Your Browser is not longer supported

Please use Google Chrome, Mozilla Firefox or Microsoft Edge to view the page correctly
Loading...

{{viewport.spaceProperty.prod}}

COBOL example program

The following program employee.cbl is used as an example.

IDENTIFICATION DIVISION.
   PROGRAM-ID. EMPLOYEE.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
   01 EMPLOYEE-RECORD
      05 EMPLOYEE-NUMBER   PIC X(08).
      05 FIRST-NAME        PIC X(20).
      05 LAST-NAME         PIC X(20).
      05 PAY-METHOD        PIC X.
      05 SALARY-INFO.
          10 ANNUAL-SALARY PIC 9(5).
LINKAGE SECTION.
      COPY KCKBC.
      ...
      COPY KCPAC.
PROCEDURE DIVISION
...