*COPY IOTABLE                                                           00001000
         PUSH  PRINT                                                    00001200
         AIF   ('&SYSPARM' NE 'SUP').IOT01                              00001400
         PRINT OFF,NOGEN                                                00001600
.IOT01   ANOP                                                           00001800
IOTABLE  DSECT                                                          00002000
         SPACE 1                                                        00003000
***                          IOTABLE  -  I/O TABLE                      00004000
*                                                                       00005000
*          0   +-----------------------------------------------+        00006000
*              |                   IOSYNCH                     |        00007000
*          4   +-----------------------+-----------+-----------+        00008000
*              |         DEVCUU        |  SENSREQ  |  DEVCODE  |        00009000
*          8   +-----------------------+-----------+-----------+        00010000
*              |                   PROGADDR                    |        00011000
*          C   +-----------------------------------------------+        00012000
*              |  SIOCODE  |                                   |        00013000
*              +-----------+                                   |        00014000
*              |                    ENDCSW                     |        00015000
*              |                                               |        00016000
*         14   +-----------------------------------------------+        00017000
*              |                   ENDSENSE                    |        00018000
*         18   +-----------------------------------------------+        00019000
*                                                                       00020000
***                          IOTABLE  -  I/O TABLE                      00021000
         SPACE 1                                                        00022000
IOSYNCH  DS    1F                  SYNCH LOCK FOR I/O OPERATIONS        00023000
DEVCUU   DS    AL2                 CUU ADDRESS                          00024000
SENSREQ  DS    AL1                 NUM OF SENSE BYTES REQUESTED         00025000
DEVCODE  DS    AL1                 VM/370 DEVICE CODE                   00026000
PROGADDR DS    1F                  ADDR OF STRT CHANNEL PROGRAM         00027000
SIOCOND  EQU   *                   SIO CONDITION CODE                   00028000
ENDCSW   DS    2F                  ENDING CSW WITH COMPOSITE STATUS     00029000
ENDSENSE DS    AL1                 REQUESTED RETURN SENSE INFO          00030000
         EJECT                                                          00031000
         POP   PRINT                                                    00032000
         SPACE                                                          00033000