Example COBOL Declaration

The following shows the result of a COBOL declaration. In this example, level 2 was assigned to the record definition.

01 DCLEMPLOYEE.
  2 E-NO PIC S9(4) COMP.
  2 LNAME PIC X(10).
  2 FNAME PIC X(10).
  2 STREET PIC X(20).
  2 CITY PIC X(15).
  2 ST PIC X(2).
  2 ZIP PIC X(5).
  2 DEPT PIC X(4).
  2 PAYRATE PIC S9(13)V9(2) COMP-3.
  2 COM PIC SV9(2) COMP-3.