1 /* BEGIN INCLUDE FILE - dm_rlm_opening_info.incl.pl1 */
 2 
 3 /* Written by Matthew Pierret, 09/08/82.
 4 Modified:
 5 01/18/83 by Matthew Pierret:  Changed version to be char (8). Added
 6             transaction_id.
 7 02/25/83 by Matthew Pierret:  Changed to relation_opening_info (from
 8             relation_info).
 9 10/29/84 by Stanford S. Cox:  Changed to not init version.
10 */
11 
12 
13 /* format: style2,ind3 */
14 
15      dcl     1 relation_opening_info
16                                     aligned based (relation_opening_info_ptr),
17                2 version            char (8),
18                2 per_process,
19                  3 current_transaction_id
20                                     bit (36) aligned init ("0"b),
21                  3 current_rollback_count
22                                     fixed bin (35) init (0),
23                  3 file_opening_id  bit (36) aligned init ("0"b),
24                  3 number_of_openings
25                                     fixed bin (17) aligned init (0),
26                  3 lock_advice      aligned,
27                    4 this_process   bit (2) unaligned init ("0"b),
28                    4 other_processes
29                                     bit (2) unaligned init ("0"b),
30                    4 mbz1           bit (32) unaligned init ("0"b),
31                  3 record_cursor_ptr
32                                     ptr init (null),
33                  3 index_cursor_array_ptr
34                                     ptr init (null),
35                2 relation_header_ptr
36                                     ptr init (null),
37                2 attribute_info_ptr ptr init (null),
38                2 index_attribute_map_ptr
39                                     ptr init (null);
40 
41      dcl     relation_opening_info_ptr
42                                     ptr;
43      dcl     RELATION_OPENING_INFO_VERSION_2
44                                     init ("rlmopen2") char (8) aligned internal static options (constant);
45 
46 
47 /* END INCLUDE FILE - dm_rlm_opening_info.incl.pl1 */