« COBOL/Structure du programme » : différence entre les versions

Contenu supprimé Contenu ajouté
Guillpetiot (discussion | contributions)
mAucun résumé des modifications
Guillpetiot (discussion | contributions)
mAucun résumé des modifications
Ligne 18 :
 
*La colonne 7 est réservée aux caractères particuliers suivants :
** '''*''' : ce qui suit doit être considéré comme un commentaire.
** '''d''' : indique que la phrase COBOL de cette ligne n'est à exécuter qu'en DEBBUGING-MODE.
** '''/''' : caractère reconnaissable par l'imprimante et commandant un saut de page dans le listing issu de la compilation.
** '''-''' : caractère de continuation d'un libellé (uniquement en WORKING-STORAGE SECTION).
** Spaceun espace : dans tous les autres cas.
 
*Les colonnes 8 à 11 incluses sont réservés commencer les noms de divisions, de sections et de paragraphes ainsi que certaines descriptions de données.
Ligne 39 :
Les 4 divisions qui composent un programme sont les suivantes :
 
* <code>IDENTIFICATION DIVISION</code>, obligatoire, stocke les caractéristiques du programme (son nom par exemple). Elle doit obligatoirement contenir la clause <code>PROGRAM-ID</code> suivie du nom que vous donnez à votre programme, ce nom servira à le référencer : d'autres programmes pourront l'utiliser ;
* <code>ENVIRONMENT DIVISION</code>, facultative, définit l'environnement dans lequel s'exécute le programme ;
* <code>DATA DIVISION</code>, facultative, sert a définir les variables utilisées par le programme ;
* <code>PROCEDURE DIVISION</code>, facultative, contient les instructions du programmes. Ces instructions sont regroupées en paragraphes, un paragraphe est formé d'un nom de paragraphe suivi d'un point, et d'une suite d'instructions, assimilées a des phrases, chaque phrase doit se terminer par un point.
 
L'identifiant du programme, les noms de paragraphes et de variables sont une suite de caractères alphanumériques, pouvant contenir des tirets (pas d'espaces ou autres caractères spéciaux).
 
La fin d'un programme est signalée par la phrase <code>END PROGRAM</code> suivie du nom que vous avez donné à votre programme.
Pour mettre fin à l'exécution du programme, vous avez à votre disposition l'instruction <code>STOP RUN</code>, celle-ci doit être la dernière instruction d'une phrase, elle provoque la fermeture de tous les fichiers.
 
Les différentes sections d'un programme seront détaillées dans les chapitres suivants.
Ligne 53 :
===Code minimal===
 
{{exemple|contenu=<source lang="cobol">
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. premier-programme.
Ligne 61 :
000006 STOP RUN.
000007
000008 END PROGRAM premier-programme.</source>}}
 
 
Ce programme, appelé premier-programme, ne contient qu'un paragraphe : paragraphe-principal ne contenant lui-même que l'instruction <code>STOP RUN</code>.
 
===Hello World !===
Ligne 69 ⟶ 70 :
Traditionnellement, quand on vous apprend un langage, on vous fournit un "Hello World !", c'est un programme qui se contente d'afficher cette chaîne de caractères sur la console.
 
Pour afficher des données sur la sortie standard (la console), vous aurez besoin de l'instruction <code>DISPLAY</code>, elle s'utilise comme suit :
 
{{exemple|contenu=<source lang="cobol">DISPLAY identificateur/littéral ... [NO ADVANCING]</source>}}
 
<source lang="cobol">DISPLAY identificateur/littéral ... [NO ADVANCING]</source>
 
Conformément à tout un tas de conventions d'écriture, ce qui figure entre crochets est optionnel, nous pouvons donc l'utiliser de 2 manières différentes :
 
{{exemple|contenu=<source lang="cobol">
DISPLAY identificateur/littéral ...
DISPLAY identificateur/littéral ... NO ADVANCING</source>}}
 
 
<code>NO ADVANCING</code> est facultatif et permet de garder le curseur positionné immédiatement derrière le dernier caractère écrit.
 
Les identificateurs sont des noms de variables, les littéraux sont des données brutes, manipulées sans l'intermédiaire de variables, par exemple des chaînes de caractères (délimitées par des guillemets) ou des valeurs numériques. Voici donc un exemple de Hello World ! :
 
{{exemple|contenu=<source lang="cobol">
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. premier-programme.
Ligne 93 ⟶ 96 :
000008 STOP RUN.
000009
000010 END PROGRAM premier-programme.</source>}}
 
 
[[Catégorie:COBOL]]