ibm:vm370-lib:rscs:ioe.copy_src
Table of Contents
IOE Source
References
- Fixes Applied : 0
- This Source Date : Saturday, December 9, 1978
- Last Fix ID : [Unmodified]
Source Listing
- IOE.COPY.txt
- *COPY IOE 00001000
- PUSH PRINT 00001200
- AIF ('&SYSPARM' NE 'SUP').IOE01 00001400
- PRINT OFF,NOGEN 00001600
- .IOE01 ANOP 00001800
- IOE DSECT 00002000
- SPACE 1 00003000
- *** IOE - I/O ELEMENT 00004000
- * 00005000
- * 0 +-----------------------------------------------+ 00006000
- * | IONEXT | 00007000
- * 4 +-----------------------------------------------+ 00008000
- * | IOSUBQ | 00009000
- * 8 +-----------+-----------------------------------+ 00010000
- * | IOSTAT | IOTABLEA | 00011000
- * C +-----------+-----------+-----------+-----------+ 00012000
- * | IOADDR | IOSBCHAN | IOID | 00013000
- * 10 +-----------------------+-----------+-----------+ 00014000
- * 00015000
- *** IOE - I/O ELEMENT 00016000
- SPACE 1 00017000
- IONEXT DS 1F NEXT (ACTIVE) I/O ELEMENT 00018000
- IOSUBQ DS 1F FIRST (INACTIVE) I/O ELEMENT 00019000
- * FOR THIS SUB-CHANNEL 00020000
- IOSTAT EQU * STATUS FLAGS 00021000
- IOTABLEA DS 1F ADDRESS OF I/O REQUEST TABLE 00022000
- IOADDR DS AL2 CUU I/O DEVICE ADDRESS 00023000
- IOSBCHAN DS 1X SUBCHANNEL ADDRESS (RSS STYLE) 00024000
- IOID DS 1X ID OF ASSOCIATED TASK 00025000
- SPACE 1 00026000
- * BITS DEFINES IN IOSTAT 00027000
- SENSING EQU X'80' AUTOMATIC SENSE IS ACTIVE 00028000
- CHANDONE EQU X'40' SUB-CHANNEL TERMINATION 00029000
- EJECT 00030000
- POP PRINT 00031000
- SPACE 00032000
ibm/vm370-lib/rscs/ioe.copy_src.txt · Last modified: 2023/08/06 13:39 by Site Administrator