Ces variables sont en mĂ©moire tant que le programme tourne. Elles permettent de stocker des donnĂ©es temporaires, des valeurs intermĂ©diaires, des constantes, ou encore des zones dâaffichage ou de calcul.
 WORKING-STORAGE  SECTION : structure et utilité
La  WORKING-STORAGE  SECTION est une sous-partie de la  DATA  DIVISION dans un programme  COBOL . Elle sert Ă dĂ©clarer toutes les variables utilisĂ©es durant lâexĂ©cution du programme.
Ces variables sont en mĂ©moire tant que le programme tourne. Elles permettent de stocker des donnĂ©es temporaires, des valeurs intermĂ©diaires, des constantes, ou encore des zones dâaffichage ou de calcul.
 DATA DIVISION.
 WORKING-STORAGE SECTION.
    01 NOM-CLIENT PIC X(30).
    01 MONTANT PIC 9(5)V99.
Ici :
 NOM-CLIENT est une chaßne de 30 caractÚres (alphanumérique) MONTANT est une variable numérique avec 5 chiffres avant la virgule et 2 aprÚs
Chaque variable commence par un niveau (souvent  01 ) :
 01 ADRESSE-CLIENT.
    05 RUE PIC X(25).
    05 CODE-POSTAL PIC X(5).
    05 VILLE PIC X(20).
Cela permet de regrouper logiquement des champs, et dâagir soit sur le groupe complet ( ADRESSE-CLIENT ), soit sur chaque champ sĂ©parĂ©ment.
 WORKING-STORAGE ? PRIX-TTC ,  SOMME , etc.) FIN-FICHIER ,  ERREUR-LECTURE ) MESSAGE-INFO )
 01 MESSAGE-ACCUEIL PIC X(50) VALUE "Bienvenue dans lâapplication COBOL".
Cela Ă©vite dâĂ©crire une instruction  MOVE dans la  PROCEDURE  DIVISION .
 NOM-CLIENT ,  DATE-PAIEMENT  X1 ou  AÂ
La  WORKING-STORAGE  SECTION est :
Dans les prochaines sections, vous verrez comment affiner la déclaration des variables avec les clauses  VALUE ,  REDEFINES ,  FILLER et bien plus encore.