IDENTIFICATION DIVISION.
PROGRAM-ID.  DemoDivisions.
      
ENVIRONMENT DIVISION.
      
DATA DIVISION.
WORKING-STORAGE SECTION. 
      01  Salutation PIC X(38) VALUE "Bonjour depuis les 4 divisions COBOL !".
      
PROCEDURE DIVISION.
   DISPLAY Salutation
   STOP RUN.