1 /* Begin amu_old_uid_table.incl.pl1 */
 2 
 3 dcl old_uid_table_ptr ptr;
 4 
 5 
 6 dcl 1 old_uid_table based (old_uid_table_ptr),
 7       2 dp_dir char (168),
 8       2 dp_name char (32),
 9       2 sys_release char (8),
10       2 max_uid_ind fixed bin,
11       2 hash_factor fixed bin,
12       2 uid_array (0 :allocate_uid_hash) like old_uide;
13 
14 dcl old_uidep ptr;
15 
16 dcl 1 old_uide based (old_uidep),
17       2 uid bit (36),
18       2 seg_name char (168);
19 
20 dcl allocate_uid_hash fixed bin;
21