1 
 2 /* begin include file ... cobol_TYPE1.incl.pl1 */
 3 /* Last modified on 11/17/76 by ORN */
 4 /* Last modified on 12/28/76 by FCH */
 5 /* Last modified on 12/16/80 by FCH */
 6 
 7                     /* header */
 8                     2 size fixed bin,
 9                     2 line fixed bin,
10                     2 column fixed bin,
11                     2 type fixed bin,
12                     /* body */
13                     2 key fixed bin,
14                     /* procedure division class bits */
15                     2 verb bit (1),
16                     2 arith_op bit (1),
17                     2 figcon bit (1),
18                     2 terminator bit (1),
19                     2 end_dec bit (1),
20                     2 rel_op bit (1),
21                     2 imper_verb bit (1),
22                     2 end_cobol bit (1),
23                     /* data division class bits */
24                     2 section_header bit (1),
25                     2 fs_ind bit (1),
26                     2 fd_clause bit (1),
27                     2 dd_clause bit (1),
28                     2 cd_input bit (1),
29                     2 cd_output bit (1),
30                     2 cset_name bit (1),
31                     2 ss_division bit (1),
32                     2 repl_jump_ind bit (4),
33                     2 ided_recovery bit (1),
34                     2 report_writer bit (5),
35                     2 ss_desc_entry bit (1),
36                     2 jump_index fixed bin,
37                     2 length fixed bin,
38                     2 name char(0 refer(reserved_word.length));
39 
40 
41 
42 /* end include file ... cobol_TYPE1.incl.pl1 */
43