CPF7030
Objet de type *&3 déjà journalisé.
Gravité 40 · Fin anormale du programme ou de la fonction
Cause
Vous avez tenté de lancer la journalisation d'un objet qui est déjà en cours de journalisation dans le journal &6 de la bibliothèque &7. Si l'objet est de type objet du système de fichiers intégré, vous avez tenté de démarrer la journalisation de l'objet &5 possédant l'ID fichier &4. Si l'objet appartient à un autre type, vous avez tenté de démarrer la journalisation de l'objet &1 de la bibliothèque &2. Si *N ou un zéro hexadécimal s'affiche pour ces zones, ces informations ne sont pas applicables.
Que faire
Si l'objet est journalisé dans le même journal avec les mêmes attributs de journalisation, aucun rétablissement n'est nécessaire. Si l'objet est journalisé dans un journal différent, arrêtez la journalisation, puis relancez-la. Si l'objet est journalisé dans le journal spécifié, mais que ses attributs de journalisation sont différents, utilisez la commande CHGJRNOBJ pour modifier les attributs de journalisation dudit objet.
Description technique
Utilisez la commande Afficher la description d'un objet (DSPOBJD), la commande Afficher la description d'une bibliothèque (DSPLIBD) ou la commande Gérer les liens d'objet (WRKLNK) pour déterminer dans quel journal l'objet est journalisé et quels sont ses attributs de journalisation.
Use the Display Object Description (DSPOBJD) command, Display Library Description (DSPLIBD) command, or the Work with Object Links (WRKLNK) command to see what journal the object is journaled to and what its journaling attributes are.
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 |
7 |
| &4 | *HEX |
16 |
| &5 | *CCHAR |
variable |
| &6 | *CHAR |
10 |
| &7 | *CHAR |
10 |
Sur votre IBM i
Afficher la description complète du message :
DSPMSGD RANGE(CPF7030) MSGF(QSYS/QCPFMSG)
L'intercepter dans un programme CL, quand il est envoyé comme message d'échappement :
MONMSG MSGID(CPF7030) EXEC(DO)
/* traitement de l'erreur */
ENDDO