1
2
3
4
5
6
7 2 size fixed bin,
8 2 line fixed bin,
9 2 column fixed bin,
10 2 type fixed bin,
11
12 2 string_ptr ptr,
13 2 prev_rec ptr,
14 2 searched bit (1),
15 2 duplicate bit (1),
16 2 saved bit (1),
17 2 debug_ind bit (1),
18 2 filler2 bit (3),
19 2 used_as_sub bit (1),
20 2 def_line fixed bin,
21 2 level fixed bin,
22 2 linkage fixed bin,
23 2 file_num fixed bin,
24 2 size_rtn fixed bin,
25 2 item_length fixed bin(24),
26 2 places_left fixed bin,
27 2 places_right fixed bin,
28
29 2 file_section bit (1),
30 2 working_storage bit (1),
31 2 constant_section bit (1),
32 2 linkage_section bit (1),
33 2 communication_section bit (1),
34 2 report_section bit (1),
35 2 level_77 bit (1),
36 2 level_01 bit (1),
37 2 non_elementary bit (1),
38 2 elementary bit (1),
39 2 filler_item bit (1),
40 2 s_of_rdf bit (1),
41 2 o_of_rdf bit (1),
42 2 bin_18 bit (1),
43 2 bin_36 bit (1),
44 2 pic_has_l bit (1),
45 2 pic_is_do bit (1),
46 2 numeric bit (1),
47 2 numeric_edited bit (1),
48 2 alphanum bit (1),
49 2 alphanum_edited bit (1),
50 2 alphabetic bit (1),
51 2 alphabetic_edited bit (1),
52 2 pic_has_p bit (1),
53 2 pic_has_ast bit (1),
54 2 item_signed bit(1),
55 2 sign_separate bit (1),
56 2 display bit (1),
57 2 comp bit (1),
58 2 ascii_packed_dec_h bit (1),
59 2 ascii_packed_dec bit (1),
60 2 ebcdic_packed_dec bit (1),
61 2 bin_16 bit (1),
62 2 bin_32 bit (1),
63 2 usage_index bit (1),
64 2 just_right bit (1),
65 2 compare_argument bit (1),
66 2 sync bit (1),
67 2 temporary bit (1),
68 2 bwz bit (1),
69 2 variable_length bit (1),
70 2 subscripted bit (1),
71 2 occurs_do bit (1),
72 2 key_a bit (1),
73 2 key_d bit (1),
74 2 indexed_by bit (1),
75 2 value_numeric bit (1),
76 2 value_non_numeric bit (1),
77 2 value_signed bit (1),
78 2 sign_type bit (3),
79 2 pic_integer bit (1),
80 2 ast_when_zero bit (1),
81 2 label_record bit (1),
82 2 sign_clause_occurred bit (1),
83 2 okey_dn bit (1),
84 2 subject_of_keyis bit (1),
85 2 exp_redefining bit (1),
86 2 sync_in_rec bit (1),
87 2 rounded bit (1),
88 2 ad_bit bit (1),
89 2 debug_all bit (1),
90 2 overlap bit (1),
91 2 sum_counter bit (1),
92 2 exp_occurs bit (1),
93 2 linage_counter bit (1),
94 2 rnm_01 bit (1),
95 2 aligned bit (1),
96 2 not_user_writable bit (1),
97 2 database_key bit (1),
98 2 database_data_item bit (1),
99 2 seg_num fixed bin,
100 2 offset fixed bin(24),
101 2 initial_ptr fixed bin,
102 2 edit_ptr fixed bin,
103 2 occurs_ptr fixed bin,
104 2 do_rec char(5),
105 2 bitt bit (1),
106 2 byte bit (1),
107 2 half_word bit (1),
108 2 word bit (1),
109 2 double_word bit (1),
110 2 half_byte bit (1),
111 2 filler5 bit (1),
112 2 bit_offset bit (4),
113 2 son_cnt bit (16),
114 2 max_red_size fixed bin(24),
115 2 name_size fixed bin,
116 2 name char(0 refer(data_name.name_size));
117
118
119
120
121