IDENTIFICATION DIVISION.
PROGRAM-ID.EXO1.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
77 Z1 PIC X(10).
77 Z2 PIC X(10).
PROCEDURE DIVISION.
DEBUT.
DISPLAY
"Entrez une valeur pour zone".
MOVE
SPACES TO Z1.
ACCEPT
Z1.
MOVE Z1 TO Z2.
DISPLAY Z2.
STOP
RUN.
Ce programme s'appelle EXO1. Son principe est de définir deux
variables Z1 et Z2, de saisir une valeur dans Z1 puis de la mettre dans
Z2. Pour finir on affiche Z2.
Ce premier paragraphe permet d'identifier le programme pour l'utilisateur
en indiquantle nom du programme, le nom de l'auteur, la date de création
etc...
Tout cela s'écrit en colonne 8.
Retour au programme.
Ce terme sert à nommer le programme, il est suivi de son nom.
Retour au programme.
Ce deuxième paragraphe contient une description sommaire de la
configuration du calculateur utilisé ainsi que des informations
relatives à la gestion des entrées-sorties, aux conditions
spéciales de traitement des fichiers.
Retour au programme.
Ce troisième paragraphe est divisé en plusieurs sections.
Il permet de définir toutes les données utiles au programme:
-Fichiers manipulés par le programme
-Données internes comme les variables, les vecteurs etc...
Les trois sections les plus utilisées sont:
-FILE SECTION
-WORKING-STORAGE SECTION
-LINKAGE SECTION
Cette section permet de déclarer les variables internes au programme.
Retour au programme.
77 permet de déclarer une variable.
Z1 correspond à son nom.
PIC permet de donner son type d'image.
X représente le type d'image alphanumérique.
(10) correspond à la taille de la variable.
(Cf: Chapitre II "Les différentes déclarations")
Retour au programme.
Le programmeur y décrit le traitement à effectuer par
le calculateur. C'est donc le lieu de la traduction de l'algorithme conçu
par le programmeur. Le programme ainsi défini s'écrit en
colonne 12.
Retour au programme.
Il s'agit d'une étiquette. On en utilisera de manière
à faire des boucles ou pour donner les noms des fonctions et procédures
de notre programme.
Retour au programme.
Commande qui permet d'afficher à l'écran.
Retour au programme.
Cette commande permet de faire une affectation.
Exemple:
MOVE SPACES TO Z1.
Cela met des espaces dans la variable Z1.
MOVE Z1 TO Z2.
Cela met le contenu de la variable Z1 dans la variable Z2.
Cette commande permet de saisir queque chose au clavier et de le mettre
dans une variable.
Retour au programme.
Cette commande marque la fin du programme.
Retour au programme.