1
2
3
4
5
6
7
8
9
10
11
12
13 dcl lap_load_info_ptr pointer;
14 dcl lap_data_ptr pointer;
15
16 dcl 1 lap_data aligned based (lap_data_ptr),
17 2 name char (32) unaligned,
18 2 devx fixed bin,
19 2 subchannel fixed bin,
20 2 state fixed bin,
21 2 flags aligned,
22 3 send_output bit (1) unaligned,
23 3 simplex_started bit (1) unaligned,
24 3 pad bit (34) unaligned,
25 2 load_process_id bit (36) aligned,
26 2 load_event_channel fixed bin (71),
27 2 activate_order aligned like lap_line_control_info,
28 2 dialup_info aligned like dialup_info,
29 2 sc_dialup_info aligned like dialup_info,
30 2 max_frame_size fixed bin,
31 2 frame_ready bit (1) aligned,
32 2 frame_size fixed bin,
33 2 frame_start pointer,
34 2 frame_end pointer;
35
36 dcl LAP_HUNGUP init (0) fixed bin internal static options (constant);
37 dcl LAP_LISTENING init (1) fixed bin internal static options (constant);
38 dcl LAP_ACTIVE init (2) fixed bin internal static options (constant);
39
40 dcl 1 lap_load_info aligned based (lap_load_info_ptr),
41 2 version char (8) aligned,
42 2 event_channel fixed bin (71),
43 2 process_id bit (36) aligned,
44 2 activate_order aligned like lap_line_control_info;
45
46 dcl LAP_LOAD_INFO_VERSION_1 char (8) internal static options (constant) init ("lapload1");
47
48