Utilisez cet exemple de fichier de stockage COBOL avec
Génération d'une application DB2 COBOL en mode batch local 01 EMPLOYEE.
05 EMPNO PIC X(6).
05 FIRSTNME.
49 LEN PIC S9(4) COMP-5.
49 DAT PIC X(12).
05 MIDINIT PIC X(1).
05 LASTNAME.
49 LEN PIC S9(4) COMP-5.
49 DAT PIC X(15).
05 WORKDEPT PIC X(3).
05 PHONENO PIC X(4).
05 HIREDATE PIC X(10).
05 JOB PIC X(8).
05 EDLEVEL PIC S9(4) COMP-5.
05 SEX PIC X(1).
05 BIRTHDATE PIC X(10).
05 SALARY PIC S9(7)V9(2) COMP-3.
05 BONUS PIC S9(7)V9(2) COMP-3.
05 COMM PIC S9(7)V9(2) COMP-3.