1 
 2 /* Begin include file ...... ioi_stat.incl.pl1 */
 3 /* Last modified 3/24/75 by Noel I. Morris */
 4 
 5 dcl  isp ptr;                                               /* pointer to status structure */
 6 
 7 dcl 1 istat based (isp) aligned,                            /* I/O Interfacer status structure */
 8     2 completion,                                           /* completion flags */
 9      (3 st bit (1),                                         /* "1"b if status returned */
10       3 er bit (1),                                         /* "1"b if status indicates error condition */
11       3 run bit (1),                                        /* "1"b if channel still running */
12       3 time_out bit (1)) unal,                             /* "1"b if time-out occurred */
13     2 level fixed bin (3),                                  /* IOM interrupt level */
14     2 offset fixed bin (18),                                /* DCW list offset */
15     2 absaddr fixed bin (24),                               /* absolute address of workspace */
16     2 iom_stat bit (72),                                    /* IOM status */
17     2 lpw bit (72);                                         /* LPW residue */
18 
19 dcl  imp ptr;                                               /* pointer to message structure */
20 
21 dcl 1 imess based (imp) aligned,                            /* I/O Interfacer event message structure */
22    (2 completion like istat.completion,                     /* completion flags */
23     2 pad bit (11),
24     2 level bit (3),                                        /* interrupt level */
25     2 offset bit (18),                                      /* DCW list offset */
26     2 status bit (36)) unal;                                /* first 36 bits of status */
27 
28 /* End of include file ...... ioi_stat.incl.pl1 */
29