1 /*  BEGIN INCLUDE FILE  heals_io_report_args.incl.pl1  */
 2 /*  Created by RH Morrison Dec. 9,1976  */
 3 /*  Last modified by RH Morrison 12/13/76  */
 4 
 5 dcl 1 ior_ptrs aligned based (heals_ior_args_p),
 6     2 ior_flags_p ptr,
 7     2 ior_prms_p ptr,
 8     2 ch_nfo_ar_p ptr,
 9     2 ioerr_log_sw_p ptr,
10     2 ior_avars_p ptr;
11 
12 dcl 1 ior_flags aligned based (ior_ptrs.ior_flags_p),
13     (2 trace bit (1),
14     2 db bit (1),
15     2 no_recs bit (1)
16      ) unal;
17 
18 dcl 1 ior_prms aligned based (ior_ptrs.ior_prms_p),
19     (2 max_iom_nb_a fixed bin,
20     2 max_ch_nb_a fixed bin,
21     2 max_tape_nb_a fixed bin,
22     2 max_line_cnt_a fixed bin) unal;
23 
24 dcl  ch_nfo_p ptr;
25 dcl 1 ch_nfo aligned based (ch_nfo_p),
26     (2 dev_nam char (4),
27     2 model fixed bin,
28     2 lchan fixed bin (6),
29     2 uchan fixed bin (6),
30     2 i_set bit (1)
31      ) unal;
32 
33 dcl 1 ior_avars aligned based (ior_ptrs.ior_avars_p),
34     2 bulk_port fixed bin;
35 
36 /*  END INCLUDE FILE  heals_io_report_args.incl.pl1  */