Un littéral numérique représente un nombre entier ou décimal. Il est utilisé pour : Initialiser une variable Faire des calculs Tester une condition
Dans un programme COBOL , un littéral est une valeur constante que vous écrivez directement dans votre code. Les littéraux peuvent être de plusieurs types :
Un littéral numérique représente un nombre entier ou décimal. Il est utilisé pour :
MOVE 100 TO MONTANT.
COMPUTE TOTAL = PRIX * 2.
IF AGE > 18 DISPLAY "Majeur".
Le nombre est directement inscrit dans l'instruction. Aucun guillemet n'est nécessaire pour les littéraux numériques.
Ce sont des chaînes de caractères entourées de guillemets. On les utilise pour :
DISPLAY IF
MOVE "COBOL" TO NOM-LANGAGE.
DISPLAY "Bienvenue utilisateur".
IF CIVILITE = "MR" DISPLAY "Bonjour monsieur".
Ce sont des mots-clés spéciaux reconnus par COBOL qui représentent une valeur bien définie. Les plus utilisés sont :
ZERO , ZEROS ou ZEROES SPACE ou SPACES HIGH-VALUE ou LOW-VALUE
MOVE ZERO TO TOTAL-LIGNES.
MOVE SPACES TO NOM-CLIENT.
IF CHAMP = HIGH-VALUE DISPLAY "Fin de plage".
Les littéraux figuratifs sont très utiles pour initialiser proprement une variable ou tester des cas extrêmes.
| Type | Syntaxe | Utilisation |
|---|---|---|
| Numérique | 100, 45.75 |
Calculs, montants, âges, quantités |
| Alphanumérique | "Bienvenue" |
Messages, noms, libellés |
| Figuratif | ZERO, SPACES |
Initialisation, effacement, comparaisons extrêmes |
ZERO plutôt que 0 pour l’init d’un champ numérique SPACES plutôt que " " pour effacer une chaîne
Les littéraux sont indispensables dans tout programme COBOL . Ils permettent :