1 /* BEGIN INCLUDE FILE:        dm_bj_check_in_table.incl.pl1 */
 2 /*
 3 Table for fast checking of who's got what BJ open
 4 
 5 Written by Andre Bensoussan June/July 1982
 6 Modified:
 7 08/30/82 by Lee A. Newcomb:  To use dm_system_data_ for max length of
 8             vector and array bounds.
 9 */
10 /* format: style4,indattr,idind33,^indcomtxt */
11 
12 dcl  bj_check_in_table_ptr            ptr;
13 
14 dcl  1 bj_check_in_table              based (bj_check_in_table_ptr) aligned,
15        2 max_n_processes              fixed bin,
16        2 max_n_journals               fixed bin,
17        2 process_id                   dim (dm_system_data_$bj_max_n_processes refer
18                                       (bj_check_in_table.max_n_processes)) bit (36),
19        2 cross_proc_bj                dim (dm_system_data_$bj_max_n_processes refer
20                                       (bj_check_in_table.max_n_processes),
21                                       dm_system_data_$bj_max_n_journals refer (bj_check_in_table.max_n_journals))
22                                       bit (1) unaligned;
23 
24 /* END INCLUDE FILE:          dm_bj_check_in_table.incl.pl1 */