Tous les articles par Mr COBOL

File Status 46

Explications du File Status 46:

Erreur en lecture séquentielle car :

1 – START mal exécuté

2 – le READ précèdent s’est mal exécuté en provoquant ou non une erreur de fin de fichier (File status 10 ou 14).

Solutions:

File Status 44

Explications du File Status 44:

WRITE ou REWRITE avec une longueur de record erroné, en particulier en dehors des limites inférieures et supérieures pour un fichier variable.

Causes possibles :
Tentative d’ECRITURE ou de REECRITURE d’un enregistrement plus grand que le plus grand ou plus petit que le plus petit enregistrement autorisé par la clause RECORD IS VARYING du fichier associé.
Tentative de REWRITE d’un enregistrement dans un fichier et l’enregistrement n’a pas la même taille que l’enregistrement remplacé.

Solutions:

File Status 39

Explications du File Status 39:

Incohérence entre la description COBOL du fichier et ses caractéristiques réelles.

Un conflit a été détecté entre les attributs de fichier réels et les attributs spécifiés pour le fichier dans le programme.
Cela est généralement dû à un conflit avec la longueur d’enregistrement, la longueur de clé, la position de clé ou l’organisation du fichier.

Les autres causes possibles sont :
1. Les index alternatifs ne sont pas correctement définis (longueur ou position de la clé, doublons ou paramètres épars) .
2. Le mode d’enregistrement est Variable ou Fixe ou n’est pas défini comme lors de la création du fichier.
3. Pour les fichiers avec des enregistrements de longueur variable, les longueurs d’enregistrement minimum et maximum pour le fichier réel peuvent ne pas correspondre aux longueurs d’enregistrement minimum et maximum utilisées par le programme.

Solutions:

Vérifier :

– l’organisation du fichier

– la taille du record

– le type de fichier (fixe ou variable)

– la clé primaire

– les clés secondaires

File Status 37

Explications: du File Status 37

Un OPEN dans un mode (INPUT, OUTPUT, EXTEND, I-O) incompatible avec les caractéristiques du fichier

Solutions:

Par exemple: OPEN INPUT sur un fichier en NEW dans le JCL

File Status 35

Explications du File Status 35:

Erreur à l’ouverture d’un fichier en éciture (OPEN INPUT, I-O ou EXTEND).

Une opération OPEN avec les phrases IO, INPUT ou EXTEND a été tentée sur un fichier non OPTIONNEL qui n’est pas présent. Tentative d’ouverture d’un fichier qui n’existe pas.
Il peut être nécessaire de mapper le nom de fichier COBOL au nom de fichier physique. (Micro Focus, reportez-vous à la directive ASSIGN(EXTERNAL)).

Solutions:

au moins 1 enregistrement doit être présent pour un open I-O

File Status 34

Explications du File Status 34:

Erreur en écriture de fichier: dépassement des limites du fichier (lié à un abend SB37).

Adressage hors des limites du fichier.

Solutions et exemples: