CPF8A0A
Ajout du pgm d'exit au document &2 du dossier &1 impossible.
Gravité 40 · Fin anormale du programme ou de la fonction
Cause
Le document &2 du dossier &1 contient déjà le programme d'exit &5 dans la bibliothèque &6. Si le nom de dossier a la valeur *NONE ou *INTDOC, &2 est un nom d'objet système. Si le nom de dossier a la valeur *INTDOC, le document n'est pas un document classé et ne figure pas dans un dossier.
Que faire
Supprimez le programme d'exit existant, puis renouvelez la demande.
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 |
63 |
| &2 | *CHAR |
20 |
| &5 | *CHAR |
10 |
| &6 | *CHAR |
10 |
Sur votre IBM i
Afficher la description complète du message :
DSPMSGD RANGE(CPF8A0A) MSGF(QSYS/QCPFMSG)
L'intercepter dans un programme CL, quand il est envoyé comme message d'échappement :
MONMSG MSGID(CPF8A0A) EXEC(DO)
/* traitement de l'erreur */
ENDDO