Créer un espace pour stocker des données en COBOL
Retour aux explications sur la structure d'un programme.
Quand vous faites des calculs à la main, vous utilisez un papier pour poser vos opérations. En COBOL, c’est la même chose : il faut un endroit pour poser les valeurs, les noms et les informations que le programme va utiliser ou mémoriser. Cet endroit s’appelle WORKING-STORAGE.
La section WORKING-STORAGE est comme une feuille de brouillon que vous préparez avant de lancer vos calculs. Vous y déclarez toutes les variables dont vous aurez besoin dans votre programme.
Déclaration d'une variable
Déclarer une variable en COBOL, c’est lui donner un nom, une taille, et un type. Par exemple :
WORKING-STORAGE SECTION. 01 MONTANT PIC 9(3) COMP.
Dans cet exemple, on déclare une variable appelée MONTANT capable de contenir des nombres jusqu’à 999. Le mot-clé COMP (abréviation de COMPUTATIONAL) signifie que cette variable est optimisée pour les calculs.
Un exemple de calcul étape par étape
Voici un exemple de programme complet :
IDENTIFICATION DIVISION. PROGRAM-ID. CalculSimple. ENVIRONMENT DIVISION. DATA DIVISION. WORKING-STORAGE SECTION. 01 RESULTAT PIC 9(3) COMP. PROCEDURE DIVISION. DEBUT. MOVE 10 TO RESULTAT. ADD 5 TO RESULTAT. SUBTRACT 3 FROM RESULTAT. DIVIDE 2 INTO RESULTAT. DISPLAY RESULTAT. STOP RUN.
Explication ligne par ligne
MOVE 10 TO RESULTAT: on initialise la variable avec 10.ADD 5 TO RESULTAT: on ajoute 5 → valeur = 15.SUBTRACT 3 FROM RESULTAT: on soustrait 3 → valeur = 12.DIVIDE 2 INTO RESULTAT: on divise par 2 → valeur = 6.DISPLAY RESULTAT: on affiche le résultat final.
Pourquoi utiliser WORKING-STORAGE ?
Ce segment permet de mémoriser des données que vous souhaitez conserver tout au long de l’exécution du programme. C’est comme un carnet dans lequel vous notez ce que vous ne voulez pas oublier.
Téléchargez le code source : 🔍 Voir dans un nouvel onglet | 📥 Télécharger le fichier
WORKING-STORAGE.