1 /* Begin include file ...... io_special_status.incl.pl1 */
 2 /* Written February 1981 by Chris Jones (from iom_stat.incl.pl1) */
 3 
 4 
 5 /****^  HISTORY COMMENTS:
 6   1) change(88-01-06,Farley), approve(88-03-01,MCR7831),
 7      audit(88-03-01,Parisek), install(88-03-08,MR12.2-1032):
 8      Corrected channel size to 6 bits, was incorrectly set to 8.
 9                                                    END HISTORY COMMENTS */
10 
11 
12 dcl  io_special_status_ptr ptr;                             /* pointer to status */
13 
14 dcl  1 io_special_status based (io_special_status_ptr) aligned,
15                                                             /* special status from PSIA */
16        (
17        2 t bit (1),                                         /* entry present bit */
18        2 pad bit (2),
19        2 channel bit (6),                                   /* channel number */
20        2 pad1 bit (3),
21        2 device bit (6),                                    /* device address */
22        2 pad2 bit (1),
23        2 byte2 bit (8),                                     /* device dependent information */
24        2 pad3 bit (1),
25        2 byte3 bit (8)
26        ) unal;                                              /* device dependent information */
27 
28 /* End of include file io_special_status.incl.pl1 */