1 /* BEGIN INCLUDE FILE ... rldr_control.incl.pll ... March 1976 */ 2 3 dcl controlp ptr; /* ptr to control segment */ 4 5 dcl 1 rldr_control based (controlp) aligned, /* structure of control segment for reloader */ 6 2 curn_volname char (32), /* volune name of present input volume */ 7 2 dir_num fixed bin, /* number of directories reloaded */ 8 2 dir_rec fixed bin, /* number of driectory records reloaded */ 9 2 seg_num fixed bin, /* number of segments reloaded */ 10 2 seg_rec fixed bin, /* number of segment records reloaded */ 11 2 input_vol_dir_num fixed bin, /* number of directories reloaded from input vol */ 12 2 input_vol_dir_rec fixed bin, /* number of driectory records reloaded from input vol */ 13 2 input_vol_seg_num fixed bin, /* number of segments reloaded from input vol */ 14 2 input_vol_seg_rec fixed bin, /* number of segment records reloaded from input vol */ 15 2 num_null_vtoce fixed bin, /* number of null vtoce reloaded */ 16 2 num_rejected fixed bin, /* number of data objects on input media that were skipped */ 17 2 curn_volid bit (36), /* volume id of present input volume */ 18 2 label like label aligned, 19 2 vol_map like vol_map aligned, 20 2 vtoc_header like vtoc_header aligned, 21 2 array (0 : 1), /* look aside memory of vtoces reloaded */ 22 3 uid bit (36), /* uid of reloaded vtoce */ 23 3 buffer_idx fixed bin, /* index in vtoc buffer */ 24 3 time_dumped fixed bin(71), /* time object dumped */ 25 3 volid bit (36); /* volid of input volume vtoce reloaded from */ 26 27 /* END INCLUDE FILE ... rld_control.incl.pl1 */