CPF5112
Longueur d'enreg dépasse longueur de bloc pour fichier &2 de &3.
Gravité 30 · Erreur grave
Cause
Les longueurs d'enregistrement et de bloc étaient indiquées, à l'origine, pour la description de l'unité &4. L'une au moins de ces valeurs a été modifiée pour le fichier &2 de la bibliothèque &3, par une précédente commande ADDICFDEVE (Ajouter un poste unité à un fichier ICF), CHGICFDEVE (Modifier un poste unité de fichier ICF) ou OVRICFDEVE (Substituer un poste unité de fichier ICF). La longueur d'enregistrement dépasse maintenant la longueur de bloc.
Que faire
Fermez le fichier et modifiez la longueur d'enregistrement ou la longueur de bloc, de sorte que la première soit inférieure ou égale à la seconde. Renouvelez ensuite la demande.
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 |
Sur votre IBM i
Afficher la description complète du message :
DSPMSGD RANGE(CPF5112) MSGF(QSYS/QCPFMSG)
L'intercepter dans un programme CL, quand il est envoyé comme message d'échappement :
MONMSG MSGID(CPF5112) EXEC(DO)
/* traitement de l'erreur */
ENDDO