1
2
3
4 dcl lotp ptr;
5
6 dcl 1 lot based (lotp) aligned,
7 2 lp (0:9999) ptr unaligned;
8
9 dcl lot_fault bit (36) aligned static options (constant) init ("111000000000000000000000000000000000"b);
10
11
12 dcl isotp ptr;
13 dcl 1 isot based (isotp) aligned,
14 2 isp (0:9999) ptr unaligned;
15
16 dcl 1 isot1 (0 :9999) aligned based,
17 2 flags unaligned,
18 3 fault bit (2) unaligned,
19 3 system bit (1) unaligned,
20 3 mbz bit (6) unaligned,
21 2 fault_code fixed bin (8) unaligned,
22 2 static_offset bit (18) unaligned;
23
24
25