CPF4381

Impossible d'ouvrir le fichier avec le paramètre SHARE(*NO).

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

Cause

Une substitution a été créée pour ouvrir le fichier avec SHARE(*NO), ce qui est incorrect.

Que faire

Créez une substitution pour ouvrir le fichier avec SHARE(*YES), ou n'indiquez pas le paramètre SHARE dans la substitution afin que la valeur SHARE(*YES) soit utilisée par défaut.

Sur votre IBM i

Afficher la description complète du message :

DSPMSGD RANGE(CPF4381) MSGF(QSYS/QCPFMSG)

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

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