77 level, 88 level variables

77 level – 

Individual elementary data item.

77 level data items must be defined only in Working-storage and Linkage sections.

The data items defined in this level are neither subdivided to another data items nor they subdivided themselves. 

Example :

77  INDENT-C PIC X(16) VALUE SPACE.    

77  INDENT-I PIC X(40) VALUE 'ABCDEFG'.

88 level –  For condition name

Example:

05 VALID-DAY            PIC 9(2).                   

   88 VALID-DAY-OK                  VALUE 01 THRU 31.

   88 VALID-DAY-28                  VALUE 01 THRU 28.

   88 VALID-DAY-30                  VALUE 01 THRU 30.