Data Definition Language (DDL) Reference Manual

Definition Attributes
Data Definition Language (DDL) Reference Manual—529431-004
6-36
pTAL or TAL
pTAL or TAL
In pTAL or TAL, a redefining structure can be smaller than the structure it redefines.
TACL
DDL Output (Pascal Code)
TYPE A_DEF = RECORD
V_B : RECORD
CASE INT16 OF
01:( B : FSTRING[4] );
02:( C : RECORD
C_1 : FSTRING[2];
C_2 : FSTRING[2];
END );
END;
D : RECORD
CASE INT16 OF
01:( D_1 : CHAR );
02:( D_2 : CHAR );
END;
CASE INT16 OF
01:( E : FSTRING[5] );
02:( F : RECORD
F_1 : FSTRING[3];
F_2 : FSTRING[2];
END );
END;
Example 6-27. REDEFINES Clause With TACL Output (page1of2)
DDL Input
DEF A.
02 B PIC 9(4).
02 C REDEFINES B.
04 C-1 PIC 9(2).
04 C-2 PIC 9(2).
02 D.
04 D-1 PIC X.
04 D-2 PIC 9 REDEFINES D-1.
02 E PIC 9(5).
02 F REDEFINES E.
04 F-1 PIC 9(3).
04 F-2 PIC 9(2).
END.
Example 6-26. REDEFINES Clause With Pascal Output (page 2 of 2)