1
2
3 dcl ACCESS_NAME_TYPE bit (18) static options (constant) init ("000001"b3);
4 dcl ACLE_TYPE bit (18) static options (constant) init ("000002"b3);
5 dcl DIR_HEADER_TYPE bit (18) static options (constant) init ("000003"b3);
6 dcl DIR_TYPE bit (18) static options (constant) init ("000004"b3);
7 dcl LINK_TYPE bit (18) static options (constant) init ("000005"b3);
8 dcl NAME_TYPE bit (18) static options (constant) init ("000006"b3);
9 dcl SEG_TYPE bit (18) static options (constant) init ("000007"b3);
10 dcl HASH_TABLE_TYPE bit (18) static options (constant) init ("000013"b3);
11
12 dcl access_name_type fixed bin static options (constant) init (1);
13 dcl acle_type fixed bin static options (constant) init (2);
14 dcl dir_header_type fixed bin static options (constant) init (3);
15 dcl dir_type fixed bin static options (constant) init (4);
16 dcl link_type fixed bin static options (constant) init (5);
17 dcl name_type fixed bin static options (constant) init (6);
18 dcl seg_type fixed bin static options (constant) init (7);
19 dcl hash_table_type fixed bin static options (constant) init (11);
20
21