CPF372A

Commande INZSYS ou GO LICPGM actuellement utilisée par un autre travail.

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

Cause

Le système n'a pas pu attribuer la bibliothèque QUSRSYS, soit parce que la commande INZSYS d'initialisation du système ou la commande GO LICPGM est en cours d'exécution pour un autre travail, soit parce qu'un autre travail a déjà attribué cette bibliothèque.

Que faire

Lancez la commande WRKACTJOB (Gérer les travaux actifs) pour déterminer si INZSYS ou GO LICPGM est actuellement utilisée pour un autre travail. Si ce n'est pas le cas, servez-vous de la commande WKROBJLCK (Gérer les verrouillages d'objet) pour savoir quel travail a déjà attribué la bibliothèque QUSRSYS. Attendez que la bibliothèque soit disponible et, le cas échéant, relancez la commande.

Sur votre IBM i

Afficher la description complète du message :

DSPMSGD RANGE(CPF372A) MSGF(QSYS/QCPFMSG)

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

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