C’est dans cette section que sont effectuées les déclarations de fichiers en entréesortie.
Cette déclaration est effectuée à l’aide d’un paragraphe appelé File-control, il met en
avant une instruction clé dans Cobol qui est la déclaration des fichiers à l’aide de la clause
SELECT. Cette déclaration est assujettie à deux remarques relatives : les normes employées
pour définir les noms – interne et externe – logiques des fichiers et l’utilisation du FILE
STATUS représentant l’état du fichier.
Chaque fichier de l’application DIALOG est rattaché à un code produit et assure une
fonctionnalité précise, c’est ainsi qu’une phrase utilisant la clause select utilise 2 noms de
fichiers : un nom interne au programme Cobol et un nom externe au programme Cobol – c’est
le nom utilisé dans le script servant à l’exécution du programme Cobol -. Pour DIALOG ces
deux noms sont identiques et doivent respecter la codification PRDFXXXV :
· PRD comme le code produit concerné – exemple DZE –
· F comme fichier
· XXX comme une valeur sur trois caractères
· V comme la version
Une condition supplémentaire est que le nom de fichier ne doit pas exister. La gestion
du code retour, matérialisé par le FILE STATUS, est systématique pour chaque fichier utilisé
pour un programme donné. Un test de valeur est effectué pour chaque instruction fichier :
· Ouverture et Fermeture
· Ordre de lecture et mise à jour
Tout code retour ne correspondant pas à une situation normale stoppe le programme en
allant à un paragraphe appelé 999-000-GEST-ERR – ce paragraphe représente en fait une
fonction de traitement des anomalies rencontrées dans le programme -. Le nom donné au
FILE STATUS se compose d’une partie constante et d’une partie variable :
· Constante : WSTA-
· PRDFXXXV dont les valeurs correspondent aux noms internes Cobol.
Ci-dessous une présentation de la section d’entrée-sortie :
Page suivante : II-3 Division Données
Retour au menu : Open Groupe