1
2
3
4
5
6
7
8 dcl as_com_channel_info_ptr pointer;
9 dcl 1 as_com_channel_info aligned
10 based (as_com_channel_info_ptr),
11 2 version char (8),
12 2 channel_name char (32),
13 2 flags aligned,
14 3 access_control unaligned,
15 4 login bit (1),
16 4 dial_slave bit (1),
17 4 priv_attach bit (1),
18 4 dial_server bit (1),
19 4 dial_out bit (1),
20 3 attached_to_caller bit (1) unaligned,
21 3 user_authenticated bit (1) unaligned,
22 3 dialed_to_caller bit (1) unaligned,
23 3 pad bit (28) unaligned,
24 2 service_type fixed bin,
25 2 current_service_type fixed bin,
26 2 access_class (2) bit (72) aligned,
27 2 current_access_class bit (72) aligned,
28 2 auth_user_name char (32) unaligned;
29
30 declare AS_COM_CHANNEL_INFO_VERSION_1 char (8) aligned init ("ascci001") int static options (constant);
31
32