Message d'erreur IBM i (AS/400)
CPF7052
Erreur de sélection/omission dans fichier logique sur membre &3.
Gravité 40 · Fin anormale du programme ou de la fonction
Cause
Une erreur de sélection ou d'omission s'étant produite pour un enregistrement d'un fichier logique comprenant le membre &3 du fichier &1 de la bibliothèque &2, l'application ou le retrait de postes journalisés a échoué pour le récepteur de journal &4, bibliothèque &5, numéro de séquence &8. Le code raison est &7. Codes raison : 1
- Des données sont dans une zone décimale non admise. 2
- Une erreur liée au programme de sélection/omission s'est produite. Les données d'une zone de sélection/omission sont incompatibles avec les spécifications de même type. 3
- Une erreur s'est produite lors de l'appel d'un programme de sélection/omission. 4
- Une comparaison a été tentée dans une zone en virgule flottante ne contenant pas de nombre.
Que faire
Identifiez, avec la commande DSPDBR, tous les membres de fichier logique contenant le membre &3 du fichier &1 de la bibliothèque &2, et ouvrez-les. A l'ouverture, les messages de diagnostic doivent indiquer quels enregistrements contiennent des erreurs de sélection/omission. Corrigez les erreurs, puis relancez la demande en précisant, dans le paramètre FROMENTLRG ou le paramètre FROMENT, le numéro de séquence du poste dans lequel le traitement a échoué.
Variables du message
Quand le système envoie le message, chaque variable est remplacée par une valeur réelle : un nom d'objet, de bibliothèque, un code...
| Variable | Type | Longueur |
|---|---|---|
| &1 | *CHAR |
10 |
| &2 | *CHAR |
10 |
| &3 | *CHAR |
10 |
| &4 | *CHAR |
10 |
| &5 | *CHAR |
10 |
| &7 | *BIN |
2 |
| &8 | *UBIN |
8 |
Sur votre IBM i
Afficher la description complète du message :
DSPMSGD RANGE(CPF7052) MSGF(QSYS/QCPFMSG)
L'intercepter dans un programme CL, quand il est envoyé comme message d'échappement :
MONMSG MSGID(CPF7052) EXEC(DO)
/* traitement de l'erreur */
ENDDO