CPF5139
L'opération de modification de la fin des données a échoué.
Gravité 50 · Fin anormale du travail
Cause
La modification de la fin des données a échoué pour le membre &4 du fichier &2, dans la bibliothèque &3 (code raison &6). Voici les différents codes raison possibles : 1 - Il s'agit d'un fichier physique avec clé, ouvert pour un traitement séquentiel sur clé. 2 - Le fichier a été ouvert pour le traitement de tous ces membres. 3 - Le fichier a été ouvert pour le contrôle de validation.
Que faire
Selon le code raison, effectuez l'une des opérations suivantes : 1 - Lancez la commande OPNDBF (Ouvrir un fichier base de données) en indiquant la valeur *ARRIVAL au paramètre ACCPTH, puis la commande OVRDBF (Substituer un fichier base de données) en précisant SHARE(*YES). Renouvelez ensuite l'opération. 2 - Utilisez la commande OVRDBF et indiquez un nom de membre unique, *FIRST ou *LAST au paramètre MBR, ou la commande DLTOVR (Supprimer une substitution) pour enlever la valeur *ALL du paramètre MBR. Relancez ensuite l'opération. Exécutez la commande DSPOVR (Afficher les substitutions) pour afficher les substitutions appliquées actuellement au fichier. 3 - Assurez-vous que le fichier n'est pas ouvert sous contrôle de validation. Si ce n'est pas le cas, indiquez *NO au paramètre COMMIT, puis relancez l'opération.
Description technique
Le message CPF5139 est envoyé chaque fois que l'opération de modification de fin de données échoue à cause d'un problème lié à la façon dont le fichier indiqué a été ouvert.
Message CPF5139 is sent whenever the change end of data operation fails, because of a problem with how the specified file was opened.
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 |
|---|---|---|
| &2 | *CHAR |
10 |
| &3 | *CHAR |
10 |
| &4 | *CHAR |
10 |
| &6 | *BIN |
2 |
Sur votre IBM i
Afficher la description complète du message :
DSPMSGD RANGE(CPF5139) MSGF(QSYS/QCPFMSG)
L'intercepter dans un programme CL, quand il est envoyé comme message d'échappement :
MONMSG MSGID(CPF5139) EXEC(DO)
/* traitement de l'erreur */
ENDDO