1
2
3 dcl abs_data_ptr ptr int static;
4
5 dcl abs_data_len int static fixed bin aligned;
6
7 dcl 1 abs_data aligned based (abs_data_ptr),
8 2 absentee_dir char (168) aligned,
9 2 home_dir char (168) aligned,
10 2 input_segment_name char (32) aligned,
11 2 user_name char (32) aligned,
12 2 priority_queue fixed bin aligned,
13 2 absentee_options aligned,
14 3 deferral_switch bit (1) unaligned,
15 2 absentee_data aligned,
16 3 deferral fixed bin (71) aligned,
17 2 end_abs_data fixed bin aligned;
18
19 dcl data_blank bit (abs_data_len) aligned based (abs_data_ptr);
20
21