Exemple minimal
COBOL
Format fixe
Télécharger le code
IDENTIFICATION DIVISION.
PROGRAM-ID. EXO-DISPLAY-19.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-NOM PIC X(20) VALUE "MARTIN".
01 WS-AGE PIC 99 VALUE 28.
PROCEDURE DIVISION.
DISPLAY "Bonjour !"
DISPLAY "Nom : " WS-NOM
DISPLAY "Age : " WS-AGE
DISPLAY "Message : " WS-NOM " a " WS-AGE " ans."
STOP RUN.Lecture simple
DISPLAY peut afficher : un texte entre guillemets, une variable, ou plusieurs éléments à la suite. COBOL va écrire les éléments dans l’ordre.
À retenir :
DISPLAY est votre meilleur outil de compréhension.
Quand un résultat vous surprend, affichez les variables une par une pour voir ce qu’elles contiennent.
Votre micro-exercice
Faites ces 3 modifications :
- Remplacez la valeur de WS-NOM par une valeur saisie avec ACCEPT.
- Ajoutez une variable WS-VILLE et affichez “Ville : ...”.
- Affichez une phrase complète : “Bonjour NOM, vous avez AGE ans et vous vivez à VILLE.”
Erreur fréquente à éviter
Oublier les espaces dans les textes. Par exemple, écrire DISPLAY "Nom:" WS-NOM produit “Nom:MARTIN”. Le bon réflexe : ajoutez un espace dans la chaîne : "Nom : ".
Autre piège : afficher un champ non initialisé. Si vous n’avez pas mis de valeur ou de VALUE, vous pouvez afficher des espaces ou des zéros inattendus.
Conseil : pour apprendre, affichez souvent des messages courts : “Avant calcul”, “Apres calcul”, “Valeur = ...”.