Data Definition Language (DDL) Reference Manual

DDL Compiler Commands
Data Definition Language (DDL) Reference Manual—529431-004
9-25
COBLEVEL
COBLEVEL
The COBLEVEL command specifies a level-numbering scheme for COBOL output.
base
is the starting level number.
Default: 1
increment
is the number of levels to skip.
Default: 1
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 output; the DDL compiler
does not keep these level numbers in the dictionary. If you need to rebuild your
COBOL source code files and want to keep the COBLEVEL level numbers, you must
specify the COBLEVEL command before issuing the OUTPUT statement.
COBLEVEL [ base [ , increment ] ]
Example 9-11. COBLEVEL Command
DDL Input
?COBLEVEL 5,3
DEF aa.
02 bb.
03 cc PIC X.
END
DDL Output (COBOL Code)
05 AA.
08 BB.
11 CC PIC X.