Apprenez les bases du COBOL et développez vos compétences en programmation legacy avec une approche moderne.
En COBOL, certaines clauses permettent de contrôler précisément l’affichage et l’alignement des données alphanumériques. Les mots-clés JUSTIFIED, RIGHT et FILLER permettent de gérer l'alignement à droite et la réservation d’espace dans une structure de données.
Par défaut, les chaînes alphanumériques sont alignées à gauche dans leur champ.
Avec JUSTIFIED RIGHT, elles sont alignées à droite, les espaces sont ajoutés à gauche.
01 NOM PIC X(10) JUSTIFIED RIGHT VALUE "ALAIN".
Résultat : le mot "ALAIN" sera positionné à droite dans un champ de 10 caractères :
[ ALAIN]
La clause FILLER permet de réserver un espace mémoire ou un emplacement dans une structure,
sans donner de nom à la variable. Elle est souvent utilisée pour ignorer certains caractères dans un enregistrement fixe.
01 ENREGISTREMENT.
05 NOM PIC X(10).
05 FILLER PIC X(5).
05 CODE PIC X(3).
Ici, le champ de 5 caractères est ignoré, mais bien présent dans le format. Il peut être utile pour respecter une structure de fichier.
JUSTIFIED RIGHT s’applique uniquement aux types PIC X(n).FILLER ne peut pas être référencé par le programme (pas de MOVE, DISPLAY, etc.).FILLER.JUSTIFIED RIGHT pour aligner des montants ou des noms dans des tableaux.FILLER dans des structures fixes ou des formats de fichiers imposés.
La maîtrise de JUSTIFIED et FILLER améliore la précision de vos affichages et l’adaptation de vos programmes aux formats attendus.
Ces outils sont indispensables pour traiter des fichiers structurés, réaliser des présentations soignées ou gérer des formats complexes en COBOL.