COBOL - Tri Interne

Il s'agit d'un tri interne au COBOL détaillé.
Le fichier d'exemple associé au code est fourni.

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).

Sur TinyCOBOL, le fichier de sortie contiendra des caractères '\0' au lieu d'espaces.
C'est normal, il ne faut pas hésiter à remplacer la ligne 82 (<i>MOVE SPACES TO OUT-REC</i>) par celle-ci :
Merci à Hédhili Jaïdane pour son aide.