Data Definition Language (DDL) Reference Manual

DDL Compiler Commands
Data Definition Language (DDL) Reference Manual—529431-004
9-61
FILLER
In Example 9-27 on page 9-61, when FILLER 1 is specified, the structure of TEST1 is
the same in both CASE1 and CASE2. A COBOL program containing these data
structures can successfully execute the COBOL statement:
MOVE TEST1 OF CASE1 to TEST1 OF CASE2.
Example 9-27. FILLER Command
DDL Input (Definition Statements)
DEF test1.
02 a PIC XX.
02 b PIC S9(4) COMP.
END
DEF case1.
02 c PIC X.
02 test1 TYPE *.
END
DEF case2.
02 test1 TYPE *.
02 c PIC X.
END
DDL Output (COBOL Code) with FILLER 1
01 CASE1.
02 C PIC X.
02 FILLER PIC X(1).
02 TEST1.
03 A PIC XX.
03 B PIC S9(4) COMP.
01 CASE2.
02 TEST1.
03 A PIC XX.
03 B PIC S9(4) COMP.
02 C PIC X.
DDL Output (COBOL Code) with FILLER 0
01 CASE1.
02 C PIC X.
02 TEST1.
03 A PIC XX.
03 FILLER PIC X(1).
03 B PIC S9(4) COMP.
01 CASE2.
02 TEST1.
03 A PIC XX.
03 B PIC S9(4) COMP.
02 C PIC X.