Aller au contenu

Message d'erreur IBM i (AS/400)

CPF8351

Contrôle de validation déjà actif.

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

Cause

La commande STRCMTCTL a été lancée pour démarrer le contrôle de validation pour la définition de validation &1 alors qu'il était déjà actif.

Que faire

Si la définition de validation indiquée dans ce message est *JOB et si CMTSCOPE(*JOB) et a été spécifiée dans une commande STRCMTCTL, utilisez la commande ENDCMTCTL pour arrêter le contrôle de validation, puis relancez ce dernier. Si la définition de validation indiquée dans ce message est *JOB et si CMTSCOPE(*ACTGRP) a été spécifiée dans la commande STRCNTCTL, l'application a déjà effectué le contrôle de validation de la définition *JOB et ne peut commencer le contrôle de validation avec le paramètre CMTSCOPE(*ACTGRP). Modifiez l'application de façon à n'effectuer aucun contrôle de validation avant d'utiliser la commande STRCNTCTL avec le paramètre CNTSCOPE (* ACTGRP). Si la définition de validation indiquée dans ce message n'est pas *JOB, le contrôle de validation est déjà en cours sur le groupe d'activation . Mettez fin au contrôle de validation avec la commande ENDCNTCTL avant de faire une nouvelle tentative.

Description technique

L'identificateur de définition de validation est &2. Le numéro du groupe d'activation est &3. L'ID d'espace de verrouillage est &8. L'ID d'espace associé à l'espace de verrouillage est &9. L'XID est &10.

The commitment definition identifier is &2. The activation-group number is &3. The lock space id is &8. The lock space associated space id is &9. The XID is &10.

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 *CHAR 10
&2 *HEX 10
&3 *HEX 4
&8 *CHAR 20
&9 *BIN 2
&10 *HEX 140

Sur votre IBM i

Afficher la description complète du message :

DSPMSGD RANGE(CPF8351) MSGF(QSYS/QCPFMSG)

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

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