Ce livre traite de COBOL qui, depuis plus de 50 ans, est utilisé pour les applications stratégiques des grosses entreprises : il est au cœur de leurs applications patrimoniales. Le besoin d’informaticiens le maîtrisant reste d’actualité en 2010 et pour encore plusieurs décennies : pour la maintenance des parcs applicatifs mais également pour de nouveaux développements.
Ce livre s’adresse à tout informaticien amené à travailler sur ces applications patrimoniales, la plupart du temps en environnement grand système, ainsi que dans de moins grosses structures où COBOL a également été choisi avec des versions de compilateurs disponibles en environnement PC. La norme sur laquelle il s’appuie est la version ISO 1989:1985, ou COBOL 89 : cette version constitue le socle commun de la plupart des compilateurs COBOL utilisés aujourd’hui.
De l’informaticien débutant à l’informaticien expérimenté chaque lecteur trouvera dans cet ouvrage une information claire et précise permettant d’aborder avec sérénité la maintenance de programmes, ainsi que les règles de bon usage pour développer de nouveaux programmes.
L’explication des origines de COBOL dans le premier chapitre permet de mieux appréhender l’importance stratégique de la bonne pratique de ce langage. Le deuxième chapitre permet une première approche avec un rappel des bases de la programmation structurée. Le troisième chapitre fournit toutes les informations nécessaires à la manipulation des données. COBOL étant très utilisé pour des traitements par lots, ou traitements Batch, c’est dans le quatrième chapitre que le lecteur trouvera une description détaillée des instructions de manipulation des fichiers pour ce type de traitements. Dans le cinquième et dernier chapitre sont abordées les extensions plus spécifiques à l’environnement grand système IBM permettant, entre autres, à un programme COBOL d’accéder aux bases de données (DB2), d’être interactif (moniteur transactionnel CICS), de se connecter avec les autres environnements (Websphere MQ), et de générer de façon relativement simple du XML.
Des éléments complémentaires sont en téléchargement sur le site www.editions-eni.fr.

Les chapitres du livre :
Avant-propos - Présentation - Première approche - Déclarer et manipuler les données - Traitement des entrées sorties - Techniques avancées - Annexes

Téléchargements

• Des fichiers complémentaires (37,6 Ko)

Avant-propos

1. Avant-propos

Présentation

1. Origines
   1. 1. Les computers
   2. 2. Un langage de programmation
   3. 3. Pourquoi COBOL ?
      1. a. Spécifications
      2. b. Normalisation
2. COBOL dans le temps
   1. 1. COBOL 74
   2. 2. COBOL 85
   3. 3. COBOL 89
   4. 4. COBOL 2002
3. COBOL aujourd'hui
   1. 1. Environnement mainframe...
   2. 2. ... et autres environnements
   3. 3. Traitements batch...
   4. 4. ... et autres traitements
4. Formalisme
   1. 1. La division IDENTIFICATION
   2. 2. La division ENVIRONMENT
   3. 3. La division DATA
   4. 4. La division PROCEDURE
5. Mise en œuvre : compilation

Première approche

1. Programmation structurée
   1. 1. Le déroulement d’un programme
   2. 2. Les commentaires
   3. 3. L’aide au débogage
   4. 4. Les mots en COBOL
   5. 5. Instructions de structure
      1. a. Sections et paragraphes
      2. b. Modules
   6. 6. PERFORM : les débranchements
      1. a. Appel de paragraphe
      2. b. Appel de section
      3. c. Appel de plusieurs paragraphes ou sections
      4. d. Débranchement par GO TO
   7. 7. Contrôle de séquence : fin de module
      1. a. EXIT, pour la fin d’une section
      2. b. Particularité du module directeur
      3. c. Utilité des sections
   8. 8. Fin de programme
      1. a. STOP RUN : pour programme batch principal
      2. b. EXIT PROGRAM, pour la fin d’un sous-programme
      3. c. GOBACK : pour programmes et sous-programmes
2. Traitement itératif
   1. 1. PERFORM UNTIL : boucle jusqu’à
      1. a. Variante du PERFORM : PERFORM en ligne
   2. 2. PERFORM VARYING : boucle pour
      1. a. Boucles imbriquées : PERFORM ... VARYING...UNTIL...AFTER
      2. b. PERFORM : option WITH TEST AFTER
   3. 3. PERFORM n TIMES : boucle répéter
3. Instructions de tests
   1. 1. IF THEN ELSE : la condition simple
      1. a. Point vs SCOPE TERMINATOR
      2. b. Les opérateurs
      3. c. Les combinaisons
      4. d. Les imbrications
   2. 2. EVALUATE : la condition à choix multiple
      1. a. Évaluation d’une zone
      2. b. Évaluation booléenne
      3. c. Évaluations multiples
      4. d. CONTINUE : conditions et débranchements
      5. e. NEXT SENTENCE : autre débranchement
4. Cas pratique
   1. 1. MOVE : manipulation des données
   2. 2. But de l’exercice
   3. 3. Identifier les grandes parties (modules)
      1. a. Repérage
      2. b. Algorithme de traitement
      3. c. Amélioration du code : simplifier
      4. d. Amélioration du code : pas de code mort

Déclarer et manipuler les données

1. Introduction
   1. 1. Codes de caractère : EBCDIC
   2. 2. Déclaration des données
      1. a. Clause PICTURE
      2. b. Zones non utilisées : FILLER
   3. 3. Caractéristiques de la WORKING-STORAGE SECTION
      1. a. Constantes : clause VALUE
      2. b. Littéraux alphanumériques
      3. c. Littéraux numériques
      4. d. Constantes figuratives
2. Numéros de niveaux hiérarchiques
   1. 1. Présentation
      1. a. Niveau 01
      2. b. Niveaux 02 à 49
   2. 2. Niveaux hiérarchiques spéciaux
      1. a. Niveau 66
      2. b. Niveau 88
      3. c. Manipulation des noms de condition : instruction SET
3. Zones alphanumériques : déclaration et usage
   1. 1. MOVE avec zone réceptrice alphanumérique
      1. a. Clause JUSTIFIED RIGHT
      2. b. Notation hexadécimale
      3. c. Valeur nulle en fin de zone
      4. d. Modification de référence
   2. 2. Analyse de zone : INSPECT
      1. a. Pour compter : TALLYING
      2. b. Pour remplacer : REPLACING
      3. c. Pour convertir : CONVERTING
      4. d. BEFORE / AFTER
   3. 3. Concaténation : STRING
   4. 4. Découpage : UNSTRING
      1. a. DELIMITER et COUNT
4. Les zones numériques
   1. 1. USAGE DISPLAY
   2. 2. Numérique compacté
   3. 3. Binaire
   4. 4. Binaire natif : COMP-5
   5. 5. MOVE avec zone réceptrice numérique
   6. 6. Compatibilité des formats
   7. 7. Calculs
      1. a. Addition : ADD
      2. b. Soustraction : SUBTRACT
      3. c. Multiplication : MULTIPLY
      4. d. Division : DIVIDE
      5. e. Expression arithmétique : COMPUTE
   8. 8. Performances vs sécurité
   9. 9. Condition ON SIZE ERROR
   10. 10. Conversion automatique : DISPLAY
5. Les conditions de signe et de classe
   1. 1. Les conditions de signe
   2. 2. Les conditions de classe
6. Expression CORRESPONDING
7. Les registres spéciaux
   1. 1. WHEN-COMPILED
   2. 2. RETURN-CODE
   3. 3. LENGTH OF
   4. 4. ADDRESS OF
8. Clause REDEFINES : masque de donnée
9. Initialisations : INITIALIZE
10. Tableaux : clause OCCURS
    1. 1. Déclarations
       1. a. Tableau à plusieurs dimensions
       2. b. Tableau de longueur variable
       3. c. Tableau trié
       4. d. Indice vs Index
    2. 2. Initialisations
       1. a. Indice
       2. b. Index
       3. c. Tableau de constantes
       4. d. Tableau de données
       5. e. Charger un tableau de données
       6. f. Position relative
    3. 3. Recherche dans un tableau
       1. a. SEARCH : recherche séquentielle
       2. b. SEARCH ALL : recherche binaire
11. Conclusion : recommandations

Traitement des entrées-sorties

1. Paramètres en entrée
   1. 1. Instruction ACCEPT
   2. 2. Clause USING
2. Compte rendu de traitement, Log, fichier trace : DISPLAY
   1. 1. Présentation
   2. 2. Cas pratique
3. Les fichiers : présentation
   1. 1. Organisation des informations
      1. a. Organisation séquentielle
      2. b. Fichiers de longueur variable
      3. c. Organisation indexée
4. Déclarations
   1. 1. Division ENVIRONMENT : la FILE-CONTROL
      1. a. Clause SELECT
      2. b. Clause ORGANIZATION
      3. c. ACCESS MODE
      4. d. Clés d’accès
      5. e. FILE STATUS
   2. 2. DATA DIVISION : FILE SECTION
      1. a. File Description : FD
      2. b. Niveaux 01 : les enregistrements
5. Fichier en entrée
   1. 1. Lecture séquentielle
      1. a. Les déclarations
      2. b. Ouverture de fichier : OPEN
      3. c. Programmation structurée
      4. d. Fermeture de fichier : CLOSE
      5. e. Lecture séquentielle : READ AT END
      6. f. Current Record Pointer (CRP)
   2. 2. Lecture en accès direct
      1. a. Accès direct : ACCESS MODE IS RANDOM
      2. b. Lecture : READ INVALID KEY
   3. 3. Lecture en accès direct ET séquentiel
      1. a. Les déclarations
      2. b. Lecture : START et READ
6. Fichier en sortie
   1. 1. Accès séquentiel
      1. a. Les déclarations
      2. b. Ouverture : OUTPUT ou EXTEND
      3. c. Écriture : WRITE
   2. 2. Accès direct
7. Fichier en mise à jour : modification et suppression
   1. 1. FILE STATUS pour fichiers VSAM : récapitulatif OPEN

Techniques avancées

1. Code réutilisable
   1. 1. Modules COPY
      1. a. Pour les déclarations
      2. b. Pour le traitement
      3. c. Plusieurs fois dans le même programme
   2. 2. Sous-programmes
      1. a. Appel de sous-programme : CALL
      2. b. Le passage des paramètres
      3. c. Sous-programmes et RETURN-CODE : RETURNING
      4. d. LINKAGE SECTION
      5. e. REFERENCE vs CONTENT
      6. f. Application : COBOL et l’allocation dynamique
      7. g. Compléments
      8. h. Soumettre un JCL
2. Entrées-sorties
   1. 1. Appareillage
      1. a. Cas pratique
   2. 2. Technologie Batch PIPE
      1. a. Cas pratique
   3. 3. Bases de données : DB2
      1. a. Présentation
      2. b. Gestion des erreurs
      3. c. Les déclarations
      4. d. Zone NULL
      5. e. Les requêtes
3. Mise en forme des données
   1. 1. Fonctions intrinsèques
      1. a. Quelques fonctions
   2. 2. Cas particulier : les dates
      1. a. Les instructions COBOL "historiques"
      2. b. Les fonctions intrinsèques pour les dates
      3. c. Les services LE
   3. 3. Les états
      1. a. Déclarations : les PICTURE d’édition
      2. b. Mise en forme
      3. c. Traitement
   4. 4. Traiter le format CSV
      1. a. Récupération d’un montant
      2. b. Préparation d’un montant
   5. 5. Le format XML
4. COBOL et le transactionnel (CICS)
   1. 1. Présentation
   2. 2. Mise en œuvre du pseudo-conversationnel
   3. 3. Gestion des écrans (MAP)
      1. a. Affichage écran
      2. b. Réception écran
   4. 4. Zones de communication
      1. a. Entre CICS et le programme : la DFHEIBLK
      2. b. Entre les programmes d’une même transaction : la COMMAREA
      3. c. La Temporary Storage Queue, TS
   5. 5. Enchaînement des programmes
      1. a. Fin de programme
   6. 6. Gestion des fichiers
      1. a. Lecture en accès direct
      2. b. Lecture séquentielle
      3. c. Écriture
      4. d. Modification
   7. 7. Cohérence : point de synchronisation
   8. 8. Utilisation de transaction en Batch
   9. 9. Exemple de programme CICS
   10. 10. COBOL et Websphere
5. En conclusion

Annexes

1. Table de conversion ASCII – EBCDIC
2. Traitement des fichiers : squelette de programme
   1. 1. Fichier maître séquentiel en entrée
   2. 2. Fichier maître indexé en entrée
   3. 3. Fichier de données FICIN en accès direct
   4. 4. Fichier de données FICIN en accès dynamique
   5. 5. Fichier en sortie FICOUT séquentiel
   6. 6. Fichier en sortie FICOUT indexé écriture séquentielle
   7. 7. Fichier en sortie FICOUT indexé
3. FILE STATUS