Coblevel Command - HP DDL D40 Reference Manual

DDL Compiler Commands

COBLEVEL Command

The COBLEVEL command enables you to specify explicit level numbering for COBOL
source output.
COBLEVEL [ base [ , increment ] ]
COBLEVEL
specifies level numbering for COBOL source output.
base
is the starting level number. The default base value is 1.
increment
is the number of levels to be skipped. The default increment value is 1.
COBLEVEL Command Guidelines
The following points are guidelines for using the COBLEVEL command:
The formula for calculating COBLEVEL level numbers is:
cobol-level := base + (increment * ( level - 1 ))
Here, level is the level number of the item within the dictionary; it can be any
value from 0 to 49.
The COBLEVEL level numbers are used only for COBOL source output; DDL does
not keep these level numbers in the dictionary. If you need to rebuild your COBOL
source files and want to keep the COBLEVEL level numbers, you must specify the
COBLEVEL command before issuing the OUTPUT statement.
COBLEVEL Command Example
The COBLEVEL command precedes a definition in the following source input code,
where item aa is at level 01, item bb is at level 02, and item cc is at level 03:
?COBLEVEL 5,3
DEF aa.
02 bb.
03 cc PIC X.
END
DDL produces the following COBOL source code for the definition:
05 AA.
08 BB.
11 CC
Data Definition Language (DDL) Reference Manual—426798-002
PIC X.
9- 24
COBLEVEL Command