*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