1 
 2 /* begin include file ... cobol_TYPE40.incl.pl1 */
 3 /* Last modified on 11/17/76 by ORN */
 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 string_ptr ptr,
12                     2 prev_rec ptr,
13                     2 info,
14                               3 repl bit(8),
15                               3 one_one bit(1),
16                               3 onto bit(1),
17                     2 hival_char char(1),
18                     2 loval_char char(1),
19                     2 iw_key fixed bin,
20                     2 def_line fixed bin,
21                     2 char_size fixed bin,
22                     2 hi_value char(1),
23                     2 segno fixed bin,
24                     2 offset fixed bin,
25                     2 dn_offset fixed bin,
26                     2 table char(512),
27                     2 name_size fixed bin,
28                     2 name char(0 refer(alphabet_name.name_size));
29 
30 /* end include file ... cobol_TYPE40.incl.pl1 */
31