1 /* BEGIN INCLUDE FILE  -  mrds_dsm_access_record.incl.pl1
 2 
 3 79-11-28 Spratt: written
 4 
 5 81-04-28 Davids: added the element used.
 6 */
 7 
 8      dcl     access_record_ptr      ptr;
 9      dcl     access_record_mode_num fixed bin;
10 
11      dcl     1 access_record        based (access_record_ptr),
12                2 used               bit (1),
13                2 mode_num           fixed bin,
14                2 modes              (access_record_mode_num refer (access_record.mode_num)) char (32) varying;
15 
16 /* END INCLUDE FILE  - mrds_dsm_access_record.incl.pl1 */