Bonjour,

Je vous propose un nouvel élément à utiliser : Tri Interne COBOL

Il s'agit d'un tri interne au COBOL détaillé.



Celui-ci effectue tout d'abord le tri interne (lignes 48 - 53), appelle une procédure pour itérer sur chaque enregistrement (lignes 55 - 69), qui appelle une procédure recopiant champs par champs depuis le tri vers le fichier de sortie (lignes 71 - 90).



Ce tri n'a que très peu d’utilité sur z/OS ou System i étant donné qu'ils possèdent déjà des programmes de tri (tels que DFSORT).

Cependant, sur Windows ou Linux, il n'est pas toujours aisé de trier des données (suite sed/awk/sh sur Linux) !

Ce programme permet donc d'effectuer un tri simple en amont pour tester une application plus complexe sur ces systèmes (en appelant le programme de tri "avant" l'application).



Le fichier d'exemple associé au code est fourni.

Sur TinyCOBOL, le fichier de sortie contiendra des caractères '\0' au lieu d'espaces.

C'est normal, il ne fait pas hésiter à remplacer la ligne 82 (MOVE SPACES TO OUT-REC) par celle-ci :

MOVE ' ' TO OUT-REC





Merci à Hédhili Jaïdane pour son aide.

Qu'en pensez-vous ?