Génération des programmes de formatage des fichiers

Sur demande, MODCOB2000 construit un programme COBOL en format texte ASCII en exploitant l'ancienne et la nouvelle description des enregistrements de fichiers; toutes les rubriques des enregistrements sont recopiées; les nouvelles rubriques “Année” sont complétées avec la constante “19” placée à gauche.

Cette fonction est disponible dans le Menu Sources-Cobol, après contrôle de la Procédure division.

Avant de demander la génération, assurez-vous que la description de l'enregistrement du fichier à formater (niveau FD) est suffisamment détaillée pour que le “mappage” des zones input et output soit complet (en particulier en ce qui concerne les dates).

Comment fonctionne le générateur de COBOL ?

- L'entête du programme (jusqu'à la ligne “FILE-CONTROL” incluse) provient d'un fichier texte que vous pouvez modifier (le Bouton “Modifier entête Cobol” active le programme NOTEPAD du répertoire Windows).
 

- La clause SELECT du fichier à traiter est incluse dans le programme généré; les Clauses ACCESS autres que SEQUENTIAL sont supprimées.

- Une clause SELECT standard est incluse pour le fichier à créer au nouveau format (même nom préfixé N).
 

- La description d'enregistrement (Clause FD, niveau 01 et sous-niveaux) du programme origine est incluse en début de DATA DIVISION.

- La description d'enregistrement du fichier de sortie est générée à partir de la précédente (même noms de données préfixés N), en tenant compte des nouveaux formats des zones dates.
 

- La WORKING-STORAGE SECTION comporte les rubriques nécessaires au “mappage” des zones dates, et des descriptions d'indices permettant de traiter les tables à une ou deux dimensions décrites dans les enregistrements.
 
 

- La PROCEDURE DIVISION générée consiste en un traitement de recopie de tous les enregistrements du fichier IN vers le fichier OUT avec transfert des zones élémentaires une à une.

-

- En ce qui concerne les zones dates, le mappage est conditionné par le contenu de la zone (différent de SPACE pour les dates Alphanumériques et de ZERO pour les numériques) et dans ce cas, les 2 positions supplémentaires sont initialisées à “19”

S'il y a lieu, le générateur vous demandera de préciser le nouveau format des dates globales (JJMM19AA ou 19AAMMJJ)

- Le programme généré est sauvé dans le répertoire et sous le nom de votre choix; le nom attribué par défaut pour le formatage du fichier FICGEDT1 serait FICGEDT1.PRG.

Remarque importante : Dans la plupart des cas, le programme généré est utilisable sans modification ; cependant, si vous utilisez des fichiers dont l'accès est géré avec une clé externe à l'enregistrement (cas des fichiers relatifs par exemple), il conviendra de compléter le programme pour gérer cette clé.

-