Aller au contenu

CPF70CB

Identificateur de journal &2 en cours d'utilisation.

Gravité 40 · Fin anormale du programme ou de la fonction

Cause

Une demande de lancement de journal a été faite pour l'objet &3 de la bibliothèque &4, membre &5 du type *&9 ou contient un ID fichier &11 et un chemin d'accès &13. L'identificateur de journal utilisé précédemment pour l'objet était &2, mais il est à présent utilisé par l'objet &6 de la bibliothèque &7, membre &8 du type *&10 ou a un ID-fichier &12 et un chemin d'accès &14. Si la demande de lancement de journal est liée à l'objet en cours de restauration, le nouvel ID journal &1 a été associé à l'objet &3 de la bibliothèque &4, membre &5 du type *&9 ou possède un ID fichier &11 et un chemin d'accès &13. Si *N ou un zéro hexadécimal s'affiche pour ces zones, les informations de cette zone ne sont pas applicables.

Que faire

Si l'incident s'est produit lors de l'application des modifications du journal (commande APYJRNCHG), arrêtez la journalisation (commandes ENDJRN, ENDJRNOBJ, ENDJRNPF, ENDJRNAP, ENDJRNLIB) de l'objet qui utilise actuellement l'identificateur de journal &2, puis renouvelez votre demande. Si l'incident s'est produit lors de la restauration d'un objet et si un nouvel ID journal est inadmissible, arrêtez la journalisation de l'objet qui utilise actuellement l'identificateur de journal &2 et renouvelez votre demande. REMARQUE : Si un nouvel ID journal est autorisé, alors les postes antérieurs de l'objet ne seront pas appliqués via la commande APYJRNCHG. L'objet qui utilise l'ID journal &2 est l'objet &6 de la bibliothèque &7, membre &8 du type *&10 ou a un ID fichier &12 et un chemin d'accès &14.

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...

VariableTypeLongueur
&1 *HEX 10
&2 *HEX 10
&3 *CHAR 10
&4 *CHAR 10
&5 *CHAR 10
&6 *CHAR 10
&7 *CHAR 10
&8 *CHAR 10
&9 *CHAR 7
&10 *CHAR 7
&11 *HEX 16
&12 *HEX 16
&13 *CHAR variable
&14 *CHAR variable

Sur votre IBM i

Afficher la description complète du message :

DSPMSGD RANGE(CPF70CB) MSGF(QSYS/QCPFMSG)

L'intercepter dans un programme CL, quand il est envoyé comme message d'échappement :

MONMSG MSGID(CPF70CB) EXEC(DO)
  /* traitement de l'erreur */
ENDDO