Explication du S001:
ERREUR MATERIELLE OU LOGICIELLE LORS D’UN ACCES FICHIER.
Cette erreur se produit à la suite d’un ordre de lecture ou d’écriture.
Cause: la longueur du bloc indiqué dans le DCB ne correspond pas à celle du fichier -> souvent mauvais lien entre ddname et assign cobol.
Pour information :
Un return code est fourni dans le registre 15 :
00
Explications:
LRECL ou BLKSIZE indiqués dans le programme ne correspondent pas à ceux de l’étiquette du fichier
Solutions:
Vérifier programme et JCL
Autres informations:
La longueur d’enregistrement et la taille de bloc fournies dans le programme ou dans la carte DD sont différentes de celles trouvées dans les labels du fichier.
01
Explications:
Erreur d’entrée-sortie (écriture sur un fichier ouvert en lecture, lecture d’un fichier ouvert en écriture, lecture après la fin du fichier, format RECFM=U et pas de LRECL, fichiers de caractéristiques différentes dans une concaténation).
Solutions:
Recréer si nécessaire le fichier.
Autres informations:
Tentative d’écriture d’un fichier ouvert en INPUT.
Tentative de lecture d’un fichier ouvert en OUTPUT.
Tentative de lecture après une fin de fichier.
Pour une concaténation, le BLKSIZE d’un des fichiers est supérieur au BLKSIZE des fichiers précédents.
Les BLKSIZE d’une concaténation doivent être présentés en ordre décroissant.
Note:
Pour plus d’information sur l’ABEND S001 se référer au message IEC020I.
02
Explications:
Erreur lors de la fermeture du fichier.
Solutions:
03
Explications:
Erreur d’entrée sortie QSAM.
Solutions:
Autres informations:
Data check ou equip check.
04
Explications:
Erreur d’entrée sortie (taille de bloc inattendue).
Solutions:
Autres informations:
Pour un fichier ouvert en INPUT, incompatibilité entre les paramètres du DSCB donnés dans le programme ou sur la carte DD et ceux trouvés dans les labels.
05
Explications:
Lecture après la fin du fichier en QSAM.
Erreur lors d’un accès à un fichier séquentiel QSAM, BSAM ou DA.
Solutions:
Autres informations:
Lecture d’un fichier après être passé sur la clause AT END (Fin fu fichier)