Index du COBOL sur AS/400

Chapitre I: Premiers pas en COBOL

• IDENTIFICATION DIVISION.
  PROGRAM-ID.
  ENVIRONMENT DIVISION.
  DATA DIVISION.
  WORKING-STORAGE SECTION.
  PROCEDURE DIVISION.
  DISPLAY
  MOVE
  ACCEPT Z1.
  STOP RUN.
  Retour au programme Exo1.
  

Chapitre II: Les différentes déclarations

• 1) Déclaration de variables
  2) Déclaration de structures
  3) Déclaration de fichiers
  4) Déclaration de grilles d'écran
  5) Déclaration d'impression
  6) Déclaration des touches de fonctions
  7) Déclaration des pictures d'éditions
  

Chapitre III: Les opérations arithmétiques simples

• L'addition
  La soustraction
  La multiplication
  La division.
  Toutes sortes de calculs.
  

Chapitre IV: Utilisation des grilles d'écran

• 1) Création d'une grille d'écran
  2) Utilisation dans un programme exemple
  INPUT-OUTPUT SECTION.
  FILE-CONTROL.
  SELECT ... ASSIGN TO WORKSTATION-...
  ORGANIZATION TRANSACTION
  CONTROL-AREA FTOUCHES.
  FILE SECTION.
  FD ... LABEL RECORD OMITTED.
  COPY DDS-ALL-FORMATS OF ...
  01 FTOUCHES PIC XX.
  88 ... VALUE "...".
  OPEN I-O ...
  INITIALIZE ...
  WRITE ... FORMAT "...".
  READ ...
  MOVE CORR
  Retour au programme DECOMPTE.
  

Chapitre V: Utilisation des fichiers séquentiels

• 1) Création d'un fichier séquentiel
  2) Utilisation dans un programme exemple SCREER
  3) Que fait le programme exemple SCREER
  SELECT ... ASSIGN TO DATABASE-...
  ORGANIZATION SEQUENTIAL.
  COPY DDS-... OF ...
  FD ... LABEL RECORD STANDARD.
  OUTPUT ...
  WRITE ...
  Retour au programme SCREER.
  

Chapitre VI: Utilisation des fichiers indéxés

• 1) Création d'un fichier indéxé
  2) Utilisation dans un programme exemple ICREER
  3) Que fait le programme exemple ICREER
  ORGANIZATION INDEXED
  RECORD KEY ... OF ...
  ACCESS MODE DYNAMIC.
  WRITE ... INVALID KEY DISPLAY ...
  Retour au programme ICREER.
  

Chapitre VII: D'autres programmes séquentiels

• Programme SAJOUTER
  Programme SVOIR
  Programme SMODIFIER
  Programme SMENU
  Que font ces programmes séquentiels ?
  EXTEND ...
  REDEFINES ...
  INPUT ...
  READ ... AT END ...
  CLOSE ...
  I-O ...
  REWRITE ... INITIALIZE ...

Chapitre VIII: D'autres programmes indéxés

• Programme ICREER
  Programme IVOIR
  Programme IMODIFIER
  Programme ISUPPRIMER
  Programme ILISTER
  Que font ces programmes indéxés ?
  WITH DUPLICATES
  PERFORM
  READ ... NEXT AT END ...
  IF ... NOT = ... ...
  WRITE ... FROM ... AFTER ...
  REWRITE ... FORMAT "...".
  DELETE ... RECORD INVALID KEY ...
  ACCESS MODE SEQUENTIAL.