1
2
3
4
5
6
7
8
9
10
11 dcl network_channel_use_ptr ptr;
12 dcl 1 network_channel_use aligned based (network_channel_use_ptr),
13 2 version char (8),
14 2 network_id fixed bin,
15 2 session_handle fixed bin (35),
16 2 owner_pid bit (36) aligned,
17 2 user_pid bit (36) aligned,
18 2 session_state fixed bin,
19 2 packet_count fixed bin (17),
20 2 byte_count fixed bin (17);
21
22
23
24 dcl CREATE_SESSION fixed bin int static options (constant) init (1);
25 dcl ASSIGN_CONNECTION fixed bin int static options (constant) init (2);
26 dcl UPDATE_CONNECTION fixed bin int static options (constant) init (3);
27 dcl UNASSIGN_CONNECTION fixed bin int static options (constant) init (4);
28 dcl DESTROY_SESSION fixed bin int static options (constant) init (5);
29
30 dcl NETWORK_CHANNEL_USE_INFO_VERSION_1 char (8) int static options (constant) init ("NETCHN01");
31
32