1 /* BEGIN INCLUDE FILE:  network_account_array.incl.pl1  */
 2 
 3 /****^  HISTORY COMMENTS:
 4   1) change(86-02-21,Herbst), approve(87-07-31,MCR7694),
 5      audit(87-07-31,GDixon), install(87-08-04,MR12.1-1056):
 6      Added process_id field and replaced group_id with it in the key.
 7   2) change(87-04-09,Brunelle), approve(87-07-31,MCR7694),
 8      audit(87-07-31,GDixon), install(87-08-04,MR12.1-1056):
 9      Completely restructured.
10   3) change(87-05-07,Brunelle), approve(87-07-31,MCR7694),
11      audit(87-07-31,GDixon), install(87-08-04,MR12.1-1056):
12      Added purged and accounting bit fields.
13   4) change(87-07-31,Brunelle), approve(87-07-31,MCR7694),
14      audit(87-07-31,GDixon), install(87-08-04,MR12.1-1056):
15      Moved version field from the network_account_data structure to the
16      network_account_array structure and changed the value of the constant to
17      reflect the move.
18                                                    END HISTORY COMMENTS */
19 
20 /* format: style4 */
21 /* used by the $dump_table, $get_process_total and $read_and_reset_table
22    entrypoints of network_accounting_.pl1 */
23 
24 dcl  network_account_array_ptr ptr;
25 dcl  network_account_array_bound fixed bin;
26 
27 dcl  1 network_account_array aligned based (network_account_array_ptr),
28        2 version char (8),
29        2 max_count fixed bin,
30        2 count fixed bin,
31        2 record (network_account_array_bound refer (network_account_array.max_count))
32             aligned like network_account_data;
33 
34 dcl  network_account_data_ptr ptr;
35 
36 dcl  1 network_account_data aligned based (network_account_data_ptr),
37        2 key,
38          3 process_id bit (36) aligned,                     /* of the process using the connection */
39          3 session_handle fixed bin (35),                   /* identifier of the connection being charged */
40          3 network_id fixed bin (35),                       /* identifies the network being used */
41        2 switches unaligned,
42          3 delete_sw bit (1) unaligned,                     /* delete entry when next read */
43          3 unassigned_sw bit (1) unaligned,                 /* owner connected to the session */
44          3 purged bit (1) unaligned,                        /* network_accounting_ purged this record */
45          3 accounting bit (1) unaligned,                    /* used by act_ctl_ */
46          3 mbz bit (32) unaligned,
47        2 connect_time fixed bin (35),                       /* incremental seconds of connect time to charge */
48        2 byte_count fixed bin (35),                         /* incremental count of bytes to be charged */
49        2 packet_count fixed bin (35);                       /* incremental count of packets to be charged */
50 
51 dcl  NET_ACCT_ARRAY_VERSION_1 char (8) int static options (constant) init ("NETACTA1");
52 
53 /* END INCLUDE FILE:  network_account_array.incl.pl1 */