1 /* BEGIN  mrds_rdied_files_info.incl.pl1   RDL  05/25/79              */
 2 
 3 dcl 1 rdied_files_info aligned based (rfi_ptr),
 4     2 num_files fixed bin,                                  /* Number of files in this data base that have been readied by
 5                                                                this opening */
 6     2 files (num_files_alloc refer (rdied_files_info.num_files)),
 7       3 name char (32),                                     /* File name */
 8       3 rdy_mode fixed bin,
 9       3 active bit (1) unal,                                /* On if file is currently active */
10       3 unused bit (35) unal;                               /* Reserved for future use */
11 
12 dcl  rfi_ptr ptr;
13 dcl  num_files_alloc fixed bin;
14 
15 /* END  mrds_rdied_files_info.incl.pl1                      */
16