COBOL - Appareillage de deux fichiers

[BernardBZH]

Bonjour,

L'appareillage de deux fichiers séquentiels de structures différentes et ayant une même clef de comparaison afin d'en produire un troisième est un exercice fréquent en COBOL.

Vous trouverez ci-joint un petit modèle (éprouvé) qui devrait vous permettre de produire rapidement une solution propre.

Bon courage aux novices.

[Luc Orient]

J'avoue ne pas comprendre l'algorithme sous-jacent à ton programme COBOL

Mon problème est le suivant :
Pourquoi avoir conditionné la sortie de la boucle principale du programme par la seule fin du fichier FICIN001 ?

En effet, si la clé du dernier enregistrement de ce fichier est inférieure à la clé du dernier enregistrement de l'autre fichier (FICIN002) que va-t-il se passer, ou, en d'autres termes, si le premier fichier se termine "avant" le second fichier ?

Notamment, pour le cas particulier où le fichier FICIN001 est vide alors que le fichier FICIN002 ne l'est pas ?

Merci de bien vouloir m'éclairer ...

[BernardBZH]

Bonjour,

Tu as entièrement raison dans l'absolu Luc.

Pour être tout à fait clair, j'aurais dû préciser que, dans tous les cas fonctionnels (banque, assurance, industrie automobile ...) où j'ai eu à utiliser ce type de programme, le fichier FICIN001 était dit "fichier maître" et que le second fichier servait à enrichir les données correspondantes dans le premier. En cas de fichier FICIN001 vide, on plantait la chaîne de traitement ou on laissait courir. Idem dans le cas où FICIN001 se terminait avant FICIN002 : les enregistrements "excédentaires" du second fichier étaient passés aux oubliettes.

Pour être tout à fait exhaustif et propre, il faut conditionner la fin de traitement à la fin des deux fichiers et produire trois fichiers : un avec les enregistrements dont les clefs sont communes aux deux fichiers (le cas de mon exemple), un avec les enregistrements dont les clefs sont présentes dans FICIN001 et pas dans FICIN002 et un avec les enregistrements dont les clefs sont présentes dans FICIN002 et pas dans FICIN001.

Je laisse à chacun le soin d'adapter le modèle de base.

[jpiotrowski]

Il y a deux familles de programmes d'appareillage de fichiers :

1) les relations 1 enregistrement maître : 0 à 1 enregistrement secondaire
2) les relations 1 enregistrement maître : 0 à n enregistrements secondaires

Le premier type est simple : en cas d'égalité sur les critères de rapprochement, on relit les deux fichiers, mais le second oblige à gérer une boucle sur le fichier secondaire.

Il y a deux catégories techniques de problèmes à gérer :
1) les fins de fichiers
2) le rapprochement des fichiers sur une données (ou plusieurs données, par forcément contigües)

Il faut penser aux cas spéciaux :
- fichier vide
- secondaire sans principal correspondant

Et que faire
- planter : simple, radical, voire franchement bestial, et peut bloquer à tort des milliers de jobs toute une nuit
- pas planter : faire un fichier des rejets, et pouvoir les traiter; dans ce cas tous les programmes doivent pouvoir gérer le célèbre cas du fichier vide (qui a toussé dans la salle ?)

Exemple de table de vérité pour le second type de rapprochement, sous forme de tableau Excel.

[el_slapper]

3) les relations 1 à n enregistrements maîtres : 0 à n enregistrements secondaires.

J'ai eu à faire une fois, pour un rapprochement sur clefs partielles.

Pas si dur, il faut juste stocker les enregistrements maitres, et faire une rupture sur changement de clefs, stocker les enregistrements secondaires, faire là aussi une rupture sur changement de clef, puis mouliner le stock.