CPF70AF
Incident avec le programme d'exit &2/&1.
Gravité 40 · Fin anormale du programme ou de la fonction
Cause
Un incident s'est produit avec le programme d'exit &2/&1, code raison &8. Le programme d'exit est enregistré dans le point d'exit QIBM_QJO_CHG_JRNRCV. Le programme d'exit était appelé pour le journal &4/&3 et le récepteur de journal &6/&5 résidant sur l'unité ASP &7. Les codes raison sont les suivants : 1
- Le programme d'exit n'existait pas. 2 - le profil utilisateur &9 inscrit n'existait pas ou n'était pas accessible. 3
- Le programme d'exit a dépassé le délai d'attente de &10 secondes. 4
- Le programme d'exit a signalé une exception. 5
- Le référentiel de fonctions d'inscription du programme d'exit est actuellement indisponible car il est en cours de modification par un autre traitement. 6
- Une exception imprévue s'est produite lors de la configuration ou de l'appel des programmes d'exit enregistrés. La valeur *N signifie que les informations ne sont pas disponibles ou ne sont pas applicables.
Que faire
Pour le code raison 1, assurez-vous de l'existence du programme d'exit dans la bibliothèque indiquée et de sa présence dans le système ASP. Pour le code raison 2, vérifiez que le profil utilisateur indiqué dans le point d'exit QIBM_QJO_CHG_JRNRCV existe sur le système. Pour le code raison 3, le délai maximum d'exécution du programme d'exit est de &10 secondes. Il est préférable que le programme d'exit n'exécute que de courtes opérations d'exécution. Envisagez de modifier le programme d'exit pour soumettre un nouveau travail (SBMJOB) de façon à exécuter les opérations en cours dans le programme d'exit. Pour le code raison 4, envisagez de modifier le programme d'exit pour soumettre un nouveau travail (SBMJOB) de façon à exécuter les opérations en cours dans le programme d'exit. Ensuite, affichez le journal de travail (DSPJOBLOG) du travail soumis pour voir les exceptions signalées. Pour le code raison 5, aucune action supplémentaire n'est nécessaire. Le système renouvellera la demande automatiquement. Pour le code raison 6, aucune reprise n'est possible.
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 |
| &6 | *CHAR |
10 |
| &7 | *CHAR |
10 |
| &8 | *BIN |
2 |
| &9 | *CHAR |
10 |
| &10 | *BIN |
2 |
Sur votre IBM i
Afficher la description complète du message :
DSPMSGD RANGE(CPF70AF) MSGF(QSYS/QCPFMSG)L'intercepter dans un programme CL, quand il est envoyé comme message d'échappement :
MONMSG MSGID(CPF70AF) EXEC(DO)
/* traitement de l'erreur */
ENDDO