User Tools

Site Tools


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

Deck 1HY

Library Member Format: MODIFY

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M00S00001.1hy     +++|          IDENT  1HY,HYDD
00002  M00S00002.1hy     +++|          TITLE  1HY - HYDRA (887) DRIVER.
00003  M00S00003.1hy     +++|          CIPPU  ,S
00004  M00S00004.1hy     +++|          BASE   M
00005  M00S00005.1hy     +++|          SST
00006  M00S00006.1hy     +++|*COMMENT  1HY - HYDRA (887) DRIVER.
Line S00007 Modification History
M01 (Removed by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00007  M01S00007.281l803 ---|          COMMENT  COPYRIGHT CONTROL DATA CORPORATION, 1985.
Line S00001 Modification History
M01 (Added by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00008  M01S00001.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00009  M00S00008.1hy     +++|          SPACE  4,10
00010  M00S00009.1hy     +++|***       1HY - HYDRA (887) DRIVER.
00011  M00S00010.1hy     +++|*
00012  M00S00011.1hy     +++|*         P. D. HAAS.        85/12/16.
00013  M00S00012.1hy     +++|          SPACE  4,10
00014  M00S00013.1hy     +++|***       *1HY* IS THE DRIVER FOR THE 887 DISK STORAGE SUBSYSTEM.
00015  M00S00014.1hy     +++|*
00016  M00S00015.1hy     +++|*         THE 887 DISK DRIVES ARE SUPPORTED AS BUFFERED I/O
00017  M00S00016.1hy     +++|*         DEVICES.  REQUESTS THAT ARE PROCESSED BY *1HY* ARE
00018  M00S00017.1hy     +++|*         POSTED BY *CPUMTR* IN THE BUFFERED I/O TABLES IN *CMR*.
00019  M00S00018.1hy     +++|*         *1HY* INTERLOCKS UNITS, DELINKS BUFFERS, AND COMPLETES
00020  M00S00019.1hy     +++|*         SAID REQUESTS BY ISSUING APPROPRIATE *BIOM* FUNCTIONS.
00021  M00S00020.1hy     +++|*
00022  M00S00021.1hy     +++|*         EACH COPY OF *1HY* WILL SUPPORT ONE CONCURRENT CHANNEL AND
00023  M00S00022.1hy     +++|*         IS THE SOLE DRIVER FOR ALL HYDRA DISKS ON THAT CHANNEL.
00024  M00S00023.1hy     +++|*         *1HY* MUST BE LOADED INTO A CONCURRENT PP, IN THE SAME
00025  M00S00024.1hy     +++|*         BANK AS THE CHANNEL IT IS TO SERVICE.
00026  M00S00025.1hy     +++|*
00027  M00S00026.1hy     +++|*         *1HY* SCANS THROUGH THE *PUT* ENTRIES IN A CIRCULAR FASHION
00028  M00S00027.1hy     +++|*         LOOKING FOR REQUESTS TO PROCESS.  ONCE A REQUEST IS FOUND,
00029  M00S00028.1hy     +++|*         *1HY* USES THE PHYSICAL DISK AND UEM ADDRESSES IN THE
00030  M00S00029.1hy     +++|*         CORRESPONDING *CBT* ENTRY TO DETERMINE THE ACTION TO BE
00031  M00S00030.1hy     +++|*         TAKEN.  *1HY* WILL ATTEMPT TO PROCESS CONSECUTIVE REQUESTS
00032  M00S00031.1hy     +++|*         ON THE CURRENT UNIT UNTIL THE END OF THE UNIT I/O QUEUE,
00033  M00S00032.1hy     +++|*         OR A CONSECUTIVE REQUEST WAS NOT FOUND.  AT THIS POINT
00034  M00S00033.1hy     +++|*         *1HY* WILL RESUME ITS SEARCH THROUGH THE *PUT* WITH THE
00035  M00S00034.1hy     +++|*         *PUT* ENTRY IMMEDIATELY FOLLOWING THE ONE JUST PROCESSED.
00036  M00S00035.1hy     +++|          SPACE  4,10
00037  M00S00036.1hy     +++|***       CALL.
00038  M00S00037.1hy     +++|*
00039  M00S00038.1hy     +++|*T        18/ *1HY*, 6/ CP, 6/ CO, 18/, 7/ 1, 5/ CH
Figure

045111229 CH 1303536414259 CO CP *1HY*

00040  M00S00039.1hy     +++|*
00041  M00S00040.1hy     +++|*         CP     CONTROL POINT NUMBER (MUST BE SYSTEM CP).
00042  M00S00041.1hy     +++|*         CO     CHANNEL TABLE ORDINAL (SET BY *CPUMTR*).
00043  M00S00042.1hy     +++|*         CH     CHANNEL NUMBER BEING SERVICED BY THIS PP.
00044  M00S00043.1hy     +++|          SPACE  4,10
00045  M00S00044.1hy     +++|***       DAYFILE MESSAGES.
00046  M00S00045.1hy     +++|*
00047  M00S00046.1hy     +++|*         1HY - UNAUTHORIZED CALL.
00048  M00S00047.1hy     +++|*
00049  M00S00048.1hy     +++|*         *1HY* WILL ISSUE THIS MESSAGE AND ABORT IF
00050  M00S00049.1hy     +++|*         NOT ASSIGNED TO THE SYSTEM CONTROL POINT.
00051  M00S00050.1hy     +++|          SPACE  4,10
00052  M00S00051.1hy     +++|***       ERRLOG MESSAGES.
00053  M00S00052.1hy     +++|*
00054  M00S00053.1hy     +++|*         EQORD,TKNNNN, MEDIA DEFECT ENCOUNTERED.
00055  M00S00054.1hy     +++|*
00056  M00S00055.1hy     +++|*         A MEDIA DEFECT HAS BEEN ENCOUNTERED ON EQUIPMENT WITH EST
00057  M00S00056.1hy     +++|*         ORDINAL ORD, LOGICAL TRACK NNNN.  A REQUEST HAS BEEN ISSUED
00058  M00S00057.1hy     +++|*         TO AUTOMATICALLY FLAW THIS TRACK WHEN IT IS DROPPED.
00059  M00S00058.1hy     +++|          SPACE  4,10
Line S00001 Modification History
M01 (Added by) 1hy6
Seq #  *Modification Id* Act 
----------------------------+
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  M00S00059.1hy     +++|***       ORGANIZATION OF THE 887 (MEASUREMENTS IN DECIMAL).
00067  M00S00060.1hy     +++|*
00068  M00S00061.1hy     +++|*         EQUIPMENT TYPE                    *DF*
00069  M00S00062.1hy     +++|*
00070  M00S00063.1hy     +++|*         UNITS/LOGICAL DEVICE (N)         1 - 3
00071  M00S00064.1hy     +++|*
00072  M00S00065.1hy     +++|*         PHYSICAL ORGANIZATION:
00073  M00S00066.1hy     +++|*
00074  M00S00067.1hy     +++|*           WORDS/PHYSICAL SECTOR            512
00075  M00S00068.1hy     +++|*           PHYSICAL SECTORS/TRACK            38
00076  M00S00069.1hy     +++|*           PHYSICAL TRACKS/CYLINDER           4
00077  M00S00070.1hy     +++|*           CYLINDERS/DEVICE                 884 * N
00078  M00S00071.1hy     +++|*           WORDS/DEVICE              68,796,416 * N
00079  M00S00072.1hy     +++|*
00080  M00S00073.1hy     +++|*         LOGICAL ORGANIZATION:
00081  M00S00074.1hy     +++|*
00082  M00S00075.1hy     +++|*           WORDS/LOGICAL SECTOR              64
00083  M00S00076.1hy     +++|*           LOGICAL SECTORS/PHYSICAL SECTOR    8
00084  M00S00077.1hy     +++|*           LOGICAL SECTORS/LOGICAL TRACK    608 * N
00085  M00S00078.1hy     +++|*           LOGICAL TRACKS/CYLINDER            2
00086  M00S00079.1hy     +++|*           LOGICAL TRACKS/DEVICE           1768
00087  M00S00080.1hy     +++|*
00088  M00S00081.1hy     +++|*         MAXIMUM SUSTAINED DATA RATE        983 K WORDS/SECOND
00089  M00S00082.1hy     +++|*
00090  M00S00083.1hy     +++|*
00091  M00S00084.1hy     +++|*         EQUIPMENT TYPE                    *DH*
00092  M00S00085.1hy     +++|*
00093  M00S00086.1hy     +++|*         UNITS/LOGICAL DEVICE (N)         1 - 2
00094  M00S00087.1hy     +++|*
00095  M00S00088.1hy     +++|*         PHYSICAL ORGANIZATION:
00096  M00S00089.1hy     +++|*
00097  M00S00090.1hy     +++|*           WORDS/PHYSICAL SECTOR           2048
00098  M00S00091.1hy     +++|*           PHYSICAL SECTORS/TRACK            11
00099  M00S00092.1hy     +++|*           PHYSICAL TRACKS/CYLINDER           4
00100  M00S00093.1hy     +++|*           CYLINDERS/DEVICE                 884 * N
00101  M00S00094.1hy     +++|*           WORDS/DEVICE              79,659,008 * N
00102  M00S00095.1hy     +++|*
00103  M00S00096.1hy     +++|*         LOGICAL ORGANIZATION:
00104  M00S00097.1hy     +++|*
00105  M00S00098.1hy     +++|*           WORDS/LOGICAL SECTOR              64
00106  M00S00099.1hy     +++|*           LOGICAL SECTORS/PHYSICAL SECTOR   32
00107  M00S00100.1hy     +++|*           LOGICAL SECTORS/LOGICAL TRACK    704 * N
00108  M00S00101.1hy     +++|*           LOGICAL TRACKS/CYLINDER            2
00109  M00S00102.1hy     +++|*           LOGICAL TRACKS/DEVICE           1768
00110  M00S00103.1hy     +++|*
00111  M00S00104.1hy     +++|*         MAXIMUM SUSTAINED DATA RATE       1122 K WORDS/SECOND
00112  M00S00105.1hy     +++|          SPACE  4,10
00113  M00S00106.1hy     +++|***       DISK ERROR PROCESSING DONE BY *1HY*.
00114  M00S00107.1hy     +++|*
00115  M00S00108.1hy     +++|*         FOR EACH REQUEST THAT IS PROCESSED, *1HY* KEEPS A COUNTER
00116  M00S00109.1hy     +++|*         WHICH CONTAINS THE NUMBER OF RETRIES THAT HAVE BEEN
00117  M00S00110.1hy     +++|*         ATTEMPTED WHILE TRYING TO SUCCESSFULLY PROCESS THE REQUEST.
00118  M00S00111.1hy     +++|*         WHEN A REQUEST IS COMPLETED *1HY* CHECKS TO SEE IF THE
00119  M00S00112.1hy     +++|*         ERROR COUNT IS NON-ZERO.  *1HY* WILL LOG A BML MESSAGE
00120  M00S00113.1hy     +++|*         AND INCREMENT THE RECOVERED ERROR COUNT IN THE MST IF THE
00121  M00S00114.1hy     +++|*         ERROR COUNT IS NON-ZERO.
00122  M00S00115.1hy     +++|*
00123  M00S00116.1hy     +++|*         IF THE ERROR COUNT REACHES *MERC* BEFORE THE REQUEST IS
00124  M00S00117.1hy     +++|*         SUCCESSFULLY COMPLETED, *1HY* WILL SET THE ERROR FLAGS IN
00125  M00S00118.1hy     +++|*         THE *CBT*, LOG A FATAL ERROR IN THE BML, AND INCREMENT THE
00126  M00S00119.1hy     +++|*         UNRECOVERED ERROR COUNT IN THE MST.
00127  M00S00120.1hy     +++|          SPACE  4,10
00128  M00S00121.1hy     +++|***       SPECIAL PROGRAMMING NOTES.
00129  M00S00122.1hy     +++|*
00130  M00S00123.1hy     +++|*         THE FOLLOWING IS A LIST OF SPECIAL NOTES THAT SHOULD BE
00131  M00S00124.1hy     +++|*         READ AND UNDERSTOOD BEFORE ANY MODIFICATIONS ARE MADE TO
00132  M00S00125.1hy     +++|*         THIS PROGRAM.
00133  M00S00126.1hy     +++|*
00134  M00S00127.1hy     +++|*
00135  M00S00128.1hy     +++|*         1)  WHERE POSSIBLE, *CMR* POINTERS HAVE BEEN PLUGGED BY THE
00136  M00S00129.1hy     +++|*             PRESET ROUTINE TO IMPROVE THE EXECUTION SPEED OF THE
00137  M00S00130.1hy     +++|*             PROGRAM AND TO MINIMIZE THE AMOUNT OF CODE.
00138  M00S00131.1hy     +++|*
00139  M00S00132.1hy     +++|*         2)  THIS PROGRAM EXCHANGES *CPUMTR* WITHOUT WAITING FOR
00140  M00S00133.1hy     +++|*             THE REQUEST TO COMPLETE.  ROUTINE *CMC* SHOULD BE CALLED
00141  M00S00134.1hy     +++|*             IF THE *MONITOR* MACRO IS TO BE USED WHILE THERE IS A
00142  M00S00135.1hy     +++|*             POSSIBILITY OF AN OUTSTANDING MONITOR REQUEST.
00143  M00S00136.1hy     +++|*
00144  M00S00137.1hy     +++|*         3)  THE DEVICE STATE TABLE IS BUILT AT LOCATION *EXR* IN
00145  M00S00138.1hy     +++|*             PP RESIDENT, THEREFORE IT IS NOT POSSIBLE TO USE THE
00146  M00S00139.1hy     +++|*             *EXR* AND *SMS* ROUTINES.
00147  M00S00140.1hy     +++|          SPACE  4,10
00148  M00S00141.1hy     +++|
00149  M00S00142.1hy     +++|**        COMMON DECKS.
00150  M00S00143.1hy     +++|
00151  M00S00144.1hy     +++|
00152  M00S00145.1hy     +++|*CALL     COMPMAC
00153  M00S00146.1hy     +++| RICHI$   EQU    1           SELECT DEFERRED INSTRUCTION MODIFICATION
00154  M00S00147.1hy     +++|*CALL     COMPCHI
00155  M00S00148.1hy     +++|*CALL     COMSCPS
00156  M00S00149.1hy     +++| QUAL$S   SET    0           REMOVE QUALIFICATION OF COMSDFS CONSTANTS
00157  M00S00150.1hy     +++|*CALL     COMSDFS
00158  M00S00151.1hy     +++|          LIST   X
00159  M00S00152.1hy     +++|*CALL     COMSHIO
00160  M00S00153.1hy     +++|          LIST   *
00161  M00S00154.1hy     +++|          QUAL   IOU
00162  M00S00155.1hy     +++|*CALL     COMSIOU
00163  M00S00156.1hy     +++|          QUAL   *
00164  M00S00157.1hy     +++|*CALL     COMSLSD
00165  M00S00158.1hy     +++|*CALL     COMSMSC
00166  M00S00159.1hy     +++|*CALL     COMSMSP
00167  M00S00160.1hy     +++|*CALL     COMSPIM
00168  M00S00161.1hy     +++|*CALL     COMS1DS
00169  M00S00162.1hy     +++|          TITLE  CONSTANTS AND DEFINITIONS.
00170  M00S00163.1hy     +++|          SPACE  4,10
00171  M00S00164.1hy     +++|****      DIRECT CELL ALLOCATION.
00172  M00S00165.1hy     +++|
00173  M00S00166.1hy     +++|
00174  M00S00167.1hy     +++| NR       EQU    15 - 21     NEXT REQUEST
00175  M00S00168.1hy     +++| WB       EQU    22 - 26     CM WORD BUFFER
00176  M00S00169.1hy     +++|
00177  M00S00170.1hy     +++|*         THE NEXT FIVE LOCATIONS ARE ORDER DEPENDENT.
00178  M00S00171.1hy     +++|
00179  M00S00172.1hy     +++| PB       EQU    27          PREVIOUS CONTROL BUFFER ORDINAL
00180  M00S00173.1hy     +++| CB       EQU    30          CURRENT CONTROL BUFFER ORDINAL
00181  M00S00174.1hy     +++| NB       EQU    31          NEXT CONTROL BUFFER ORDINAL
00182  M00S00175.1hy     +++| EO       EQU    32          EST ORDINAL
00183  M00S00176.1hy     +++| UN       EQU    33          UNIT NUMBER
00184  M00S00177.1hy     +++|
00185  M00S00178.1hy     +++| UA       EQU    34 - 35     UEM ADDRESS / 100
00186  M00S00179.1hy     +++| RC       EQU    36          REQUEST COUNT
00187  M00S00180.1hy     +++| DT       EQU    37          DEVICE TYPE
00188  M00S00181.1hy     +++| SS       EQU    40          SLAVE STATUS FLAGS
00189  M00S00182.1hy     +++| PO       EQU    41          CURRENT *PUT* ORDINAL
00190  M00S00183.1hy     +++| TO       EQU    42          COMMAND TIMEOUT
00191  M00S00184.1hy     +++| SF       EQU    43          DEVICE SELECTED FLAG
00192  M00S00185.1hy     +++| UC       EQU    44          UNIT ACTIVITY COUNT
00193  M00S00186.1hy     +++|          ERRNZ  SF+1-UC     CODE DEPENDS ON VALUE
00194  M00S00187.1hy     +++| RW       EQU    45          READ / WRITE FLAG
00195  M00S00188.1hy     +++| PA       EQU    46          PROCESSOR ADDRESS
00196  M00S00189.1hy     +++| DI       EQU    47          DEVICE INDEX
00197  M00S00190.1hy     +++| CR       EQU    57          CHANNEL RESERVED STATUS
00198  M00S00191.1hy     +++| ML       EQU    60          MESSAGE LENGTH
00199  M00S00192.1hy     +++| FC       EQU    61          FAULT CODE
00200  M00S00193.1hy     +++| CD       EQU    62          CHANNEL DATA
Line S00001 Modification History
M01 (Added by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
00201  M01S00001.ns2512  +++| RF       EQU    63          SPECIAL REQUEST FLAGS
00202  M00S00194.1hy     +++|
00203  M00S00195.1hy     +++|****
00204  M00S00196.1hy     +++|          SPACE  4,10
00205  M00S00197.1hy     +++|**        ISI ADAPTOR FUNCTION CODES.
00206  M00S00198.1hy     +++|
00207  M00S00199.1hy     +++|
00208  M00S00200.1hy     +++| FCMC     EQU    0#000       MASTER CLEAR
00209  M00S00201.1hy     +++| FCRC     EQU    0#100       READ CONTROL REGISTER
00210  M00S00202.1hy     +++| FCWC     EQU    0#101       WRITE CONTROL REGISTER
00211  M00S00203.1hy     +++| FCRM     EQU    0#200       READ MASK REGISTER
00212  M00S00204.1hy     +++| FCWM     EQU    0#201       WRITE MASK REGISTER
00213  M00S00205.1hy     +++| FCRE     EQU    0#300       READ ERROR STATUS
00214  M00S00206.1hy     +++| FCRO     EQU    0#400       READ OPERATIONAL STATUS
00215  M00S00207.1hy     +++| FCIS     EQU    0#500       REQUEST IDLE STATUS
00216  M00S00208.1hy     +++| FCRT     EQU    0#600       READ *T* REGISTERS
00217  M00S00209.1hy     +++| FCWT     EQU    0#601       WRITE *T* REGISTERS
00218  M00S00210.1hy     +++| FCRS     EQU    0#700       READ TEST SEED
00219  M00S00211.1hy     +++| FCWS     EQU    0#701       WRITE TEST SEED
00220  M00S00212.1hy     +++| FCCH     EQU    0#800       CLEAR SELECT HOLD
00221  M00S00213.1hy     +++| FCSH     EQU    0#801       SET SELECT HOLD
00222  M00S00214.1hy     +++| FCCS     EQU    0#900       CLEAR COMMAND SEQUENCE
00223  M00S00215.1hy     +++| FCSS     EQU    0#901       SET COMMAND SEQUENCE
00224  M00S00216.1hy     +++| FCSO     EQU    0#A00       FORCE SYNC OUT
00225  M00S00217.1hy     +++| FCPM     EQU    0#B00       SET PP MODE
00226  M00S00218.1hy     +++| FCCD     EQU    0#C00       CLEAR DMA MODE
00227  M00S00219.1hy     +++| FCSD     EQU    0#C01       SET DMA MODE
00228  M00S00220.1hy     +++| FCCE     EQU    0#D00       CLEAR ECHO MODE
00229  M00S00221.1hy     +++| FCSE     EQU    0#D01       SET ECHO MODE
00230  M00S00222.1hy     +++| FCCT     EQU    0#E00       CLEAR *T* REGISTERS
00231  M00S00223.1hy     +++|          SPACE  4,10
00232  M00S00224.1hy     +++|**        FUNCTION WORD OPTION FLAGS.
00233  M00S00225.1hy     +++|
00234  M00S00226.1hy     +++|
00235  M00S00227.1hy     +++| FOBS     EQU    1S8         BUS SLAVE (IHD) SELECT
00236  M00S00228.1hy     +++| FONI     EQU    1S9         NON-INTERLOCKED MODE
00237  M00S00229.1hy     +++| FOTT     EQU    1S10        TERMINATE I/O TRANSFER
00238  M00S00230.1hy     +++| FOZI     EQU    1S11        ZERO-FILL INHIBIT
00239  M00S00231.1hy     +++| FOCA     EQU    1S12        CLEAR ATTENTION
00240  M00S00232.1hy     +++| FODE     EQU    1S13        DATA EXCHANGE
00241  M00S00233.1hy     +++| FOSR     EQU    1S14        SELECTIVE RESET
00242  M00S00234.1hy     +++| FOWR     EQU    1S15        WRITE SELECT
00243  M00S00235.1hy     +++|          SPACE  4,10
00244  M00S00236.1hy     +++|**        *IHD* FUNCTION WORDS.
00245  M00S00237.1hy     +++|
00246  M00S00238.1hy     +++|
00247  M00S00239.1hy     +++| FWSB     EQU    0#80                  READ STATUS BLOCK
00248  M00S00240.1hy     +++| FWDS     EQU    0#90                  READ DEVICE STATUS
00249  M00S00241.1hy     +++| FWBS     EQU    FOBS                  BUS SLAVE (IHD) SELECT
00250  M00S00242.1hy     +++| FWCA     EQU    FOCA                  CLEAR ATTENTION
00251  M00S00243.1hy     +++| FWSN     EQU    FOCA+FOTT+0#D0        READ SERIAL NUMBER
00252  M00S00244.1hy     +++| FWRL     EQU    FOCA+FOTT+0#FA        READ REVISION LEVEL
00253  M00S00245.1hy     +++| FWEP     EQU    FODE+FOCA+FOTT        ERROR PROCESSING
00254  M00S00246.1hy     +++| FWEL     EQU    FODE+FOCA+FOTT        READ ERROR LOG
00255  M00S00247.1hy     +++| FWER     EQU    FODE+FOCA+FOTT        READ ERROR REGISTER
00256  M00S00248.1hy     +++| FWRE     EQU    FODE+FOTT+FONI+FOCA   READ EXCHANGE
00257  M00S00249.1hy     +++| FWSR     EQU    FOSR+FOCA             SELECTIVE RESET
00258  M00S00250.1hy     +++| FWCB     EQU    FOWR+FOCA             WRITE COMMAND BLOCK
00259  M00S00251.1hy     +++| FWWE     EQU    FOWR+FWRE+FOZI        WRITE EXCHANGE
00260  M00S00252.1hy     +++|          SPACE  4,10
00261  M00S00253.1hy     +++|**        *IHD* COMMAND CODES.
00262  M00S00254.1hy     +++|
00263  M00S00255.1hy     +++|
00264  M00S00256.1hy     +++| CCRL     EQU    0#01+1S15   READ ERROR LOG
00265  M00S00257.1hy     +++| CCRI     EQU    0#02+1S15   READ ERROR REGISTER IMAGE
00266  M00S00258.1hy     +++| CCNO     EQU    0#05+1S15   NO OPERATION
00267  M00S00259.1hy     +++| CCSD     EQU    0#12+1S15   SPIN-DOWN DRIVE
00268  M00S00260.1hy     +++| CCSU     EQU    0#13+1S15   SPIN-UP DRIVE
00269  M00S00261.1hy     +++| CCOW     EQU    0#23+1S15   INITIATE OPEN-ENDED WRITE
00270  M00S00262.1hy     +++| CCOR     EQU    0#35+1S15   INITIATE OPEN-ENDED READ
00271  M00S00263.1hy     +++| CCLM     EQU    0#53+1S15   LOAD OPERATING MODE PARAMETERS
00272  M00S00264.1hy     +++| CCLD     EQU    0#54+1S15   LOAD ATTENTION DELAY PARAMETERS
00273  M00S00265.1hy     +++| CCD2     EQU    0#70+1S15   EXECUTE LEVEL 2 DIAGNOSTICS
00274  M00S00266.1hy     +++| CCRT     EQU    0#78+1S15   EXECUTE READ TEST
00275  M00S00267.1hy     +++| CCWT     EQU    0#79+1S15   EXECUTE WRITE TEST
00276  M00S00268.1hy     +++| CCD1     EQU    0#7A+1S15   EXECUTE LEVEL 1 DIAGNOSTICS
00277  M00S00269.1hy     +++|          SPACE  4,10
00278  M00S00270.1hy     +++|**        *IHD* COMMAND EXECUTION STATUS.
00279  M00S00271.1hy     +++|
00280  M00S00272.1hy     +++|
00281  M00S00273.1hy     +++| ESUI     EQU    00          *IHD* UNIT IDLE
00282  M00S00274.1hy     +++| ESRD     EQU    10          READ DATA AVAILABLE
00283  M00S00275.1hy     +++| ESBS     EQU    20          BUFFER SPACE AVAILABLE
00284  M00S00276.1hy     +++| ESCB     EQU    40          COMMAND BLOCK INDEPENDENT
00285  M00S00277.1hy     +++| ESUA     EQU    60          UNSOLICITED ATTENTION
00286  M00S00278.1hy     +++| ESCC     EQU    70          COMMAND COMPLETE
00287  M00S00279.1hy     +++|          SPACE  4,10
00288  M00S00280.1hy     +++|**        *IHD* COMMAND BLOCK PARAMETER WORD VALUES.
00289  M00S00281.1hy     +++|
00290  M00S00282.1hy     +++|
00291  M00S00283.1hy     +++| PWIT     EQU    0#0000      INTEGRITY TEST
00292  M00S00284.1hy     +++| PWWT     EQU    0#0005      WRITE TEST
00293  M00S00285.1hy     +++| PWRT     EQU    0#0006      READ TEST
00294  M00S00286.1hy     +++| PWADDF   EQU    0#0401      ATTENTION DELAY (4KB SECTOR)
00295  M00S00287.1hy     +++| PWADDH   EQU    0#0101      ATTENTION DELAY (16KB SECTOR)
Line S00288 Modification History
M01 (Removed by) 1hy8
Seq #  *Modification Id* Act 
----------------------------+
00296  M01S00288.1hy8    ---| PWOM     EQU    0#3902      OPERATING MODE
Line S00001 Modification History
M01 (Added by) 1hy8
Seq #  *Modification Id* Act 
----------------------------+
00297  M01S00001.1hy8    +++| PWOM     EQU    0#3D02      OPERATING MODE
00298  M00S00289.1hy     +++|          SPACE  4,10
00299  M00S00290.1hy     +++|**        MAINTENANCE REGISTER REQUEST CODE SYMBOLS.
00300  M00S00291.1hy     +++|
00301  M00S00292.1hy     +++|
00302  M00S00293.1hy     +++| MR       EQU    /IOU/MR     MAINTENANCE CHANNEL
00303  M00S00294.1hy     +++| IOUC     EQU    /IOU/IOUC+/IOU/MRRD   READ CONNECT CODE
00304  M00S00295.1hy     +++| RMRF     EQU    /IOU/MRRD-/IOU/MRRD   READ REGISTER
00305  M00S00296.1hy     +++| WMRF     EQU    /IOU/MRWT-/IOU/MRRD   WRITE REGISTER
00306  M00S00297.1hy     +++|
00307  M00S00298.1hy     +++| RFMR     EQU    RMRF*10000+/IOU/FMCR  READ FAULT MASK REGISTER
00308  M00S00299.1hy     +++| RCSR     EQU    RMRF*10000+/IOU/C0CR  READ CHANNEL STATUS REGISTER
00309  M00S00300.1hy     +++| WFMR     EQU    WMRF*10000+/IOU/FMCR  WRITE FAULT MASK REGISTER
00310  M00S00301.1hy     +++|          SPACE  4,10
00311  M00S00302.1hy     +++|**        FAULT ANALYSIS CODES.
00312  M00S00303.1hy     +++|
00313  M00S00304.1hy     +++|
00314  M00S00305.1hy     +++| ECPE     EQU    1           CHANNEL PARITY ERROR
00315  M00S00306.1hy     +++|
00316  M00S00307.1hy     +++| ECER     EQU    4           CHANNEL DETECTED ERROR
00317  M00S00308.1hy     +++| ECCM     EQU    5           CHANNEL DETECTED CM ERROR
00318  M00S00309.1hy     +++| ECIE     EQU    6           ISI CHANNEL ERROR
00319  M00S00310.1hy     +++| ECHF     EQU    7           CHANNEL HUNG FULL
00320  M00S00311.1hy     +++|
00321  M00S00312.1hy     +++| ETAT     EQU    10          ATTENTION TIMEOUT
00322  M00S00313.1hy     +++| ETFN     EQU    11          CHANNEL FUNCTION TIMEOUT
00323  M00S00314.1hy     +++|
00324  M00S00315.1hy     +++| EDPE     EQU    14          DATA PARITY ERROR
00325  M00S00316.1hy     +++|
00326  M00S00317.1hy     +++| EDNR     EQU    20          DEVICE NOT READY
00327  M00S00318.1hy     +++| EOTC     EQU    21          OVER TEMP CONDITION
00328  M00S00319.1hy     +++|
00329  M00S00320.1hy     +++| EIDT     EQU    24          INCOMPLETE DATA TRANSFER
00330  M00S00321.1hy     +++|
00331  M00S00322.1hy     +++| EIRQ     EQU    30          *IHD* FAILURE
00332  M00S00323.1hy     +++| ECBN     EQU    31          COMMAND BLOCK NUMBER
00333  M00S00324.1hy     +++| EICU     EQU    32          INCORRECT UNIT SELECTED
00334  M00S00325.1hy     +++| ETSL     EQU    33          SELECT TIMEOUT
00335  M00S00326.1hy     +++|
00336  M00S00327.1hy     +++| ESUF     EQU    34          SPIN-UP FAILURE
00337  M00S00328.1hy     +++| ESDF     EQU    35          SPIN-DOWN FAILURE
00338  M00S00329.1hy     +++| ETTC     EQU    36          TRANSFER COMPLETE TIMEOUT
00339  M00S00330.1hy     +++| EUES     EQU    37          UNEXPECTED EXECUTION STATUS
00340  M00S00331.1hy     +++|
00341  M00S00332.1hy     +++| ETCB     EQU    40          COMMAND BLOCK TIMEOUT
00342  M00S00333.1hy     +++| EUDS     EQU    41          UNEXPECTED DELAY STATUS
00343  M00S00334.1hy     +++| ELOP     EQU    42          LOAD OPERATING PARAMETERS FAILURE
00344  M00S00335.1hy     +++| EDSA     EQU    43          SELECT ACTIVE DROPPED
00345  M00S00336.1hy     +++|
00346  M00S00337.1hy     +++| ETTR     EQU    44          *T* REGISTER EMPTY TIMEOUT
00347  M00S00338.1hy     +++| EIOS     EQU    45          I/O INITIATION ERROR
00348  M00S00339.1hy     +++| EIOC     EQU    46          I/O COMPLETE ERROR
00349  M00S00340.1hy     +++|
00350  M00S00341.1hy     +++| EDTF     EQU    50          DIAGNOSTIC FAULT
00351  M00S00342.1hy     +++|
00352  M00S00343.1hy     +++| EDRA     EQU    54          DRIVE RESERVED TO ALTERNATE ACCESS
00353  M00S00344.1hy     +++|          SPACE  4,10
00354  M00S00345.1hy     +++|**        DEVICE STATE TABLE DEFINITIONS.
00355  M00S00346.1hy     +++|
00356  M00S00347.1hy     +++|
00357  M00S00348.1hy     +++|          LOC    0
00358  M00S00349.1hy     +++| PUTO     BSS    1           *PUT* ORDINAL
00359  M00S00350.1hy     +++| CREG     BSS    1           CONTROL REGISTER IMAGE
00360  M00S00351.1hy     +++| ADDR     BSS    1           PROCESSOR ADDRESS
00361  M00S00352.1hy     +++| RADD     BSS    1           RETURN ADDRESS
00362  M00S00353.1hy     +++| ATTN     BSS    1           ATTENTION RETURN
00363  M00S00354.1hy     +++| EEST     BSS    1           EXPECTED EXECUTION STATUS
00364  M00S00355.1hy     +++| RWST     BSS    1           READ / WRITE STATUS
00365  M00S00356.1hy     +++| RQIN     BSS    1           REQUEST QUEUE INDEX
00366  M00S00357.1hy     +++| RQLN     EQU    10          REQUEST QUEUE LENGTH
00367  M00S00358.1hy     +++| IORQ     BSS    RQLN        I/O REQUEST QUEUE
00368  M00S00359.1hy     +++| CBCT     BSS    1           CUMULATIVE BUFFER COUNT
00369  M00S00360.1hy     +++| CYLN     BSS    1           CYLINDER ON SEEK
00370  M00S00361.1hy     +++| TKSN     BSS    1           TRACK + SECTOR ON SEEK
00371  M00S00362.1hy     +++| ERCT     BSS    1           ERROR COUNT
00372  M00S00363.1hy     +++| ELEN     BSS    1           ERROR LOG ENTRY NUMBER
00373  M00S00364.1hy     +++| ELRC     BSS    1           ERROR LOG REPETITION COUNT
00374  M00S00365.1hy     +++| EREN     BSS    1           ERROR REGISTER ENTRY NUMBER
00375  M00S00366.1hy     +++| SREQ     BSS    1           SPECIAL REQUEST
00376  M00S00367.1hy     +++| IPPS     BSS    1           I/O PREPROCESSING STATUS
00377  M00S00368.1hy     +++| LCMD     BSS    1           LAST *IHD* COMMAND
00378  M00S00369.1hy     +++| ESAD     BSS    1           ERROR STEP ADDRESS
00379  M00S00370.1hy     +++|
00380  M00S00371.1hy     +++| DSTBE    BSS    0           LENGTH OF STATE TABLE ENTRY
00381  M00S00372.1hy     +++|          LOC    0
00382  M00S00373.1hy     +++|          SPACE  4,15
00383  M00S00374.1hy     +++|****      ASSEMBLY CONSTANTS.
00384  M00S00375.1hy     +++|
00385  M00S00376.1hy     +++|
00386  M00S00377.1hy     +++| CH       EQU    16          CHANNEL NUMBER
00387  M00S00378.1hy     +++| MXND     EQU    10*2        MAXIMUM NUMBER OF UNITS / DRIVER
00388  M00S00379.1hy     +++| DSTB     EQU    EXR         START OF DEVICE STATE TABLES
00389  M00S00380.1hy     +++| DSTBL    EQU    DSTB+DSTBE*MXND  LWA+1 OF DEVICE STATE TABLES
00390  M00S00381.1hy     +++| OHYD     MAX    PPFW,DSTBL  DRIVER ORIGIN
00391  M00S00382.1hy     +++|
00392  M00S00383.1hy     +++|*         THE FOLLOWING SYMBOLS DEFINE LOCATIONS IN THE I/O
00393  M00S00384.1hy     +++|*         REQUEST QUEUE (IORQ) OF THE DEVICE STATE TABLE.
00394  M00S00385.1hy     +++|*         THESE LOCATIONS MAY BE USED ONLY DURING ERROR AND
00395  M00S00386.1hy     +++|*         SPECIAL REQUEST PROCESSING (NOT DURING I/O PROCESSING).
00396  M00S00387.1hy     +++|
00397  M00S00388.1hy     +++| ENAD     EQU    IORQ+RQLN-1 ERROR NEXT ADDRESS
00398  M00S00389.1hy     +++| CACT     EQU    ENAD-1      CLEAR ATTENTION COUNT
00399  M00S00390.1hy     +++| SIST     EQU    CACT-1      SYSTEM INTERVENTION STATUS
00400  M00S00391.1hy     +++| MIST     EQU    SIST-1      MANUAL INTERVENTION STATUS
00401  M00S00392.1hy     +++| GSST     EQU    MIST-1      GENERAL SLAVE STATUS
00402  M00S00393.1hy     +++| IOST     EQU    GSST-1      READ WRITE STATUS
00403  M00S00394.1hy     +++| ERAD     EQU    IOST-1      ERROR RETURN ADDRESS
00404  M00S00395.1hy     +++|          ERRNG  ERAD-IORQ   CODE DEPENDS ON VALUE
00405  M00S00396.1hy     +++|
00406  M00S00397.1hy     +++|*         THE FOLLOWING VALUE IS USED AS A SHIFT COUNT
00407  M00S00398.1hy     +++|*         TO DETERMINE THE FUNCTION TIMEOUT DELAY (2**N).
00408  M00S00399.1hy     +++|
00409  M00S00400.1hy     +++| FTOS     EQU    0           1 MILLISECOND
00410  M00S00401.1hy     +++|          ERRNG  8D-FTOS     VALUE TOO LARGE
00411  M00S00402.1hy     +++| .2       DECMIC FTOS+2
00412  M00S00403.1hy     +++| FTOD     EQU    370S".2"    FUNCTION TIMEOUT DELAY
00413  M00S00404.1hy     +++|
00414  M00S00405.1hy     +++| DRFM     EQU    1000        DIRECTION FLAG MASK
00415  M00S00406.1hy     +++| ILFM     EQU    4000        INTERLOCK FLAG MASK
00416  M00S00407.1hy     +++| MERC     EQU    7           ERROR PROCESSING RETRY COUNT
Line S00408 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
00417  M01S00408.271l716 ---| CSRC     EQU    MERC/2      CHANNEL SWITCH RETRY COUNT
Line S00001 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
00418  M01S00001.271l716 +++| CSRC     EQU    MERC/2+1    CHANNEL SWITCH RETRY COUNT
00419  M00S00409.1hy     +++| FTRC     EQU    3           FUNCTION TIMEOUT RETRY COUNT
00420  M00S00410.1hy     +++| DSRC     EQU    20D         DEVICE SELECT RETRY COUNT
00421  M00S00411.1hy     +++| ERLGL    EQU    48D         ERROR LOG LENGTH
00422  M00S00412.1hy     +++| ERRGL    EQU    48D         ERROR REGISTER LENGTH
00423  M00S00413.1hy     +++| SLSTL    EQU    7           SLAVE STATUS BLOCK LENGTH
00424  M00S00414.1hy     +++| DVSTL    EQU    10          DEVICE STATUS BLOCK LENGTH
00425  M00S00415.1hy     +++| STSBL    EQU    SLSTL+DVSTL COMBINED STATUS BLOCK LENGTH
00426  M00S00416.1hy     +++| DBUFL    MAX    ERLGL,ERRGL DATA BUFFER LENGTH
00427  M00S00417.1hy     +++| EBUFL    EQU    5*10D       ERROR MESSAGE BUFFER LENGTH
00428  M00S00418.1hy     +++|
00429  M00S00419.1hy     +++|****
Line S00002 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
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  M00S00420.1hy     +++|          TITLE  MACROS.
00441  M00S00421.1hy     +++|          SPACE  4,10
00442  M00S00422.1hy     +++|**        MACRO DEFINITIONS.
00443  M00S00423.1hy     +++| TBLM     SPACE  4,10
Line S00424 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00444  M01S00424.ns2769  ---|**        TBLM - CREATE BUFFERED DEVICE TABLE ENTRY MACRO.
Line S00001 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00445  M01S00001.ns2769  +++|**        TBLM - CREATE TABLE ENTRY MACRO.
00446  M00S00425.1hy     +++|*
00447  M00S00426.1hy     +++|*NAM      TBLM
00448  M00S00427.1hy     +++|*
Line S00428 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00449  M01S00428.ns2769  ---|*         ENTRY  NAM = BUFFERED DEVICE TABLE NAME.
Line S00002 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00450  M01S00002.ns2769  +++|*         ENTRY  NAM = TABLE NAME.
00451  M00S00429.1hy     +++|*
00452  M00S00430.1hy     +++|*         EXIT   NAM_E MACRO DEFINED.
00453  M00S00431.1hy     +++|
00454  M00S00432.1hy     +++|
00455  M00S00433.1hy     +++|          PURGMAC  TBLM
00456  M00S00434.1hy     +++|
00457  M00S00435.1hy     +++|          MACRO  TBLM,NAM
00458  M00S00436.1hy     +++|          PURGMAC  NAM_E
00459  M00S00437.1hy     +++| NAM_E    MACRO  ADDR
00460  M00S00438.1hy     +++|          LOCAL  A
00461  M00S00439.1hy     +++|          MACREF NAM_E
00462  M00S00440.1hy     +++|          NOREF  A
00463  M00S00441.1hy     +++| A        EQU    ADDR
00464  M00S00442.1hy     +++| T_NAM    RMT
00465  M00S00443.1hy     +++|          CON    A
00466  M00S00444.1hy     +++|          RMT
00467  M00S00445.1hy     +++| TBLM     ENDM
00468  M00S00446.1hy     +++| CBTE     SPACE  4,10
00469  M00S00447.1hy     +++|**        CBTE - CONTROL BUFFER TABLE ENTRY.
00470  M00S00448.1hy     +++|*
00471  M00S00449.1hy     +++|*         THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TCBT*
00472  M00S00450.1hy     +++|*         THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH
00473  M00S00451.1hy     +++|*         REQUIRES THE FWA OF THE CONTROL BUFFER TABLE.
00474  M00S00452.1hy     +++|*
00475  M00S00453.1hy     +++|*         CBTE   ADDR
00476  M00S00454.1hy     +++|*
00477  M00S00455.1hy     +++|*         ENTRY  (ADDR) = ADDRESS OF INSTRUCTION.
00478  M00S00456.1hy     +++|*
00479  M00S00457.1hy     +++|*         EXIT   ADDRESS IS ADDED TO THE REMOTE BLOCK *TCBT*.
00480  M00S00458.1hy     +++|
00481  M00S00459.1hy     +++|
00482  M00S00460.1hy     +++| CBT      TBLM
00483  M00S00461.1hy     +++| CCTE     SPACE  4,10
00484  M00S00462.1hy     +++|**        CCTE - CHANNEL CONTROL TABLE ENTRY.
00485  M00S00463.1hy     +++|*
00486  M00S00464.1hy     +++|*         THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TCCT*
00487  M00S00465.1hy     +++|*         THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH
00488  M00S00466.1hy     +++|*         REQUIRES THE FWA OF THE CHANNEL CONTROL TABLE.
00489  M00S00467.1hy     +++|*
00490  M00S00468.1hy     +++|*         CCTE   ADDR
00491  M00S00469.1hy     +++|*
00492  M00S00470.1hy     +++|*         ENTRY  (ADDR) = ADDRESS OF INSTRUCTION.
00493  M00S00471.1hy     +++|*
00494  M00S00472.1hy     +++|*         EXIT   ADDRESS IS ADDED TO THE REMOTE BLOCK *TCCT*.
00495  M00S00473.1hy     +++|
00496  M00S00474.1hy     +++|
00497  M00S00475.1hy     +++| CCT      TBLM
00498  M00S00476.1hy     +++| CHTE     SPACE  4,10
00499  M00S00477.1hy     +++|**        CHTE - CHANNEL TABLE ENTRY.
00500  M00S00478.1hy     +++|*
00501  M00S00479.1hy     +++|*         THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TCHT*
00502  M00S00480.1hy     +++|*         THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH
00503  M00S00481.1hy     +++|*         REQUIRES THE FWA OF THE CHANNEL TABLE.
00504  M00S00482.1hy     +++|*
00505  M00S00483.1hy     +++|*         CHTE   ADDR
00506  M00S00484.1hy     +++|*
00507  M00S00485.1hy     +++|*         ENTRY  (ADDR) = ADDRESS OF INSTRUCTION.
00508  M00S00486.1hy     +++|*
00509  M00S00487.1hy     +++|*         EXIT   ADDRESS IS ADDED TO THE REMOTE BLOCK *TCHT*.
00510  M00S00488.1hy     +++|
00511  M00S00489.1hy     +++|
00512  M00S00490.1hy     +++| CHT      TBLM
00513  M00S00491.1hy     +++| EMBE     SPACE  4,10
00514  M00S00492.1hy     +++|**        EMBE - ERROR MESSAGE TABLE ENTRY.
00515  M00S00493.1hy     +++|*
00516  M00S00494.1hy     +++|*         THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TEMB*
00517  M00S00495.1hy     +++|*         THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH
00518  M00S00496.1hy     +++|*         REQUIRES THE FWA OF THE ERROR MESSAGE TABLE.
00519  M00S00497.1hy     +++|*
00520  M00S00498.1hy     +++|*         EMBE   ADDR
00521  M00S00499.1hy     +++|*
00522  M00S00500.1hy     +++|*         ENTRY  (ADDR) = ADDRESS OF INSTRUCTION.
00523  M00S00501.1hy     +++|*
00524  M00S00502.1hy     +++|*         EXIT   ADDRESS IS ADDED TO THE REMOTE BLOCK *TEMB*.
00525  M00S00503.1hy     +++|
00526  M00S00504.1hy     +++|
00527  M00S00505.1hy     +++| EMB      TBLM
00528  M00S00506.1hy     +++| EXPE     SPACE  4,10
00529  M00S00507.1hy     +++|**        EXPE - EXCHANGE PACKAGE ADDRESS ENTRY.
00530  M00S00508.1hy     +++|*
00531  M00S00509.1hy     +++|*         THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TEXP*
00532  M00S00510.1hy     +++|*         THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH
00533  M00S00511.1hy     +++|*         REQUIRES THE FWA OF THE PP EXCHANGE PACKAGE.
00534  M00S00512.1hy     +++|*
00535  M00S00513.1hy     +++|*         EXPE   ADDR
00536  M00S00514.1hy     +++|*
00537  M00S00515.1hy     +++|*         ENTRY  (ADDR) = ADDRESS OF INSTRUCTION.
00538  M00S00516.1hy     +++|*
00539  M00S00517.1hy     +++|*         EXIT   ADDRESS IS ADDED TO THE REMOTE BLOCK *TEXP*.
00540  M00S00518.1hy     +++|
00541  M00S00519.1hy     +++|
00542  M00S00520.1hy     +++| EXP      TBLM
00543  M00S00521.1hy     +++| FTTE     SPACE  4,10
00544  M00S00522.1hy     +++|**        FTTE - FUNCTION TIMEOUT TABLE ENTRY.
00545  M00S00523.1hy     +++|*
00546  M00S00524.1hy     +++|*         THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TFTT*
00547  M00S00525.1hy     +++|*         THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH
00548  M00S00526.1hy     +++|*         REQUIRES THE FWA OF THE FUNCTION TIMEOUT TABLE.
00549  M00S00527.1hy     +++|*
00550  M00S00528.1hy     +++|*         FTTE   ADDR
00551  M00S00529.1hy     +++|*
00552  M00S00530.1hy     +++|*         ENTRY  (ADDR) = ADDRESS OF INSTRUCTION.
00553  M00S00531.1hy     +++|*
00554  M00S00532.1hy     +++|*         EXIT   ADDRESS IS ADDED TO THE REMOTE BLOCK *TFTT*.
00555  M00S00533.1hy     +++|
00556  M00S00534.1hy     +++|
00557  M00S00535.1hy     +++| FTT      TBLM
00558  M00S00536.1hy     +++| PUTE     SPACE  4,10
00559  M00S00537.1hy     +++|**        PUTE - PHYSICAL UNIT TABLE ENTRY.
00560  M00S00538.1hy     +++|*
00561  M00S00539.1hy     +++|*         THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TPUT*
00562  M00S00540.1hy     +++|*         THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH
00563  M00S00541.1hy     +++|*         REQUIRES THE FWA OF THE PHYSICAL UNIT TABLE.
00564  M00S00542.1hy     +++|*
00565  M00S00543.1hy     +++|*         PUTE   ADDR
00566  M00S00544.1hy     +++|*
00567  M00S00545.1hy     +++|*         ENTRY  (ADDR) = ADDRESS OF INSTRUCTION.
00568  M00S00546.1hy     +++|*
00569  M00S00547.1hy     +++|*         EXIT   ADDRESS IS ADDED TO THE REMOTE BLOCK *TPUT*.
00570  M00S00548.1hy     +++|
00571  M00S00549.1hy     +++|
00572  M00S00550.1hy     +++| PUT      TBLM
Line S00551 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00573  M01S00551.ns2769  ---| RELM     SPACE  4,10
00574  M01S00552.ns2769  ---|**        RELM - REDEFINE *M* TYPE INSTRUCTIONS.
00575  M01S00553.ns2769  ---|*
00576  M01S00554.ns2769  ---|*         REDEFINE *M* TYPE INSTRUCTIONS FOR AUTOMATIC BIAS
00577  M01S00555.ns2769  ---|*         BY (DI) IF THE *M* ADDRESS FIELD IS .LT. *DSTBE*.
00578  M01S00556.ns2769  ---|*         THE ORIGINAL FORM IS AVAILABLE WITH A *.* SUFFIX.
00579  M01S00557.ns2769  ---|
00580  M01S00558.ns2769  ---|
00581  M01S00559.ns2769  ---| XX       EQU    DI
00582  M01S00560.ns2769  ---|          NOREF  XX
00583  M01S00561.ns2769  ---|
00584  M01S00562.ns2769  ---| RELM     MACRO  OPC
00585  M01S00563.ns2769  ---| OPC.     OPSYN  OPC
00586  M01S00564.ns2769  ---| OPC=     MACRO  M,D
00587  M01S00565.ns2769  ---|          IF     DEF,M
00588  M01S00566.ns2769  ---|          IFLE   M,DSTBE
00589  M01S00567.ns2769  ---|          IFC    EQ,*D**
00590  M01S00568.ns2769  ---|          OPC.   M,XX
00591  M01S00569.ns2769  ---|          ELSE
00592  M01S00570.ns2769  ---|          OPC.   M,D
00593  M01S00571.ns2769  ---|          ENDIF
00594  M01S00572.ns2769  ---| OPC=     ENDM
00595  M01S00573.ns2769  ---| OPC      OPSYN  OPC=
00596  M01S00574.ns2769  ---| RELM     ENDM
00597  M01S00575.ns2769  ---|
00598  M01S00576.ns2769  ---|
00599  M01S00577.ns2769  ---|          RELM   LDM
00600  M01S00578.ns2769  ---|          RELM   ADM
00601  M01S00579.ns2769  ---|          RELM   SBM
00602  M01S00580.ns2769  ---|          RELM   LMM
00603  M01S00581.ns2769  ---|          RELM   STM
00604  M01S00582.ns2769  ---|          RELM   RAM
00605  M01S00583.ns2769  ---|          RELM   AOM
00606  M01S00584.ns2769  ---|          RELM   SOM
00607  M01S00585.ns2769  ---|
00608  M01S00586.ns2769  ---|          RELM   LPML
00609  M01S00587.ns2769  ---|          RELM   LDML
00610  M01S00588.ns2769  ---|          RELM   ADML
00611  M01S00589.ns2769  ---|          RELM   SBML
00612  M01S00590.ns2769  ---|          RELM   LMML
00613  M01S00591.ns2769  ---|          RELM   STML
00614  M01S00592.ns2769  ---|          RELM   RAML
00615  M01S00593.ns2769  ---|          RELM   AOML
00616  M01S00594.ns2769  ---|          RELM   SOML
00617  M00S00595.1hy     +++|          TITLE  MAIN PROGRAM.
00618  M00S00596.1hy     +++| HYD      SPACE  4,10
00619  M00S00597.1hy     +++|**        HYD - MAIN PROGRAM.
00620  M00S00598.1hy     +++|
00621  M00S00599.1hy     +++|
00622  M00S00600.1hy     +++|          ORG    OHYD
00623  M00S00601.1hy     +++|          RICHI              BEGIN CHANNEL INSTRUCTION MODIFICATION
00624  M00S00602.1hy     +++|
00625  M00S00603.1hy     +++| HYDD     LJM    PRS         PRESET DRIVER
00626  M00S00604.1hy     +++| HYD      EQU    *-1
00627  M00S00605.1hy     +++|          LDM    HYD         PRESERVE RETURN ADDRESS
Line S00606 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00628  M01S00606.ns2769  ---|          STM    ADDR
Line S00003 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00629  M01S00003.ns2769  +++|          STM    ADDR,DI
00630  M00S00607.1hy     +++| HYD1     LDD    SF
00631  M00S00608.1hy     +++|          ZJN    HYD3        IF DEVICE NOT SELECTED
00632  M00S00609.1hy     +++|          LDC    FCCH
00633  M00S00610.1hy     +++|          RJM    FCN         CLEAR SELECT HOLD
00634  M00S00611.1hy     +++|          SOD    SF
00635  M00S00612.1hy     +++| HYD3     BSS    0
00636  M00S00613.1hy     +++|          LDC    0           CHECK ERROR PROCESSING
00637  M00S00614.1hy     +++| UNSW     EQU    *-1
00638  M00S00615.1hy     +++|          NJN    HYD5        IF UNIT SWITCH DISABLED
00639  M00S00616.1hy     +++|          LDN    DSTBE
00640  M00S00617.1hy     +++|          RAD    DI          ADVANCE DEVICE INDEX
00641  M00S00618.1hy     +++|          LMC    DSTBL
00642  M00S00619.1hy     +++| HYDA     EQU    *-1
00643  M00S00620.1hy     +++|          NJN    HYD5        IF NOT END OF STATUS BLOCK
00644  M00S00621.1hy     +++|          RJM    CCR
00645  M00S00622.1hy     +++|          ZJN    HYD7        IF CHANNEL DOWN
00646  M00S00623.1hy     +++| HYD4     LDC    DSTB
00647  M00S00624.1hy     +++|          STD    DI          RESET START OF STATUS BLOCK
00648  M00S00625.1hy     +++| HYD5     RJM    CFR
00649  M00S00626.1hy     +++|          UJN    HYD3        CHECK NEXT DEVICE
00650  M00S00627.1hy     +++|
00651  M00S00628.1hy     +++| HYD7     UJN    *+2         FIRST PASS
00652  M00S00629.1hy     +++| HYDB     EQU    HYD7
00653  M00S00630.1hy     +++|          UJN    HYD8        DROP PP ON SECOND PASS
00654  M00S00631.1hy     +++|          SOM    HYDB
00655  M00S00632.1hy     +++|          LDN    0           ENABLE UNIT SWITCH
00656  M00S00633.1hy     +++|          STM    UNSW
00657  M00S00634.1hy     +++|          LDN    PSNI        CHANGE PATH THRU *CFR*
00658  M00S00635.1hy     +++|          STM    CFRA
00659  M00S00636.1hy     +++|          LDC    CMP7        RELEASE *PUT* INTERLOCKS
00660  M00S00637.1hy     +++|          STM    CFRB
00661  M00S00638.1hy     +++|          UJN    HYD4        LOOP THRU DEVICE STATE TABLE
00662  M00S00639.1hy     +++|
00663  M00S00640.1hy     +++| HYD8     MONITOR  DPPM      DROP PP
00664  M00S00641.1hy     +++|          LJM    PPR         EXIT TO PPR
00665  M00S00642.1hy     +++|          TITLE  READ / WRITE PROCESSING.
00666  M00S00643.1hy     +++| PIO      SPACE  4,10
00667  M00S00644.1hy     +++|**        PIO - READ / WRITE PROCESSING.
00668  M00S00645.1hy     +++|
00669  M00S00646.1hy     +++|
00670  M00S00647.1hy     +++| PIO      BSS    0
00671  M00S00648.1hy     +++|          LDML   PIOB,RW     ISSUE SEEK COMMAND
00672  M00S00649.1hy     +++|          LMC    1S17
00673  M00S00650.1hy     +++|          RJM    WCB         WRITE COMMAND BLOCK
00674  M00S00651.1hy     +++|
00675  M00S00652.1hy     +++|*         WAIT UNTIL *IHD* HAS RAISED ATTENTION.
00676  M00S00653.1hy     +++|
00677  M00S00654.1hy     +++|          LDM    PIOC,RW     PROCESS ATTENTION
00678  M00S00655.1hy     +++|          RJM    ATT
00679  M00S00656.1hy     +++|          ZJN    PIO2        IF EXPECTED STATUS
00680  M00S00657.1hy     +++|          LDN    EIOS
00681  M00S00658.1hy     +++| PIO1     RJM    ERR         PROCESS ERROR
00682  M00S00659.1hy     +++|
00683  M00S00660.1hy     +++|*         INITIATE DATA TRANSFER.
00684  M00S00661.1hy     +++|
00685  M00S00662.1hy     +++| PIO2     LDN    1           SET CHANNEL ACTIVE FOR *CPD*
00686  M00S00663.1hy     +++|          RJM    SCD
00687  M00S00664.1hy     +++|          LDML   PIOD,RW     SELECT INFORMATION EXCHANGE
00688  M00S00665.1hy     +++|          RJM    WFW
00689  M00S00666.1hy     +++|          LDC    FCSD        SET DMA MODE
00690  M00S00667.1hy     +++|          RJM    FCN
00691  M00S00668.1hy     +++|          LDM    PIOE,RW     SET PROCESSOR ADDRESS
00692  M00S00669.1hy     +++|          STM    PIOA
00693  M00S00670.1hy     +++| PIO3     RJM    0           PROCESS I/O REQUEST
00694  M00S00671.1hy     +++| PIOA     EQU    *-1
00695  M00S00672.1hy     +++| PIO6     NJN    PIO1        IF TIMEOUT ERROR
00696  M00S00673.1hy     +++|
00697  M00S00674.1hy     +++|*         WAIT - TRANSFER COMPLETE.
00698  M00S00675.1hy     +++|
00699  M00S00676.1hy     +++| PIO7     LCN    1           CHECK OPERATIONAL STATUS
00700  M00S00677.1hy     +++|          RJM    COS
00701  M00S00678.1hy     +++|          ZJN    PIO8        IF TRANSFER COMPLETE
00702  M00S00679.1hy     +++|          LDN    ETTC
00703  M00S00680.1hy     +++|          UJN    PIO1        TRANSFER IN PROGRESS TIMEOUT
00704  M00S00681.1hy     +++|
00705  M00S00682.1hy     +++| PIO8     RJM    SFR         CHECK FOR CONSECUTIVE REQUEST
00706  M00S00683.1hy     +++|          STD    CB
00707  M00S00684.1hy     +++|          NJN    PIO3        IF ONE MORE REQUEST
00708  M00S00685.1hy     +++|
00709  M00S00686.1hy     +++|*         COMPLETE READ / WRITE OPERATIONS.
00710  M00S00687.1hy     +++|
00711  M00S00688.1hy     +++|          LDC    FCCS        CLEAR COMMAND SEQUENCE
00712  M00S00689.1hy     +++|          RJM    FCN
00713  M00S00690.1hy     +++|          LDN    0           CLEAR CHANNEL ACTIVE
00714  M00S00691.1hy     +++|          RJM    SCD
00715  M00S00692.1hy     +++|          LDN    ESCC        PROCESS ATTENTION
00716  M00S00693.1hy     +++|          RJM    ATT
00717  M00S00694.1hy     +++|          ZJN    PIO9        IF *COMMAND COMPLETE*
00718  M00S00695.1hy     +++|          LDN    EIOC
00719  M00S00696.1hy     +++|          UJN    PIO6        ERROR IN I/O COMPLETE STATUS
00720  M00S00697.1hy     +++|
00721  M00S00698.1hy     +++| PIO9     LDD    SS          CHECK FOR DELAY STATUS
00722  M00S00699.1hy     +++|          LPN    1
00723  M00S00700.1hy     +++|          ZJN    PIO11       IF NO DELAY STATUS
00724  M00S00701.1hy     +++|          LDD    RW
Line S00702 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00725  M01S00702.ns2769  ---|          STM    IPPS        SAVE READ / WRITE STATUS
Line S00004 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00726  M01S00004.ns2769  +++|          STM    IPPS,DI     SAVE READ / WRITE STATUS
00727  M00S00703.1hy     +++|          LDN    0
00728  M00S00704.1hy     +++|          STD    RW          SELECT *IHD* ERROR LOG
Line S00705 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00729  M01S00705.ns2769  ---|          STM    RWST
Line S00005 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00730  M01S00005.ns2769  +++|          STM    RWST,DI
00731  M00S00706.1hy     +++|          LDC    PIO10       SET RETURN ADDRESS
Line S00707 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00732  M01S00707.ns2769  ---|          STM    ESAD
Line S00006 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00733  M01S00006.ns2769  +++|          STM    ESAD,DI
00734  M00S00708.1hy     +++|          LJM    LGE1        DUMP ERROR LOG
00735  M00S00709.1hy     +++|
Line S00710 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00736  M01S00710.ns2769  ---| PIO10    LDM    IPPS        RESTORE READ / WRITE STATUS
Line S00007 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00737  M01S00007.ns2769  +++| PIO10    LDM    IPPS,DI     RESTORE READ / WRITE STATUS
00738  M00S00711.1hy     +++|          STD    RW
Line S00712 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00739  M01S00712.ns2769  ---|          STM    RWST
Line S00008 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00740  M01S00008.ns2769  +++|          STM    RWST,DI
00741  M00S00713.1hy     +++|          LDN    0           ENABLE ERROR PROCESSING
Line S00714 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00742  M01S00714.ns2769  ---|          STM    ESAD
Line S00009 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00743  M01S00009.ns2769  +++|          STM    ESAD,DI
00744  M00S00715.1hy     +++| PIO11    LJM    CMP         COMPLETE PROCESSING
00745  M00S00716.1hy     +++|
00746  M00S00717.1hy     +++|
00747  M00S00718.1hy     +++| PIOB     BSS    0           COMMAND CODES
00748  M00S00719.1hy     +++|          CONL   CCOR
00749  M00S00720.1hy     +++|          CONL   CCOW
00750  M00S00721.1hy     +++|
00751  M00S00722.1hy     +++| PIOC     BSS    0           EXPECTED EXECUTION STATUS
00752  M00S00723.1hy     +++|          CON    ESRD
00753  M00S00724.1hy     +++|          CON    ESBS
00754  M00S00725.1hy     +++|
00755  M00S00726.1hy     +++| PIOD     BSS    0           INFORMATION EXCHANGE FUNCTION WORDS
00756  M00S00727.1hy     +++|          CONL   FWRE
00757  M00S00728.1hy     +++|          CONL   FWWE
00758  M00S00729.1hy     +++|
00759  M00S00730.1hy     +++| PIOE     BSS    0           PROCESSOR ADDRESSES
00760  M00S00731.1hy     +++|          CON    RBD
00761  M00S00732.1hy     +++|          CON    WBD
00762  M00S00733.1hy     +++|          TITLE  DOCUMENT UNIT CHARACTERISTICS.
00763  M00S00734.1hy     +++| DUC      SPACE  4,10
00764  M00S00735.1hy     +++|**        DUC - DAYFILE UNIT CHARACTERISTICS.
00765  M00S00736.1hy     +++|
00766  M00S00737.1hy     +++|
00767  M00S00738.1hy     +++| DUC      BSS    0
Line S00739 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
00768  M01S00739.271l716 ---|          LDC    SBUF        SET MESSAGE ADDRESS
00769  M01S00740.271l716 ---|          STM    MAD1
00770  M01S00741.271l716 ---|          ADN    2*5         ASSEMBLY BUFFER ADDRESS
00771  M01S00742.271l716 ---|          STD    T3
00772  M00S00743.1hy     +++|          LDN    ZERL        CLEAR MESSAGE HEADER
00773  M00S00744.1hy     +++|          CRD    WB
00774  M00S00745.1hy     +++|          LDN    MLDY        SET DAYFILE CODE
00775  M00S00746.1hy     +++|          STD    WB+4
00776  M00S00747.1hy     +++|          LDC    FWSN
00777  M00S00748.1hy     +++|          RJM    WFW         REQUEST SERIAL NUMBER
00778  M00S00749.1hy     +++|          LDN    2
00779  M00S00750.1hy     +++|          STD    T7          SET BLOCK SIZE
00780  M00S00751.1hy     +++|          ACN    CH
00781  M00S00752.1hy     +++|          IAM    DBUF,CH     READ SERIAL NUMBER
00782  M00S00753.1hy     +++|          RJM    CFE
00783  M00S00754.1hy     +++|          LDC    FWRL        REQUEST OTHER CHARACTERISTICS
00784  M00S00755.1hy     +++|          RJM    WFW
00785  M00S00756.1hy     +++|          LDN    6           READ CHARACTERISTICS
00786  M00S00757.1hy     +++|          ACN    CH
00787  M00S00758.1hy     +++|          IAM    DBUF+2,CH   READ REVISION LEVEL
00788  M00S00759.1hy     +++|          RJM    CFE
Line S00012 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
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  M00S00760.1hy     +++|          LDC    10S12+DBUF  UNPACK HEX DATA
00794  M00S00761.1hy     +++|          RJM    UHD
00795  M00S00762.1hy     +++|          ADN    2           SET MESSAGE LENGTH
00796  M00S00763.1hy     +++|          STD    WB+3
00797  M00S00764.1hy     +++|          LDM    MSGL        RESIDUAL BYTE COUNT
00798  M00S00765.1hy     +++|          STD    WB+2
00799  M00S00766.1hy     +++|          LDC    DM0401      MESSAGE ID
00800  M00S00767.1hy     +++|          STD    PB
00801  M00S00768.1hy     +++|          LDC    HI0107      SET SYMPTOM CODE
00802  M00S00769.1hy     +++|          STD    PB+1
00803  M00S00770.1hy     +++|          LDD    DT          DEVICE TYPE
00804  M00S00771.1hy     +++|          SHN    1
00805  M00S00772.1hy     +++|          ERRNZ  PB+3-EO     CODE DEPENDS ON VALUE
00806  M00S00773.1hy     +++|          ADC    2RDF
00807  M00S00774.1hy     +++|          ERRNZ  PB+4-UN     CODE DEPENDS ON VALUE
00808  M00S00775.1hy     +++|          STD    PB+2
00809  M00S00776.1hy     +++|          LDD    MA          MOVE BASIC MESSAGE DATA
00810  M00S00777.1hy     +++|          CWM    WB,T7
00811  M00S00778.1hy     +++|          ERRNZ  WB+5-PB     CODE DEPENDS ON VALUE
00812  M00S00779.1hy     +++|          SBN    2
00813  M00S00780.1hy     +++|          CRM    SBUF,T7
Line S00781 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
00814  M01S00781.271l716 ---|          LDD    WB+3        LENGTH OF SECOND PART OF MESSAGE
00815  M01S00782.271l716 ---|          SBN    3
00816  M01S00783.271l716 ---|          SHN    14          ISSUE BML MESSAGE
00817  M01S00784.271l716 ---|          RJM    IBM
00818  M01S00785.271l716 ---|          LDC    MSGP        RESTORE ERROR MESSAGE ADDRESS
00819  M01S00786.271l716 ---|          STM    MAD1
Line S00016 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
00820  M01S00016.271l716 +++|          LDN    0
00821  M01S00017.271l716 +++|          STD    RW          ISSUE BML MESSAGE
00822  M01S00018.271l716 +++|          RJM    IBM
00823  M00S00787.1hy     +++|          LJM    CSR         CLEAR SPECIAL REQUEST FLAG
00824  M00S00788.1hy     +++|          TITLE  LOG *IHD* ERRORS.
00825  M00S00789.1hy     +++| LGE      SPACE  4,10
00826  M00S00790.1hy     +++|**        LGE - LOG *IHD* ERRORS.
00827  M00S00791.1hy     +++|*
00828  M00S00792.1hy     +++|*         ENTRY  (RW) = 0 TO LOG ERROR LOG.
00829  M00S00793.1hy     +++|*                     = 1 TO LOG ERROR REGISTER.
00830  M00S00794.1hy     +++|
00831  M00S00795.1hy     +++|
00832  M00S00796.1hy     +++| LGE      BSS    0
00833  M00S00797.1hy     +++|          LDC    CMP         SET RETURN ADDRESS
Line S00798 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00834  M01S00798.ns2769  ---| LGE1     STM    RADD
Line S00010 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00835  M01S00010.ns2769  +++| LGE1     STM    RADD,DI
00836  M00S00799.1hy     +++|          LDN    3           SET TIMEOUT VALUE = 3 SECONDS
00837  M00S00800.1hy     +++|          STD    TO
00838  M00S00801.1hy     +++|          LDML   LGEA,RW     REQUEST LOG / REGISTER DUMP
00839  M00S00802.1hy     +++|          RJM    WCB
00840  M00S00803.1hy     +++|
00841  M00S00804.1hy     +++|*         WAIT UNTIL *IHD* HAS RAISED ATTENTION.
00842  M00S00805.1hy     +++|
00843  M00S00806.1hy     +++|          LDN    ESRD        PROCESS ATTENTION
00844  M00S00807.1hy     +++|          RJM    ATT
00845  M00S00808.1hy     +++|          ZJN    LGE3        IF EXPECTED RESPONSE
00846  M00S00809.1hy     +++|          LDN    EIOS
00847  M00S00810.1hy     +++|          RJM    ERR         PROCESS ERROR
00848  M00S00811.1hy     +++|
00849  M00S00812.1hy     +++|*         INITIATE DATA TRANSFER.
00850  M00S00813.1hy     +++|
00851  M00S00814.1hy     +++| LGE3     LDML   LGEB,RW     WRITE FUNCTION WORD
00852  M00S00815.1hy     +++|          RJM    WFW
00853  M00S00816.1hy     +++|          ACN    CH
00854  M00S00817.1hy     +++|          LDM    LGEC,RW     SET DUMP LENGTH
00855  M00S00818.1hy     +++|          STD    T7
00856  M00S00819.1hy     +++|          IAM    DBUF,CH     INPUT ERROR DATA
00857  M00S00820.1hy     +++|          RJM    CFE
00858  M00S00821.1hy     +++|          LCN    0           PRESET SEARCH INDEX
00859  M00S00822.1hy     +++|          STD    T6
00860  M00S00823.1hy     +++|          LDD    RW
00861  M00S00824.1hy     +++|          ZJN    LGE5        IF DUMPING ERROR LOG
00862  M00S00825.1hy     +++|          LDML   DBUF
Line S00826 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00863  M01S00826.ns2769  ---|          SBML   EREN
Line S00011 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00864  M01S00011.ns2769  +++|          SBML   EREN,DI
00865  M00S00827.1hy     +++|          ZJN    LGE7        IF NO CHANGE IN ERROR REGISTER
Line S00828 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00866  M01S00828.ns2769  ---|          RAML   EREN
Line S00012 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00867  M01S00012.ns2769  +++|          RAML   EREN,DI
00868  M00S00829.1hy     +++|          UJN    LGE9        PROCESS ERROR REGISTER DATA
00869  M00S00830.1hy     +++|
00870  M00S00831.1hy     +++|*         SCAN ERROR LOG DATA FOR NEW ENTRIES.
00871  M00S00832.1hy     +++|
00872  M00S00833.1hy     +++| LGE4     SHN    -12         POSITION ERROR COUNT
Line S00834 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00873  M01S00834.ns2769  ---|          LMM    ELEN
Line S00013 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00874  M01S00013.ns2769  +++|          LMM    ELEN,DI
00875  M00S00835.1hy     +++|          ZJN    LGE10       IF END OF NEW ENTRIES
00876  M00S00836.1hy     +++| LGE5     AOD    T6
00877  M00S00837.1hy     +++|          SHN    2           ADVANCE INDICES
00878  M00S00838.1hy     +++|          STD    T7
00879  M00S00839.1hy     +++|          ERRNZ  ERLGL-ERLGL/4*4  CODE DEPENDS ON VALUE
00880  M00S00840.1hy     +++|          LMK    ERLGL
00881  M00S00841.1hy     +++|          ZJN    LGE8        IF END OF ERROR LOG
00882  M00S00842.1hy     +++|          LDML   DBUF,T7
00883  M00S00843.1hy     +++|          NJN    LGE4        IF NOT EMPTY ENTRY
00884  M00S00844.1hy     +++| LGE6     LDD    T6
00885  M00S00845.1hy     +++|          NJN    LGE8        IF NEW ENTRIES FOUND
00886  M00S00846.1hy     +++| LGE7     LJM    LGE12       CLEAR COMMAND SEQUENCE
00887  M00S00847.1hy     +++|
00888  M00S00848.1hy     +++| LGE8     LDML   DBUF
00889  M00S00849.1hy     +++|          SHN    -12         RESET ENTRY NUMBER
Line S00850 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00890  M01S00850.ns2769  ---|          STM    ELEN
Line S00014 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00891  M01S00014.ns2769  +++|          STM    ELEN,DI
00892  M00S00851.1hy     +++|          LDML   DBUF+3      SET REPETITION COUNT
Line S00852 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00893  M01S00852.ns2769  ---|          STML   ELRC
Line S00015 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00894  M01S00015.ns2769  +++|          STML   ELRC,DI
00895  M00S00853.1hy     +++| LGE9     UJN    LGE11       PROCESS ERROR DATA
00896  M00S00854.1hy     +++|
00897  M00S00855.1hy     +++| LGE10    LDML   DBUF+3,T7   CHECK REPEAT COUNT
Line S00856 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00898  M01S00856.ns2769  ---|          SBML   ELRC
Line S00016 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00899  M01S00016.ns2769  +++|          SBML   ELRC,DI
00900  M00S00857.1hy     +++|          ZJN    LGE6        IF NO CHANGE IN REPETITION COUNT
00901  M00S00858.1hy     +++|          STML   DBUF+3,T7
Line S00859 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00902  M01S00859.ns2769  ---|          RAML   ELRC        UPDATE ERROR LOG REPEAT COUNT
Line S00017 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00903  M01S00017.ns2769  +++|          RAML   ELRC,DI     UPDATE ERROR LOG REPEAT COUNT
00904  M00S00860.1hy     +++|          LDN    4
00905  M00S00861.1hy     +++|          RAD    T7          INCLUDE THIS ERROR LOG ENTRY
00906  M00S00862.1hy     +++|
00907  M00S00863.1hy     +++|*         PROCESS ERROR INFORMATION.
00908  M00S00864.1hy     +++|
00909  M00S00865.1hy     +++| LGE11    LDC    MBUF        SET MESSAGE BUFFER ADDRESS
00910  M00S00866.1hy     +++|          STD    T3
00911  M00S00867.1hy     +++|          LDD    T7          ERROR DATA BYTE COUNT
00912  M00S00868.1hy     +++|          SHN    14
00913  M00S00869.1hy     +++|          LMC    DBUF
00914  M00S00870.1hy     +++|          RJM    UHD         UNPACK HEX DATA
00915  M00S00871.1hy     +++|          SHN    14
00916  M00S00872.1hy     +++|          LMM    LGED,RW     ISSUE BML MESSAGE
00917  M00S00873.1hy     +++|          RJM    IBM
00918  M00S00874.1hy     +++| LGE12    LDC    FCCS        CLEAR COMMAND SEQUENCE
00919  M00S00875.1hy     +++|          RJM    FCN
00920  M00S00876.1hy     +++|          LDN    ESCC        PROCESS ATTENTION
00921  M00S00877.1hy     +++|          RJM    ATT
00922  M00S00878.1hy     +++|          ZJN    LGE13       IF *COMMAND COMPLETE*
00923  M00S00879.1hy     +++|          LDN    EIOC
00924  M00S00880.1hy     +++|          RJM    ERR         ERROR IN I/O COMPLETE STATUS
00925  M00S00881.1hy     +++|
00926  M00S00882.1hy     +++| LGE13    LDC    FWCA        CLEAR ATTENTION
00927  M00S00883.1hy     +++|          RJM    WFC
Line S00884 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00928  M01S00884.ns2769  ---|          LDM    RADD        SET RETURN ADDRESS
Line S00018 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00929  M01S00018.ns2769  +++|          LDM    RADD,DI     SET RETURN ADDRESS
00930  M00S00885.1hy     +++|          STD    PA
00931  M00S00886.1hy     +++|          LJM    0,PA        RETURN TO CALLER
00932  M00S00887.1hy     +++|
00933  M00S00888.1hy     +++|
00934  M00S00889.1hy     +++| LGEA     BSS    0           LOG / REGISTER SELECT OPTIONS
00935  M00S00890.1hy     +++|          CONL   CCRL
00936  M00S00891.1hy     +++|          CONL   CCRI
00937  M00S00892.1hy     +++|
00938  M00S00893.1hy     +++| LGEB     BSS    0           DUMP FUNCTION WORDS
00939  M00S00894.1hy     +++|          CONL   FWEL
00940  M00S00895.1hy     +++|          CONL   FWER
00941  M00S00896.1hy     +++|
00942  M00S00897.1hy     +++| LGEC     BSS    0           DUMP LENGTHS
00943  M00S00898.1hy     +++|          CON    ERLGL
00944  M00S00899.1hy     +++|          CON    ERRGL
00945  M00S00900.1hy     +++|
00946  M00S00901.1hy     +++| LGED     BSS    0           BML SYMPTOM CODES
00947  M00S00902.1hy     +++|          CON    HD0104
00948  M00S00903.1hy     +++|          CON    HD0103
00949  M00S00904.1hy     +++|          TITLE  LOAD OPERATING PARAMETERS.
00950  M00S00905.1hy     +++| LOP      SPACE  4,10
00951  M00S00906.1hy     +++|**        LOP - LOAD OPERATING PARAMETERS.
00952  M00S00907.1hy     +++|*
00953  M00S00908.1hy     +++|*         ENTRY  (RW) = 0 TO LOAD ATTENTION DELAY PARAMETERS.
00954  M00S00909.1hy     +++|*                     = 1 TO LOAD OPERATING MODE PARAMETERS.
00955  M00S00910.1hy     +++|
00956  M00S00911.1hy     +++|
00957  M00S00912.1hy     +++| LOP      BSS    0
00958  M00S00913.1hy     +++|          LDC    CMP         SET RETURN ADDRESS
Line S00914 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00959  M01S00914.ns2769  ---| LOP1     STM    RADD
Line S00019 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00960  M01S00019.ns2769  +++| LOP1     STM    RADD,DI
00961  M00S00915.1hy     +++|          LDD    RW
00962  M00S00916.1hy     +++|          NJN    LOP2        IF SETTING OPERATING MODE
00963  M00S00917.1hy     +++|          LDML   LOPA,DT
00964  M00S00918.1hy     +++|          UJN    LOP3        SET ATTENTION DELAY PARAMETERS
00965  M00S00919.1hy     +++|
00966  M00S00920.1hy     +++| LOP2     LDC    PWOM        SET OPERATING MODE PARAMETERS
00967  M00S00921.1hy     +++| LOP3     STML   WCBA+4
00968  M00S00922.1hy     +++|          LDN    3           SET TIMEOUT VALUE = 3 SECONDS
00969  M00S00923.1hy     +++|          STD    TO
00970  M00S00924.1hy     +++|          LDML   LOPB,RW     LOAD PARAMETERS
00971  M00S00925.1hy     +++|          RJM    WCB
00972  M00S00926.1hy     +++|
00973  M00S00927.1hy     +++|*         WAIT UNTIL *IHD* HAS RAISED ATTENTION.
00974  M00S00928.1hy     +++|
00975  M00S00929.1hy     +++|          LDN    ESCC        PROCESS ATTENTION
00976  M00S00930.1hy     +++|          RJM    ATT
00977  M00S00931.1hy     +++|          ZJN    LOP4        IF NORMAL COMPLETION
00978  M00S00932.1hy     +++|          LDN    ELOP
00979  M00S00933.1hy     +++|          RJM    ERR         PROCESS ERROR
00980  M00S00934.1hy     +++|
Line S00935 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00981  M01S00935.ns2769  ---| LOP4     LDM    RADD        SET RETURN ADDRESS
Line S00020 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
00982  M01S00020.ns2769  +++| LOP4     LDM    RADD,DI     SET RETURN ADDRESS
00983  M00S00936.1hy     +++|          STD    PA
00984  M00S00937.1hy     +++|          LJM    0,PA        RETURN TO CALLER
00985  M00S00938.1hy     +++|
00986  M00S00939.1hy     +++|
00987  M00S00940.1hy     +++| LOPA     BSS    0           ATTENTION DELAY PARAMETER WORDS
00988  M00S00941.1hy     +++|          CONL   PWADDF
00989  M00S00942.1hy     +++|          CONL   PWADDH
00990  M00S00943.1hy     +++|
00991  M00S00944.1hy     +++| LOPB     BSS    0           COMMAND CODES
00992  M00S00945.1hy     +++|          CONL   CCLD
00993  M00S00946.1hy     +++|          CONL   CCLM
00994  M00S00947.1hy     +++|          TITLE  DIAGNOSTIC PROCESSING.
00995  M00S00948.1hy     +++| RND      SPACE  4,10
00996  M00S00949.1hy     +++|**        RND - RUN DIAGNOSTICS.
00997  M00S00950.1hy     +++|*
00998  M00S00951.1hy     +++|*         ENTRY  (RW) = 0 TO EXECUTE READ TEST.
00999  M00S00952.1hy     +++|*                     = 1 TO EXECUTE WRITE TEST.
Line S00953 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01000  M01S00953.271l716 ---|*                     = 2 TO RUN LEVEL 1 DIAGNOSTICS.
01001  M01S00954.271l716 ---|*                     = 3 TO RUN LEVEL 2 DIAGNOSTICS.
Line S00019 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01002  M01S00019.271l716 +++|*                     = 2 TO RUN VERIFICATION DIAGNOSTICS.
01003  M00S00955.1hy     +++|
01004  M00S00956.1hy     +++|
01005  M00S00957.1hy     +++| RND      BSS    0
01006  M00S00958.1hy     +++|          LDC    CSR         SET RETURN ADDRESS
Line S00959 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01007  M01S00959.ns2769  ---| RND1     STM    RADD
Line S00021 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01008  M01S00021.ns2769  +++| RND1     STM    RADD,DI
Line S00007 Modification History
M01 (Added by) 1hy6
Seq #  *Modification Id* Act 
----------------------------+
01009  M01S00007.1hy6    +++|          LDC    RNDD        ISSUE OPERATOR MESSAGE
01010  M01S00008.1hy6    +++|          RJM    IOM
01011  M00S00960.1hy     +++|          LDML   RNDA,RW     SET PARAMETER WORD
01012  M00S00961.1hy     +++|          STML   WCBA+4
01013  M00S00962.1hy     +++|          LDM    RNDB,RW     SET TIMEOUT VALUE
01014  M00S00963.1hy     +++|          STD    TO
01015  M00S00964.1hy     +++|          LDML   RNDC,RW     INITIATE TEST
01016  M00S00965.1hy     +++|          RJM    WCB
01017  M00S00966.1hy     +++|
01018  M00S00967.1hy     +++|*         WAIT UNTIL *IHD* HAS RAISED ATTENTION.
01019  M00S00968.1hy     +++|
01020  M00S00969.1hy     +++|          LDN    0           PROCESS ATTENTION
01021  M00S00970.1hy     +++|          RJM    ATT
01022  M00S00971.1hy     +++| RND2     LDC    MBUF        SET ASSEMBLY BUFFER ADDRESS
01023  M00S00972.1hy     +++|          STD    T3
01024  M00S00973.1hy     +++|          LDC    SLSTL*10000+SLST  UNPACK HEX DATA
01025  M00S00974.1hy     +++|          RJM    UHD
01026  M00S00975.1hy     +++|          SHN    14          ISSUE BML MESSAGE
01027  M00S00976.1hy     +++|          LMC    HD0106
01028  M00S00977.1hy     +++|          ADD    RW
01029  M00S00978.1hy     +++|          ERRNZ  HD0106+1-HD0107  CODE DEPENDS ON VALUE
01030  M00S00979.1hy     +++|          ERRNZ  HD0107+1-HD0110  CODE DEPENDS ON VALUE
Line S00980 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01031  M01S00980.271l716 ---|          ERRNZ  HD0110+1-HD0111  CODE DEPENDS ON VALUE
01032  M00S00981.1hy     +++|          RJM    IBM
01033  M00S00982.1hy     +++|          LDD    RW          CHECK OPERATION
01034  M00S00983.1hy     +++|          SBN    2
Line S00984 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01035  M01S00984.271l716 ---|          PJN    RND3        IF LEVEL 1 / 2 DIAGNOSTICS
Line S00020 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01036  M01S00020.271l716 +++|          ZJN    RND3        IF VERIFICATION DIAGNOSTICS
01037  M00S00985.1hy     +++|          LDD    SS
01038  M00S00986.1hy     +++|          LMN    ESCC
01039  M00S00987.1hy     +++|          LPN    70
01040  M00S00988.1hy     +++|          ZJN    RND3        IF NORMAL COMPLETION
01041  M00S00989.1hy     +++|          LDN    EDTF
01042  M00S00990.1hy     +++|          RJM    ERR         PROCESS ERROR
01043  M00S00991.1hy     +++|
Line S00992 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01044  M01S00992.271l716 ---| RND3     LDM    RADD        SET RETURN ADDRESS
01045  M01S00993.271l716 ---|          STD    PA
Line S00009 Modification History
M01 (Added by) 1hy6
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01046  M02S00009.271l716 ---|          LDN    0           CLEAR OPERATOR MESSAGE
01047  M02S00010.271l716 ---|          RJM    IOM
Line S00021 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01048  M01S00021.271l716 +++|*RND3     LDN    0           CLEAR OPERATOR MESSAGE
01049  M01S00022.271l716 +++| RND3     RJM    IOM
Line S00023 Modification History
M01 (Added by) 271l716
M02 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01050  M02S00023.ns2769  ---|          LDM    RADD        SET RETURN ADDRESS
Line S00022 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01051  M01S00022.ns2769  +++|          LDM    RADD,DI     SET RETURN ADDRESS
Line S00024 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01052  M01S00024.271l716 +++|          STD    PA
01053  M00S00994.1hy     +++|          LJM    0,PA        RETURN TO CALLER
01054  M00S00995.1hy     +++|
01055  M00S00996.1hy     +++|
01056  M00S00997.1hy     +++| RNDA     BSS    0           PARAMETER WORDS
01057  M00S00998.1hy     +++|          CONL   PWRT
01058  M00S00999.1hy     +++|          CONL   PWWT
Line S01000 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01059  M01S01000.271l716 ---|          CONL   PWIT
01060  M00S01001.1hy     +++|          CONL   PWIT
01061  M00S01002.1hy     +++|
01062  M00S01003.1hy     +++| RNDB     BSS    0           TIMEOUT VALUES (IN SECONDS)
01063  M00S01004.1hy     +++|          CON    1*60D
01064  M00S01005.1hy     +++|          CON    1*60D
Line S01006 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01065  M01S01006.271l716 ---|          CON    4*60D
01066  M00S01007.1hy     +++|          CON    4*60D+20D
01067  M00S01008.1hy     +++|
01068  M00S01009.1hy     +++| RNDC     BSS    0           COMMAND CODES
01069  M00S01010.1hy     +++|          CONL   CCRT
01070  M00S01011.1hy     +++|          CONL   CCWT
Line S01012 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01071  M01S01012.271l716 ---|          CONL   CCD1
01072  M01S01013.271l716 ---|          CONL   CCD2
Line S00025 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01073  M01S00025.271l716 +++|          CONL   CCVD
Line S00011 Modification History
M01 (Added by) 1hy6
Seq #  *Modification Id* Act 
----------------------------+
01074  M01S00011.1hy6    +++|
01075  M01S00012.1hy6    +++| RNDD     DATA   C* EQ000, DIAGNOSTIC RUNNING.*
01076  M00S01014.1hy     +++|          TITLE  SPIN-DOWN PROCESSING.
01077  M00S01015.1hy     +++| SPD      SPACE  4,10
01078  M00S01016.1hy     +++|**        SPD - SPIN DOWN DRIVE.
01079  M00S01017.1hy     +++|
01080  M00S01018.1hy     +++|
01081  M00S01019.1hy     +++| SPD      BSS    0
01082  M00S01020.1hy     +++|          LDN    1*60D       SET TIMEOUT VALUE = 1 MINUTE
01083  M00S01021.1hy     +++|          STD    TO
01084  M00S01022.1hy     +++|          LDC    CCSD        SPIN-DOWN DRIVE
01085  M00S01023.1hy     +++|          RJM    WCB
01086  M00S01024.1hy     +++|
01087  M00S01025.1hy     +++|*         WAIT UNTIL *IHD* HAS RAISED ATTENTION.
01088  M00S01026.1hy     +++|
01089  M00S01027.1hy     +++|          LDN    ESCC        PROCESS ATTENTION
01090  M00S01028.1hy     +++|          RJM    ATT
01091  M00S01029.1hy     +++|          ZJP    CSR         IF NORMAL COMPLETION
01092  M00S01030.1hy     +++|          LDN    ESDF
01093  M00S01031.1hy     +++|          RJM    ERR         PROCESS ERROR
01094  M00S01032.1hy     +++|          TITLE  SPIN-UP PROCESSING.
01095  M00S01033.1hy     +++| SPU      SPACE  4,10
01096  M00S01034.1hy     +++|**        SPU - SPIN UP DRIVE.
01097  M00S01035.1hy     +++|
01098  M00S01036.1hy     +++|
01099  M00S01037.1hy     +++| SPU      BSS    0
01100  M00S01038.1hy     +++|          LDC    CSR         SET RETURN ADDRESS
Line S01039 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01101  M01S01039.ns2769  ---| SPU1     STM    ERAD
Line S00023 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01102  M01S00023.ns2769  +++| SPU1     STM    ERAD,DI
01103  M00S01040.1hy     +++|          LDN    0           GET SLAVE STATUS
01104  M00S01041.1hy     +++|          RJM    GSS
01105  M00S01042.1hy     +++|          LDML   SLST+5      CHECK DEVICE READY
01106  M00S01043.1hy     +++|          SHN    0-17
01107  M00S01044.1hy     +++|          ZJN    SPU2        IF DISK NOT SPINNING
01108  M00S01045.1hy     +++|          LDN    SPU5-SPU4
01109  M00S01046.1hy     +++| SPU2     ADC    SPU4        PROCESS SELECTIVE RESET
01110  M00S01047.1hy     +++|          LJM    SRS1
01111  M00S01048.1hy     +++|
01112  M00S01049.1hy     +++| SPU3     RJM    HYD         RETURN TO MAIN LOOP
01113  M00S01050.1hy     +++|
01114  M00S01051.1hy     +++|*         CHECK TIME INTERVAL SINCE LAST SPIN-UP.
01115  M00S01052.1hy     +++|
01116  M00S01053.1hy     +++| SPU4     RJM    CMC         CHECK MONITOR COMPLETE
01117  M00S01054.1hy     +++|          LDK    HSUEI
01118  M00S01055.1hy     +++|          STD    CM+4        SET SPIN-UP INTERVAL
01119  M00S01056.1hy     +++|          SHN    -14
01120  M00S01057.1hy     +++|          STD    CM+3
01121  M00S01058.1hy     +++|          LDN    UHSS        UPDATE EVENT TIME
01122  M00S01059.1hy     +++|          STD    CM+1
01123  M00S01060.1hy     +++|          MONITOR  EATM      CHECK EVENT TIME
01124  M00S01061.1hy     +++|          LDD    CM+1
01125  M00S01062.1hy     +++|          NJN    SPU3        IF EVENT INTERVAL NOT ELAPSED
01126  M00S01063.1hy     +++|
01127  M00S01064.1hy     +++|*         WRITE COMMAND BLOCK TO POWER UP SPINDLE.
01128  M00S01065.1hy     +++|
01129  M00S01066.1hy     +++|          RJM    SSD
01130  M00S01067.1hy     +++|          LDC    3*60D       SET TIMEOUT VALUE = 3 MINUTES
01131  M00S01068.1hy     +++|          STD    TO
Line S00013 Modification History
M01 (Added by) 1hy6
Seq #  *Modification Id* Act 
----------------------------+
01132  M01S00013.1hy6    +++|          LDC    SPUA        ISSUE OPERATOR MESSAGE
01133  M01S00014.1hy6    +++|          RJM    IOM
01134  M00S01069.1hy     +++|          LDC    CCSU        SPIN-UP DRIVE
01135  M00S01070.1hy     +++|          RJM    WCB
01136  M00S01071.1hy     +++|
01137  M00S01072.1hy     +++|*         WAIT UNTIL *IHD* HAS RAISED ATTENTION.
01138  M00S01073.1hy     +++|
01139  M00S01074.1hy     +++|          LDN    ESCC        PROCESS ATTENTION
01140  M00S01075.1hy     +++|          RJM    ATT
01141  M00S01076.1hy     +++|          ZJN    SPU5        IF NORMAL COMPLETION
01142  M00S01077.1hy     +++|          LDN    ESUF
01143  M00S01078.1hy     +++|          RJM    ERR         PROCESS ERROR
01144  M00S01079.1hy     +++|
01145  M00S01080.1hy     +++| SPU5     LDN    1           SELECT LOAD OF MODE PARAMETERS
Line S01081 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01146  M01S01081.ns2769  ---|          STM    RWST
Line S00024 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01147  M01S00024.ns2769  +++|          STM    RWST,DI
01148  M00S01082.1hy     +++| SPU6     STD    RW          SET PROCESSOR INDEX
01149  M00S01083.1hy     +++|          LDC    SPU7
01150  M00S01084.1hy     +++|          LJM    LOP1        LOAD OPERATING PARAMETERS
01151  M00S01085.1hy     +++|
Line S01086 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01152  M01S01086.ns2769  ---| SPU7     SOM    RWST
Line S00025 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01153  M01S00025.ns2769  +++| SPU7     SOM    RWST,DI
01154  M00S01087.1hy     +++|          PJN    SPU6        IF YET TO LOAD DELAY PARAMETERS
Line S01088 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01155  M01S01088.ns2769  ---|          LDM    SREQ
Line S00026 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01156  M01S00026.ns2769  +++|          LDM    SREQ,DI
01157  M00S01089.1hy     +++|          ZJN    SPU8        IF SPIN-UP INITIATED BY DRIVER
01158  M00S01090.1hy     +++|          LDN    DUNF
01159  M00S01091.1hy     +++|          RJM    CPF         CLEAR DEVICE UNAVAILABLE
01160  M00S01092.1hy     +++|
01161  M00S01093.1hy     +++|*         COMPLETE DEVICE INITIALIZATION.
01162  M00S01094.1hy     +++|
Line S01095 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01163  M01S01095.ns2769  ---| SPU8     LDM    ERAD        SET RETURN ADDRESS
Line S00027 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01164  M01S00027.ns2769  +++| SPU8     LDM    ERAD,DI     SET RETURN ADDRESS
01165  M00S01096.1hy     +++|          STD    PA
Line S00015 Modification History
M01 (Added by) 1hy6
Seq #  *Modification Id* Act 
----------------------------+
01166  M01S00015.1hy6    +++|          LDN    0           CLEAR OPERATOR MESSAGE
01167  M01S00016.1hy6    +++|          RJM    IOM
01168  M00S01097.1hy     +++|          LJM    0,PA        RETURN TO CALLER
Line S00017 Modification History
M01 (Added by) 1hy6
Seq #  *Modification Id* Act 
----------------------------+
01169  M01S00017.1hy6    +++|
01170  M01S00018.1hy6    +++| SPUA     DATA   C* EQ000, SPIN UP PENDING.*
01171  M00S01098.1hy     +++|          TITLE  SELECTIVE RESET PROCESSING.
01172  M00S01099.1hy     +++| SRS      SPACE  4,10
01173  M00S01100.1hy     +++|**        SRS - PROCESS SELECTIVE RESET.
01174  M00S01101.1hy     +++|
01175  M00S01102.1hy     +++|
01176  M00S01103.1hy     +++| SRS      BSS    0
01177  M00S01104.1hy     +++|          LDC    CMP4        SET RETURN ADDRESS
Line S01105 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01178  M01S01105.ns2769  ---| SRS1     STM    RADD
Line S00028 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01179  M01S00028.ns2769  +++| SRS1     STM    RADD,DI
01180  M00S01106.1hy     +++|          LDC    FWSR        ISSUE SELECTIVE RESET
01181  M00S01107.1hy     +++|          RJM    WFW
01182  M00S01108.1hy     +++|          LDN    6           SET TIMEOUT TO 6 SECONDS
01183  M00S01109.1hy     +++|          RJM    STO
01184  M00S01110.1hy     +++|          LDN    ESCB        PROCESS ATTENTION
01185  M00S01111.1hy     +++|          RJM    ATT
01186  M00S01112.1hy     +++|          ZJN    SRS3        IF *COMMAND BLOCK INDEPENDENT*
01187  M00S01113.1hy     +++|          LDN    EUES
01188  M00S01114.1hy     +++| SRS2     RJM    ERR         PROCESS ERROR
01189  M00S01115.1hy     +++|
01190  M00S01116.1hy     +++| SRS3     LDD    SS          CHECK DELAY STATUS PRESENT
01191  M00S01117.1hy     +++|          LPN    1
01192  M00S01118.1hy     +++|          ZJN    SRS4        IF NO DELAY STATUS
01193  M00S01119.1hy     +++|          LDM    SLST+3
01194  M00S01120.1hy     +++|          LPC    377         CHECK DELAY STATUS
01195  M00S01121.1hy     +++|          LMC    0#83
01196  M00S01122.1hy     +++|          ZJN    SRS5        IF HOST GENERATED RESET
01197  M00S01123.1hy     +++| SRS4     LDN    EUDS
01198  M00S01124.1hy     +++|          UJN    SRS2        UNEXPECTED DELAY STATUS
01199  M00S01125.1hy     +++|
Line S01126 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01200  M01S01126.ns2769  ---| SRS5     STM    ELEN
01201  M01S01127.ns2769  ---|          STM    ELRC        CLEAR INTERNAL ERROR COUNTERS
01202  M01S01128.ns2769  ---|          STM    EREN
01203  M01S01129.ns2769  ---|          LDM    RADD        SET RETURN ADDRESS
Line S00029 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
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  M00S01130.1hy     +++|          STD    PA
01209  M00S01131.1hy     +++|          LJM    0,PA        RETURN TO CALLER
01210  M00S01132.1hy     +++|          TITLE  SUBROUTINES.
01211  M00S01133.1hy     +++| ACE      SPACE  4,10
01212  M00S01134.1hy     +++|**        ACE - ANALYZE CHANNEL ERROR.
01213  M00S01135.1hy     +++|*
01214  M00S01136.1hy     +++|*         ENTRY  (RBUF) = CHANNEL STATUS REGISTER.
01215  M00S01137.1hy     +++|
01216  M00S01138.1hy     +++|
01217  M00S01139.1hy     +++| ACE3     LDN    ECCM        SET CHANNEL DETECTED CM ERROR
01218  M00S01140.1hy     +++| ACE4     STM    FALT
01219  M00S01141.1hy     +++|
01220  M00S01142.1hy     +++| ACE      SUBR               ENTRY/EXIT
01221  M00S01143.1hy     +++|          LDM    RBUF+5
01222  M00S01144.1hy     +++|          LPN    2
01223  M00S01145.1hy     +++|          ZJN    ACEX        IF NO CHANNEL ERROR
01224  M00S01146.1hy     +++|          LDM    RBUF
01225  M00S01147.1hy     +++|          LPN    76
01226  M00S01148.1hy     +++|          NJN    ACE3        IF ERROR IN MEMORY
01227  M00S01149.1hy     +++|          LDM    RBUF+1
01228  M00S01150.1hy     +++|          SHN    -5
01229  M00S01151.1hy     +++|          ZJN    ACE2        IF NOT PARITY / ISI CHANNEL ERROR
01230  M00S01152.1hy     +++|          LPN    2
01231  M00S01153.1hy     +++|          ZJN    ACE1        IF NOT PARITY ERROR
01232  M00S01154.1hy     +++|          LDN    ECPE&ECIE
01233  M00S01155.1hy     +++| ACE1     LMN    ECIE&ECER   FAULT ANALYSIS CODE
01234  M00S01156.1hy     +++| ACE2     LMN    ECER
01235  M00S01157.1hy     +++|          UJN    ACE4        SAVE FAULT CODE
01236  M00S01158.1hy     +++| AME      SPACE  4,10
01237  M00S01159.1hy     +++|**        AME - ATTEMPT MONITOR EXCHANGE.
01238  M00S01160.1hy     +++|*
01239  M00S01161.1hy     +++|*         EXIT   (A) = 0.
01240  M00S01162.1hy     +++|*
01241  M00S01163.1hy     +++|*         USES   CM - CM+4.
01242  M00S01164.1hy     +++|*
01243  M00S01165.1hy     +++|*         MACROS EXPE.
01244  M00S01166.1hy     +++|
01245  M00S01167.1hy     +++|
01246  M00S01168.1hy     +++| AME      SUBR               ENTRY/EXIT
01247  M00S01169.1hy     +++|          EXPE   *
01248  M00S01170.1hy     +++| AME1     LDC    6           CHECK FOR (MA) NON-ZERO
01249  M00S01171.1hy     +++|          CRD    CM
01250  M00S01172.1hy     +++|          LDD    CM
01251  M00S01173.1hy     +++|          ADD    CM+1
01252  M00S01174.1hy     +++|          NJN    AME1        IF EXCHANGE PACKAGE NOT READY
01253  M00S01175.1hy     +++|          EXPE   *
01254  M00S01176.1hy     +++| AME2     LDC    0           SET (B0) NON-ZERO
01255  M00S01177.1hy     +++|          CWM    AMEA,ON
01256  M00S01178.1hy     +++|          SBN    1           EXCHANGE MONITOR
01257  M00S01179.1hy     +++|          MXN    0
01258  M00S01180.1hy     +++|          CRD    CM
01259  M00S01181.1hy     +++|          LDD    CM+4
01260  M00S01182.1hy     +++|          ZJN    AMEX        IF EXCHANGE TAKEN
01261  M00S01183.1hy     +++|          LDN    28D
01262  M00S01184.1hy     +++|          SBN    1           WAIT 20 MICROSECONDS ELAPSED
01263  M00S01185.1hy     +++|          NJN    *-1
01264  M00S01186.1hy     +++|          UJN    AME2        RETRY EXCHANGE
01265  M00S01187.1hy     +++|
01266  M00S01188.1hy     +++|
01267  M00S01189.1hy     +++| AMEA     VFD    24/0        (P)
01268  M00S01190.1hy     +++|          VFD    18/0        (A0)
01269  M00S01191.1hy     +++|          VFD    18/0        (B0)
01270  M00S01192.1hy     +++| AMR      SPACE  4,15
01271  M00S01193.1hy     +++|**        AMR - ACCESS MAINTENANCE REGISTER.
01272  M00S01194.1hy     +++|*
01273  M00S01195.1hy     +++|*         ENTRY  (A) = 6/ OC, 12/ RN
01274  M00S01196.1hy     +++|*                      OC = *RMRF* TO READ REGISTER.
01275  M00S01197.1hy     +++|*                         = *WMRF* TO WRITE REGISTER.
01276  M00S01198.1hy     +++|*                      RN = *IOU* REGISTER NUMBER.
01277  M00S01199.1hy     +++|*
01278  M00S01200.1hy     +++|*         EXIT   (A) = 0 IF NO CHANNEL ERROR.
01279  M00S01201.1hy     +++|*                (RBUF) = REGISTER CONTENTS.
01280  M00S01202.1hy     +++|*
01281  M00S01203.1hy     +++|*         USES   T4.
01282  M00S01204.1hy     +++|*
01283  M00S01205.1hy     +++|*         CALLS  WMC.
01284  M00S01206.1hy     +++|
01285  M00S01207.1hy     +++|
01286  M00S01208.1hy     +++| AMR1     ACN.   MR
01287  M00S01209.1hy     +++|          LDN    0           OUTPUT NULL PARAMETER
01288  M00S01210.1hy     +++|          OAN.   MR
01289  M00S01211.1hy     +++|          LDD    T4          TRANSMIT REGISTER NUMBER
01290  M00S01212.1hy     +++|          OAN.   MR
01291  M00S01213.1hy     +++|          LDN    0           WAIT CHANNEL EMPTY
01292  M00S01214.1hy     +++|          RJM    WMC
01293  M00S01215.1hy     +++|          DCN.   MR+40
01294  M00S01216.1hy     +++|          NJN    AMRX        IF CHANNEL HUNG FULL
01295  M00S01217.1hy     +++|          ACN.   MR
01296  M00S01218.1hy     +++|          LDN    10          READ / WRITE REGISTER
01297  M00S01219.1hy     +++| AMRA     IAM.   RBUF,MR
01298  M00S01220.1hy     +++|
01299  M00S01221.1hy     +++| AMR      SUBR               ENTRY/EXIT
01300  M00S01222.1hy     +++|          STD    T4
01301  M00S01223.1hy     +++|          SHN    -14         POSITION OP CODE
01302  M00S01224.1hy     +++|          LMD    HN
01303  M00S01225.1hy     +++|          ERRNZ  IOUC-100    CODE DEPENDS ON VALUE
01304  M00S01226.1hy     +++|          FAN.   MR
01305  M00S01227.1hy     +++|          LPN    20
01306  M00S01228.1hy     +++|          ERRNZ  RMRF+20-WMRF CODE DEPENDS ON VALUE
01307  M00S01229.1hy     +++|          SHN    3
01308  M00S01230.1hy     +++|          LMC    IAMI+MR     FORM I/O INSTRUCTION
01309  M00S01231.1hy     +++|          STM    AMRA
01310  M00S01232.1hy     +++|          UJP    AMR1        ACCESS MAINTENANCE REGISTER
01311  M00S01233.1hy     +++| ATT      SPACE  4,15
01312  M00S01234.1hy     +++|**        ATT - PROCESS ATTENTION.
01313  M00S01235.1hy     +++|*
01314  M00S01236.1hy     +++|*         ENTRY  (A) = EXPECTED EXECUTION STATUS.
01315  M00S01237.1hy     +++|*
01316  M00S01238.1hy     +++|*         EXIT   (A) = 0 IF EXPECTED EXECUTION STATUS.
01317  M00S01239.1hy     +++|*                (SS) = SLAVE STATUS (SET BY *GSS*).
01318  M00S01240.1hy     +++|*
01319  M00S01241.1hy     +++|*         ERROR  TO *ERR* IF TIMEOUT.
01320  M00S01242.1hy     +++|*
01321  M00S01243.1hy     +++|*         USES   PA.
01322  M00S01244.1hy     +++|*
01323  M00S01245.1hy     +++|*         CALLS  CTO, GSS, HYD, R1B, SSD.
01324  M00S01246.1hy     +++|
01325  M00S01247.1hy     +++|
01326  M00S01248.1hy     +++| ATT      CON    0           ENTRY
Line S01249 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01327  M01S01249.ns2769  ---|          STM    EEST
Line S00033 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01328  M01S00033.ns2769  +++|          STM    EEST,DI
01329  M00S01250.1hy     +++|          LDM    ATT         SAVE RETURN ADDRESS
Line S01251 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01330  M01S01251.ns2769  ---|          STM    ATTN
Line S00034 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01331  M01S00034.ns2769  +++|          STM    ATTN,DI
01332  M00S01252.1hy     +++| ATT1     RJM    HYD         RETURN TO MAIN LOOP
01333  M00S01253.1hy     +++|          LDC    FCIS
01334  M00S01254.1hy     +++|          RJM    R1B         REQUEST IDLE STATUS
01335  M00S01255.1hy     +++|          STML   IDST
01336  M00S01256.1hy     +++|          LPML   TMSK,UN
01337  M00S01257.1hy     +++|          ZJN    ATT2        IF ATTENTION NOT SET
Line S01258 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01338  M01S01258.ns2769  ---|          LDM    ATTN
Line S00035 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01339  M01S00035.ns2769  +++|          LDM    ATTN,DI
01340  M00S01259.1hy     +++|          STD    PA
01341  M00S01260.1hy     +++|          RJM    SSD         SELECT SLAVE DEVICE
01342  M00S01261.1hy     +++|
01343  M00S01262.1hy     +++|*         RETURN TO CALLER WITH *IHD* STATUS.
01344  M00S01263.1hy     +++|
Line S01264 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01345  M01S01264.ns2769  ---|          LDM    EEST
Line S00036 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01346  M01S00036.ns2769  +++|          LDM    EEST,DI
01347  M00S01265.1hy     +++|          RJM    GSS         GET SLAVE STATUS
Line S01266 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01348  M01S01266.ns2769  ---|          LMM    EEST
Line S00037 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01349  M01S00037.ns2769  +++|          LMM    EEST,DI
01350  M00S01267.1hy     +++|          LJM    0,PA        RETURN TO CALLER
01351  M00S01268.1hy     +++|
01352  M00S01269.1hy     +++| ATT2     RJM    CTO
01353  M00S01270.1hy     +++|          MJN    ATT1        IF NOT TIMEOUT
01354  M00S01271.1hy     +++|          LDN    ETAT
01355  M00S01272.1hy     +++|          RJM    ERR         PROCESS ERROR
01356  M00S01273.1hy     +++| CCR      SPACE  4,15
01357  M00S01274.1hy     +++|**        CCR - CHECK FOR CHANNEL REQUEST.
01358  M00S01275.1hy     +++|*
01359  M00S01276.1hy     +++|*         ENTRY  (UC) = UNIT ACTIVITY COUNT.
01360  M00S01277.1hy     +++|*                (IR+4) = CHANNEL NUMBER.
01361  M00S01278.1hy     +++|*
01362  M00S01279.1hy     +++|*         EXIT   (A) = 0 IF CHANNEL DOWN.
01363  M00S01280.1hy     +++|*
01364  M00S01281.1hy     +++|*         USES   CM - CM+4.
01365  M00S01282.1hy     +++|*
01366  M00S01283.1hy     +++|*         CALLS  DCR, RCT, SRF.
01367  M00S01284.1hy     +++|*
01368  M00S01285.1hy     +++|*         MACROS DELAY, MONITOR.
01369  M00S01286.1hy     +++|
01370  M00S01287.1hy     +++|
01371  M00S01288.1hy     +++| CCR3     RJM    SRF         SET DRIVER RELOAD FLAG
01372  M00S01289.1hy     +++| CCR4     LDD    CR
01373  M00S01290.1hy     +++|
01374  M00S01291.1hy     +++| CCR      SUBR               ENTRY/EXIT
01375  M00S01292.1hy     +++|          RJM    RCT         READ CHANNEL TABLE
01376  M00S01293.1hy     +++|          SHN    21-5
01377  M00S01294.1hy     +++|          MJN    CCR3        IF CHANNEL GLOBALLY DOWN
01378  M00S01295.1hy     +++|          LPN    40
01379  M00S01296.1hy     +++|          ZJN    CCR4        IF CHANNEL NOT REQUESTED
01380  M00S01297.1hy     +++|          STM    CHRQ        DISABLE NEW ACTIVITY
01381  M00S01298.1hy     +++|          LDD    UC
01382  M00S01299.1hy     +++|          NJN    CCRX        IF CURRENT ACTIVITY
01383  M00S01300.1hy     +++|          RJM    DCR         DROP CHANNEL RESERVATION
01384  M00S01301.1hy     +++|*         LDN    0
01385  M00S01302.1hy     +++|          STM    CHRQ        ENABLE NEW ACTIVITY
01386  M00S01303.1hy     +++| CCR1     LDD    CR
01387  M00S01304.1hy     +++|          NJN    CCRX        IF CHANNEL RESERVED
01388  M00S01305.1hy     +++| CCR2     DELAY
01389  M00S01306.1hy     +++|          LDD    IR+4
01390  M00S01307.1hy     +++|          STD    CM+1        ATTEMPT TO RESERVE CHANNEL
01391  M00S01308.1hy     +++|          MONITOR  CCHM
01392  M00S01309.1hy     +++|          LDD    CM+2        SET RESERVATION STATUS
01393  M00S01310.1hy     +++|          STD    CR
01394  M00S01311.1hy     +++|          RJM    RCT         READ CHANNEL TABLE
01395  M00S01312.1hy     +++|          LPN    40
01396  M00S01313.1hy     +++|          ZJN    CCR1        IF CHANNEL NOT DOWN
01397  M00S01314.1hy     +++|          LJM    CCR3        SET DRIVER RELOAD FLAG
01398  M00S01315.1hy     +++| CFE      SPACE  4,10
01399  M00S01316.1hy     +++|**        CFE - CHECK FOR I/O ERROR.
01400  M00S01317.1hy     +++|*
01401  M00S01318.1hy     +++|*         EXIT   (A) = 0.
01402  M00S01319.1hy     +++|*
01403  M00S01320.1hy     +++|*         ERROR  TO *ERR*.
01404  M00S01321.1hy     +++|
01405  M00S01322.1hy     +++|
01406  M00S01323.1hy     +++| CFE3     LDC    FCRE        ACCESS ERROR REGISTER
01407  M00S01324.1hy     +++|          RJM    FCN
01408  M00S01325.1hy     +++|          ACN    CH          SIMULATE REGISTER READ
01409  M00S01326.1hy     +++|          DCN    CH+40
01410  M00S01327.1hy     +++|          CFM    *+2,CH      CLEAR CHANNEL ERROR FLAG
01411  M00S01328.1hy     +++|          LDD    T1
01412  M00S01329.1hy     +++| CFE4     NJN    CFE2        IF INCOMPLETE DATA TRANSFER
01413  M00S01330.1hy     +++|
01414  M00S01331.1hy     +++| CFE      SUBR               ENTRY/EXIT
01415  M00S01332.1hy     +++|          DCN    CH+40
01416  M00S01333.1hy     +++|          CFM    CFE4,CH     IF CHANNEL ERROR FLAG CLEAR
01417  M00S01334.1hy     +++|          STD    T1
01418  M00S01335.1hy     +++|          LDML   WFWA        CHECK OPERATION IN PROGRESS
01419  M00S01336.1hy     +++|          LMC    FWSR
01420  M00S01337.1hy     +++|          ZJN    CFE3        IF SELECTIVE RESET
01421  M00S01338.1hy     +++|          LDN    ECIE
01422  M00S01339.1hy     +++| CFE1     RJM    ERR         PROCESS CHANNEL ERROR
01423  M00S01340.1hy     +++|
01424  M00S01341.1hy     +++| CFE2     STM    RBCT        SAVE RESIDUAL BYTE COUNT
01425  M00S01342.1hy     +++|          LDN    EIDT
01426  M00S01343.1hy     +++|          UJN    CFE1        PROCESS ERROR
01427  M00S01344.1hy     +++| CFR      SPACE  4,10
01428  M00S01345.1hy     +++|**        CFR - CHECK *PUT* FOR REQUEST.
01429  M00S01346.1hy     +++|*
01430  M00S01347.1hy     +++|*         ENTRY  (DI) = DEVICE STATUS BLOCK ADDRESS.
01431  M00S01348.1hy     +++|*
01432  M00S01349.1hy     +++|*         USES   T2, CM - CM+4.
01433  M00S01350.1hy     +++|*
01434  M00S01351.1hy     +++|*         CALLS  CSD, IIO, ISR, SAP.
01435  M00S01352.1hy     +++|*
01436  M00S01353.1hy     +++|*         MACROS PUTE, SFA.
01437  M00S01354.1hy     +++|
01438  M00S01355.1hy     +++|
01439  M00S01356.1hy     +++| CFR3     LDD    WB          EXTRACT UNIT NUMBER
01440  M00S01357.1hy     +++|          LPN    77
01441  M00S01358.1hy     +++|          STD    UN
01442  M00S01359.1hy     +++|          LDD    WB+1
01443  M00S01360.1hy     +++|          STD    EO          SET EST ORDINAL
01444  M00S01361.1hy     +++|          SFA    EST
01445  M00S01362.1hy     +++|          ADK    EQDE        READ EST ENTRY
01446  M00S01363.1hy     +++|          CRD    CM
01447  M00S01364.1hy     +++|          LDD    CM+3
01448  M00S01365.1hy     +++|          LPN    77
01449  M00S01366.1hy     +++|          SBN    1RF         SET DEVICE TYPE
01450  M00S01367.1hy     +++|          SHN    0-1
01451  M00S01368.1hy     +++|          STD    DT
01452  M00S01369.1hy     +++|          LDD    WB+3        SET *CBT* ORDINAL
01453  M00S01370.1hy     +++|          STD    CB
01454  M00S01371.1hy     +++|          LDD    PA
01455  M00S01372.1hy     +++|          ZJN    CFR4        IF NO REQUEST IN PROGRESS
01456  M00S01373.1hy     +++|          RJM    SAP         SELECT ADAPTOR PORT
Line S01374 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01457  M01S01374.ns2769  ---|          LDM    RWST
Line S00038 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01458  M01S00038.ns2769  +++|          LDM    RWST,DI
01459  M00S01375.1hy     +++|          STD    RW          SET READ / WRITE STATUS
01460  M00S01376.1hy     +++|          UJN    CFR6        RETURN TO PROCESSOR
01461  M00S01377.1hy     +++|
01462  M00S01378.1hy     +++| CFR4     LDD    T2
01463  M00S01379.1hy     +++|          ZJN    CFR7        IF NO SPECIAL REQUEST
01464  M00S01380.1hy     +++|          RJM    ISR         IDENTIFY SPECIAL REQUEST
01465  M00S01381.1hy     +++|          ZJN    CFRX        IF UNKNOWN REQUEST
Line S00002 Modification History
M01 (Added by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
01466  M01S00002.ns2512  +++|          LDN    0
01467  M01S00003.ns2512  +++|          STD    CB
01468  M00S01382.1hy     +++| CFR5     RJM    CSD         CONNECT TO *IHD*
01469  M00S01383.1hy     +++|          ZJN    CFRX        IF UNIT UNAVAILABLE
01470  M00S01384.1hy     +++|
01471  M00S01385.1hy     +++|*         EXIT TO PROCESSOR AS APPLICABLE WITH -
01472  M00S01386.1hy     +++|*                (PO) = *PUT* ORDINAL.
01473  M00S01387.1hy     +++|*                (CB) = *CBT* ORDINAL.
01474  M00S01388.1hy     +++|*                (EO) = EST ORDINAL.
01475  M00S01389.1hy     +++|*                (RW) = READ / WRITE STATUS.
01476  M00S01390.1hy     +++|*                (DT) = DEVICE TYPE.
01477  M00S01391.1hy     +++|*                (UN) = UNIT NUMBER.
Line S00004 Modification History
M01 (Added by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
01478  M01S00004.ns2512  +++|*                (RF) = SPECIAL REQUEST FLAGS.
01479  M00S01392.1hy     +++|*                (WB - WB+4) = *UNCT* WORD OF *PUT* ENTRY.
01480  M00S01393.1hy     +++|
01481  M00S01394.1hy     +++| CFR6     LJM    0,PA        RETURN TO PROCESSOR
01482  M00S01395.1hy     +++|
01483  M00S01396.1hy     +++| CFR7     LDD    CB          INITIATE I/O
01484  M00S01397.1hy     +++|          RJM    IIO
01485  M00S01398.1hy     +++|          NJN    CFR5        IF I/O ENABLED ON THIS ACCESS
01486  M00S01399.1hy     +++|
01487  M00S01400.1hy     +++| CFR      SUBR               ENTRY/EXIT
01488  M00S01401.1hy     +++|          LDI    DI
01489  M00S01402.1hy     +++|          ERRNZ  PUTO        CODE DEPENDS ON VALUE
01490  M00S01403.1hy     +++|          STD    PO
01491  M00S01404.1hy     +++|          SHN    PUTLS       READ *PUT* ENTRY
01492  M00S01405.1hy     +++|          PUTE   *
Line S01406 Modification History
M01 (Removed by) ns2703
Seq #  *Modification Id* Act 
----------------------------+
01493  M01S01406.ns2703  ---|          ADC    UNCT        FETCH UNIT CONTROL WORD
Line S00001 Modification History
M01 (Added by) ns2703
Seq #  *Modification Id* Act 
----------------------------+
01494  M01S00001.ns2703  +++|          ADC    PILL        GET INTERLOCK STATUS
01495  M01S00002.ns2703  +++|          CRD    CM
01496  M01S00003.ns2703  +++|          SBN    PILL-UNCT   FETCH UNIT CONTROL WORD
01497  M00S01407.1hy     +++|          CRD    WB
Line S01408 Modification History
M01 (Removed by) ns2703
Seq #  *Modification Id* Act 
----------------------------+
01498  M01S01408.ns2703  ---|          ADN    PILL-UNCT   GET INTERLOCK STATUS
01499  M01S01409.ns2703  ---|          CRD    CM
Line S01410 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01500  M01S01410.ns2769  ---|          LDM    ADDR        CHECK REQUEST PRESENT
Line S00039 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01501  M01S00039.ns2769  +++|          LDM    ADDR,DI     CHECK REQUEST PRESENT
01502  M00S01411.1hy     +++|          STD    PA
01503  M00S01412.1hy     +++|          NJN    CFR2        IF REQUEST IN PROGRESS
01504  M00S01413.1hy     +++|          LDD    CM+3
Line S00005 Modification History
M01 (Added by) ns2512
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01505  M02S00005.271l716 ---|          STD    RF
01506  M02S00006.271l716 ---|          LPN    77          EXTRACT OPERATOR REQUESTS
Line S00026 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
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
Line S00007 Modification History
M01 (Added by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
01510  M01S00007.ns2512  +++|          STD    CM+3
01511  M00S01414.1hy     +++|          SCN    1           CLEAR DEVICE UNAVAILABLE
01512  M00S01415.1hy     +++|          STD    T2
01513  M00S01416.1hy     +++|          NJN    CFR1        IF SPECIAL REQUEST PRESENT
01514  M00S01417.1hy     +++|          LMD    CM+3
01515  M00S01418.1hy     +++|          NJN    CFRX        IF DEVICE UNAVAILABLE FOR I/O
01516  M00S01419.1hy     +++|          ADD    WB+3
01517  M00S01420.1hy     +++|          ZJN    CFRX        IF NO I/O REQUEST
01518  M00S01421.1hy     +++| CFR1     LDD    CM+4
01519  M00S01422.1hy     +++| CFRA     ZJN    CFR2        IF UNIT NOT INTERLOCKED
01520  M00S01423.1hy     +++|          LMD    OA
01521  M00S01424.1hy     +++|          NJN    CFRX        IF NOT INTERLOCKED BY THIS DRIVER
01522  M00S01425.1hy     +++| CFR2     LJM    CFR3
01523  M00S01426.1hy     +++| CFRB     EQU    *-1         (MODIFIED FOR TERMINATION PROCESSING)
01524  M00S01427.1hy     +++| CMC      SPACE  4,10
01525  M00S01428.1hy     +++|**        CMC - CHECK MONITOR COMPLETE.
01526  M00S01429.1hy     +++|*
01527  M00S01430.1hy     +++|*         EXIT   (A) = (CM) = 0.
01528  M00S01431.1hy     +++|*
01529  M00S01432.1hy     +++|*         USES   CM - CM+4.
01530  M00S01433.1hy     +++|*
01531  M00S01434.1hy     +++|*         CALLS  AME.
01532  M00S01435.1hy     +++|*
01533  M00S01436.1hy     +++|*         MACROS DELAY.
01534  M00S01437.1hy     +++|
01535  M00S01438.1hy     +++|
01536  M00S01439.1hy     +++| CMC      SUBR               ENTRY/EXIT
01537  M00S01440.1hy     +++| CMC1     LDD    OA
01538  M00S01441.1hy     +++|          CRD    CM
01539  M00S01442.1hy     +++|          LDD    CM
01540  M00S01443.1hy     +++|          ZJN    CMCX        IF NO REQUEST WAITING FOR RESPONSE
01541  M00S01444.1hy     +++|          SHN    21-13
01542  M00S01445.1hy     +++|          PJN    CMC2        IF NOT TO RETRY REQUEST
01543  M00S01446.1hy     +++|          SHN    13-21
01544  M00S01447.1hy     +++|          LPC    177         CLEAR FLAGS
01545  M00S01448.1hy     +++|          STD    CM
01546  M00S01449.1hy     +++|          LDD    OA          UPDATE OUTPUT REGISTER
01547  M00S01450.1hy     +++|          CWD    CM
01548  M00S01451.1hy     +++|          RJM    AME         REISSUE REQUEST
01549  M00S01452.1hy     +++| CMC2     DELAY
01550  M00S01453.1hy     +++|          UJN    CMC1        RECHECK OUTPUT REGISTER
01551  M00S01454.1hy     +++| CMP      SPACE  4,15
01552  M00S01455.1hy     +++|**        CMP - COMPLETE PROCESSING.
01553  M00S01456.1hy     +++|*
01554  M00S01457.1hy     +++|*         ENTRY  (SF) = DEVICE SELECTED STATUS.
01555  M00S01458.1hy     +++|*                (UC) = UNIT ACTIVITY COUNT.
01556  M00S01459.1hy     +++|*                (RW) = READ / WRITE STATUS.
01557  M00S01460.1hy     +++|*
01558  M00S01461.1hy     +++|*         EXIT   TO *HYD3*.
01559  M00S01462.1hy     +++|*                (SF) = 0.
01560  M00S01463.1hy     +++|*                (UC) = UNIT ACTIVITY COUNT DECREMENTED.
01561  M00S01464.1hy     +++|*
01562  M00S01465.1hy     +++|*         USES   WB+4.
01563  M00S01466.1hy     +++|*
01564  M00S01467.1hy     +++|*         CALLS  CMC, DCB, FCN, IEM, WFC.
01565  M00S01468.1hy     +++|
01566  M00S01469.1hy     +++|
Line S01470 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01567  M01S01470.ns2769  ---| CMP      LDM    ERCT
Line S00040 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01568  M01S00040.ns2769  +++| CMP      LDM    ERCT,DI
01569  M00S01471.1hy     +++|          ZJN    CMP3        IF NO ERRORS
Line S01472 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01570  M01S01472.ns2769  ---|          AOM    ERCT
Line S00041 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01571  M01S00041.ns2769  +++|          AOM    ERCT,DI
Line S01473 Modification History
M01 (Removed by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
01572  M01S01473.272l774 ---| CMP1     LDN    HD0105-HD0100
Line S00001 Modification History
M01 (Added by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
01573  M01S00001.272l774 +++| CMP1     LDN    HD0111-HD0100
01574  M00S01474.1hy     +++|          RJM    IEM         ISSUE FINAL MESSAGE
01575  M00S01475.1hy     +++|*         LDN    0
Line S01476 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01576  M01S01476.ns2769  ---| CMP2     STM    ERCT        CLEAR ERROR COUNT
01577  M01S01477.ns2769  ---| CMP3     STM    IPPS
Line S00042 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01578  M01S00042.ns2769  +++| CMP2     STM    ERCT,DI     CLEAR ERROR COUNT
01579  M01S00043.ns2769  +++| CMP3     STM    IPPS,DI
01580  M00S01478.1hy     +++| CMP4     LDD    SF
01581  M00S01479.1hy     +++|          ZJN    CMP5        IF DEVICE NOT SELECTED
01582  M00S01480.1hy     +++|          LDC    FWCA
01583  M00S01481.1hy     +++|          RJM    WFC         CLEAR ATTENTION
01584  M00S01482.1hy     +++|          LDC    FCCH
01585  M00S01483.1hy     +++|          RJM    FCN         CLEAR SELECT HOLD
01586  M00S01484.1hy     +++|          SOD    SF
01587  M00S01485.1hy     +++| CMP5     LDD    RW          SET DATA TRANSFER DIRECTION
01588  M00S01486.1hy     +++|          SHN    13-0
Line S01487 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01589  M01S01487.ns2769  ---|          LMM    CBCT        APPEND CUMULATIVE BUFFER COUNT
Line S00044 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01590  M01S00044.ns2769  +++|          LMM    CBCT,DI     APPEND CUMULATIVE BUFFER COUNT
01591  M00S01488.1hy     +++|          STD    WB+4
Line S01489 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01592  M01S01489.ns2769  ---|          LDM    RQIN        SET UP *CBT* LIST
Line S00045 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01593  M01S00045.ns2769  +++|          LDM    RQIN,DI     SET UP *CBT* LIST
01594  M00S01490.1hy     +++|          LMC    4000
01595  M00S01491.1hy     +++|          RJM    DCB         DELINK BUFFERS / RELEASE UNIT INTERLOCK
01596  M00S01492.1hy     +++|          LDD    WB+3
01597  M00S01493.1hy     +++|          SHN    0-13
01598  M00S01494.1hy     +++|          ZJN    CMP6        IF UNIT INTERLOCK NOT RELEASED
01599  M00S01495.1hy     +++|          SOD    UC
01600  M00S01496.1hy     +++|          LDN    0           CLEAR REQUEST IN PROGRESS
Line S01497 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01601  M01S01497.ns2769  ---| CMP6     STM    ADDR
01602  M01S01498.ns2769  ---|          STM    CBCT        CLEAR *CBT* COUNT
01603  M01S01499.ns2769  ---|          STM    RQIN
01604  M01S01500.ns2769  ---|          STM    SREQ
Line S00046 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01605  M01S00046.ns2769  +++| CMP6     STM    ADDR,DI
01606  M01S00047.ns2769  +++|          STM    CBCT,DI     CLEAR *CBT* COUNT
01607  M01S00048.ns2769  +++|          STM    RQIN,DI
01608  M01S00049.ns2769  +++|          STM    SREQ,DI
01609  M00S01501.1hy     +++|          RJM    CMC
01610  M00S01502.1hy     +++|          LJM    HYD3        RETURN
01611  M00S01503.1hy     +++| CMPA     EQU    *-1
01612  M00S01504.1hy     +++|
01613  M00S01505.1hy     +++| CMP7     LDN    0           SET REQUEST QUEUE EMPTY
Line S01506 Modification History
M01 (Removed by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01614  M01S01506.ns2769  ---|          STM    RQIN
Line S00050 Modification History
M01 (Added by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01615  M01S00050.ns2769  +++|          STM    RQIN,DI
01616  M00S01507.1hy     +++|          UJP    CMP5        RELEASE UNIT INTERLOCK
01617  M00S01508.1hy     +++| COS      SPACE  4,10
01618  M00S01509.1hy     +++|**        COS - CHECK OPERATIONAL STATUS.
01619  M00S01510.1hy     +++|*
01620  M00S01511.1hy     +++|*         ENTRY  (A) = POSITIVE MASK TO RETURN ON BIT(S) SET.
01621  M00S01512.1hy     +++|*                    = NEGATIVE MASK TO RETURN ON BIT(S) CLEAR.
01622  M00S01513.1hy     +++|*
01623  M00S01514.1hy     +++|*         EXIT   (A) = 0 IF CONDITION SET.
01624  M00S01515.1hy     +++|*                    .LT. 0 IF TIMEOUT.
01625  M00S01516.1hy     +++|*
01626  M00S01517.1hy     +++|*         ERROR  TO *ERR* IF ADAPTOR DROPPED SELECT ACTIVE.
01627  M00S01518.1hy     +++|*
01628  M00S01519.1hy     +++|*         USES   T2, T3.
01629  M00S01520.1hy     +++|*
01630  M00S01521.1hy     +++|*         CALLS  CTO, R1B.
01631  M00S01522.1hy     +++|
01632  M00S01523.1hy     +++|
01633  M00S01524.1hy     +++| COS3     SHN    12
01634  M00S01525.1hy     +++|          LPDL   T2          CHECK CONDITION MET
01635  M00S01526.1hy     +++|          LMDL   T3
01636  M00S01527.1hy     +++|          ZJN    COSX        IF CONDITION SET
01637  M00S01528.1hy     +++|          RJM    CTO
01638  M00S01529.1hy     +++|          MJN    COS2        IF NOT TIMEOUT
01639  M00S01530.1hy     +++|          LCN    0
01640  M00S01531.1hy     +++|
01641  M00S01532.1hy     +++| COS      SUBR               ENTRY/EXIT
01642  M00S01533.1hy     +++|          STDL   T2
01643  M00S01534.1hy     +++|          PJN    COS1        IF RETURN ON BIT(S) SET
01644  M00S01535.1hy     +++|          LMC    -0
01645  M00S01536.1hy     +++|          STDL   T2          COMPLEMENT MASK
01646  M00S01537.1hy     +++|          LDN    0
01647  M00S01538.1hy     +++| COS1     STDL   T3
01648  M00S01539.1hy     +++| COS2     LDC    FCRO        GET OPERATIONAL STATUS
01649  M00S01540.1hy     +++|          RJM    R1B
01650  M00S01541.1hy     +++|          SHN    21-11
01651  M00S01542.1hy     +++|          MJN    COS3        IF *SELECT* ACTIVE
01652  M00S01543.1hy     +++|          LDN    EDSA
01653  M00S01544.1hy     +++|          RJM    ERR         PROCESS ERROR
01654  M00S01545.1hy     +++| CPF      SPACE  4,10
01655  M00S01546.1hy     +++|**        CLEAR *PUT* FLAG.
01656  M00S01547.1hy     +++|*
01657  M00S01548.1hy     +++|*         ENTRY  (A) = BIT NUMBER TO CLEAR IN *PILL* WORD.
01658  M00S01549.1hy     +++|*
01659  M00S01550.1hy     +++|*         EXIT   (A) = 0.
01660  M00S01551.1hy     +++|*
01661  M00S01552.1hy     +++|*         USES   T6, T7, CM - CM+4.
01662  M00S01553.1hy     +++|*
01663  M00S01554.1hy     +++|*         CALLS  CMC.
01664  M00S01555.1hy     +++|*
01665  M00S01556.1hy     +++|*         MACROS MONITOR, PUTE.
01666  M00S01557.1hy     +++|
01667  M00S01558.1hy     +++|
01668  M00S01559.1hy     +++| CPF      SUBR               ENTRY/EXIT
01669  M00S01560.1hy     +++|          SHN    6
01670  M00S01561.1hy     +++|          STD    T7          SET BIT NUMBER
01671  M00S01562.1hy     +++|          LDC    PILL*100+1
01672  M00S01563.1hy     +++|          STD    T6          WORD OFFSET + FIELD WIDTH
01673  M00S01564.1hy     +++|          RJM    CMC
01674  M00S01565.1hy     +++|*         LDN    0           CLEAR UNUSED BYTE
01675  M00S01566.1hy     +++|          STD    CM+2
01676  M00S01567.1hy     +++|          LDD    MA          STORE MESSAGE BUFFER PARAMETERS
01677  M00S01568.1hy     +++|          CWD    T6
01678  M00S01569.1hy     +++|          LDN    1           PARAMETER WORD COUNT
01679  M00S01570.1hy     +++|          STD    CM+1
01680  M00S01571.1hy     +++|          LDD    PO
01681  M00S01572.1hy     +++|          SHN    PUTLS
01682  M00S01573.1hy     +++|          PUTE   *
01683  M00S01574.1hy     +++|          ADC    0           SET BASE *PUT* ENTRY ADDRESS
01684  M00S01575.1hy     +++|          STD    CM+4
01685  M00S01576.1hy     +++|          SHN    -14
01686  M00S01577.1hy     +++|          STD    CM+3
01687  M00S01578.1hy     +++|          MONITOR  UTEM      CLEAR *PUT* FLAG
01688  M00S01579.1hy     +++|*         LDN    0
01689  M00S01580.1hy     +++|          UJN    CPFX        RETURN
01690  M00S01581.1hy     +++| CSD      SPACE  4,15
01691  M00S01582.1hy     +++|**        CSD - CONNECT TO SLAVE DEVICE.
01692  M00S01583.1hy     +++|*
01693  M00S01584.1hy     +++|*         ENTRY  (UN) = UNIT NUMBER.
Line S00008 Modification History
M01 (Added by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
01694  M01S00008.ns2512  +++|*                (CB) = *CBT* ORDINAL IF I/O REQUEST.
01695  M00S01585.1hy     +++|*                (CM - CM+4) = EST ENTRY.
01696  M00S01586.1hy     +++|*
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/1hy.txt ยท Last modified: (external edit)