Exercice 2 : accept

Micro-exercice

Objectif : utiliser l’instruction ACCEPT pour récupérer une saisie, la stocker dans une variable, puis l’afficher avec DISPLAY . Cet exercice vous apprend le réflexe “entrée → variable → sortie”.

Ce que vous pratiquez

  • Déclarer une variable texte en WORKING-STORAGE .
  • Lire une saisie au clavier avec ACCEPT .
  • Afficher une réponse claire avec DISPLAY .

Repère sur les colonnes

  • Zone A : colonnes 8 à 11 (ici, 7 espaces avant divisions et déclarations).
  • Zone B : colonnes 12 à 72 (ici, 11 espaces avant les instructions).

Le code est affiché en <pre>, donc les espaces sont conservés et l’alignement reste visible.

Exemple minimal COBOL Format fixe
Télécharger le code 
       IDENTIFICATION DIVISION.
       PROGRAM-ID. EXO-ACCEPT-02.

       DATA DIVISION.
       WORKING-STORAGE SECTION.
       01  WS-NOM               PIC X(30) VALUE SPACES.

       PROCEDURE DIVISION.
           DISPLAY "Entrez votre nom : ".
           ACCEPT WS-NOM.
           DISPLAY "Vous avez saisi : " WS-NOM
           STOP RUN.

Ce que fait le programme

1) Il affiche une question avec DISPLAY .
2) Il attend une saisie clavier et la place dans WS-NOM grâce à ACCEPT .
3) Il ré-affiche ce qui a été saisi, pour vérifier que la variable contient la bonne valeur.
4) Il termine avec STOP RUN .

À retenir : ACCEPT stocke l’entrée dans une variable. Pour que cela fonctionne correctement, la variable doit être déclarée (ici en PIC X(30) ).

Votre micro-exercice

Faites ces 3 modifications (elles vous apprennent les bons réflexes) :

  1. Ajoutez une variable WS-VILLE (texte) et saisissez-la avec ACCEPT .
  2. Affichez ensuite : “Ville : ” puis la valeur de WS-VILLE .
  3. Changez le message d’accueil pour qu’il soit plus clair (ex : “Saisissez votre nom puis validez”).

Erreur fréquente à éviter

Déclarer une zone trop courte puis saisir un texte plus long. Exemple : PIC X(05) et l’utilisateur tape “DUPONT”. Selon l’environnement, le résultat peut être tronqué, ou contenir des espaces inattendus.

Autre piège : croire que ACCEPT “comprend” un nombre automatiquement. Pour débuter, commencez par des variables texte (PIC X(...)). Les variables numériques viendront ensuite, avec des contrôles.

Conseil : après une saisie, affichez toujours la valeur au moins une fois. Cela vous évite de chercher longtemps si la variable ne contient pas ce que vous imaginez.
Voir d’autres exemples dans l’index Retour accueil