Message d'erreur IBM i (AS/400)
CPF90F1
Fin anormale du répertoire de distribution du système avec code raison &1.
Gravité 40 · Fin anormale du programme ou de la fonction
Cause
Une erreur interne a été détectée dans le code du répertoire de distribution du système (code raison &1). Voici les codes raison avec leurs significations : 1 - Le format d'enregistrement n'a pas été passé à la fonction OKVARFLD PLMIMAC. 2 - Une fonction non admise a été demandée lors de la gestion des lieux ou des services du répertoire. 3 - L'ajout d'un nom à blanc a été tenté pour le lieu ou le service. 4 - Une réplication du répertoire a été demandée pour rajouter des données de lieu ou de service, mais la clé unique du lieu ou du service est à blanc. 5 - Une erreur s'est produite lors de la modification des données de lieu ou de service. Soit la clé unique du lieu ou du service est nulle, soit le nom du lieu ou du service est à blanc alors que l'horodateur indique une mise à jour. 6 - La suppression d'un lieu ou d'un service dont la clé unique est nulle a été tentée. 7 - Une fonction non admise (OSACTION) a été demandée lors de l'enregistrement d'une modification de répertoire dans l'historique des modifications (QUSRSYS/QAOKPLGA). 8 - Une clé unique a été indiquée pour le service de rattachement, mais le nom du service de rattachement était à blanc. 9 - Un responsable du service a été indiqué avec une clé unique, mais l'ID utilisateur et l'adresse de ce responsable diffèrent des données correspondantes existant dans le fichier avec la clé unique.
Que faire
Signalez l'incident (commande ANZPRB) en fonction du cas de figure.
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 |
1 |
Sur votre IBM i
Afficher la description complète du message :
DSPMSGD RANGE(CPF90F1) MSGF(QSYS/QCPFMSG)
L'intercepter dans un programme CL, quand il est envoyé comme message d'échappement :
MONMSG MSGID(CPF90F1) EXEC(DO)
/* traitement de l'erreur */
ENDDO