Aller au contenu

Message d'erreur IBM i (AS/400)

CPF1302

Le journal de comptabilité du système ne peut pas recevoir de données. Code raison : &1.

Gravité 80 · Alerte système

Cause

Le journal de comptabilité du système QACGJRN dans la bibliothèque QSYS ne peut pas recevoir de données de comptabilité. Voici la signification des différents codes raison :

  • 1)Le journal n'a pas été trouvé.
  • 2)L'espace disponible dans le récepteur de journal associé est insuffisant pour la donnée reçue.
  • 3)Le journal est endommagé.
  • 4)Le récepteur associé au journal est endommagé.
  • 5)Le numéro de séquence du journal dépasse le maximum admis.
  • 6, 8, 9)Incident relatif au journal.
  • 10)Un nouveau récepteur doit être associé à ce journal à l'aide de la commande CHGJRN (Modifier un journal) pour que des postes puissent y être consignés.

Que faire

Arrêtez d'abord la fonction de comptabilité en associant la valeur système de niveau de comptabilité (QACGLVL) à *NONE (commande CHGSYSVAL). En fonction du code raison, effectuez ensuite l'une des opérations suivantes pour corriger l'erreur :

  • 1) Si le journal est introuvable, créez le récepteur de journal (commande CRTJRNRCV), puis créez le journal QACGJRN (commande CRTJRN) dans la bibliothèque QSYS.
  • 2 et 5) : Si l'espace du récepteur est insuffisant ou que le numéro de séquence est trop élevé (raison 5), modifiez le récepteur de journal (commande CHGJRN) et, s'il y a lieu, le numéro de séquence.
  • 3, 4, 6, 8 et 9) : Si la modification du journal ou du récepteur associé ne permet pas de résoudre l'incident, ou que le journal ou le récepteur de journal nécessite une procédure de reprise, utilisez la commande WRKJRN (Gérer la journalisation).
  • 10) : Modifiez le récepteur associé au journal (commande CHGJRN). Lancez la fonction de comptabilité en associant la valeur système de niveau de comptabilité (QACGLVL) au niveau de votre choix (commande CHGSYSVAL).

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 *BIN 2

Sur votre IBM i

Afficher la description complète du message :

DSPMSGD RANGE(CPF1302) MSGF(QSYS/QCPFMSG)

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

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