Definition Attributes
Data Definition Language (DDL) Reference Manual — 426798-002
6- 70
TYPE Clause
DEF Bit-Map.
2 Bits-8 TYPE BIT 8.
2 Bits-3 TYPE BIT 3 UNSIGNED.
2 Bits-10 TYPE BIT 10.
End.
?Section BIT^MAP Struct
Begin
FILLER 2;
FILLER 2;
End;
DEF Bit-Struct.
2 Bits-0 TYPE Bit-1.
2 Bits-1-To-10 TYPE Bit-10.
End.
?Section BIT^STRUCT Struct
Begin
FILLER 2;
End;
DEF Bit-Fillers.
2 Field-1 Type Character 3.
2 Filler Type Bit 4.
2 Bit-Field-1 Type Bit 5.
2 Filler Type Binary 16.
2 Field-2 Type Binary 32.
End.
?Section BIT^FILLERS Struct
Begin
STRUCT FIELD^1;
BEGIN CHAR BYTE(0:2); END;
FILLER 1;
FILLER 2;
FILLER 2;
INT2 FIELD^2;
End;
DEF Enum-Spec Begin
TYPE ENUM.
89 Val-1 Value 1.
89 Val-2 Value 3.
89 Val-3 Value 0.
End.
?Section VAL^1 Text
1
?Section VAL^2 Text
3
?Section VAL^3 Text
0
?Section ENUM^SPEC Struct
Begin
ENUM ENUM^SPEC;
End;
DEF Bits-With-Enums.
02 Bit-Field-1 TYPE BIT 8
ENUM Enum-Spec.
02 Bit-Field-2 TYPE BIT 4.
End.
?Section BITS^WITH^ENUMS Struct
Begin
FILLER 2;
End;
DEF Reused-Bits.
02 Data-Item Type Binary.
02 Bits-Layout-1
Redefines Data-Item.
03 F-11 TYPE BIT 5.
03 F-12 TYPE BIT 6.
03 F-13 TYPE BIT 4.
02 Bits-Layout-2
Redefines Data-Item
03 F-21 TYPE BIT 4.
03 F-22 TYPE BIT 3.
End.
?Section REUSED^BITS Struct
Begin
INT DATA^ITEM;
STRUCT BITS^LAYOUT^1
REDEFINES DATA^ITEM;
Begin
FILLER 2;
End;
STRUCT BITS^LAYOUT^2
REDEFINES DATA^ITEM;
Begin
FILLER 2;
End;
End;
DDL Type
TACL Type
