User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:1hy

Deck 1HY

12 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M01S00001.1hy     +++|          IDENT  1HY,HYDD
00002  M01S00002.1hy     +++|          TITLE  1HY - HYDRA (887) DRIVER.
00003  M01S00003.1hy     +++|          CIPPU  ,S
00004  M01S00004.1hy     +++|          BASE   M
00005  M01S00005.1hy     +++|          SST
00006  M01S00006.1hy     +++|*COMMENT  1HY - HYDRA (887) DRIVER.
Line S00007 Modification History
M01 (Added by) 1hy
M02 (Updated by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00007  M02S00007.281l803 ---|          COMMENT  COPYRIGHT CONTROL DATA CORPORATION, 1985.
00008  M01S00001.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00009  M01S00008.1hy     +++|          SPACE  4,10
00010  M01S00009.1hy     +++|***       1HY - HYDRA (887) DRIVER.
00011  M01S00010.1hy     +++|*
00012  M01S00011.1hy     +++|*         P. D. HAAS.        85/12/16.
00013  M01S00012.1hy     +++|          SPACE  4,10
00014  M01S00013.1hy     +++|***       *1HY* IS THE DRIVER FOR THE 887 DISK STORAGE SUBSYSTEM.
00015  M01S00014.1hy     +++|*
00016  M01S00015.1hy     +++|*         THE 887 DISK DRIVES ARE SUPPORTED AS BUFFERED I/O
00017  M01S00016.1hy     +++|*         DEVICES.  REQUESTS THAT ARE PROCESSED BY *1HY* ARE
00018  M01S00017.1hy     +++|*         POSTED BY *CPUMTR* IN THE BUFFERED I/O TABLES IN *CMR*.
00019  M01S00018.1hy     +++|*         *1HY* INTERLOCKS UNITS, DELINKS BUFFERS, AND COMPLETES
00020  M01S00019.1hy     +++|*         SAID REQUESTS BY ISSUING APPROPRIATE *BIOM* FUNCTIONS.
00021  M01S00020.1hy     +++|*
00022  M01S00021.1hy     +++|*         EACH COPY OF *1HY* WILL SUPPORT ONE CONCURRENT CHANNEL AND
00023  M01S00022.1hy     +++|*         IS THE SOLE DRIVER FOR ALL HYDRA DISKS ON THAT CHANNEL.
00024  M01S00023.1hy     +++|*         *1HY* MUST BE LOADED INTO A CONCURRENT PP, IN THE SAME
00025  M01S00024.1hy     +++|*         BANK AS THE CHANNEL IT IS TO SERVICE.
00026  M01S00025.1hy     +++|*
00027  M01S00026.1hy     +++|*         *1HY* SCANS THROUGH THE *PUT* ENTRIES IN A CIRCULAR FASHION
00028  M01S00027.1hy     +++|*         LOOKING FOR REQUESTS TO PROCESS.  ONCE A REQUEST IS FOUND,
00029  M01S00028.1hy     +++|*         *1HY* USES THE PHYSICAL DISK AND UEM ADDRESSES IN THE
00030  M01S00029.1hy     +++|*         CORRESPONDING *CBT* ENTRY TO DETERMINE THE ACTION TO BE
00031  M01S00030.1hy     +++|*         TAKEN.  *1HY* WILL ATTEMPT TO PROCESS CONSECUTIVE REQUESTS
00032  M01S00031.1hy     +++|*         ON THE CURRENT UNIT UNTIL THE END OF THE UNIT I/O QUEUE,
00033  M01S00032.1hy     +++|*         OR A CONSECUTIVE REQUEST WAS NOT FOUND.  AT THIS POINT
00034  M01S00033.1hy     +++|*         *1HY* WILL RESUME ITS SEARCH THROUGH THE *PUT* WITH THE
00035  M01S00034.1hy     +++|*         *PUT* ENTRY IMMEDIATELY FOLLOWING THE ONE JUST PROCESSED.
00036  M01S00035.1hy     +++|          SPACE  4,10
00037  M01S00036.1hy     +++|***       CALL.
00038  M01S00037.1hy     +++|*
00039  M01S00038.1hy     +++|*T        18/ *1HY*, 6/ CP, 6/ CO, 18/, 7/ 1, 5/ CH
Figure

045111229 CH 1303536414259 CO CP *1HY*

00040  M01S00039.1hy     +++|*
00041  M01S00040.1hy     +++|*         CP     CONTROL POINT NUMBER (MUST BE SYSTEM CP).
00042  M01S00041.1hy     +++|*         CO     CHANNEL TABLE ORDINAL (SET BY *CPUMTR*).
00043  M01S00042.1hy     +++|*         CH     CHANNEL NUMBER BEING SERVICED BY THIS PP.
00044  M01S00043.1hy     +++|          SPACE  4,10
00045  M01S00044.1hy     +++|***       DAYFILE MESSAGES.
00046  M01S00045.1hy     +++|*
00047  M01S00046.1hy     +++|*         1HY - UNAUTHORIZED CALL.
00048  M01S00047.1hy     +++|*
00049  M01S00048.1hy     +++|*         *1HY* WILL ISSUE THIS MESSAGE AND ABORT IF
00050  M01S00049.1hy     +++|*         NOT ASSIGNED TO THE SYSTEM CONTROL POINT.
00051  M01S00050.1hy     +++|          SPACE  4,10
00052  M01S00051.1hy     +++|***       ERRLOG MESSAGES.
00053  M01S00052.1hy     +++|*
00054  M01S00053.1hy     +++|*         EQORD,TKNNNN, MEDIA DEFECT ENCOUNTERED.
00055  M01S00054.1hy     +++|*
00056  M01S00055.1hy     +++|*         A MEDIA DEFECT HAS BEEN ENCOUNTERED ON EQUIPMENT WITH EST
00057  M01S00056.1hy     +++|*         ORDINAL ORD, LOGICAL TRACK NNNN.  A REQUEST HAS BEEN ISSUED
00058  M01S00057.1hy     +++|*         TO AUTOMATICALLY FLAW THIS TRACK WHEN IT IS DROPPED.
00059  M01S00058.1hy     +++|          SPACE  4,10
00060  M01S00001.1hy6    +++|***       OPERATOR MESSAGES.
00061  M01S00002.1hy6    +++|*
00062  M01S00003.1hy6    +++|*         EQORD, DIAGNOSTICS RUNNING.
00063  M01S00004.1hy6    +++|*
00064  M01S00005.1hy6    +++|*         EQORD, SPIN UP PENDING.
00065  M01S00006.1hy6    +++|          SPACE  4,10
00066  M01S00059.1hy     +++|***       ORGANIZATION OF THE 887 (MEASUREMENTS IN DECIMAL).
00067  M01S00060.1hy     +++|*
00068  M01S00061.1hy     +++|*         EQUIPMENT TYPE                    *DF*
00069  M01S00062.1hy     +++|*
00070  M01S00063.1hy     +++|*         UNITS/LOGICAL DEVICE (N)         1 - 3
00071  M01S00064.1hy     +++|*
00072  M01S00065.1hy     +++|*         PHYSICAL ORGANIZATION:
00073  M01S00066.1hy     +++|*
00074  M01S00067.1hy     +++|*           WORDS/PHYSICAL SECTOR            512
00075  M01S00068.1hy     +++|*           PHYSICAL SECTORS/TRACK            38
00076  M01S00069.1hy     +++|*           PHYSICAL TRACKS/CYLINDER           4
00077  M01S00070.1hy     +++|*           CYLINDERS/DEVICE                 884 * N
00078  M01S00071.1hy     +++|*           WORDS/DEVICE              68,796,416 * N
00079  M01S00072.1hy     +++|*
00080  M01S00073.1hy     +++|*         LOGICAL ORGANIZATION:
00081  M01S00074.1hy     +++|*
00082  M01S00075.1hy     +++|*           WORDS/LOGICAL SECTOR              64
00083  M01S00076.1hy     +++|*           LOGICAL SECTORS/PHYSICAL SECTOR    8
00084  M01S00077.1hy     +++|*           LOGICAL SECTORS/LOGICAL TRACK    608 * N
00085  M01S00078.1hy     +++|*           LOGICAL TRACKS/CYLINDER            2
00086  M01S00079.1hy     +++|*           LOGICAL TRACKS/DEVICE           1768
00087  M01S00080.1hy     +++|*
00088  M01S00081.1hy     +++|*         MAXIMUM SUSTAINED DATA RATE        983 K WORDS/SECOND
00089  M01S00082.1hy     +++|*
00090  M01S00083.1hy     +++|*
00091  M01S00084.1hy     +++|*         EQUIPMENT TYPE                    *DH*
00092  M01S00085.1hy     +++|*
00093  M01S00086.1hy     +++|*         UNITS/LOGICAL DEVICE (N)         1 - 2
00094  M01S00087.1hy     +++|*
00095  M01S00088.1hy     +++|*         PHYSICAL ORGANIZATION:
00096  M01S00089.1hy     +++|*
00097  M01S00090.1hy     +++|*           WORDS/PHYSICAL SECTOR           2048
00098  M01S00091.1hy     +++|*           PHYSICAL SECTORS/TRACK            11
00099  M01S00092.1hy     +++|*           PHYSICAL TRACKS/CYLINDER           4
00100  M01S00093.1hy     +++|*           CYLINDERS/DEVICE                 884 * N
00101  M01S00094.1hy     +++|*           WORDS/DEVICE              79,659,008 * N
00102  M01S00095.1hy     +++|*
00103  M01S00096.1hy     +++|*         LOGICAL ORGANIZATION:
00104  M01S00097.1hy     +++|*
00105  M01S00098.1hy     +++|*           WORDS/LOGICAL SECTOR              64
00106  M01S00099.1hy     +++|*           LOGICAL SECTORS/PHYSICAL SECTOR   32
00107  M01S00100.1hy     +++|*           LOGICAL SECTORS/LOGICAL TRACK    704 * N
00108  M01S00101.1hy     +++|*           LOGICAL TRACKS/CYLINDER            2
00109  M01S00102.1hy     +++|*           LOGICAL TRACKS/DEVICE           1768
00110  M01S00103.1hy     +++|*
00111  M01S00104.1hy     +++|*         MAXIMUM SUSTAINED DATA RATE       1122 K WORDS/SECOND
00112  M01S00105.1hy     +++|          SPACE  4,10
00113  M01S00106.1hy     +++|***       DISK ERROR PROCESSING DONE BY *1HY*.
00114  M01S00107.1hy     +++|*
00115  M01S00108.1hy     +++|*         FOR EACH REQUEST THAT IS PROCESSED, *1HY* KEEPS A COUNTER
00116  M01S00109.1hy     +++|*         WHICH CONTAINS THE NUMBER OF RETRIES THAT HAVE BEEN
00117  M01S00110.1hy     +++|*         ATTEMPTED WHILE TRYING TO SUCCESSFULLY PROCESS THE REQUEST.
00118  M01S00111.1hy     +++|*         WHEN A REQUEST IS COMPLETED *1HY* CHECKS TO SEE IF THE
00119  M01S00112.1hy     +++|*         ERROR COUNT IS NON-ZERO.  *1HY* WILL LOG A BML MESSAGE
00120  M01S00113.1hy     +++|*         AND INCREMENT THE RECOVERED ERROR COUNT IN THE MST IF THE
00121  M01S00114.1hy     +++|*         ERROR COUNT IS NON-ZERO.
00122  M01S00115.1hy     +++|*
00123  M01S00116.1hy     +++|*         IF THE ERROR COUNT REACHES *MERC* BEFORE THE REQUEST IS
00124  M01S00117.1hy     +++|*         SUCCESSFULLY COMPLETED, *1HY* WILL SET THE ERROR FLAGS IN
00125  M01S00118.1hy     +++|*         THE *CBT*, LOG A FATAL ERROR IN THE BML, AND INCREMENT THE
00126  M01S00119.1hy     +++|*         UNRECOVERED ERROR COUNT IN THE MST.
00127  M01S00120.1hy     +++|          SPACE  4,10
00128  M01S00121.1hy     +++|***       SPECIAL PROGRAMMING NOTES.
00129  M01S00122.1hy     +++|*
00130  M01S00123.1hy     +++|*         THE FOLLOWING IS A LIST OF SPECIAL NOTES THAT SHOULD BE
00131  M01S00124.1hy     +++|*         READ AND UNDERSTOOD BEFORE ANY MODIFICATIONS ARE MADE TO
00132  M01S00125.1hy     +++|*         THIS PROGRAM.
00133  M01S00126.1hy     +++|*
00134  M01S00127.1hy     +++|*
00135  M01S00128.1hy     +++|*         1)  WHERE POSSIBLE, *CMR* POINTERS HAVE BEEN PLUGGED BY THE
00136  M01S00129.1hy     +++|*             PRESET ROUTINE TO IMPROVE THE EXECUTION SPEED OF THE
00137  M01S00130.1hy     +++|*             PROGRAM AND TO MINIMIZE THE AMOUNT OF CODE.
00138  M01S00131.1hy     +++|*
00139  M01S00132.1hy     +++|*         2)  THIS PROGRAM EXCHANGES *CPUMTR* WITHOUT WAITING FOR
00140  M01S00133.1hy     +++|*             THE REQUEST TO COMPLETE.  ROUTINE *CMC* SHOULD BE CALLED
00141  M01S00134.1hy     +++|*             IF THE *MONITOR* MACRO IS TO BE USED WHILE THERE IS A
00142  M01S00135.1hy     +++|*             POSSIBILITY OF AN OUTSTANDING MONITOR REQUEST.
00143  M01S00136.1hy     +++|*
00144  M01S00137.1hy     +++|*         3)  THE DEVICE STATE TABLE IS BUILT AT LOCATION *EXR* IN
00145  M01S00138.1hy     +++|*             PP RESIDENT, THEREFORE IT IS NOT POSSIBLE TO USE THE
00146  M01S00139.1hy     +++|*             *EXR* AND *SMS* ROUTINES.
00147  M01S00140.1hy     +++|          SPACE  4,10
00148  M01S00141.1hy     +++|
00149  M01S00142.1hy     +++|**        COMMON DECKS.
00150  M01S00143.1hy     +++|
00151  M01S00144.1hy     +++|
00152  M01S00145.1hy     +++|*CALL     COMPMAC
00153  M01S00146.1hy     +++| RICHI$   EQU    1           SELECT DEFERRED INSTRUCTION MODIFICATION
00154  M01S00147.1hy     +++|*CALL     COMPCHI
00155  M01S00148.1hy     +++|*CALL     COMSCPS
00156  M01S00149.1hy     +++| QUAL$S   SET    0           REMOVE QUALIFICATION OF COMSDFS CONSTANTS
00157  M01S00150.1hy     +++|*CALL     COMSDFS
00158  M01S00151.1hy     +++|          LIST   X
00159  M01S00152.1hy     +++|*CALL     COMSHIO
00160  M01S00153.1hy     +++|          LIST   *
00161  M01S00154.1hy     +++|          QUAL   IOU
00162  M01S00155.1hy     +++|*CALL     COMSIOU
00163  M01S00156.1hy     +++|          QUAL   *
00164  M01S00157.1hy     +++|*CALL     COMSLSD
00165  M01S00158.1hy     +++|*CALL     COMSMSC
00166  M01S00159.1hy     +++|*CALL     COMSMSP
00167  M01S00160.1hy     +++|*CALL     COMSPIM
00168  M01S00161.1hy     +++|*CALL     COMS1DS
00169  M01S00162.1hy     +++|          TITLE  CONSTANTS AND DEFINITIONS.
00170  M01S00163.1hy     +++|          SPACE  4,10
00171  M01S00164.1hy     +++|****      DIRECT CELL ALLOCATION.
00172  M01S00165.1hy     +++|
00173  M01S00166.1hy     +++|
00174  M01S00167.1hy     +++| NR       EQU    15 - 21     NEXT REQUEST
00175  M01S00168.1hy     +++| WB       EQU    22 - 26     CM WORD BUFFER
00176  M01S00169.1hy     +++|
00177  M01S00170.1hy     +++|*         THE NEXT FIVE LOCATIONS ARE ORDER DEPENDENT.
00178  M01S00171.1hy     +++|
00179  M01S00172.1hy     +++| PB       EQU    27          PREVIOUS CONTROL BUFFER ORDINAL
00180  M01S00173.1hy     +++| CB       EQU    30          CURRENT CONTROL BUFFER ORDINAL
00181  M01S00174.1hy     +++| NB       EQU    31          NEXT CONTROL BUFFER ORDINAL
00182  M01S00175.1hy     +++| EO       EQU    32          EST ORDINAL
00183  M01S00176.1hy     +++| UN       EQU    33          UNIT NUMBER
00184  M01S00177.1hy     +++|
00185  M01S00178.1hy     +++| UA       EQU    34 - 35     UEM ADDRESS / 100
00186  M01S00179.1hy     +++| RC       EQU    36          REQUEST COUNT
00187  M01S00180.1hy     +++| DT       EQU    37          DEVICE TYPE
00188  M01S00181.1hy     +++| SS       EQU    40          SLAVE STATUS FLAGS
00189  M01S00182.1hy     +++| PO       EQU    41          CURRENT *PUT* ORDINAL
00190  M01S00183.1hy     +++| TO       EQU    42          COMMAND TIMEOUT
00191  M01S00184.1hy     +++| SF       EQU    43          DEVICE SELECTED FLAG
00192  M01S00185.1hy     +++| UC       EQU    44          UNIT ACTIVITY COUNT
00193  M01S00186.1hy     +++|          ERRNZ  SF+1-UC     CODE DEPENDS ON VALUE
00194  M01S00187.1hy     +++| RW       EQU    45          READ / WRITE FLAG
00195  M01S00188.1hy     +++| PA       EQU    46          PROCESSOR ADDRESS
00196  M01S00189.1hy     +++| DI       EQU    47          DEVICE INDEX
00197  M01S00190.1hy     +++| CR       EQU    57          CHANNEL RESERVED STATUS
00198  M01S00191.1hy     +++| ML       EQU    60          MESSAGE LENGTH
00199  M01S00192.1hy     +++| FC       EQU    61          FAULT CODE
00200  M01S00193.1hy     +++| CD       EQU    62          CHANNEL DATA
00201  M01S00001.ns2512  +++| RF       EQU    63          SPECIAL REQUEST FLAGS
00202  M01S00194.1hy     +++|
00203  M01S00195.1hy     +++|****
00204  M01S00196.1hy     +++|          SPACE  4,10
00205  M01S00197.1hy     +++|**        ISI ADAPTOR FUNCTION CODES.
00206  M01S00198.1hy     +++|
00207  M01S00199.1hy     +++|
00208  M01S00200.1hy     +++| FCMC     EQU    0#000       MASTER CLEAR
00209  M01S00201.1hy     +++| FCRC     EQU    0#100       READ CONTROL REGISTER
00210  M01S00202.1hy     +++| FCWC     EQU    0#101       WRITE CONTROL REGISTER
00211  M01S00203.1hy     +++| FCRM     EQU    0#200       READ MASK REGISTER
00212  M01S00204.1hy     +++| FCWM     EQU    0#201       WRITE MASK REGISTER
00213  M01S00205.1hy     +++| FCRE     EQU    0#300       READ ERROR STATUS
00214  M01S00206.1hy     +++| FCRO     EQU    0#400       READ OPERATIONAL STATUS
00215  M01S00207.1hy     +++| FCIS     EQU    0#500       REQUEST IDLE STATUS
00216  M01S00208.1hy     +++| FCRT     EQU    0#600       READ *T* REGISTERS
00217  M01S00209.1hy     +++| FCWT     EQU    0#601       WRITE *T* REGISTERS
00218  M01S00210.1hy     +++| FCRS     EQU    0#700       READ TEST SEED
00219  M01S00211.1hy     +++| FCWS     EQU    0#701       WRITE TEST SEED
00220  M01S00212.1hy     +++| FCCH     EQU    0#800       CLEAR SELECT HOLD
00221  M01S00213.1hy     +++| FCSH     EQU    0#801       SET SELECT HOLD
00222  M01S00214.1hy     +++| FCCS     EQU    0#900       CLEAR COMMAND SEQUENCE
00223  M01S00215.1hy     +++| FCSS     EQU    0#901       SET COMMAND SEQUENCE
00224  M01S00216.1hy     +++| FCSO     EQU    0#A00       FORCE SYNC OUT
00225  M01S00217.1hy     +++| FCPM     EQU    0#B00       SET PP MODE
00226  M01S00218.1hy     +++| FCCD     EQU    0#C00       CLEAR DMA MODE
00227  M01S00219.1hy     +++| FCSD     EQU    0#C01       SET DMA MODE
00228  M01S00220.1hy     +++| FCCE     EQU    0#D00       CLEAR ECHO MODE
00229  M01S00221.1hy     +++| FCSE     EQU    0#D01       SET ECHO MODE
00230  M01S00222.1hy     +++| FCCT     EQU    0#E00       CLEAR *T* REGISTERS
00231  M01S00223.1hy     +++|          SPACE  4,10
00232  M01S00224.1hy     +++|**        FUNCTION WORD OPTION FLAGS.
00233  M01S00225.1hy     +++|
00234  M01S00226.1hy     +++|
00235  M01S00227.1hy     +++| FOBS     EQU    1S8         BUS SLAVE (IHD) SELECT
00236  M01S00228.1hy     +++| FONI     EQU    1S9         NON-INTERLOCKED MODE
00237  M01S00229.1hy     +++| FOTT     EQU    1S10        TERMINATE I/O TRANSFER
00238  M01S00230.1hy     +++| FOZI     EQU    1S11        ZERO-FILL INHIBIT
00239  M01S00231.1hy     +++| FOCA     EQU    1S12        CLEAR ATTENTION
00240  M01S00232.1hy     +++| FODE     EQU    1S13        DATA EXCHANGE
00241  M01S00233.1hy     +++| FOSR     EQU    1S14        SELECTIVE RESET
00242  M01S00234.1hy     +++| FOWR     EQU    1S15        WRITE SELECT
00243  M01S00235.1hy     +++|          SPACE  4,10
00244  M01S00236.1hy     +++|**        *IHD* FUNCTION WORDS.
00245  M01S00237.1hy     +++|
00246  M01S00238.1hy     +++|
00247  M01S00239.1hy     +++| FWSB     EQU    0#80                  READ STATUS BLOCK
00248  M01S00240.1hy     +++| FWDS     EQU    0#90                  READ DEVICE STATUS
00249  M01S00241.1hy     +++| FWBS     EQU    FOBS                  BUS SLAVE (IHD) SELECT
00250  M01S00242.1hy     +++| FWCA     EQU    FOCA                  CLEAR ATTENTION
00251  M01S00243.1hy     +++| FWSN     EQU    FOCA+FOTT+0#D0        READ SERIAL NUMBER
00252  M01S00244.1hy     +++| FWRL     EQU    FOCA+FOTT+0#FA        READ REVISION LEVEL
00253  M01S00245.1hy     +++| FWEP     EQU    FODE+FOCA+FOTT        ERROR PROCESSING
00254  M01S00246.1hy     +++| FWEL     EQU    FODE+FOCA+FOTT        READ ERROR LOG
00255  M01S00247.1hy     +++| FWER     EQU    FODE+FOCA+FOTT        READ ERROR REGISTER
00256  M01S00248.1hy     +++| FWRE     EQU    FODE+FOTT+FONI+FOCA   READ EXCHANGE
00257  M01S00249.1hy     +++| FWSR     EQU    FOSR+FOCA             SELECTIVE RESET
00258  M01S00250.1hy     +++| FWCB     EQU    FOWR+FOCA             WRITE COMMAND BLOCK
00259  M01S00251.1hy     +++| FWWE     EQU    FOWR+FWRE+FOZI        WRITE EXCHANGE
00260  M01S00252.1hy     +++|          SPACE  4,10
00261  M01S00253.1hy     +++|**        *IHD* COMMAND CODES.
00262  M01S00254.1hy     +++|
00263  M01S00255.1hy     +++|
00264  M01S00256.1hy     +++| CCRL     EQU    0#01+1S15   READ ERROR LOG
00265  M01S00257.1hy     +++| CCRI     EQU    0#02+1S15   READ ERROR REGISTER IMAGE
00266  M01S00258.1hy     +++| CCNO     EQU    0#05+1S15   NO OPERATION
00267  M01S00259.1hy     +++| CCSD     EQU    0#12+1S15   SPIN-DOWN DRIVE
00268  M01S00260.1hy     +++| CCSU     EQU    0#13+1S15   SPIN-UP DRIVE
00269  M01S00261.1hy     +++| CCOW     EQU    0#23+1S15   INITIATE OPEN-ENDED WRITE
00270  M01S00262.1hy     +++| CCOR     EQU    0#35+1S15   INITIATE OPEN-ENDED READ
00271  M01S00263.1hy     +++| CCLM     EQU    0#53+1S15   LOAD OPERATING MODE PARAMETERS
00272  M01S00264.1hy     +++| CCLD     EQU    0#54+1S15   LOAD ATTENTION DELAY PARAMETERS
00273  M01S00265.1hy     +++| CCD2     EQU    0#70+1S15   EXECUTE LEVEL 2 DIAGNOSTICS
00274  M01S00266.1hy     +++| CCRT     EQU    0#78+1S15   EXECUTE READ TEST
00275  M01S00267.1hy     +++| CCWT     EQU    0#79+1S15   EXECUTE WRITE TEST
00276  M01S00268.1hy     +++| CCD1     EQU    0#7A+1S15   EXECUTE LEVEL 1 DIAGNOSTICS
00277  M01S00269.1hy     +++|          SPACE  4,10
00278  M01S00270.1hy     +++|**        *IHD* COMMAND EXECUTION STATUS.
00279  M01S00271.1hy     +++|
00280  M01S00272.1hy     +++|
00281  M01S00273.1hy     +++| ESUI     EQU    00          *IHD* UNIT IDLE
00282  M01S00274.1hy     +++| ESRD     EQU    10          READ DATA AVAILABLE
00283  M01S00275.1hy     +++| ESBS     EQU    20          BUFFER SPACE AVAILABLE
00284  M01S00276.1hy     +++| ESCB     EQU    40          COMMAND BLOCK INDEPENDENT
00285  M01S00277.1hy     +++| ESUA     EQU    60          UNSOLICITED ATTENTION
00286  M01S00278.1hy     +++| ESCC     EQU    70          COMMAND COMPLETE
00287  M01S00279.1hy     +++|          SPACE  4,10
00288  M01S00280.1hy     +++|**        *IHD* COMMAND BLOCK PARAMETER WORD VALUES.
00289  M01S00281.1hy     +++|
00290  M01S00282.1hy     +++|
00291  M01S00283.1hy     +++| PWIT     EQU    0#0000      INTEGRITY TEST
00292  M01S00284.1hy     +++| PWWT     EQU    0#0005      WRITE TEST
00293  M01S00285.1hy     +++| PWRT     EQU    0#0006      READ TEST
00294  M01S00286.1hy     +++| PWADDF   EQU    0#0401      ATTENTION DELAY (4KB SECTOR)
00295  M01S00287.1hy     +++| PWADDH   EQU    0#0101      ATTENTION DELAY (16KB SECTOR)
Line S00288 Modification History
M01 (Added by) 1hy
M02 (Updated by) 1hy8
Seq #  *Modification Id* Act 
----------------------------+
00296  M02S00288.1hy8    ---| PWOM     EQU    0#3902      OPERATING MODE
00297  M01S00001.1hy8    +++| PWOM     EQU    0#3D02      OPERATING MODE
00298  M01S00289.1hy     +++|          SPACE  4,10
00299  M01S00290.1hy     +++|**        MAINTENANCE REGISTER REQUEST CODE SYMBOLS.
00300  M01S00291.1hy     +++|
00301  M01S00292.1hy     +++|
00302  M01S00293.1hy     +++| MR       EQU    /IOU/MR     MAINTENANCE CHANNEL
00303  M01S00294.1hy     +++| IOUC     EQU    /IOU/IOUC+/IOU/MRRD   READ CONNECT CODE
00304  M01S00295.1hy     +++| RMRF     EQU    /IOU/MRRD-/IOU/MRRD   READ REGISTER
00305  M01S00296.1hy     +++| WMRF     EQU    /IOU/MRWT-/IOU/MRRD   WRITE REGISTER
00306  M01S00297.1hy     +++|
00307  M01S00298.1hy     +++| RFMR     EQU    RMRF*10000+/IOU/FMCR  READ FAULT MASK REGISTER
00308  M01S00299.1hy     +++| RCSR     EQU    RMRF*10000+/IOU/C0CR  READ CHANNEL STATUS REGISTER
00309  M01S00300.1hy     +++| WFMR     EQU    WMRF*10000+/IOU/FMCR  WRITE FAULT MASK REGISTER
00310  M01S00301.1hy     +++|          SPACE  4,10
00311  M01S00302.1hy     +++|**        FAULT ANALYSIS CODES.
00312  M01S00303.1hy     +++|
00313  M01S00304.1hy     +++|
00314  M01S00305.1hy     +++| ECPE     EQU    1           CHANNEL PARITY ERROR
00315  M01S00306.1hy     +++|
00316  M01S00307.1hy     +++| ECER     EQU    4           CHANNEL DETECTED ERROR
00317  M01S00308.1hy     +++| ECCM     EQU    5           CHANNEL DETECTED CM ERROR
00318  M01S00309.1hy     +++| ECIE     EQU    6           ISI CHANNEL ERROR
00319  M01S00310.1hy     +++| ECHF     EQU    7           CHANNEL HUNG FULL
00320  M01S00311.1hy     +++|
00321  M01S00312.1hy     +++| ETAT     EQU    10          ATTENTION TIMEOUT
00322  M01S00313.1hy     +++| ETFN     EQU    11          CHANNEL FUNCTION TIMEOUT
00323  M01S00314.1hy     +++|
00324  M01S00315.1hy     +++| EDPE     EQU    14          DATA PARITY ERROR
00325  M01S00316.1hy     +++|
00326  M01S00317.1hy     +++| EDNR     EQU    20          DEVICE NOT READY
00327  M01S00318.1hy     +++| EOTC     EQU    21          OVER TEMP CONDITION
00328  M01S00319.1hy     +++|
00329  M01S00320.1hy     +++| EIDT     EQU    24          INCOMPLETE DATA TRANSFER
00330  M01S00321.1hy     +++|
00331  M01S00322.1hy     +++| EIRQ     EQU    30          *IHD* FAILURE
00332  M01S00323.1hy     +++| ECBN     EQU    31          COMMAND BLOCK NUMBER
00333  M01S00324.1hy     +++| EICU     EQU    32          INCORRECT UNIT SELECTED
00334  M01S00325.1hy     +++| ETSL     EQU    33          SELECT TIMEOUT
00335  M01S00326.1hy     +++|
00336  M01S00327.1hy     +++| ESUF     EQU    34          SPIN-UP FAILURE
00337  M01S00328.1hy     +++| ESDF     EQU    35          SPIN-DOWN FAILURE
00338  M01S00329.1hy     +++| ETTC     EQU    36          TRANSFER COMPLETE TIMEOUT
00339  M01S00330.1hy     +++| EUES     EQU    37          UNEXPECTED EXECUTION STATUS
00340  M01S00331.1hy     +++|
00341  M01S00332.1hy     +++| ETCB     EQU    40          COMMAND BLOCK TIMEOUT
00342  M01S00333.1hy     +++| EUDS     EQU    41          UNEXPECTED DELAY STATUS
00343  M01S00334.1hy     +++| ELOP     EQU    42          LOAD OPERATING PARAMETERS FAILURE
00344  M01S00335.1hy     +++| EDSA     EQU    43          SELECT ACTIVE DROPPED
00345  M01S00336.1hy     +++|
00346  M01S00337.1hy     +++| ETTR     EQU    44          *T* REGISTER EMPTY TIMEOUT
00347  M01S00338.1hy     +++| EIOS     EQU    45          I/O INITIATION ERROR
00348  M01S00339.1hy     +++| EIOC     EQU    46          I/O COMPLETE ERROR
00349  M01S00340.1hy     +++|
00350  M01S00341.1hy     +++| EDTF     EQU    50          DIAGNOSTIC FAULT
00351  M01S00342.1hy     +++|
00352  M01S00343.1hy     +++| EDRA     EQU    54          DRIVE RESERVED TO ALTERNATE ACCESS
00353  M01S00344.1hy     +++|          SPACE  4,10
00354  M01S00345.1hy     +++|**        DEVICE STATE TABLE DEFINITIONS.
00355  M01S00346.1hy     +++|
00356  M01S00347.1hy     +++|
00357  M01S00348.1hy     +++|          LOC    0
00358  M01S00349.1hy     +++| PUTO     BSS    1           *PUT* ORDINAL
00359  M01S00350.1hy     +++| CREG     BSS    1           CONTROL REGISTER IMAGE
00360  M01S00351.1hy     +++| ADDR     BSS    1           PROCESSOR ADDRESS
00361  M01S00352.1hy     +++| RADD     BSS    1           RETURN ADDRESS
00362  M01S00353.1hy     +++| ATTN     BSS    1           ATTENTION RETURN
00363  M01S00354.1hy     +++| EEST     BSS    1           EXPECTED EXECUTION STATUS
00364  M01S00355.1hy     +++| RWST     BSS    1           READ / WRITE STATUS
00365  M01S00356.1hy     +++| RQIN     BSS    1           REQUEST QUEUE INDEX
00366  M01S00357.1hy     +++| RQLN     EQU    10          REQUEST QUEUE LENGTH
00367  M01S00358.1hy     +++| IORQ     BSS    RQLN        I/O REQUEST QUEUE
00368  M01S00359.1hy     +++| CBCT     BSS    1           CUMULATIVE BUFFER COUNT
00369  M01S00360.1hy     +++| CYLN     BSS    1           CYLINDER ON SEEK
00370  M01S00361.1hy     +++| TKSN     BSS    1           TRACK + SECTOR ON SEEK
00371  M01S00362.1hy     +++| ERCT     BSS    1           ERROR COUNT
00372  M01S00363.1hy     +++| ELEN     BSS    1           ERROR LOG ENTRY NUMBER
00373  M01S00364.1hy     +++| ELRC     BSS    1           ERROR LOG REPETITION COUNT
00374  M01S00365.1hy     +++| EREN     BSS    1           ERROR REGISTER ENTRY NUMBER
00375  M01S00366.1hy     +++| SREQ     BSS    1           SPECIAL REQUEST
00376  M01S00367.1hy     +++| IPPS     BSS    1           I/O PREPROCESSING STATUS
00377  M01S00368.1hy     +++| LCMD     BSS    1           LAST *IHD* COMMAND
00378  M01S00369.1hy     +++| ESAD     BSS    1           ERROR STEP ADDRESS
00379  M01S00370.1hy     +++|
00380  M01S00371.1hy     +++| DSTBE    BSS    0           LENGTH OF STATE TABLE ENTRY
00381  M01S00372.1hy     +++|          LOC    0
00382  M01S00373.1hy     +++|          SPACE  4,15
00383  M01S00374.1hy     +++|****      ASSEMBLY CONSTANTS.
00384  M01S00375.1hy     +++|
00385  M01S00376.1hy     +++|
00386  M01S00377.1hy     +++| CH       EQU    16          CHANNEL NUMBER
00387  M01S00378.1hy     +++| MXND     EQU    10*2        MAXIMUM NUMBER OF UNITS / DRIVER
00388  M01S00379.1hy     +++| DSTB     EQU    EXR         START OF DEVICE STATE TABLES
00389  M01S00380.1hy     +++| DSTBL    EQU    DSTB+DSTBE*MXND  LWA+1 OF DEVICE STATE TABLES
00390  M01S00381.1hy     +++| OHYD     MAX    PPFW,DSTBL  DRIVER ORIGIN
00391  M01S00382.1hy     +++|
00392  M01S00383.1hy     +++|*         THE FOLLOWING SYMBOLS DEFINE LOCATIONS IN THE I/O
00393  M01S00384.1hy     +++|*         REQUEST QUEUE (IORQ) OF THE DEVICE STATE TABLE.
00394  M01S00385.1hy     +++|*         THESE LOCATIONS MAY BE USED ONLY DURING ERROR AND
00395  M01S00386.1hy     +++|*         SPECIAL REQUEST PROCESSING (NOT DURING I/O PROCESSING).
00396  M01S00387.1hy     +++|
00397  M01S00388.1hy     +++| ENAD     EQU    IORQ+RQLN-1 ERROR NEXT ADDRESS
00398  M01S00389.1hy     +++| CACT     EQU    ENAD-1      CLEAR ATTENTION COUNT
00399  M01S00390.1hy     +++| SIST     EQU    CACT-1      SYSTEM INTERVENTION STATUS
00400  M01S00391.1hy     +++| MIST     EQU    SIST-1      MANUAL INTERVENTION STATUS
00401  M01S00392.1hy     +++| GSST     EQU    MIST-1      GENERAL SLAVE STATUS
00402  M01S00393.1hy     +++| IOST     EQU    GSST-1      READ WRITE STATUS
00403  M01S00394.1hy     +++| ERAD     EQU    IOST-1      ERROR RETURN ADDRESS
00404  M01S00395.1hy     +++|          ERRNG  ERAD-IORQ   CODE DEPENDS ON VALUE
00405  M01S00396.1hy     +++|
00406  M01S00397.1hy     +++|*         THE FOLLOWING VALUE IS USED AS A SHIFT COUNT
00407  M01S00398.1hy     +++|*         TO DETERMINE THE FUNCTION TIMEOUT DELAY (2**N).
00408  M01S00399.1hy     +++|
00409  M01S00400.1hy     +++| FTOS     EQU    0           1 MILLISECOND
00410  M01S00401.1hy     +++|          ERRNG  8D-FTOS     VALUE TOO LARGE
00411  M01S00402.1hy     +++| .2       DECMIC FTOS+2
00412  M01S00403.1hy     +++| FTOD     EQU    370S".2"    FUNCTION TIMEOUT DELAY
00413  M01S00404.1hy     +++|
00414  M01S00405.1hy     +++| DRFM     EQU    1000        DIRECTION FLAG MASK
00415  M01S00406.1hy     +++| ILFM     EQU    4000        INTERLOCK FLAG MASK
00416  M01S00407.1hy     +++| MERC     EQU    7           ERROR PROCESSING RETRY COUNT
Line S00408 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
00417  M02S00408.271l716 ---| CSRC     EQU    MERC/2      CHANNEL SWITCH RETRY COUNT
00418  M01S00001.271l716 +++| CSRC     EQU    MERC/2+1    CHANNEL SWITCH RETRY COUNT
00419  M01S00409.1hy     +++| FTRC     EQU    3           FUNCTION TIMEOUT RETRY COUNT
00420  M01S00410.1hy     +++| DSRC     EQU    20D         DEVICE SELECT RETRY COUNT
00421  M01S00411.1hy     +++| ERLGL    EQU    48D         ERROR LOG LENGTH
00422  M01S00412.1hy     +++| ERRGL    EQU    48D         ERROR REGISTER LENGTH
00423  M01S00413.1hy     +++| SLSTL    EQU    7           SLAVE STATUS BLOCK LENGTH
00424  M01S00414.1hy     +++| DVSTL    EQU    10          DEVICE STATUS BLOCK LENGTH
00425  M01S00415.1hy     +++| STSBL    EQU    SLSTL+DVSTL COMBINED STATUS BLOCK LENGTH
00426  M01S00416.1hy     +++| DBUFL    MAX    ERLGL,ERRGL DATA BUFFER LENGTH
00427  M01S00417.1hy     +++| EBUFL    EQU    5*10D       ERROR MESSAGE BUFFER LENGTH
00428  M01S00418.1hy     +++|
00429  M01S00419.1hy     +++|****
00430  M01S00002.271l716 +++|          SPACE  4,10
00431  M01S00003.271l716 +++|*         THE FOLLOWING SYMBOL DEFINITION CONTROLS WHICH (IF ANY)
00432  M01S00004.271l716 +++|*         OF THE DIAGNOSTICS ARE USED FOR DEVICE VERIFICATION.
00433  M01S00005.271l716 +++|
00434  M01S00006.271l716 +++|
00435  M01S00007.271l716 +++|*CCVD     EQU    CCNO        NO DIAGNOSTICS
00436  M01S00008.271l716 +++|*CCVD     EQU    CCD1        LEVEL 1 DIAGNOSTICS
00437  M01S00009.271l716 +++|*CCVD     EQU    CCD2        LEVEL 2 DIAGNOSTICS
00438  M01S00010.271l716 +++|
00439  M01S00011.271l716 +++| CCVD     EQU    CCD2        LEVEL 2 DIAGNOSTICS
00440  M01S00420.1hy     +++|          TITLE  MACROS.
00441  M01S00421.1hy     +++|          SPACE  4,10
00442  M01S00422.1hy     +++|**        MACRO DEFINITIONS.
00443  M01S00423.1hy     +++| TBLM     SPACE  4,10
Line S00424 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00444  M02S00424.ns2769  ---|**        TBLM - CREATE BUFFERED DEVICE TABLE ENTRY MACRO.
00445  M01S00001.ns2769  +++|**        TBLM - CREATE TABLE ENTRY MACRO.
00446  M01S00425.1hy     +++|*
00447  M01S00426.1hy     +++|*NAM      TBLM
00448  M01S00427.1hy     +++|*
Line S00428 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00449  M02S00428.ns2769  ---|*         ENTRY  NAM = BUFFERED DEVICE TABLE NAME.
00450  M01S00002.ns2769  +++|*         ENTRY  NAM = TABLE NAME.
00451  M01S00429.1hy     +++|*
00452  M01S00430.1hy     +++|*         EXIT   NAM_E MACRO DEFINED.
00453  M01S00431.1hy     +++|
00454  M01S00432.1hy     +++|
00455  M01S00433.1hy     +++|          PURGMAC  TBLM
00456  M01S00434.1hy     +++|
00457  M01S00435.1hy     +++|          MACRO  TBLM,NAM
00458  M01S00436.1hy     +++|          PURGMAC  NAM_E
00459  M01S00437.1hy     +++| NAM_E    MACRO  ADDR
00460  M01S00438.1hy     +++|          LOCAL  A
00461  M01S00439.1hy     +++|          MACREF NAM_E
00462  M01S00440.1hy     +++|          NOREF  A
00463  M01S00441.1hy     +++| A        EQU    ADDR
00464  M01S00442.1hy     +++| T_NAM    RMT
00465  M01S00443.1hy     +++|          CON    A
00466  M01S00444.1hy     +++|          RMT
00467  M01S00445.1hy     +++| TBLM     ENDM
00468  M01S00446.1hy     +++| CBTE     SPACE  4,10
00469  M01S00447.1hy     +++|**        CBTE - CONTROL BUFFER TABLE ENTRY.
00470  M01S00448.1hy     +++|*
00471  M01S00449.1hy     +++|*         THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TCBT*
00472  M01S00450.1hy     +++|*         THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH
00473  M01S00451.1hy     +++|*         REQUIRES THE FWA OF THE CONTROL BUFFER TABLE.
00474  M01S00452.1hy     +++|*
00475  M01S00453.1hy     +++|*         CBTE   ADDR
00476  M01S00454.1hy     +++|*
00477  M01S00455.1hy     +++|*         ENTRY  (ADDR) = ADDRESS OF INSTRUCTION.
00478  M01S00456.1hy     +++|*
00479  M01S00457.1hy     +++|*         EXIT   ADDRESS IS ADDED TO THE REMOTE BLOCK *TCBT*.
00480  M01S00458.1hy     +++|
00481  M01S00459.1hy     +++|
00482  M01S00460.1hy     +++| CBT      TBLM
00483  M01S00461.1hy     +++| CCTE     SPACE  4,10
00484  M01S00462.1hy     +++|**        CCTE - CHANNEL CONTROL TABLE ENTRY.
00485  M01S00463.1hy     +++|*
00486  M01S00464.1hy     +++|*         THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TCCT*
00487  M01S00465.1hy     +++|*         THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH
00488  M01S00466.1hy     +++|*         REQUIRES THE FWA OF THE CHANNEL CONTROL TABLE.
00489  M01S00467.1hy     +++|*
00490  M01S00468.1hy     +++|*         CCTE   ADDR
00491  M01S00469.1hy     +++|*
00492  M01S00470.1hy     +++|*         ENTRY  (ADDR) = ADDRESS OF INSTRUCTION.
00493  M01S00471.1hy     +++|*
00494  M01S00472.1hy     +++|*         EXIT   ADDRESS IS ADDED TO THE REMOTE BLOCK *TCCT*.
00495  M01S00473.1hy     +++|
00496  M01S00474.1hy     +++|
00497  M01S00475.1hy     +++| CCT      TBLM
00498  M01S00476.1hy     +++| CHTE     SPACE  4,10
00499  M01S00477.1hy     +++|**        CHTE - CHANNEL TABLE ENTRY.
00500  M01S00478.1hy     +++|*
00501  M01S00479.1hy     +++|*         THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TCHT*
00502  M01S00480.1hy     +++|*         THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH
00503  M01S00481.1hy     +++|*         REQUIRES THE FWA OF THE CHANNEL TABLE.
00504  M01S00482.1hy     +++|*
00505  M01S00483.1hy     +++|*         CHTE   ADDR
00506  M01S00484.1hy     +++|*
00507  M01S00485.1hy     +++|*         ENTRY  (ADDR) = ADDRESS OF INSTRUCTION.
00508  M01S00486.1hy     +++|*
00509  M01S00487.1hy     +++|*         EXIT   ADDRESS IS ADDED TO THE REMOTE BLOCK *TCHT*.
00510  M01S00488.1hy     +++|
00511  M01S00489.1hy     +++|
00512  M01S00490.1hy     +++| CHT      TBLM
00513  M01S00491.1hy     +++| EMBE     SPACE  4,10
00514  M01S00492.1hy     +++|**        EMBE - ERROR MESSAGE TABLE ENTRY.
00515  M01S00493.1hy     +++|*
00516  M01S00494.1hy     +++|*         THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TEMB*
00517  M01S00495.1hy     +++|*         THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH
00518  M01S00496.1hy     +++|*         REQUIRES THE FWA OF THE ERROR MESSAGE TABLE.
00519  M01S00497.1hy     +++|*
00520  M01S00498.1hy     +++|*         EMBE   ADDR
00521  M01S00499.1hy     +++|*
00522  M01S00500.1hy     +++|*         ENTRY  (ADDR) = ADDRESS OF INSTRUCTION.
00523  M01S00501.1hy     +++|*
00524  M01S00502.1hy     +++|*         EXIT   ADDRESS IS ADDED TO THE REMOTE BLOCK *TEMB*.
00525  M01S00503.1hy     +++|
00526  M01S00504.1hy     +++|
00527  M01S00505.1hy     +++| EMB      TBLM
00528  M01S00506.1hy     +++| EXPE     SPACE  4,10
00529  M01S00507.1hy     +++|**        EXPE - EXCHANGE PACKAGE ADDRESS ENTRY.
00530  M01S00508.1hy     +++|*
00531  M01S00509.1hy     +++|*         THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TEXP*
00532  M01S00510.1hy     +++|*         THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH
00533  M01S00511.1hy     +++|*         REQUIRES THE FWA OF THE PP EXCHANGE PACKAGE.
00534  M01S00512.1hy     +++|*
00535  M01S00513.1hy     +++|*         EXPE   ADDR
00536  M01S00514.1hy     +++|*
00537  M01S00515.1hy     +++|*         ENTRY  (ADDR) = ADDRESS OF INSTRUCTION.
00538  M01S00516.1hy     +++|*
00539  M01S00517.1hy     +++|*         EXIT   ADDRESS IS ADDED TO THE REMOTE BLOCK *TEXP*.
00540  M01S00518.1hy     +++|
00541  M01S00519.1hy     +++|
00542  M01S00520.1hy     +++| EXP      TBLM
00543  M01S00521.1hy     +++| FTTE     SPACE  4,10
00544  M01S00522.1hy     +++|**        FTTE - FUNCTION TIMEOUT TABLE ENTRY.
00545  M01S00523.1hy     +++|*
00546  M01S00524.1hy     +++|*         THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TFTT*
00547  M01S00525.1hy     +++|*         THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH
00548  M01S00526.1hy     +++|*         REQUIRES THE FWA OF THE FUNCTION TIMEOUT TABLE.
00549  M01S00527.1hy     +++|*
00550  M01S00528.1hy     +++|*         FTTE   ADDR
00551  M01S00529.1hy     +++|*
00552  M01S00530.1hy     +++|*         ENTRY  (ADDR) = ADDRESS OF INSTRUCTION.
00553  M01S00531.1hy     +++|*
00554  M01S00532.1hy     +++|*         EXIT   ADDRESS IS ADDED TO THE REMOTE BLOCK *TFTT*.
00555  M01S00533.1hy     +++|
00556  M01S00534.1hy     +++|
00557  M01S00535.1hy     +++| FTT      TBLM
00558  M01S00536.1hy     +++| PUTE     SPACE  4,10
00559  M01S00537.1hy     +++|**        PUTE - PHYSICAL UNIT TABLE ENTRY.
00560  M01S00538.1hy     +++|*
00561  M01S00539.1hy     +++|*         THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TPUT*
00562  M01S00540.1hy     +++|*         THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH
00563  M01S00541.1hy     +++|*         REQUIRES THE FWA OF THE PHYSICAL UNIT TABLE.
00564  M01S00542.1hy     +++|*
00565  M01S00543.1hy     +++|*         PUTE   ADDR
00566  M01S00544.1hy     +++|*
00567  M01S00545.1hy     +++|*         ENTRY  (ADDR) = ADDRESS OF INSTRUCTION.
00568  M01S00546.1hy     +++|*
00569  M01S00547.1hy     +++|*         EXIT   ADDRESS IS ADDED TO THE REMOTE BLOCK *TPUT*.
00570  M01S00548.1hy     +++|
00571  M01S00549.1hy     +++|
00572  M01S00550.1hy     +++| PUT      TBLM
Line S00551 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00573  M02S00551.ns2769  ---| RELM     SPACE  4,10
Line S00552 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00574  M02S00552.ns2769  ---|**        RELM - REDEFINE *M* TYPE INSTRUCTIONS.
Line S00553 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00575  M02S00553.ns2769  ---|*
Line S00554 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00576  M02S00554.ns2769  ---|*         REDEFINE *M* TYPE INSTRUCTIONS FOR AUTOMATIC BIAS
Line S00555 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00577  M02S00555.ns2769  ---|*         BY (DI) IF THE *M* ADDRESS FIELD IS .LT. *DSTBE*.
Line S00556 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00578  M02S00556.ns2769  ---|*         THE ORIGINAL FORM IS AVAILABLE WITH A *.* SUFFIX.
Line S00557 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00579  M02S00557.ns2769  ---|
Line S00558 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00580  M02S00558.ns2769  ---|
Line S00559 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00581  M02S00559.ns2769  ---| XX       EQU    DI
Line S00560 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00582  M02S00560.ns2769  ---|          NOREF  XX
Line S00561 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00583  M02S00561.ns2769  ---|
Line S00562 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00584  M02S00562.ns2769  ---| RELM     MACRO  OPC
Line S00563 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00585  M02S00563.ns2769  ---| OPC.     OPSYN  OPC
Line S00564 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00586  M02S00564.ns2769  ---| OPC=     MACRO  M,D
Line S00565 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00587  M02S00565.ns2769  ---|          IF     DEF,M
Line S00566 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00588  M02S00566.ns2769  ---|          IFLE   M,DSTBE
Line S00567 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00589  M02S00567.ns2769  ---|          IFC    EQ,*D**
Line S00568 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00590  M02S00568.ns2769  ---|          OPC.   M,XX
Line S00569 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00591  M02S00569.ns2769  ---|          ELSE
Line S00570 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00592  M02S00570.ns2769  ---|          OPC.   M,D
Line S00571 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00593  M02S00571.ns2769  ---|          ENDIF
Line S00572 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00594  M02S00572.ns2769  ---| OPC=     ENDM
Line S00573 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00595  M02S00573.ns2769  ---| OPC      OPSYN  OPC=
Line S00574 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00596  M02S00574.ns2769  ---| RELM     ENDM
Line S00575 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00597  M02S00575.ns2769  ---|
Line S00576 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00598  M02S00576.ns2769  ---|
Line S00577 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00599  M02S00577.ns2769  ---|          RELM   LDM
Line S00578 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00600  M02S00578.ns2769  ---|          RELM   ADM
Line S00579 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00601  M02S00579.ns2769  ---|          RELM   SBM
Line S00580 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00602  M02S00580.ns2769  ---|          RELM   LMM
Line S00581 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00603  M02S00581.ns2769  ---|          RELM   STM
Line S00582 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00604  M02S00582.ns2769  ---|          RELM   RAM
Line S00583 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00605  M02S00583.ns2769  ---|          RELM   AOM
Line S00584 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00606  M02S00584.ns2769  ---|          RELM   SOM
Line S00585 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00607  M02S00585.ns2769  ---|
Line S00586 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00608  M02S00586.ns2769  ---|          RELM   LPML
Line S00587 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00609  M02S00587.ns2769  ---|          RELM   LDML
Line S00588 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00610  M02S00588.ns2769  ---|          RELM   ADML
Line S00589 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00611  M02S00589.ns2769  ---|          RELM   SBML
Line S00590 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00612  M02S00590.ns2769  ---|          RELM   LMML
Line S00591 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00613  M02S00591.ns2769  ---|          RELM   STML
Line S00592 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00614  M02S00592.ns2769  ---|          RELM   RAML
Line S00593 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00615  M02S00593.ns2769  ---|          RELM   AOML
Line S00594 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00616  M02S00594.ns2769  ---|          RELM   SOML
00617  M01S00595.1hy     +++|          TITLE  MAIN PROGRAM.
00618  M01S00596.1hy     +++| HYD      SPACE  4,10
00619  M01S00597.1hy     +++|**        HYD - MAIN PROGRAM.
00620  M01S00598.1hy     +++|
00621  M01S00599.1hy     +++|
00622  M01S00600.1hy     +++|          ORG    OHYD
00623  M01S00601.1hy     +++|          RICHI              BEGIN CHANNEL INSTRUCTION MODIFICATION
00624  M01S00602.1hy     +++|
00625  M01S00603.1hy     +++| HYDD     LJM    PRS         PRESET DRIVER
00626  M01S00604.1hy     +++| HYD      EQU    *-1
00627  M01S00605.1hy     +++|          LDM    HYD         PRESERVE RETURN ADDRESS
Line S00606 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00628  M02S00606.ns2769  ---|          STM    ADDR
00629  M01S00003.ns2769  +++|          STM    ADDR,DI
00630  M01S00607.1hy     +++| HYD1     LDD    SF
00631  M01S00608.1hy     +++|          ZJN    HYD3        IF DEVICE NOT SELECTED
00632  M01S00609.1hy     +++|          LDC    FCCH
00633  M01S00610.1hy     +++|          RJM    FCN         CLEAR SELECT HOLD
00634  M01S00611.1hy     +++|          SOD    SF
00635  M01S00612.1hy     +++| HYD3     BSS    0
00636  M01S00613.1hy     +++|          LDC    0           CHECK ERROR PROCESSING
00637  M01S00614.1hy     +++| UNSW     EQU    *-1
00638  M01S00615.1hy     +++|          NJN    HYD5        IF UNIT SWITCH DISABLED
00639  M01S00616.1hy     +++|          LDN    DSTBE
00640  M01S00617.1hy     +++|          RAD    DI          ADVANCE DEVICE INDEX
00641  M01S00618.1hy     +++|          LMC    DSTBL
00642  M01S00619.1hy     +++| HYDA     EQU    *-1
00643  M01S00620.1hy     +++|          NJN    HYD5        IF NOT END OF STATUS BLOCK
00644  M01S00621.1hy     +++|          RJM    CCR
00645  M01S00622.1hy     +++|          ZJN    HYD7        IF CHANNEL DOWN
00646  M01S00623.1hy     +++| HYD4     LDC    DSTB
00647  M01S00624.1hy     +++|          STD    DI          RESET START OF STATUS BLOCK
00648  M01S00625.1hy     +++| HYD5     RJM    CFR
00649  M01S00626.1hy     +++|          UJN    HYD3        CHECK NEXT DEVICE
00650  M01S00627.1hy     +++|
00651  M01S00628.1hy     +++| HYD7     UJN    *+2         FIRST PASS
00652  M01S00629.1hy     +++| HYDB     EQU    HYD7
00653  M01S00630.1hy     +++|          UJN    HYD8        DROP PP ON SECOND PASS
00654  M01S00631.1hy     +++|          SOM    HYDB
00655  M01S00632.1hy     +++|          LDN    0           ENABLE UNIT SWITCH
00656  M01S00633.1hy     +++|          STM    UNSW
00657  M01S00634.1hy     +++|          LDN    PSNI        CHANGE PATH THRU *CFR*
00658  M01S00635.1hy     +++|          STM    CFRA
00659  M01S00636.1hy     +++|          LDC    CMP7        RELEASE *PUT* INTERLOCKS
00660  M01S00637.1hy     +++|          STM    CFRB
00661  M01S00638.1hy     +++|          UJN    HYD4        LOOP THRU DEVICE STATE TABLE
00662  M01S00639.1hy     +++|
00663  M01S00640.1hy     +++| HYD8     MONITOR  DPPM      DROP PP
00664  M01S00641.1hy     +++|          LJM    PPR         EXIT TO PPR
00665  M01S00642.1hy     +++|          TITLE  READ / WRITE PROCESSING.
00666  M01S00643.1hy     +++| PIO      SPACE  4,10
00667  M01S00644.1hy     +++|**        PIO - READ / WRITE PROCESSING.
00668  M01S00645.1hy     +++|
00669  M01S00646.1hy     +++|
00670  M01S00647.1hy     +++| PIO      BSS    0
00671  M01S00648.1hy     +++|          LDML   PIOB,RW     ISSUE SEEK COMMAND
00672  M01S00649.1hy     +++|          LMC    1S17
00673  M01S00650.1hy     +++|          RJM    WCB         WRITE COMMAND BLOCK
00674  M01S00651.1hy     +++|
00675  M01S00652.1hy     +++|*         WAIT UNTIL *IHD* HAS RAISED ATTENTION.
00676  M01S00653.1hy     +++|
00677  M01S00654.1hy     +++|          LDM    PIOC,RW     PROCESS ATTENTION
00678  M01S00655.1hy     +++|          RJM    ATT
00679  M01S00656.1hy     +++|          ZJN    PIO2        IF EXPECTED STATUS
00680  M01S00657.1hy     +++|          LDN    EIOS
00681  M01S00658.1hy     +++| PIO1     RJM    ERR         PROCESS ERROR
00682  M01S00659.1hy     +++|
00683  M01S00660.1hy     +++|*         INITIATE DATA TRANSFER.
00684  M01S00661.1hy     +++|
00685  M01S00662.1hy     +++| PIO2     LDN    1           SET CHANNEL ACTIVE FOR *CPD*
00686  M01S00663.1hy     +++|          RJM    SCD
00687  M01S00664.1hy     +++|          LDML   PIOD,RW     SELECT INFORMATION EXCHANGE
00688  M01S00665.1hy     +++|          RJM    WFW
00689  M01S00666.1hy     +++|          LDC    FCSD        SET DMA MODE
00690  M01S00667.1hy     +++|          RJM    FCN
00691  M01S00668.1hy     +++|          LDM    PIOE,RW     SET PROCESSOR ADDRESS
00692  M01S00669.1hy     +++|          STM    PIOA
00693  M01S00670.1hy     +++| PIO3     RJM    0           PROCESS I/O REQUEST
00694  M01S00671.1hy     +++| PIOA     EQU    *-1
00695  M01S00672.1hy     +++| PIO6     NJN    PIO1        IF TIMEOUT ERROR
00696  M01S00673.1hy     +++|
00697  M01S00674.1hy     +++|*         WAIT - TRANSFER COMPLETE.
00698  M01S00675.1hy     +++|
00699  M01S00676.1hy     +++| PIO7     LCN    1           CHECK OPERATIONAL STATUS
00700  M01S00677.1hy     +++|          RJM    COS
00701  M01S00678.1hy     +++|          ZJN    PIO8        IF TRANSFER COMPLETE
00702  M01S00679.1hy     +++|          LDN    ETTC
00703  M01S00680.1hy     +++|          UJN    PIO1        TRANSFER IN PROGRESS TIMEOUT
00704  M01S00681.1hy     +++|
00705  M01S00682.1hy     +++| PIO8     RJM    SFR         CHECK FOR CONSECUTIVE REQUEST
00706  M01S00683.1hy     +++|          STD    CB
00707  M01S00684.1hy     +++|          NJN    PIO3        IF ONE MORE REQUEST
00708  M01S00685.1hy     +++|
00709  M01S00686.1hy     +++|*         COMPLETE READ / WRITE OPERATIONS.
00710  M01S00687.1hy     +++|
00711  M01S00688.1hy     +++|          LDC    FCCS        CLEAR COMMAND SEQUENCE
00712  M01S00689.1hy     +++|          RJM    FCN
00713  M01S00690.1hy     +++|          LDN    0           CLEAR CHANNEL ACTIVE
00714  M01S00691.1hy     +++|          RJM    SCD
00715  M01S00692.1hy     +++|          LDN    ESCC        PROCESS ATTENTION
00716  M01S00693.1hy     +++|          RJM    ATT
00717  M01S00694.1hy     +++|          ZJN    PIO9        IF *COMMAND COMPLETE*
00718  M01S00695.1hy     +++|          LDN    EIOC
00719  M01S00696.1hy     +++|          UJN    PIO6        ERROR IN I/O COMPLETE STATUS
00720  M01S00697.1hy     +++|
00721  M01S00698.1hy     +++| PIO9     LDD    SS          CHECK FOR DELAY STATUS
00722  M01S00699.1hy     +++|          LPN    1
00723  M01S00700.1hy     +++|          ZJN    PIO11       IF NO DELAY STATUS
00724  M01S00701.1hy     +++|          LDD    RW
Line S00702 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00725  M02S00702.ns2769  ---|          STM    IPPS        SAVE READ / WRITE STATUS
00726  M01S00004.ns2769  +++|          STM    IPPS,DI     SAVE READ / WRITE STATUS
00727  M01S00703.1hy     +++|          LDN    0
00728  M01S00704.1hy     +++|          STD    RW          SELECT *IHD* ERROR LOG
Line S00705 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00729  M02S00705.ns2769  ---|          STM    RWST
00730  M01S00005.ns2769  +++|          STM    RWST,DI
00731  M01S00706.1hy     +++|          LDC    PIO10       SET RETURN ADDRESS
Line S00707 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00732  M02S00707.ns2769  ---|          STM    ESAD
00733  M01S00006.ns2769  +++|          STM    ESAD,DI
00734  M01S00708.1hy     +++|          LJM    LGE1        DUMP ERROR LOG
00735  M01S00709.1hy     +++|
Line S00710 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00736  M02S00710.ns2769  ---| PIO10    LDM    IPPS        RESTORE READ / WRITE STATUS
00737  M01S00007.ns2769  +++| PIO10    LDM    IPPS,DI     RESTORE READ / WRITE STATUS
00738  M01S00711.1hy     +++|          STD    RW
Line S00712 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00739  M02S00712.ns2769  ---|          STM    RWST
00740  M01S00008.ns2769  +++|          STM    RWST,DI
00741  M01S00713.1hy     +++|          LDN    0           ENABLE ERROR PROCESSING
Line S00714 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00742  M02S00714.ns2769  ---|          STM    ESAD
00743  M01S00009.ns2769  +++|          STM    ESAD,DI
00744  M01S00715.1hy     +++| PIO11    LJM    CMP         COMPLETE PROCESSING
00745  M01S00716.1hy     +++|
00746  M01S00717.1hy     +++|
00747  M01S00718.1hy     +++| PIOB     BSS    0           COMMAND CODES
00748  M01S00719.1hy     +++|          CONL   CCOR
00749  M01S00720.1hy     +++|          CONL   CCOW
00750  M01S00721.1hy     +++|
00751  M01S00722.1hy     +++| PIOC     BSS    0           EXPECTED EXECUTION STATUS
00752  M01S00723.1hy     +++|          CON    ESRD
00753  M01S00724.1hy     +++|          CON    ESBS
00754  M01S00725.1hy     +++|
00755  M01S00726.1hy     +++| PIOD     BSS    0           INFORMATION EXCHANGE FUNCTION WORDS
00756  M01S00727.1hy     +++|          CONL   FWRE
00757  M01S00728.1hy     +++|          CONL   FWWE
00758  M01S00729.1hy     +++|
00759  M01S00730.1hy     +++| PIOE     BSS    0           PROCESSOR ADDRESSES
00760  M01S00731.1hy     +++|          CON    RBD
00761  M01S00732.1hy     +++|          CON    WBD
00762  M01S00733.1hy     +++|          TITLE  DOCUMENT UNIT CHARACTERISTICS.
00763  M01S00734.1hy     +++| DUC      SPACE  4,10
00764  M01S00735.1hy     +++|**        DUC - DAYFILE UNIT CHARACTERISTICS.
00765  M01S00736.1hy     +++|
00766  M01S00737.1hy     +++|
00767  M01S00738.1hy     +++| DUC      BSS    0
Line S00739 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
00768  M02S00739.271l716 ---|          LDC    SBUF        SET MESSAGE ADDRESS
Line S00740 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
00769  M02S00740.271l716 ---|          STM    MAD1
Line S00741 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
00770  M02S00741.271l716 ---|          ADN    2*5         ASSEMBLY BUFFER ADDRESS
Line S00742 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
00771  M02S00742.271l716 ---|          STD    T3
00772  M01S00743.1hy     +++|          LDN    ZERL        CLEAR MESSAGE HEADER
00773  M01S00744.1hy     +++|          CRD    WB
00774  M01S00745.1hy     +++|          LDN    MLDY        SET DAYFILE CODE
00775  M01S00746.1hy     +++|          STD    WB+4
00776  M01S00747.1hy     +++|          LDC    FWSN
00777  M01S00748.1hy     +++|          RJM    WFW         REQUEST SERIAL NUMBER
00778  M01S00749.1hy     +++|          LDN    2
00779  M01S00750.1hy     +++|          STD    T7          SET BLOCK SIZE
00780  M01S00751.1hy     +++|          ACN    CH
00781  M01S00752.1hy     +++|          IAM    DBUF,CH     READ SERIAL NUMBER
00782  M01S00753.1hy     +++|          RJM    CFE
00783  M01S00754.1hy     +++|          LDC    FWRL        REQUEST OTHER CHARACTERISTICS
00784  M01S00755.1hy     +++|          RJM    WFW
00785  M01S00756.1hy     +++|          LDN    6           READ CHARACTERISTICS
00786  M01S00757.1hy     +++|          ACN    CH
00787  M01S00758.1hy     +++|          IAM    DBUF+2,CH   READ REVISION LEVEL
00788  M01S00759.1hy     +++|          RJM    CFE
00789  M01S00012.271l716 +++|          LDC    SBUF        SET MESSAGE ADDRESS
00790  M01S00013.271l716 +++|          STM    MAD1
00791  M01S00014.271l716 +++|          ADN    2*5         ASSEMBLY BUFFER ADDRESS
00792  M01S00015.271l716 +++|          STD    T3
00793  M01S00760.1hy     +++|          LDC    10S12+DBUF  UNPACK HEX DATA
00794  M01S00761.1hy     +++|          RJM    UHD
00795  M01S00762.1hy     +++|          ADN    2           SET MESSAGE LENGTH
00796  M01S00763.1hy     +++|          STD    WB+3
00797  M01S00764.1hy     +++|          LDM    MSGL        RESIDUAL BYTE COUNT
00798  M01S00765.1hy     +++|          STD    WB+2
00799  M01S00766.1hy     +++|          LDC    DM0401      MESSAGE ID
00800  M01S00767.1hy     +++|          STD    PB
00801  M01S00768.1hy     +++|          LDC    HI0107      SET SYMPTOM CODE
00802  M01S00769.1hy     +++|          STD    PB+1
00803  M01S00770.1hy     +++|          LDD    DT          DEVICE TYPE
00804  M01S00771.1hy     +++|          SHN    1
00805  M01S00772.1hy     +++|          ERRNZ  PB+3-EO     CODE DEPENDS ON VALUE
00806  M01S00773.1hy     +++|          ADC    2RDF
00807  M01S00774.1hy     +++|          ERRNZ  PB+4-UN     CODE DEPENDS ON VALUE
00808  M01S00775.1hy     +++|          STD    PB+2
00809  M01S00776.1hy     +++|          LDD    MA          MOVE BASIC MESSAGE DATA
00810  M01S00777.1hy     +++|          CWM    WB,T7
00811  M01S00778.1hy     +++|          ERRNZ  WB+5-PB     CODE DEPENDS ON VALUE
00812  M01S00779.1hy     +++|          SBN    2
00813  M01S00780.1hy     +++|          CRM    SBUF,T7
Line S00781 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
00814  M02S00781.271l716 ---|          LDD    WB+3        LENGTH OF SECOND PART OF MESSAGE
Line S00782 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
00815  M02S00782.271l716 ---|          SBN    3
Line S00783 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
00816  M02S00783.271l716 ---|          SHN    14          ISSUE BML MESSAGE
Line S00784 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
00817  M02S00784.271l716 ---|          RJM    IBM
Line S00785 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
00818  M02S00785.271l716 ---|          LDC    MSGP        RESTORE ERROR MESSAGE ADDRESS
Line S00786 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
00819  M02S00786.271l716 ---|          STM    MAD1
00820  M01S00016.271l716 +++|          LDN    0
00821  M01S00017.271l716 +++|          STD    RW          ISSUE BML MESSAGE
00822  M01S00018.271l716 +++|          RJM    IBM
00823  M01S00787.1hy     +++|          LJM    CSR         CLEAR SPECIAL REQUEST FLAG
00824  M01S00788.1hy     +++|          TITLE  LOG *IHD* ERRORS.
00825  M01S00789.1hy     +++| LGE      SPACE  4,10
00826  M01S00790.1hy     +++|**        LGE - LOG *IHD* ERRORS.
00827  M01S00791.1hy     +++|*
00828  M01S00792.1hy     +++|*         ENTRY  (RW) = 0 TO LOG ERROR LOG.
00829  M01S00793.1hy     +++|*                     = 1 TO LOG ERROR REGISTER.
00830  M01S00794.1hy     +++|
00831  M01S00795.1hy     +++|
00832  M01S00796.1hy     +++| LGE      BSS    0
00833  M01S00797.1hy     +++|          LDC    CMP         SET RETURN ADDRESS
Line S00798 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00834  M02S00798.ns2769  ---| LGE1     STM    RADD
00835  M01S00010.ns2769  +++| LGE1     STM    RADD,DI
00836  M01S00799.1hy     +++|          LDN    3           SET TIMEOUT VALUE = 3 SECONDS
00837  M01S00800.1hy     +++|          STD    TO
00838  M01S00801.1hy     +++|          LDML   LGEA,RW     REQUEST LOG / REGISTER DUMP
00839  M01S00802.1hy     +++|          RJM    WCB
00840  M01S00803.1hy     +++|
00841  M01S00804.1hy     +++|*         WAIT UNTIL *IHD* HAS RAISED ATTENTION.
00842  M01S00805.1hy     +++|
00843  M01S00806.1hy     +++|          LDN    ESRD        PROCESS ATTENTION
00844  M01S00807.1hy     +++|          RJM    ATT
00845  M01S00808.1hy     +++|          ZJN    LGE3        IF EXPECTED RESPONSE
00846  M01S00809.1hy     +++|          LDN    EIOS
00847  M01S00810.1hy     +++|          RJM    ERR         PROCESS ERROR
00848  M01S00811.1hy     +++|
00849  M01S00812.1hy     +++|*         INITIATE DATA TRANSFER.
00850  M01S00813.1hy     +++|
00851  M01S00814.1hy     +++| LGE3     LDML   LGEB,RW     WRITE FUNCTION WORD
00852  M01S00815.1hy     +++|          RJM    WFW
00853  M01S00816.1hy     +++|          ACN    CH
00854  M01S00817.1hy     +++|          LDM    LGEC,RW     SET DUMP LENGTH
00855  M01S00818.1hy     +++|          STD    T7
00856  M01S00819.1hy     +++|          IAM    DBUF,CH     INPUT ERROR DATA
00857  M01S00820.1hy     +++|          RJM    CFE
00858  M01S00821.1hy     +++|          LCN    0           PRESET SEARCH INDEX
00859  M01S00822.1hy     +++|          STD    T6
00860  M01S00823.1hy     +++|          LDD    RW
00861  M01S00824.1hy     +++|          ZJN    LGE5        IF DUMPING ERROR LOG
00862  M01S00825.1hy     +++|          LDML   DBUF
Line S00826 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00863  M02S00826.ns2769  ---|          SBML   EREN
00864  M01S00011.ns2769  +++|          SBML   EREN,DI
00865  M01S00827.1hy     +++|          ZJN    LGE7        IF NO CHANGE IN ERROR REGISTER
Line S00828 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00866  M02S00828.ns2769  ---|          RAML   EREN
00867  M01S00012.ns2769  +++|          RAML   EREN,DI
00868  M01S00829.1hy     +++|          UJN    LGE9        PROCESS ERROR REGISTER DATA
00869  M01S00830.1hy     +++|
00870  M01S00831.1hy     +++|*         SCAN ERROR LOG DATA FOR NEW ENTRIES.
00871  M01S00832.1hy     +++|
00872  M01S00833.1hy     +++| LGE4     SHN    -12         POSITION ERROR COUNT
Line S00834 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00873  M02S00834.ns2769  ---|          LMM    ELEN
00874  M01S00013.ns2769  +++|          LMM    ELEN,DI
00875  M01S00835.1hy     +++|          ZJN    LGE10       IF END OF NEW ENTRIES
00876  M01S00836.1hy     +++| LGE5     AOD    T6
00877  M01S00837.1hy     +++|          SHN    2           ADVANCE INDICES
00878  M01S00838.1hy     +++|          STD    T7
00879  M01S00839.1hy     +++|          ERRNZ  ERLGL-ERLGL/4*4  CODE DEPENDS ON VALUE
00880  M01S00840.1hy     +++|          LMK    ERLGL
00881  M01S00841.1hy     +++|          ZJN    LGE8        IF END OF ERROR LOG
00882  M01S00842.1hy     +++|          LDML   DBUF,T7
00883  M01S00843.1hy     +++|          NJN    LGE4        IF NOT EMPTY ENTRY
00884  M01S00844.1hy     +++| LGE6     LDD    T6
00885  M01S00845.1hy     +++|          NJN    LGE8        IF NEW ENTRIES FOUND
00886  M01S00846.1hy     +++| LGE7     LJM    LGE12       CLEAR COMMAND SEQUENCE
00887  M01S00847.1hy     +++|
00888  M01S00848.1hy     +++| LGE8     LDML   DBUF
00889  M01S00849.1hy     +++|          SHN    -12         RESET ENTRY NUMBER
Line S00850 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00890  M02S00850.ns2769  ---|          STM    ELEN
00891  M01S00014.ns2769  +++|          STM    ELEN,DI
00892  M01S00851.1hy     +++|          LDML   DBUF+3      SET REPETITION COUNT
Line S00852 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00893  M02S00852.ns2769  ---|          STML   ELRC
00894  M01S00015.ns2769  +++|          STML   ELRC,DI
00895  M01S00853.1hy     +++| LGE9     UJN    LGE11       PROCESS ERROR DATA
00896  M01S00854.1hy     +++|
00897  M01S00855.1hy     +++| LGE10    LDML   DBUF+3,T7   CHECK REPEAT COUNT
Line S00856 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00898  M02S00856.ns2769  ---|          SBML   ELRC
00899  M01S00016.ns2769  +++|          SBML   ELRC,DI
00900  M01S00857.1hy     +++|          ZJN    LGE6        IF NO CHANGE IN REPETITION COUNT
00901  M01S00858.1hy     +++|          STML   DBUF+3,T7
Line S00859 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00902  M02S00859.ns2769  ---|          RAML   ELRC        UPDATE ERROR LOG REPEAT COUNT
00903  M01S00017.ns2769  +++|          RAML   ELRC,DI     UPDATE ERROR LOG REPEAT COUNT
00904  M01S00860.1hy     +++|          LDN    4
00905  M01S00861.1hy     +++|          RAD    T7          INCLUDE THIS ERROR LOG ENTRY
00906  M01S00862.1hy     +++|
00907  M01S00863.1hy     +++|*         PROCESS ERROR INFORMATION.
00908  M01S00864.1hy     +++|
00909  M01S00865.1hy     +++| LGE11    LDC    MBUF        SET MESSAGE BUFFER ADDRESS
00910  M01S00866.1hy     +++|          STD    T3
00911  M01S00867.1hy     +++|          LDD    T7          ERROR DATA BYTE COUNT
00912  M01S00868.1hy     +++|          SHN    14
00913  M01S00869.1hy     +++|          LMC    DBUF
00914  M01S00870.1hy     +++|          RJM    UHD         UNPACK HEX DATA
00915  M01S00871.1hy     +++|          SHN    14
00916  M01S00872.1hy     +++|          LMM    LGED,RW     ISSUE BML MESSAGE
00917  M01S00873.1hy     +++|          RJM    IBM
00918  M01S00874.1hy     +++| LGE12    LDC    FCCS        CLEAR COMMAND SEQUENCE
00919  M01S00875.1hy     +++|          RJM    FCN
00920  M01S00876.1hy     +++|          LDN    ESCC        PROCESS ATTENTION
00921  M01S00877.1hy     +++|          RJM    ATT
00922  M01S00878.1hy     +++|          ZJN    LGE13       IF *COMMAND COMPLETE*
00923  M01S00879.1hy     +++|          LDN    EIOC
00924  M01S00880.1hy     +++|          RJM    ERR         ERROR IN I/O COMPLETE STATUS
00925  M01S00881.1hy     +++|
00926  M01S00882.1hy     +++| LGE13    LDC    FWCA        CLEAR ATTENTION
00927  M01S00883.1hy     +++|          RJM    WFC
Line S00884 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00928  M02S00884.ns2769  ---|          LDM    RADD        SET RETURN ADDRESS
00929  M01S00018.ns2769  +++|          LDM    RADD,DI     SET RETURN ADDRESS
00930  M01S00885.1hy     +++|          STD    PA
00931  M01S00886.1hy     +++|          LJM    0,PA        RETURN TO CALLER
00932  M01S00887.1hy     +++|
00933  M01S00888.1hy     +++|
00934  M01S00889.1hy     +++| LGEA     BSS    0           LOG / REGISTER SELECT OPTIONS
00935  M01S00890.1hy     +++|          CONL   CCRL
00936  M01S00891.1hy     +++|          CONL   CCRI
00937  M01S00892.1hy     +++|
00938  M01S00893.1hy     +++| LGEB     BSS    0           DUMP FUNCTION WORDS
00939  M01S00894.1hy     +++|          CONL   FWEL
00940  M01S00895.1hy     +++|          CONL   FWER
00941  M01S00896.1hy     +++|
00942  M01S00897.1hy     +++| LGEC     BSS    0           DUMP LENGTHS
00943  M01S00898.1hy     +++|          CON    ERLGL
00944  M01S00899.1hy     +++|          CON    ERRGL
00945  M01S00900.1hy     +++|
00946  M01S00901.1hy     +++| LGED     BSS    0           BML SYMPTOM CODES
00947  M01S00902.1hy     +++|          CON    HD0104
00948  M01S00903.1hy     +++|          CON    HD0103
00949  M01S00904.1hy     +++|          TITLE  LOAD OPERATING PARAMETERS.
00950  M01S00905.1hy     +++| LOP      SPACE  4,10
00951  M01S00906.1hy     +++|**        LOP - LOAD OPERATING PARAMETERS.
00952  M01S00907.1hy     +++|*
00953  M01S00908.1hy     +++|*         ENTRY  (RW) = 0 TO LOAD ATTENTION DELAY PARAMETERS.
00954  M01S00909.1hy     +++|*                     = 1 TO LOAD OPERATING MODE PARAMETERS.
00955  M01S00910.1hy     +++|
00956  M01S00911.1hy     +++|
00957  M01S00912.1hy     +++| LOP      BSS    0
00958  M01S00913.1hy     +++|          LDC    CMP         SET RETURN ADDRESS
Line S00914 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00959  M02S00914.ns2769  ---| LOP1     STM    RADD
00960  M01S00019.ns2769  +++| LOP1     STM    RADD,DI
00961  M01S00915.1hy     +++|          LDD    RW
00962  M01S00916.1hy     +++|          NJN    LOP2        IF SETTING OPERATING MODE
00963  M01S00917.1hy     +++|          LDML   LOPA,DT
00964  M01S00918.1hy     +++|          UJN    LOP3        SET ATTENTION DELAY PARAMETERS
00965  M01S00919.1hy     +++|
00966  M01S00920.1hy     +++| LOP2     LDC    PWOM        SET OPERATING MODE PARAMETERS
00967  M01S00921.1hy     +++| LOP3     STML   WCBA+4
00968  M01S00922.1hy     +++|          LDN    3           SET TIMEOUT VALUE = 3 SECONDS
00969  M01S00923.1hy     +++|          STD    TO
00970  M01S00924.1hy     +++|          LDML   LOPB,RW     LOAD PARAMETERS
00971  M01S00925.1hy     +++|          RJM    WCB
00972  M01S00926.1hy     +++|
00973  M01S00927.1hy     +++|*         WAIT UNTIL *IHD* HAS RAISED ATTENTION.
00974  M01S00928.1hy     +++|
00975  M01S00929.1hy     +++|          LDN    ESCC        PROCESS ATTENTION
00976  M01S00930.1hy     +++|          RJM    ATT
00977  M01S00931.1hy     +++|          ZJN    LOP4        IF NORMAL COMPLETION
00978  M01S00932.1hy     +++|          LDN    ELOP
00979  M01S00933.1hy     +++|          RJM    ERR         PROCESS ERROR
00980  M01S00934.1hy     +++|
Line S00935 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00981  M02S00935.ns2769  ---| LOP4     LDM    RADD        SET RETURN ADDRESS
00982  M01S00020.ns2769  +++| LOP4     LDM    RADD,DI     SET RETURN ADDRESS
00983  M01S00936.1hy     +++|          STD    PA
00984  M01S00937.1hy     +++|          LJM    0,PA        RETURN TO CALLER
00985  M01S00938.1hy     +++|
00986  M01S00939.1hy     +++|
00987  M01S00940.1hy     +++| LOPA     BSS    0           ATTENTION DELAY PARAMETER WORDS
00988  M01S00941.1hy     +++|          CONL   PWADDF
00989  M01S00942.1hy     +++|          CONL   PWADDH
00990  M01S00943.1hy     +++|
00991  M01S00944.1hy     +++| LOPB     BSS    0           COMMAND CODES
00992  M01S00945.1hy     +++|          CONL   CCLD
00993  M01S00946.1hy     +++|          CONL   CCLM
00994  M01S00947.1hy     +++|          TITLE  DIAGNOSTIC PROCESSING.
00995  M01S00948.1hy     +++| RND      SPACE  4,10
00996  M01S00949.1hy     +++|**        RND - RUN DIAGNOSTICS.
00997  M01S00950.1hy     +++|*
00998  M01S00951.1hy     +++|*         ENTRY  (RW) = 0 TO EXECUTE READ TEST.
00999  M01S00952.1hy     +++|*                     = 1 TO EXECUTE WRITE TEST.
Line S00953 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01000  M02S00953.271l716 ---|*                     = 2 TO RUN LEVEL 1 DIAGNOSTICS.
Line S00954 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01001  M02S00954.271l716 ---|*                     = 3 TO RUN LEVEL 2 DIAGNOSTICS.
01002  M01S00019.271l716 +++|*                     = 2 TO RUN VERIFICATION DIAGNOSTICS.
01003  M01S00955.1hy     +++|
01004  M01S00956.1hy     +++|
01005  M01S00957.1hy     +++| RND      BSS    0
01006  M01S00958.1hy     +++|          LDC    CSR         SET RETURN ADDRESS
Line S00959 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01007  M02S00959.ns2769  ---| RND1     STM    RADD
01008  M01S00021.ns2769  +++| RND1     STM    RADD,DI
01009  M01S00007.1hy6    +++|          LDC    RNDD        ISSUE OPERATOR MESSAGE
01010  M01S00008.1hy6    +++|          RJM    IOM
01011  M01S00960.1hy     +++|          LDML   RNDA,RW     SET PARAMETER WORD
01012  M01S00961.1hy     +++|          STML   WCBA+4
01013  M01S00962.1hy     +++|          LDM    RNDB,RW     SET TIMEOUT VALUE
01014  M01S00963.1hy     +++|          STD    TO
01015  M01S00964.1hy     +++|          LDML   RNDC,RW     INITIATE TEST
01016  M01S00965.1hy     +++|          RJM    WCB
01017  M01S00966.1hy     +++|
01018  M01S00967.1hy     +++|*         WAIT UNTIL *IHD* HAS RAISED ATTENTION.
01019  M01S00968.1hy     +++|
01020  M01S00969.1hy     +++|          LDN    0           PROCESS ATTENTION
01021  M01S00970.1hy     +++|          RJM    ATT
01022  M01S00971.1hy     +++| RND2     LDC    MBUF        SET ASSEMBLY BUFFER ADDRESS
01023  M01S00972.1hy     +++|          STD    T3
01024  M01S00973.1hy     +++|          LDC    SLSTL*10000+SLST  UNPACK HEX DATA
01025  M01S00974.1hy     +++|          RJM    UHD
01026  M01S00975.1hy     +++|          SHN    14          ISSUE BML MESSAGE
01027  M01S00976.1hy     +++|          LMC    HD0106
01028  M01S00977.1hy     +++|          ADD    RW
01029  M01S00978.1hy     +++|          ERRNZ  HD0106+1-HD0107  CODE DEPENDS ON VALUE
01030  M01S00979.1hy     +++|          ERRNZ  HD0107+1-HD0110  CODE DEPENDS ON VALUE
Line S00980 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01031  M02S00980.271l716 ---|          ERRNZ  HD0110+1-HD0111  CODE DEPENDS ON VALUE
01032  M01S00981.1hy     +++|          RJM    IBM
01033  M01S00982.1hy     +++|          LDD    RW          CHECK OPERATION
01034  M01S00983.1hy     +++|          SBN    2
Line S00984 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01035  M02S00984.271l716 ---|          PJN    RND3        IF LEVEL 1 / 2 DIAGNOSTICS
01036  M01S00020.271l716 +++|          ZJN    RND3        IF VERIFICATION DIAGNOSTICS
01037  M01S00985.1hy     +++|          LDD    SS
01038  M01S00986.1hy     +++|          LMN    ESCC
01039  M01S00987.1hy     +++|          LPN    70
01040  M01S00988.1hy     +++|          ZJN    RND3        IF NORMAL COMPLETION
01041  M01S00989.1hy     +++|          LDN    EDTF
01042  M01S00990.1hy     +++|          RJM    ERR         PROCESS ERROR
01043  M01S00991.1hy     +++|
Line S00992 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01044  M02S00992.271l716 ---| RND3     LDM    RADD        SET RETURN ADDRESS
Line S00993 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01045  M02S00993.271l716 ---|          STD    PA
Line S00009 Modification History
M01 (Added by) 1hy6
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01046  M02S00009.271l716 ---|          LDN    0           CLEAR OPERATOR MESSAGE
Line S00010 Modification History
M01 (Added by) 1hy6
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01047  M02S00010.271l716 ---|          RJM    IOM
01048  M01S00021.271l716 +++|*RND3     LDN    0           CLEAR OPERATOR MESSAGE
01049  M01S00022.271l716 +++| RND3     RJM    IOM
Line S00023 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01050  M02S00023.ns2769  ---|          LDM    RADD        SET RETURN ADDRESS
01051  M01S00022.ns2769  +++|          LDM    RADD,DI     SET RETURN ADDRESS
01052  M01S00024.271l716 +++|          STD    PA
01053  M01S00994.1hy     +++|          LJM    0,PA        RETURN TO CALLER
01054  M01S00995.1hy     +++|
01055  M01S00996.1hy     +++|
01056  M01S00997.1hy     +++| RNDA     BSS    0           PARAMETER WORDS
01057  M01S00998.1hy     +++|          CONL   PWRT
01058  M01S00999.1hy     +++|          CONL   PWWT
Line S01000 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01059  M02S01000.271l716 ---|          CONL   PWIT
01060  M01S01001.1hy     +++|          CONL   PWIT
01061  M01S01002.1hy     +++|
01062  M01S01003.1hy     +++| RNDB     BSS    0           TIMEOUT VALUES (IN SECONDS)
01063  M01S01004.1hy     +++|          CON    1*60D
01064  M01S01005.1hy     +++|          CON    1*60D
Line S01006 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01065  M02S01006.271l716 ---|          CON    4*60D
01066  M01S01007.1hy     +++|          CON    4*60D+20D
01067  M01S01008.1hy     +++|
01068  M01S01009.1hy     +++| RNDC     BSS    0           COMMAND CODES
01069  M01S01010.1hy     +++|          CONL   CCRT
01070  M01S01011.1hy     +++|          CONL   CCWT
Line S01012 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01071  M02S01012.271l716 ---|          CONL   CCD1
Line S01013 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01072  M02S01013.271l716 ---|          CONL   CCD2
01073  M01S00025.271l716 +++|          CONL   CCVD
01074  M01S00011.1hy6    +++|
01075  M01S00012.1hy6    +++| RNDD     DATA   C* EQ000, DIAGNOSTIC RUNNING.*
01076  M01S01014.1hy     +++|          TITLE  SPIN-DOWN PROCESSING.
01077  M01S01015.1hy     +++| SPD      SPACE  4,10
01078  M01S01016.1hy     +++|**        SPD - SPIN DOWN DRIVE.
01079  M01S01017.1hy     +++|
01080  M01S01018.1hy     +++|
01081  M01S01019.1hy     +++| SPD      BSS    0
01082  M01S01020.1hy     +++|          LDN    1*60D       SET TIMEOUT VALUE = 1 MINUTE
01083  M01S01021.1hy     +++|          STD    TO
01084  M01S01022.1hy     +++|          LDC    CCSD        SPIN-DOWN DRIVE
01085  M01S01023.1hy     +++|          RJM    WCB
01086  M01S01024.1hy     +++|
01087  M01S01025.1hy     +++|*         WAIT UNTIL *IHD* HAS RAISED ATTENTION.
01088  M01S01026.1hy     +++|
01089  M01S01027.1hy     +++|          LDN    ESCC        PROCESS ATTENTION
01090  M01S01028.1hy     +++|          RJM    ATT
01091  M01S01029.1hy     +++|          ZJP    CSR         IF NORMAL COMPLETION
01092  M01S01030.1hy     +++|          LDN    ESDF
01093  M01S01031.1hy     +++|          RJM    ERR         PROCESS ERROR
01094  M01S01032.1hy     +++|          TITLE  SPIN-UP PROCESSING.
01095  M01S01033.1hy     +++| SPU      SPACE  4,10
01096  M01S01034.1hy     +++|**        SPU - SPIN UP DRIVE.
01097  M01S01035.1hy     +++|
01098  M01S01036.1hy     +++|
01099  M01S01037.1hy     +++| SPU      BSS    0
01100  M01S01038.1hy     +++|          LDC    CSR         SET RETURN ADDRESS
Line S01039 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01101  M02S01039.ns2769  ---| SPU1     STM    ERAD
01102  M01S00023.ns2769  +++| SPU1     STM    ERAD,DI
01103  M01S01040.1hy     +++|          LDN    0           GET SLAVE STATUS
01104  M01S01041.1hy     +++|          RJM    GSS
01105  M01S01042.1hy     +++|          LDML   SLST+5      CHECK DEVICE READY
01106  M01S01043.1hy     +++|          SHN    0-17
01107  M01S01044.1hy     +++|          ZJN    SPU2        IF DISK NOT SPINNING
01108  M01S01045.1hy     +++|          LDN    SPU5-SPU4
01109  M01S01046.1hy     +++| SPU2     ADC    SPU4        PROCESS SELECTIVE RESET
01110  M01S01047.1hy     +++|          LJM    SRS1
01111  M01S01048.1hy     +++|
01112  M01S01049.1hy     +++| SPU3     RJM    HYD         RETURN TO MAIN LOOP
01113  M01S01050.1hy     +++|
01114  M01S01051.1hy     +++|*         CHECK TIME INTERVAL SINCE LAST SPIN-UP.
01115  M01S01052.1hy     +++|
01116  M01S01053.1hy     +++| SPU4     RJM    CMC         CHECK MONITOR COMPLETE
01117  M01S01054.1hy     +++|          LDK    HSUEI
01118  M01S01055.1hy     +++|          STD    CM+4        SET SPIN-UP INTERVAL
01119  M01S01056.1hy     +++|          SHN    -14
01120  M01S01057.1hy     +++|          STD    CM+3
01121  M01S01058.1hy     +++|          LDN    UHSS        UPDATE EVENT TIME
01122  M01S01059.1hy     +++|          STD    CM+1
01123  M01S01060.1hy     +++|          MONITOR  EATM      CHECK EVENT TIME
01124  M01S01061.1hy     +++|          LDD    CM+1
01125  M01S01062.1hy     +++|          NJN    SPU3        IF EVENT INTERVAL NOT ELAPSED
01126  M01S01063.1hy     +++|
01127  M01S01064.1hy     +++|*         WRITE COMMAND BLOCK TO POWER UP SPINDLE.
01128  M01S01065.1hy     +++|
01129  M01S01066.1hy     +++|          RJM    SSD
01130  M01S01067.1hy     +++|          LDC    3*60D       SET TIMEOUT VALUE = 3 MINUTES
01131  M01S01068.1hy     +++|          STD    TO
01132  M01S00013.1hy6    +++|          LDC    SPUA        ISSUE OPERATOR MESSAGE
01133  M01S00014.1hy6    +++|          RJM    IOM
01134  M01S01069.1hy     +++|          LDC    CCSU        SPIN-UP DRIVE
01135  M01S01070.1hy     +++|          RJM    WCB
01136  M01S01071.1hy     +++|
01137  M01S01072.1hy     +++|*         WAIT UNTIL *IHD* HAS RAISED ATTENTION.
01138  M01S01073.1hy     +++|
01139  M01S01074.1hy     +++|          LDN    ESCC        PROCESS ATTENTION
01140  M01S01075.1hy     +++|          RJM    ATT
01141  M01S01076.1hy     +++|          ZJN    SPU5        IF NORMAL COMPLETION
01142  M01S01077.1hy     +++|          LDN    ESUF
01143  M01S01078.1hy     +++|          RJM    ERR         PROCESS ERROR
01144  M01S01079.1hy     +++|
01145  M01S01080.1hy     +++| SPU5     LDN    1           SELECT LOAD OF MODE PARAMETERS
Line S01081 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01146  M02S01081.ns2769  ---|          STM    RWST
01147  M01S00024.ns2769  +++|          STM    RWST,DI
01148  M01S01082.1hy     +++| SPU6     STD    RW          SET PROCESSOR INDEX
01149  M01S01083.1hy     +++|          LDC    SPU7
01150  M01S01084.1hy     +++|          LJM    LOP1        LOAD OPERATING PARAMETERS
01151  M01S01085.1hy     +++|
Line S01086 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01152  M02S01086.ns2769  ---| SPU7     SOM    RWST
01153  M01S00025.ns2769  +++| SPU7     SOM    RWST,DI
01154  M01S01087.1hy     +++|          PJN    SPU6        IF YET TO LOAD DELAY PARAMETERS
Line S01088 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01155  M02S01088.ns2769  ---|          LDM    SREQ
01156  M01S00026.ns2769  +++|          LDM    SREQ,DI
01157  M01S01089.1hy     +++|          ZJN    SPU8        IF SPIN-UP INITIATED BY DRIVER
01158  M01S01090.1hy     +++|          LDN    DUNF
01159  M01S01091.1hy     +++|          RJM    CPF         CLEAR DEVICE UNAVAILABLE
01160  M01S01092.1hy     +++|
01161  M01S01093.1hy     +++|*         COMPLETE DEVICE INITIALIZATION.
01162  M01S01094.1hy     +++|
Line S01095 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01163  M02S01095.ns2769  ---| SPU8     LDM    ERAD        SET RETURN ADDRESS
01164  M01S00027.ns2769  +++| SPU8     LDM    ERAD,DI     SET RETURN ADDRESS
01165  M01S01096.1hy     +++|          STD    PA
01166  M01S00015.1hy6    +++|          LDN    0           CLEAR OPERATOR MESSAGE
01167  M01S00016.1hy6    +++|          RJM    IOM
01168  M01S01097.1hy     +++|          LJM    0,PA        RETURN TO CALLER
01169  M01S00017.1hy6    +++|
01170  M01S00018.1hy6    +++| SPUA     DATA   C* EQ000, SPIN UP PENDING.*
01171  M01S01098.1hy     +++|          TITLE  SELECTIVE RESET PROCESSING.
01172  M01S01099.1hy     +++| SRS      SPACE  4,10
01173  M01S01100.1hy     +++|**        SRS - PROCESS SELECTIVE RESET.
01174  M01S01101.1hy     +++|
01175  M01S01102.1hy     +++|
01176  M01S01103.1hy     +++| SRS      BSS    0
01177  M01S01104.1hy     +++|          LDC    CMP4        SET RETURN ADDRESS
Line S01105 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01178  M02S01105.ns2769  ---| SRS1     STM    RADD
01179  M01S00028.ns2769  +++| SRS1     STM    RADD,DI
01180  M01S01106.1hy     +++|          LDC    FWSR        ISSUE SELECTIVE RESET
01181  M01S01107.1hy     +++|          RJM    WFW
01182  M01S01108.1hy     +++|          LDN    6           SET TIMEOUT TO 6 SECONDS
01183  M01S01109.1hy     +++|          RJM    STO
01184  M01S01110.1hy     +++|          LDN    ESCB        PROCESS ATTENTION
01185  M01S01111.1hy     +++|          RJM    ATT
01186  M01S01112.1hy     +++|          ZJN    SRS3        IF *COMMAND BLOCK INDEPENDENT*
01187  M01S01113.1hy     +++|          LDN    EUES
01188  M01S01114.1hy     +++| SRS2     RJM    ERR         PROCESS ERROR
01189  M01S01115.1hy     +++|
01190  M01S01116.1hy     +++| SRS3     LDD    SS          CHECK DELAY STATUS PRESENT
01191  M01S01117.1hy     +++|          LPN    1
01192  M01S01118.1hy     +++|          ZJN    SRS4        IF NO DELAY STATUS
01193  M01S01119.1hy     +++|          LDM    SLST+3
01194  M01S01120.1hy     +++|          LPC    377         CHECK DELAY STATUS
01195  M01S01121.1hy     +++|          LMC    0#83
01196  M01S01122.1hy     +++|          ZJN    SRS5        IF HOST GENERATED RESET
01197  M01S01123.1hy     +++| SRS4     LDN    EUDS
01198  M01S01124.1hy     +++|          UJN    SRS2        UNEXPECTED DELAY STATUS
01199  M01S01125.1hy     +++|
Line S01126 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01200  M02S01126.ns2769  ---| SRS5     STM    ELEN
Line S01127 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01201  M02S01127.ns2769  ---|          STM    ELRC        CLEAR INTERNAL ERROR COUNTERS
Line S01128 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01202  M02S01128.ns2769  ---|          STM    EREN
Line S01129 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01203  M02S01129.ns2769  ---|          LDM    RADD        SET RETURN ADDRESS
01204  M01S00029.ns2769  +++| SRS5     STM    ELEN,DI
01205  M01S00030.ns2769  +++|          STM    ELRC,DI     CLEAR INTERNAL ERROR COUNTERS
01206  M01S00031.ns2769  +++|          STM    EREN,DI
01207  M01S00032.ns2769  +++|          LDM    RADD,DI     SET RETURN ADDRESS
01208  M01S01130.1hy     +++|          STD    PA
01209  M01S01131.1hy     +++|          LJM    0,PA        RETURN TO CALLER
01210  M01S01132.1hy     +++|          TITLE  SUBROUTINES.
01211  M01S01133.1hy     +++| ACE      SPACE  4,10
01212  M01S01134.1hy     +++|**        ACE - ANALYZE CHANNEL ERROR.
01213  M01S01135.1hy     +++|*
01214  M01S01136.1hy     +++|*         ENTRY  (RBUF) = CHANNEL STATUS REGISTER.
01215  M01S01137.1hy     +++|
01216  M01S01138.1hy     +++|
01217  M01S01139.1hy     +++| ACE3     LDN    ECCM        SET CHANNEL DETECTED CM ERROR
01218  M01S01140.1hy     +++| ACE4     STM    FALT
01219  M01S01141.1hy     +++|
01220  M01S01142.1hy     +++| ACE      SUBR               ENTRY/EXIT
01221  M01S01143.1hy     +++|          LDM    RBUF+5
01222  M01S01144.1hy     +++|          LPN    2
01223  M01S01145.1hy     +++|          ZJN    ACEX        IF NO CHANNEL ERROR
01224  M01S01146.1hy     +++|          LDM    RBUF
01225  M01S01147.1hy     +++|          LPN    76
01226  M01S01148.1hy     +++|          NJN    ACE3        IF ERROR IN MEMORY
01227  M01S01149.1hy     +++|          LDM    RBUF+1
01228  M01S01150.1hy     +++|          SHN    -5
01229  M01S01151.1hy     +++|          ZJN    ACE2        IF NOT PARITY / ISI CHANNEL ERROR
01230  M01S01152.1hy     +++|          LPN    2
01231  M01S01153.1hy     +++|          ZJN    ACE1        IF NOT PARITY ERROR
01232  M01S01154.1hy     +++|          LDN    ECPE&ECIE
01233  M01S01155.1hy     +++| ACE1     LMN    ECIE&ECER   FAULT ANALYSIS CODE
01234  M01S01156.1hy     +++| ACE2     LMN    ECER
01235  M01S01157.1hy     +++|          UJN    ACE4        SAVE FAULT CODE
01236  M01S01158.1hy     +++| AME      SPACE  4,10
01237  M01S01159.1hy     +++|**        AME - ATTEMPT MONITOR EXCHANGE.
01238  M01S01160.1hy     +++|*
01239  M01S01161.1hy     +++|*         EXIT   (A) = 0.
01240  M01S01162.1hy     +++|*
01241  M01S01163.1hy     +++|*         USES   CM - CM+4.
01242  M01S01164.1hy     +++|*
01243  M01S01165.1hy     +++|*         MACROS EXPE.
01244  M01S01166.1hy     +++|
01245  M01S01167.1hy     +++|
01246  M01S01168.1hy     +++| AME      SUBR               ENTRY/EXIT
01247  M01S01169.1hy     +++|          EXPE   *
01248  M01S01170.1hy     +++| AME1     LDC    6           CHECK FOR (MA) NON-ZERO
01249  M01S01171.1hy     +++|          CRD    CM
01250  M01S01172.1hy     +++|          LDD    CM
01251  M01S01173.1hy     +++|          ADD    CM+1
01252  M01S01174.1hy     +++|          NJN    AME1        IF EXCHANGE PACKAGE NOT READY
01253  M01S01175.1hy     +++|          EXPE   *
01254  M01S01176.1hy     +++| AME2     LDC    0           SET (B0) NON-ZERO
01255  M01S01177.1hy     +++|          CWM    AMEA,ON
01256  M01S01178.1hy     +++|          SBN    1           EXCHANGE MONITOR
01257  M01S01179.1hy     +++|          MXN    0
01258  M01S01180.1hy     +++|          CRD    CM
01259  M01S01181.1hy     +++|          LDD    CM+4
01260  M01S01182.1hy     +++|          ZJN    AMEX        IF EXCHANGE TAKEN
01261  M01S01183.1hy     +++|          LDN    28D
01262  M01S01184.1hy     +++|          SBN    1           WAIT 20 MICROSECONDS ELAPSED
01263  M01S01185.1hy     +++|          NJN    *-1
01264  M01S01186.1hy     +++|          UJN    AME2        RETRY EXCHANGE
01265  M01S01187.1hy     +++|
01266  M01S01188.1hy     +++|
01267  M01S01189.1hy     +++| AMEA     VFD    24/0        (P)
01268  M01S01190.1hy     +++|          VFD    18/0        (A0)
01269  M01S01191.1hy     +++|          VFD    18/0        (B0)
01270  M01S01192.1hy     +++| AMR      SPACE  4,15
01271  M01S01193.1hy     +++|**        AMR - ACCESS MAINTENANCE REGISTER.
01272  M01S01194.1hy     +++|*
01273  M01S01195.1hy     +++|*         ENTRY  (A) = 6/ OC, 12/ RN
01274  M01S01196.1hy     +++|*                      OC = *RMRF* TO READ REGISTER.
01275  M01S01197.1hy     +++|*                         = *WMRF* TO WRITE REGISTER.
01276  M01S01198.1hy     +++|*                      RN = *IOU* REGISTER NUMBER.
01277  M01S01199.1hy     +++|*
01278  M01S01200.1hy     +++|*         EXIT   (A) = 0 IF NO CHANNEL ERROR.
01279  M01S01201.1hy     +++|*                (RBUF) = REGISTER CONTENTS.
01280  M01S01202.1hy     +++|*
01281  M01S01203.1hy     +++|*         USES   T4.
01282  M01S01204.1hy     +++|*
01283  M01S01205.1hy     +++|*         CALLS  WMC.
01284  M01S01206.1hy     +++|
01285  M01S01207.1hy     +++|
01286  M01S01208.1hy     +++| AMR1     ACN.   MR
01287  M01S01209.1hy     +++|          LDN    0           OUTPUT NULL PARAMETER
01288  M01S01210.1hy     +++|          OAN.   MR
01289  M01S01211.1hy     +++|          LDD    T4          TRANSMIT REGISTER NUMBER
01290  M01S01212.1hy     +++|          OAN.   MR
01291  M01S01213.1hy     +++|          LDN    0           WAIT CHANNEL EMPTY
01292  M01S01214.1hy     +++|          RJM    WMC
01293  M01S01215.1hy     +++|          DCN.   MR+40
01294  M01S01216.1hy     +++|          NJN    AMRX        IF CHANNEL HUNG FULL
01295  M01S01217.1hy     +++|          ACN.   MR
01296  M01S01218.1hy     +++|          LDN    10          READ / WRITE REGISTER
01297  M01S01219.1hy     +++| AMRA     IAM.   RBUF,MR
01298  M01S01220.1hy     +++|
01299  M01S01221.1hy     +++| AMR      SUBR               ENTRY/EXIT
01300  M01S01222.1hy     +++|          STD    T4
01301  M01S01223.1hy     +++|          SHN    -14         POSITION OP CODE
01302  M01S01224.1hy     +++|          LMD    HN
01303  M01S01225.1hy     +++|          ERRNZ  IOUC-100    CODE DEPENDS ON VALUE
01304  M01S01226.1hy     +++|          FAN.   MR
01305  M01S01227.1hy     +++|          LPN    20
01306  M01S01228.1hy     +++|          ERRNZ  RMRF+20-WMRF CODE DEPENDS ON VALUE
01307  M01S01229.1hy     +++|          SHN    3
01308  M01S01230.1hy     +++|          LMC    IAMI+MR     FORM I/O INSTRUCTION
01309  M01S01231.1hy     +++|          STM    AMRA
01310  M01S01232.1hy     +++|          UJP    AMR1        ACCESS MAINTENANCE REGISTER
01311  M01S01233.1hy     +++| ATT      SPACE  4,15
01312  M01S01234.1hy     +++|**        ATT - PROCESS ATTENTION.
01313  M01S01235.1hy     +++|*
01314  M01S01236.1hy     +++|*         ENTRY  (A) = EXPECTED EXECUTION STATUS.
01315  M01S01237.1hy     +++|*
01316  M01S01238.1hy     +++|*         EXIT   (A) = 0 IF EXPECTED EXECUTION STATUS.
01317  M01S01239.1hy     +++|*                (SS) = SLAVE STATUS (SET BY *GSS*).
01318  M01S01240.1hy     +++|*
01319  M01S01241.1hy     +++|*         ERROR  TO *ERR* IF TIMEOUT.
01320  M01S01242.1hy     +++|*
01321  M01S01243.1hy     +++|*         USES   PA.
01322  M01S01244.1hy     +++|*
01323  M01S01245.1hy     +++|*         CALLS  CTO, GSS, HYD, R1B, SSD.
01324  M01S01246.1hy     +++|
01325  M01S01247.1hy     +++|
01326  M01S01248.1hy     +++| ATT      CON    0           ENTRY
Line S01249 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01327  M02S01249.ns2769  ---|          STM    EEST
01328  M01S00033.ns2769  +++|          STM    EEST,DI
01329  M01S01250.1hy     +++|          LDM    ATT         SAVE RETURN ADDRESS
Line S01251 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01330  M02S01251.ns2769  ---|          STM    ATTN
01331  M01S00034.ns2769  +++|          STM    ATTN,DI
01332  M01S01252.1hy     +++| ATT1     RJM    HYD         RETURN TO MAIN LOOP
01333  M01S01253.1hy     +++|          LDC    FCIS
01334  M01S01254.1hy     +++|          RJM    R1B         REQUEST IDLE STATUS
01335  M01S01255.1hy     +++|          STML   IDST
01336  M01S01256.1hy     +++|          LPML   TMSK,UN
01337  M01S01257.1hy     +++|          ZJN    ATT2        IF ATTENTION NOT SET
Line S01258 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01338  M02S01258.ns2769  ---|          LDM    ATTN
01339  M01S00035.ns2769  +++|          LDM    ATTN,DI
01340  M01S01259.1hy     +++|          STD    PA
01341  M01S01260.1hy     +++|          RJM    SSD         SELECT SLAVE DEVICE
01342  M01S01261.1hy     +++|
01343  M01S01262.1hy     +++|*         RETURN TO CALLER WITH *IHD* STATUS.
01344  M01S01263.1hy     +++|
Line S01264 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01345  M02S01264.ns2769  ---|          LDM    EEST
01346  M01S00036.ns2769  +++|          LDM    EEST,DI
01347  M01S01265.1hy     +++|          RJM    GSS         GET SLAVE STATUS
Line S01266 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01348  M02S01266.ns2769  ---|          LMM    EEST
01349  M01S00037.ns2769  +++|          LMM    EEST,DI
01350  M01S01267.1hy     +++|          LJM    0,PA        RETURN TO CALLER
01351  M01S01268.1hy     +++|
01352  M01S01269.1hy     +++| ATT2     RJM    CTO
01353  M01S01270.1hy     +++|          MJN    ATT1        IF NOT TIMEOUT
01354  M01S01271.1hy     +++|          LDN    ETAT
01355  M01S01272.1hy     +++|          RJM    ERR         PROCESS ERROR
01356  M01S01273.1hy     +++| CCR      SPACE  4,15
01357  M01S01274.1hy     +++|**        CCR - CHECK FOR CHANNEL REQUEST.
01358  M01S01275.1hy     +++|*
01359  M01S01276.1hy     +++|*         ENTRY  (UC) = UNIT ACTIVITY COUNT.
01360  M01S01277.1hy     +++|*                (IR+4) = CHANNEL NUMBER.
01361  M01S01278.1hy     +++|*
01362  M01S01279.1hy     +++|*         EXIT   (A) = 0 IF CHANNEL DOWN.
01363  M01S01280.1hy     +++|*
01364  M01S01281.1hy     +++|*         USES   CM - CM+4.
01365  M01S01282.1hy     +++|*
01366  M01S01283.1hy     +++|*         CALLS  DCR, RCT, SRF.
01367  M01S01284.1hy     +++|*
01368  M01S01285.1hy     +++|*         MACROS DELAY, MONITOR.
01369  M01S01286.1hy     +++|
01370  M01S01287.1hy     +++|
01371  M01S01288.1hy     +++| CCR3     RJM    SRF         SET DRIVER RELOAD FLAG
01372  M01S01289.1hy     +++| CCR4     LDD    CR
01373  M01S01290.1hy     +++|
01374  M01S01291.1hy     +++| CCR      SUBR               ENTRY/EXIT
01375  M01S01292.1hy     +++|          RJM    RCT         READ CHANNEL TABLE
01376  M01S01293.1hy     +++|          SHN    21-5
01377  M01S01294.1hy     +++|          MJN    CCR3        IF CHANNEL GLOBALLY DOWN
01378  M01S01295.1hy     +++|          LPN    40
01379  M01S01296.1hy     +++|          ZJN    CCR4        IF CHANNEL NOT REQUESTED
01380  M01S01297.1hy     +++|          STM    CHRQ        DISABLE NEW ACTIVITY
01381  M01S01298.1hy     +++|          LDD    UC
01382  M01S01299.1hy     +++|          NJN    CCRX        IF CURRENT ACTIVITY
01383  M01S01300.1hy     +++|          RJM    DCR         DROP CHANNEL RESERVATION
01384  M01S01301.1hy     +++|*         LDN    0
01385  M01S01302.1hy     +++|          STM    CHRQ        ENABLE NEW ACTIVITY
01386  M01S01303.1hy     +++| CCR1     LDD    CR
01387  M01S01304.1hy     +++|          NJN    CCRX        IF CHANNEL RESERVED
01388  M01S01305.1hy     +++| CCR2     DELAY
01389  M01S01306.1hy     +++|          LDD    IR+4
01390  M01S01307.1hy     +++|          STD    CM+1        ATTEMPT TO RESERVE CHANNEL
01391  M01S01308.1hy     +++|          MONITOR  CCHM
01392  M01S01309.1hy     +++|          LDD    CM+2        SET RESERVATION STATUS
01393  M01S01310.1hy     +++|          STD    CR
01394  M01S01311.1hy     +++|          RJM    RCT         READ CHANNEL TABLE
01395  M01S01312.1hy     +++|          LPN    40
01396  M01S01313.1hy     +++|          ZJN    CCR1        IF CHANNEL NOT DOWN
01397  M01S01314.1hy     +++|          LJM    CCR3        SET DRIVER RELOAD FLAG
01398  M01S01315.1hy     +++| CFE      SPACE  4,10
01399  M01S01316.1hy     +++|**        CFE - CHECK FOR I/O ERROR.
01400  M01S01317.1hy     +++|*
01401  M01S01318.1hy     +++|*         EXIT   (A) = 0.
01402  M01S01319.1hy     +++|*
01403  M01S01320.1hy     +++|*         ERROR  TO *ERR*.
01404  M01S01321.1hy     +++|
01405  M01S01322.1hy     +++|
01406  M01S01323.1hy     +++| CFE3     LDC    FCRE        ACCESS ERROR REGISTER
01407  M01S01324.1hy     +++|          RJM    FCN
01408  M01S01325.1hy     +++|          ACN    CH          SIMULATE REGISTER READ
01409  M01S01326.1hy     +++|          DCN    CH+40
01410  M01S01327.1hy     +++|          CFM    *+2,CH      CLEAR CHANNEL ERROR FLAG
01411  M01S01328.1hy     +++|          LDD    T1
01412  M01S01329.1hy     +++| CFE4     NJN    CFE2        IF INCOMPLETE DATA TRANSFER
01413  M01S01330.1hy     +++|
01414  M01S01331.1hy     +++| CFE      SUBR               ENTRY/EXIT
01415  M01S01332.1hy     +++|          DCN    CH+40
01416  M01S01333.1hy     +++|          CFM    CFE4,CH     IF CHANNEL ERROR FLAG CLEAR
01417  M01S01334.1hy     +++|          STD    T1
01418  M01S01335.1hy     +++|          LDML   WFWA        CHECK OPERATION IN PROGRESS
01419  M01S01336.1hy     +++|          LMC    FWSR
01420  M01S01337.1hy     +++|          ZJN    CFE3        IF SELECTIVE RESET
01421  M01S01338.1hy     +++|          LDN    ECIE
01422  M01S01339.1hy     +++| CFE1     RJM    ERR         PROCESS CHANNEL ERROR
01423  M01S01340.1hy     +++|
01424  M01S01341.1hy     +++| CFE2     STM    RBCT        SAVE RESIDUAL BYTE COUNT
01425  M01S01342.1hy     +++|          LDN    EIDT
01426  M01S01343.1hy     +++|          UJN    CFE1        PROCESS ERROR
01427  M01S01344.1hy     +++| CFR      SPACE  4,10
01428  M01S01345.1hy     +++|**        CFR - CHECK *PUT* FOR REQUEST.
01429  M01S01346.1hy     +++|*
01430  M01S01347.1hy     +++|*         ENTRY  (DI) = DEVICE STATUS BLOCK ADDRESS.
01431  M01S01348.1hy     +++|*
01432  M01S01349.1hy     +++|*         USES   T2, CM - CM+4.
01433  M01S01350.1hy     +++|*
01434  M01S01351.1hy     +++|*         CALLS  CSD, IIO, ISR, SAP.
01435  M01S01352.1hy     +++|*
01436  M01S01353.1hy     +++|*         MACROS PUTE, SFA.
01437  M01S01354.1hy     +++|
01438  M01S01355.1hy     +++|
01439  M01S01356.1hy     +++| CFR3     LDD    WB          EXTRACT UNIT NUMBER
01440  M01S01357.1hy     +++|          LPN    77
01441  M01S01358.1hy     +++|          STD    UN
01442  M01S01359.1hy     +++|          LDD    WB+1
01443  M01S01360.1hy     +++|          STD    EO          SET EST ORDINAL
01444  M01S01361.1hy     +++|          SFA    EST
01445  M01S01362.1hy     +++|          ADK    EQDE        READ EST ENTRY
01446  M01S01363.1hy     +++|          CRD    CM
01447  M01S01364.1hy     +++|          LDD    CM+3
01448  M01S01365.1hy     +++|          LPN    77
01449  M01S01366.1hy     +++|          SBN    1RF         SET DEVICE TYPE
01450  M01S01367.1hy     +++|          SHN    0-1
01451  M01S01368.1hy     +++|          STD    DT
01452  M01S01369.1hy     +++|          LDD    WB+3        SET *CBT* ORDINAL
01453  M01S01370.1hy     +++|          STD    CB
01454  M01S01371.1hy     +++|          LDD    PA
01455  M01S01372.1hy     +++|          ZJN    CFR4        IF NO REQUEST IN PROGRESS
01456  M01S01373.1hy     +++|          RJM    SAP         SELECT ADAPTOR PORT
Line S01374 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01457  M02S01374.ns2769  ---|          LDM    RWST
01458  M01S00038.ns2769  +++|          LDM    RWST,DI
01459  M01S01375.1hy     +++|          STD    RW          SET READ / WRITE STATUS
01460  M01S01376.1hy     +++|          UJN    CFR6        RETURN TO PROCESSOR
01461  M01S01377.1hy     +++|
01462  M01S01378.1hy     +++| CFR4     LDD    T2
01463  M01S01379.1hy     +++|          ZJN    CFR7        IF NO SPECIAL REQUEST
01464  M01S01380.1hy     +++|          RJM    ISR         IDENTIFY SPECIAL REQUEST
01465  M01S01381.1hy     +++|          ZJN    CFRX        IF UNKNOWN REQUEST
01466  M01S00002.ns2512  +++|          LDN    0
01467  M01S00003.ns2512  +++|          STD    CB
01468  M01S01382.1hy     +++| CFR5     RJM    CSD         CONNECT TO *IHD*
01469  M01S01383.1hy     +++|          ZJN    CFRX        IF UNIT UNAVAILABLE
01470  M01S01384.1hy     +++|
01471  M01S01385.1hy     +++|*         EXIT TO PROCESSOR AS APPLICABLE WITH -
01472  M01S01386.1hy     +++|*                (PO) = *PUT* ORDINAL.
01473  M01S01387.1hy     +++|*                (CB) = *CBT* ORDINAL.
01474  M01S01388.1hy     +++|*                (EO) = EST ORDINAL.
01475  M01S01389.1hy     +++|*                (RW) = READ / WRITE STATUS.
01476  M01S01390.1hy     +++|*                (DT) = DEVICE TYPE.
01477  M01S01391.1hy     +++|*                (UN) = UNIT NUMBER.
01478  M01S00004.ns2512  +++|*                (RF) = SPECIAL REQUEST FLAGS.
01479  M01S01392.1hy     +++|*                (WB - WB+4) = *UNCT* WORD OF *PUT* ENTRY.
01480  M01S01393.1hy     +++|
01481  M01S01394.1hy     +++| CFR6     LJM    0,PA        RETURN TO PROCESSOR
01482  M01S01395.1hy     +++|
01483  M01S01396.1hy     +++| CFR7     LDD    CB          INITIATE I/O
01484  M01S01397.1hy     +++|          RJM    IIO
01485  M01S01398.1hy     +++|          NJN    CFR5        IF I/O ENABLED ON THIS ACCESS
01486  M01S01399.1hy     +++|
01487  M01S01400.1hy     +++| CFR      SUBR               ENTRY/EXIT
01488  M01S01401.1hy     +++|          LDI    DI
01489  M01S01402.1hy     +++|          ERRNZ  PUTO        CODE DEPENDS ON VALUE
01490  M01S01403.1hy     +++|          STD    PO
01491  M01S01404.1hy     +++|          SHN    PUTLS       READ *PUT* ENTRY
01492  M01S01405.1hy     +++|          PUTE   *
Line S01406 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2703
Seq #  *Modification Id* Act 
----------------------------+
01493  M02S01406.ns2703  ---|          ADC    UNCT        FETCH UNIT CONTROL WORD
01494  M01S00001.ns2703  +++|          ADC    PILL        GET INTERLOCK STATUS
01495  M01S00002.ns2703  +++|          CRD    CM
01496  M01S00003.ns2703  +++|          SBN    PILL-UNCT   FETCH UNIT CONTROL WORD
01497  M01S01407.1hy     +++|          CRD    WB
Line S01408 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2703
Seq #  *Modification Id* Act 
----------------------------+
01498  M02S01408.ns2703  ---|          ADN    PILL-UNCT   GET INTERLOCK STATUS
Line S01409 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2703
Seq #  *Modification Id* Act 
----------------------------+
01499  M02S01409.ns2703  ---|          CRD    CM
Line S01410 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01500  M02S01410.ns2769  ---|          LDM    ADDR        CHECK REQUEST PRESENT
01501  M01S00039.ns2769  +++|          LDM    ADDR,DI     CHECK REQUEST PRESENT
01502  M01S01411.1hy     +++|          STD    PA
01503  M01S01412.1hy     +++|          NJN    CFR2        IF REQUEST IN PROGRESS
01504  M01S01413.1hy     +++|          LDD    CM+3
Line S00005 Modification History
M01 (Added by) ns2512
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01505  M02S00005.271l716 ---|          STD    RF
Line S00006 Modification History
M01 (Added by) ns2512
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01506  M02S00006.271l716 ---|          LPN    77          EXTRACT OPERATOR REQUESTS
01507  M01S00026.271l716 +++|          STD    RF          SET SPECIAL REQUESTS
01508  M01S00027.271l716 +++| DVRF     BITSET DVDF-DVDF/12D*12D
01509  M01S00028.271l716 +++|          LPN    77&DVRF     EXTRACT OPERATOR REQUESTS
01510  M01S00007.ns2512  +++|          STD    CM+3
01511  M01S01414.1hy     +++|          SCN    1           CLEAR DEVICE UNAVAILABLE
01512  M01S01415.1hy     +++|          STD    T2
01513  M01S01416.1hy     +++|          NJN    CFR1        IF SPECIAL REQUEST PRESENT
01514  M01S01417.1hy     +++|          LMD    CM+3
01515  M01S01418.1hy     +++|          NJN    CFRX        IF DEVICE UNAVAILABLE FOR I/O
01516  M01S01419.1hy     +++|          ADD    WB+3
01517  M01S01420.1hy     +++|          ZJN    CFRX        IF NO I/O REQUEST
01518  M01S01421.1hy     +++| CFR1     LDD    CM+4
01519  M01S01422.1hy     +++| CFRA     ZJN    CFR2        IF UNIT NOT INTERLOCKED
01520  M01S01423.1hy     +++|          LMD    OA
01521  M01S01424.1hy     +++|          NJN    CFRX        IF NOT INTERLOCKED BY THIS DRIVER
01522  M01S01425.1hy     +++| CFR2     LJM    CFR3
01523  M01S01426.1hy     +++| CFRB     EQU    *-1         (MODIFIED FOR TERMINATION PROCESSING)
01524  M01S01427.1hy     +++| CMC      SPACE  4,10
01525  M01S01428.1hy     +++|**        CMC - CHECK MONITOR COMPLETE.
01526  M01S01429.1hy     +++|*
01527  M01S01430.1hy     +++|*         EXIT   (A) = (CM) = 0.
01528  M01S01431.1hy     +++|*
01529  M01S01432.1hy     +++|*         USES   CM - CM+4.
01530  M01S01433.1hy     +++|*
01531  M01S01434.1hy     +++|*         CALLS  AME.
01532  M01S01435.1hy     +++|*
01533  M01S01436.1hy     +++|*         MACROS DELAY.
01534  M01S01437.1hy     +++|
01535  M01S01438.1hy     +++|
01536  M01S01439.1hy     +++| CMC      SUBR               ENTRY/EXIT
01537  M01S01440.1hy     +++| CMC1     LDD    OA
01538  M01S01441.1hy     +++|          CRD    CM
01539  M01S01442.1hy     +++|          LDD    CM
01540  M01S01443.1hy     +++|          ZJN    CMCX        IF NO REQUEST WAITING FOR RESPONSE
01541  M01S01444.1hy     +++|          SHN    21-13
01542  M01S01445.1hy     +++|          PJN    CMC2        IF NOT TO RETRY REQUEST
01543  M01S01446.1hy     +++|          SHN    13-21
01544  M01S01447.1hy     +++|          LPC    177         CLEAR FLAGS
01545  M01S01448.1hy     +++|          STD    CM
01546  M01S01449.1hy     +++|          LDD    OA          UPDATE OUTPUT REGISTER
01547  M01S01450.1hy     +++|          CWD    CM
01548  M01S01451.1hy     +++|          RJM    AME         REISSUE REQUEST
01549  M01S01452.1hy     +++| CMC2     DELAY
01550  M01S01453.1hy     +++|          UJN    CMC1        RECHECK OUTPUT REGISTER
01551  M01S01454.1hy     +++| CMP      SPACE  4,15
01552  M01S01455.1hy     +++|**        CMP - COMPLETE PROCESSING.
01553  M01S01456.1hy     +++|*
01554  M01S01457.1hy     +++|*         ENTRY  (SF) = DEVICE SELECTED STATUS.
01555  M01S01458.1hy     +++|*                (UC) = UNIT ACTIVITY COUNT.
01556  M01S01459.1hy     +++|*                (RW) = READ / WRITE STATUS.
01557  M01S01460.1hy     +++|*
01558  M01S01461.1hy     +++|*         EXIT   TO *HYD3*.
01559  M01S01462.1hy     +++|*                (SF) = 0.
01560  M01S01463.1hy     +++|*                (UC) = UNIT ACTIVITY COUNT DECREMENTED.
01561  M01S01464.1hy     +++|*
01562  M01S01465.1hy     +++|*         USES   WB+4.
01563  M01S01466.1hy     +++|*
01564  M01S01467.1hy     +++|*         CALLS  CMC, DCB, FCN, IEM, WFC.
01565  M01S01468.1hy     +++|
01566  M01S01469.1hy     +++|
Line S01470 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01567  M02S01470.ns2769  ---| CMP      LDM    ERCT
01568  M01S00040.ns2769  +++| CMP      LDM    ERCT,DI
01569  M01S01471.1hy     +++|          ZJN    CMP3        IF NO ERRORS
Line S01472 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01570  M02S01472.ns2769  ---|          AOM    ERCT
01571  M01S00041.ns2769  +++|          AOM    ERCT,DI
Line S01473 Modification History
M01 (Added by) 1hy
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
01572  M02S01473.272l774 ---| CMP1     LDN    HD0105-HD0100
01573  M01S00001.272l774 +++| CMP1     LDN    HD0111-HD0100
01574  M01S01474.1hy     +++|          RJM    IEM         ISSUE FINAL MESSAGE
01575  M01S01475.1hy     +++|*         LDN    0
Line S01476 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01576  M02S01476.ns2769  ---| CMP2     STM    ERCT        CLEAR ERROR COUNT
Line S01477 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01577  M02S01477.ns2769  ---| CMP3     STM    IPPS
01578  M01S00042.ns2769  +++| CMP2     STM    ERCT,DI     CLEAR ERROR COUNT
01579  M01S00043.ns2769  +++| CMP3     STM    IPPS,DI
01580  M01S01478.1hy     +++| CMP4     LDD    SF
01581  M01S01479.1hy     +++|          ZJN    CMP5        IF DEVICE NOT SELECTED
01582  M01S01480.1hy     +++|          LDC    FWCA
01583  M01S01481.1hy     +++|          RJM    WFC         CLEAR ATTENTION
01584  M01S01482.1hy     +++|          LDC    FCCH
01585  M01S01483.1hy     +++|          RJM    FCN         CLEAR SELECT HOLD
01586  M01S01484.1hy     +++|          SOD    SF
01587  M01S01485.1hy     +++| CMP5     LDD    RW          SET DATA TRANSFER DIRECTION
01588  M01S01486.1hy     +++|          SHN    13-0
Line S01487 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01589  M02S01487.ns2769  ---|          LMM    CBCT        APPEND CUMULATIVE BUFFER COUNT
01590  M01S00044.ns2769  +++|          LMM    CBCT,DI     APPEND CUMULATIVE BUFFER COUNT
01591  M01S01488.1hy     +++|          STD    WB+4
Line S01489 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01592  M02S01489.ns2769  ---|          LDM    RQIN        SET UP *CBT* LIST
01593  M01S00045.ns2769  +++|          LDM    RQIN,DI     SET UP *CBT* LIST
01594  M01S01490.1hy     +++|          LMC    4000
01595  M01S01491.1hy     +++|          RJM    DCB         DELINK BUFFERS / RELEASE UNIT INTERLOCK
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/1hy.txt ยท Last modified: by 127.0.0.1