1 
 2 /* begin include file ... cobol_TYPE2.incl.pl1 */
 3 /* Last modified on 12/28/76 by FCH */
 4 
 5                     /* header */
 6                     2 size fixed bin,
 7                     2 line fixed bin,
 8                     2 column fixed bin,
 9                     2 type fixed bin,
10                     /* body */
11                     2 integral bit(1),
12                     2 floating bit(1),
13                     2 seg_range bit(1),
14                     2 filler1 bit(4),
15                     2 subscript bit(1),
16                     2 sign char(1),
17                     2 exp_sign char(1),
18                     2 exp_places fixed bin,
19                     2 places_left fixed bin,
20                     2 places_right fixed bin,
21                     2 places fixed bin,
22                     2 literal char(0 refer(numeric_lit.places));
23 
24 
25 
26 /* end include file ... cobol_TYPE2.incl.pl1 */
27