INTRODUCTION
COBOL, ‘Common Business Oriented Language ‘ est un langage orienté vers les affaires.
Ce langage a été mis au point en 1959 à la demande du gouvernement américain dans le but d’harmoniser les systèmes des différentes administrations.
Ce langage est encore fort répandu car à peu près 70% des applications commerciales sont écrites en COBOL. Cette grande utilisation peut être expliquée par la grande portabilité de ce langage et ses différentes remises à niveau. Des différences existent entre chaque compilateur COBOL. Nous verrons principalement le compilateur Cobol IBM-AS400 et celui de Microsoft.
Principes de base
Un programme Cobol s’écrit sur une ligne de 80 colonnes.
Les colonnes 1 à 6 représentent la numérotation des lignes et des pages.
La colonne 7 est utilisée pour indiquer une ligne de continuation (code -) ou pour indiquer un commentaire (code *).
Les colonnes 8 à 72 sont utilisées pour l’écriture du programme.
Les colonnes 73 à 80 sont utilisées pour l’identification mais non contrôlées.
Les noms de Divisions, Sections, Paragraphes sont écrits à partir de la marge A (Colonne 8), les instructions élémentaires sont écrites à partir de la marge B (colonne 12).
Structure du programme
Un programme Cobol est toujours composé des 4 même parties appelées Divisions. Ces divisions doivent se succéder dans un ordre bien précis.
IDENTIFICATION DIVISION
Cette division sert à identifier le nom du programme et fournit des informations relatives au nom du programmeur, de la date d’écriture du programme et aux remarques éventuelles.
Forme Générale
A B
IDENTIFICATION DIVISION.
PROGRAM-ID. Program4.
AUTHOR. jean-marie meskens.
DATE-WRITTEN. dimanche 20 août 2006 9:46:52.
REMARKS.
Seules les 2 premières instructions sont obligatoires.
PROGRAM-ID. Program4. indique le nom du programme, cette clause est tou jours présente car elle identifie le programme. Ce nom est limité à 8 caractères alphanumériques dont le premier doit être alphabétique.
ENVIRONMENT DIVISION
Cette division permet de définir le type d’ordinateur pour lequel est écrit le programme, ainsi que les périphériques nécessaires pour supporter les fichiers.
A B
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER. IBM-AS400.
Ou IBM-PC.
OBJECT-COMPUTER. IBM-AS400.
Ou IBM-PC.
SPECIAL-NAMES. Liste des noms symboliques spéciaux.
INPUT-OUTPUT SECTION.
FILE-CONTROL.
Options
I-O-CONTROL.
Options
DATA DIVISION
La DATA DIVISION est organisée en 4 sections.
La FILE SECTION qui définit les fichiers en regroupant les instructions de gestion des entrées sorties et les descriptions des zones de mémoire où sont transmis les enregistrements des fichiers.
La WORKING-STORAGE SECTION où sera décrit chaque variable de travail.
La LINKAGE SECTION qui permet de déclarer les zones de mémoire utilisées par plusieurs programmes.
La SCREEN SECTION pour la gestion du GUI
FILE SECTION
La FILE SECTION contient une description de fichier ainsi qu’une ou plusieurs descriptions d’enregistrement pour chaque fichier utilisé par le programme.
…..