User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:1da.008

Deck 1DA Part 008

24 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
Line S00065 Modification History
M01 (Added by) ns2767
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09152  M02S00065.ns2783  ---|          LPC    77777
09153  M02S00066.ns2783  ---|          STML   DVTP,DI
Line S00460 Modification History
M01 (Added by) 1da8
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09154  M02S00460.ns2783  ---|          LDN    0           ENABLE NEXT PASS THROUGH ERROR PROCESSING
09155  M02S00461.ns2783  ---|          STM    ERRA
09156  M02S00462.ns2783  ---|          RJM    CEP         CLEAR ERROR PROCESSING INTERLOCK
Line S00182 Modification History
M01 (Added by) 1da7
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09157  M02S00182.ns2783  ---|          LDM    RDRV,DI     DRIVE JUST RESTORED
Line S02082 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09158  M01S02082.ns2783  +++| ROD5     AOM    RCYL        INCREMENT CYLINDER TO RESTORE
09159  M01S02083.ns2783  +++|          SBM    CYUN,DT     CYLINDERS REMAINING
09160  M01S02084.ns2783  +++|          MJN    ROD6        IF MORE CYLINDERS TO RESTORE
09161  M01S02085.ns2783  +++|          NJN    ROD7        IF NO MORE CYLINDERS TO RESTORE
09162  M01S02086.ns2783  +++| ROD6     LJM    CMP         COMPLETION PROCESSING
09163  M01S02087.ns2783  +++|
09164  M01S02088.ns2783  +++|*         RESTORE COMPLETE.
09165  M01S02089.ns2783  +++|
09166  M01S02090.ns2783  +++| ROD7     RJM    CRP         CLEAR *RESTORE IN PROGRESS* FLAGS
09167  M01S02091.ns2783  +++|          RJM    CLP         CLEAR *LOST PARITY* FLAGS
09168  M01S02092.ns2783  +++|          LDM    OUPD,DI     DRIVE JUST RESTORED
Line S00183 Modification History
M01 (Added by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
09169  M01S00183.1da7    +++|          STM    PHYD,DI
09170  M01S00184.1da7    +++|          LDN    EROD        RESTORE COMMAND
09171  M01S00185.1da7    +++|          STM    EDBF+CODE
09172  M01S00186.1da7    +++|          LDC    PDPE        PARITY DRIVE PROTECTION ENABLED
09173  M01S00187.1da7    +++|          STM    EDBF+FALT   FINAL FAULT CODE
09174  M00S04863.1da     +++|          LDN    0
09175  M00S04864.1da     +++|          STM    EDBF+FCS1
09176  M00S04865.1da     +++|          STM    EDBF+FCS2
09177  M00S04866.1da     +++|          STM    EDBF+FCS3
Line S04867 Modification History
M01 (Removed by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
09178  M01S04867.1da7    ---|          LDN    EROD        RESTORE COMMAND
09179  M01S04868.1da7    ---|          STM    EDBF+CODE
09180  M01S04869.1da7    ---|          LDC    PDPE        PARITY DRIVE PROTECTION ENABLED
09181  M01S04870.1da7    ---|          STM    EDBF+FALT   FINAL FAULT CODE
09182  M01S04871.1da7    ---|          LDM    RDRV,DI     DRIVE JUST RESTORED
09183  M01S04872.1da7    ---|          STM    PHYD,DI
Line S00188 Modification History
M01 (Added by) 1da7
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09184  M02S00188.ns2783  ---| ROD4.2   RJM    LNU         SEARCH FOR LINKED PARTITION USING (EO)
09185  M02S00189.ns2783  ---|          ZJN    ROD4.3      IF NO MORE PARTITIONS
Line S02093 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09186  M01S02093.ns2783  +++|*         LDN    0           INITIALIZE PARTITION SEARCH
09187  M01S02094.ns2783  +++| ROD8     RJM    LNE         LOCATE NEXT EST FOR THIS DEVICE
09188  M01S02095.ns2783  +++|          ZJN    ROD9        IF NO MORE PARTITIONS
Line S00311 Modification History
M01 (Added by) 273l780
M02 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09189  M02S00311.1da8    ---|          LDC    IEMB        ADDRESS OF MESSAGE
Line S00463 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09190  M01S00463.1da8    +++|          LDC    ERPR        *EQXXX, UXX, PARITY PROTECTION RESTORED.*
Line S00312 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
09191  M01S00312.273l780 +++|          RJM    IEM         ISSUE ERROR LOG MESSAGE
Line S00313 Modification History
M01 (Added by) 273l780
M02 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
09192  M02S00313.283l840 ---|          LDN    0           NEW VALUE INDICATES RESTORE COMPLETE
Line S00190 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09193  M02S00190.ns2783  ---|          RJM    CRP         CLEAR *RESTORE IN PROGRESS* FLAG
09194  M02S00191.ns2783  ---|          LDN    0           CLEAR OFF-LINE DRIVE INFORMATION
Line S00314 Modification History
M01 (Added by) 273l780
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09195  M02S00314.ns2783  ---|          STD    CM+2
Line S00315 Modification History
M01 (Added by) 273l780
M02 (Removed by) 283l840
M03 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09196  M03S00315.ns2783  ---|          LDC    64*100      LOW ORDER BIT TO CHANGE TIMES 100
Line S00192 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09197  M02S00192.ns2783  ---|          LDC    65*100      LOW ORDER BIT TO CHANGE TIMES 100
Line S00316 Modification History
M01 (Added by) 273l780
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09198  M02S00316.ns2783  ---|          STD    T7
Line S00317 Modification History
M01 (Added by) 273l780
M02 (Removed by) 283l840
M03 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09199  M03S00317.ns2783  ---|          LDC    BDLL*100+10 6/WORD, 6/BITS TO CHANGE
Line S00193 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09200  M02S00193.ns2783  ---|          LDC    BDLL*100+7  6/WORD, 6/BITS TO CHANGE
Line S00318 Modification History
M01 (Added by) 273l780
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09201  M02S00318.ns2783  ---|          RJM    UBP         UPDATE *BDLL* PARAMETER
Line S04873 Modification History
M01 (Removed by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
09202  M01S04873.1da7    ---|          LDN    4
Line S00190 Modification History
M01 (Added by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
09203  M01S00190.1da7    +++|          LDD    EO
Line S00191 Modification History
M01 (Added by) 1da7
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09204  M02S00191.ns2783  ---|          UJN    ROD4.2      PROCESS NEXT PARTITION
Line S02096 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09205  M01S02096.ns2783  +++|          UJN    ROD8        PROCESS NEXT PARTITION
Line S00192 Modification History
M01 (Added by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
09206  M01S00192.1da7    +++|
Line S00193 Modification History
M01 (Added by) 1da7
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09207  M02S00193.ns2783  ---| ROD4.3   LDN    4
Line S02097 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09208  M01S02097.ns2783  +++| ROD9     LDN    4
09209  M00S04874.1da     +++|          STM    MSGL+1      SET BASIC MESSAGE LENGTH
Line S04875 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
09210  M01S04875.273l780 ---|          LJM    CMP1        ISSUE FINAL BML MESSAGE
09211  M01S04876.273l780 ---|
Line S00319 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
09212  M01S00319.273l780 +++|          AOM    ERCT,DI
09213  M01S00320.273l780 +++|          LDD    HN
09214  M01S00321.273l780 +++|          ERRNZ  HD0100-100  CODE DEPENDS ON VALUE
Line S00322 Modification History
M01 (Added by) 273l780
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09215  M02S00322.ns2783  ---|          RJM    IDM         ISSUE BML MESSAGE
Line S02098 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09216  M01S02098.ns2783  +++|          RJM    IDM         ISSUE *PARITY RESTORED* BML MESSAGE
Line S04877 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09217  M01S04877.284l847 ---| ROD4     LJM    CMP         COMPLETION PROCESSING
09218  M01S04878.284l847 ---|
09219  M01S04879.284l847 ---| ROD5     LDDL   MS
09220  M01S04880.284l847 ---|          LMC    0#42
09221  M01S04881.284l847 ---|          NJN    ROD6        IF NOT CONDITIONAL SUCCESS
09222  M01S04882.284l847 ---|          LDDL   PA
09223  M01S04883.284l847 ---|          STML   ATTN,DI     EXPECT A COMMAND COMPLETE RESPONSE
Line S04884 Modification History
M01 (Removed by) 283l840
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09224  M02S04884.284l847 ---| ROD6     LCN    EROD
Line S00194 Modification History
M01 (Added by) 283l840
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09225  M02S00194.284l847 ---| ROD6     LCN    EROD        RESTORE OFF-LINE DRIVE ERROR
Line S04885 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09226  M01S04885.284l847 ---|          UJN    ROD8        PROCESS ERROR
09227  M01S04886.284l847 ---|
Line S04887 Modification History
M01 (Removed by) 283l840
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09228  M02S04887.284l847 ---| ROD7     LDN    ECMD
Line S00195 Modification History
M01 (Added by) 283l840
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09229  M02S00195.284l847 ---| ROD7     LDN    ECMD        CONTROLLER DEAD
Line S04888 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09230  M01S04888.284l847 ---| ROD8     RJM    ERR         PROCESS ERROR
Line S00526 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09231  M01S00526.284l847 +++|          LJM    CMP         COMPLETION PROCESSING
Line S02099 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09232  M01S02099.ns2783  +++|
09233  M01S02100.ns2783  +++|
09234  M01S02101.ns2783  +++| RCYL     CON    0           CURRENT CYLINDER BEING RESTORED
09235  M01S02102.ns2783  +++| RMUX     CON    0           1/X, 15/Y WHERE
09236  M01S02103.ns2783  +++|                               X = 0 IF MULTIPLEXING ALLOWED
09237  M01S02104.ns2783  +++|                               Y = REQUESTS TO MULTIPLEX PER RESTORE
09238  M01S02105.ns2783  +++| RSDI     CON    0           RESTORE IN PROGRESS FLAG (*DST* INDEX)
09239  M01S02106.ns2783  +++| RSIN     CON    0           RESTORE INTERLOCK FLAG (*DST* INDEX)
09240  M01S02107.ns2783  +++| RTSN     CON    0           6 / RESTORE TRACK, 6 / RESTORE SECTOR
09241  M00S04889.1da     +++| SCD      SPACE  4,15
09242  M00S04890.1da     +++|**        SCD - STORE *CPD* DATA.
09243  M00S04891.1da     +++|*
09244  M00S04892.1da     +++|*         ENTRY  (A) = 0 TO INDICATE CHANNEL INACTIVE.
09245  M00S04893.1da     +++|*                    = 1 TO INDICATE CHANNEL ACTIVE.
09246  M00S04894.1da     +++|*                (UC) = UNIT ACTIVITY COUNT.
09247  M00S04895.1da     +++|*
09248  M00S04896.1da     +++|*         EXIT   (T7) = 0.
09249  M00S04897.1da     +++|*
09250  M00S04898.1da     +++|*         USES   CM - CM+2, T5 - T7.
09251  M00S04899.1da     +++|*
09252  M00S04900.1da     +++|*         MACROS CCTE.
09253  M00S04901.1da     +++|
09254  M00S04902.1da     +++|
09255  M00S04903.1da     +++| SCD      SUBR               ENTRY/EXIT
09256  M00S04904.1da     +++|          STD    T5
09257  M00S04905.1da     +++|          LDN    ZERL        CLEAR UNUSED BYTES
09258  M00S04906.1da     +++|          CRD    T6
09259  M00S04907.1da     +++|          LDD    UC          INSERT UNIT COUNT
09260  M00S04908.1da     +++|          STD    T6
09261  M00S04909.1da     +++|          CCTE   *
09262  M00S04910.1da     +++|          LDC    CREQ        STORE *CPD* DATA
09263  M00S04911.1da     +++|          CWD    T5
09264  M00S04912.1da     +++|          UJN    SCDX        RETURN
09265  M00S04913.1da     +++| SCP      SPACE  4,10
09266  M00S04914.1da     +++|**        SCP - SET COMMAND PARAMETER.
09267  M00S04915.1da     +++|*
09268  M00S04916.1da     +++|*         ENTRY  (A) = COMMAND PARAMETER.
Line S04917 Modification History
M01 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09269  M01S04917.1da8    ---|*                (DI) = DEVICE STATUS BLOCK ADDRESS.
Line S00464 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09270  M01S00464.1da8    +++|*                (DI) = DEVICE STATE TABLE ADDRESS.
Line S02108 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09271  M01S02108.ns2783  +++|*                (DDTA) = TOTAL NUMBER OF DRIVES IN LOGICAL UNIT.
09272  M00S04918.1da     +++|*
09273  M00S04919.1da     +++|*         EXIT   (A) = 0 IF 1X DRIVE.
09274  M00S04920.1da     +++|*                (CPBF+CUN) = LOGICAL ADDRESS.
09275  M00S04921.1da     +++|
09276  M00S04922.1da     +++|
09277  M00S04923.1da     +++| SCP      SUBR               ENTRY/EXIT
09278  M00S04924.1da     +++|          STML   CPBF+FCP
Line S04925 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09279  M01S04925.ns2783  ---|          LDML   TOTD,DI     TOTAL DRIVES
Line S02109 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09280  M01S02109.ns2783  +++|          LDML   DDTA        TOTAL DRIVES
09281  M00S04926.1da     +++|          LMN    1
09282  M00S04927.1da     +++|          ZJN    SCPX        IF SINGLE DRIVE
09283  M00S04928.1da     +++|          LDML   CPBF+CUN
09284  M00S04929.1da     +++|          SCN    0#38
09285  M00S04930.1da     +++|          STML   CPBF+CUN    ENSURE STRING BIT CLEAR
09286  M00S04931.1da     +++|          LDN    1
09287  M00S04932.1da     +++|          UJN    SCPX        RETURN
09288  M00S04933.1da     +++| SDO      SPACE  4,15
09289  M00S04934.1da     +++|**        SDO - SET DRIVE OFF-LINE.
09290  M00S04935.1da     +++|*
Line S04936 Modification History
M01 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09291  M01S04936.1da8    ---|*         ENTRY  (DI) = DEVICE STATUS BLOCK ADDRESS.
Line S00465 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09292  M01S00465.1da8    +++|*         ENTRY  (DI) = DEVICE STATE TABLE ADDRESS.
Line S02110 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09293  M01S02110.ns2783  +++|*                (EO) = EST ORDINAL.
09294  M01S02111.ns2783  +++|*                (PD) = 0, IF NOT PARITY DEVICE.
09295  M00S04937.1da     +++|*                (CPEA) = 0 IF DRIVE SHOULD BE SET OFF-LINE.
09296  M00S04938.1da     +++|*                (PHYD,DI) = FAILING DRIVE.
09297  M00S04939.1da     +++|*
09298  M00S04940.1da     +++|*         EXIT   TO CALLER IF NO DRIVE TO SET OFF-LINE.
Line S04941 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
09299  M01S04941.273l780 ---|*                TO *CMP7* WITH ERCT CLEAR IF DRIVE SET OFF-LINE.
Line S00323 Modification History
M01 (Added by) 273l780
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09300  M02S00323.ns2783  ---|*                TO *CMP7* WITH *ERCT* CLEAR IF DRIVE SET OFF-LINE.
Line S02112 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09301  M01S02112.ns2783  +++|*                TO *CMP10* WITH *ERCT* CLEAR IF DRIVE SET OFF-LINE.
09302  M00S04942.1da     +++|*                TO *ERR* IF ERROR.
09303  M00S04943.1da     +++|*
Line S04944 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
09304  M01S04944.273l780 ---|*         CALLS  ATT, IDM, SOU, WCB.
Line S00324 Modification History
M01 (Added by) 273l780
M02 (Removed by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
09305  M02S00324.1da7    ---|*         CALLS  ATT, CRP, IDM, RDO, SOU, WCB.
Line S00194 Modification History
M01 (Added by) 1da7
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09306  M02S00194.ns2783  ---|*         CALLS  ATT, CRP, IDM, IEE, LNU, RDO, SOU, WCB.
Line S02113 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09307  M01S02113.ns2783  +++|*         CALLS  ATT, CRP, IDM, IEM, LNE, RDO, SOU, WCB.
09308  M00S04945.1da     +++|
09309  M00S04946.1da     +++|
09310  M00S04947.1da     +++| SDO      SUBR               ENTRY/EXIT
09311  M01S02114.ns2783  +++|          LDD    PD
09312  M01S02115.ns2783  +++|          ZJN    SDOX        IF NOT PARITY DEVICE
09313  M00S04948.1da     +++|          LDM    CPEA
09314  M00S04949.1da     +++|          NJN    SDOX        IF NO DRIVE TO SET OFF-LINE
Line S04950 Modification History
M01 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09315  M01S04950.1da8    ---|          STM    ESAD,DI     SO ERROR WILL BE LOGGED
Line S00466 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09316  M01S00466.1da8    +++|          STM    ERRA        ENABLE LOGGING OF ERROR
Line S02116 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09317  M01S02116.ns2783  +++|          RJM    CRP         CLEAR *RESTORE IN PROGRESS*, IF SET
09318  M00S04951.1da     +++|          LDC    C0209       LOAD ATTRIBUTE OPERATION CODE
09319  M00S04952.1da     +++|          RJM    SOU         SET OPERATION CODE AND UNIT
09320  M00S04953.1da     +++|          LDC    P02D5
09321  M00S04954.1da     +++|          STML   CPBF+FCP    PARAMETER WITH FAILING DRIVE NUMBER
09322  M00S04955.1da     +++|          LDM    PHYD,DI
09323  M01S02117.ns2783  +++|          STM    OUPD,DI     OFFLINE DRIVE UNIT NUMBER
09324  M00S04956.1da     +++|          SHN    10
09325  M00S04957.1da     +++|          STML   CPBF+FCP+1  FAILING DRIVE NUMBER
09326  M00S04958.1da     +++|          LDC    0#1D9
09327  M00S04959.1da     +++|          STML   CPBF+FCP+2  PARAMETER TO SET OFF-LINE DRIVE
Line S04960 Modification History
M01 (Removed by) ns2767
Seq #  *Modification Id* Act 
----------------------------+
09328  M01S04960.ns2767  ---|          LDM    DVTP,DI
09329  M01S04961.ns2767  ---|          STM    DVTP,DI     ENSURE INTERNAL REQUEST BITS ARE CLEAR
Line S00325 Modification History
M01 (Added by) 273l780
M02 (Removed by) ns2767
Seq #  *Modification Id* Act 
----------------------------+
09330  M02S00325.ns2767  ---|          RJM    CRP         CLEAR RESTORE IN PROGRESS IN *BDLL*
Line S00067 Modification History
M01 (Added by) ns2767
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09331  M02S00067.ns2783  ---|          LDML   DVTP,DI     CLEAR *RESTORE IN PROGRESS* FLAG
09332  M02S00068.ns2783  ---|          LPC    77777
09333  M02S00069.ns2783  ---|          STML   DVTP,DI
Line S00070 Modification History
M01 (Added by) ns2767
M02 (Removed by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
09334  M02S00070.1da7    ---|          RJM    CRP         CLEAR *RESTORE IN PROGRESS* IN *BDLL*
09335  M00S04962.1da     ---|          LDN    14          COMMAND PACKET LENGTH
09336  M00S04963.1da     ---|          RJM    WCB         WRITE COMMAND BLOCK
09337  M00S04964.1da     ---|          LDN    CMSS
09338  M00S04965.1da     ---|          RJM    ATT         WAIT FOR ATTENTION
09339  M00S04966.1da     ---|          ZJN    SDO1        IF SUCCESSFUL
Line S04967 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
09340  M01S04967.283l840 ---|          LCN    ERDA
Line S00196 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
09341  M01S00196.283l840 +++|          LCN    ERDA        REPORT DRIVE ATTRIBUTES ERROR
09342  M00S04968.1da     +++|          RJM    ERR         PROCESS ERROR
09343  M00S04969.1da     +++|
Line S00326 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
09344  M01S00326.273l780 +++|*         *HPA* DOES NOT DISPLAY THE DATA WITH SYMPTOM 0111 WHEN THE
09345  M01S00327.273l780 +++|*         ERROR IS RECOVERABLE, SO TWO MESSAGES ARE ISSUED TO THE BML.
09346  M01S00328.273l780 +++|
09347  M00S04970.1da     +++| SDO1     AOM    ERCT,DI
09348  M01S00329.273l780 +++|          LCN    0
09349  M01S00330.273l780 +++|          STM    EDBF+FCS2   INDICATE NO RESPONSE FOR HPA
09350  M00S04971.1da     +++|          LDC    PDPD        PARITY DRIVE PROTECTION DISABLED
09351  M00S04972.1da     +++|          STM    EDBF+FALT   FINAL FAULT CODE
Line S04973 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
09352  M01S04973.273l780 ---|          LDC    HD0111      ISSUE FINAL BML MESSAGE
09353  M01S04974.273l780 ---|          RJM    IDM
Line S00331 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
09354  M01S00331.273l780 +++|          LDD    HN
09355  M01S00332.273l780 +++|          ERRNZ  HD0100-100  CODE DEPENDS ON VALUE
09356  M01S00333.273l780 +++|          RJM    IDM         ISSUE INITIAL BML MESSAGE
09357  M01S00334.273l780 +++|          LDN    3
09358  M01S00335.273l780 +++|          STM    MSGL+1      MESSAGE LENGTH
09359  M01S00336.273l780 +++|          LDC    HD0111
09360  M01S00337.273l780 +++|          RJM    IDM         ISSUE FINAL BML MESSAGE
Line S04975 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09361  M01S04975.ns2783  ---|*         LDN    0
09362  M00S04976.1da     ---|          STM    ERCT,DI     CLEAR ERROR COUNT
Line S00195 Modification History
M01 (Added by) 1da7
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09363  M02S00195.ns2783  ---| SDO2     RJM    LNU         SEARCH FOR LINKED PARTITION USING (EO)
Line S02118 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09364  M01S02118.ns2783  +++|*         LDN    0           INITIALIZE PARTITION SEARCH
09365  M01S02119.ns2783  +++| SDO2     RJM    LNE         LOCATE NEXT EST FOR THIS DEVICE
Line S00196 Modification History
M01 (Added by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
09366  M01S00196.1da7    +++|          ZJN    SDO3        IF NO MORE PARTITIONS
Line S00197 Modification History
M01 (Added by) 1da7
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09367  M02S00197.ns2783  ---|          RJM    CRP         CLEAR *RESTORE IN PROGRESS* IN *BDLL*
Line S00338 Modification History
M01 (Added by) 273l780
M02 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09368  M02S00338.1da8    ---|          LDC    IEMA        ADDRESS OF MESSAGE
Line S00467 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09369  M01S00467.1da8    +++|          LDC    ERPD        *EQXXX, UXX, PARITY PROTECTION DISABLED.*
Line S00339 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
09370  M01S00339.273l780 +++|          RJM    IEM         ISSUE ERROR LOG MESSAGE
Line S00340 Modification History
M01 (Added by) 273l780
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09371  M02S00340.ns2783  ---|          RJM    RDO         REPORT DRIVE OFF-LINE
Line S00198 Modification History
M01 (Added by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
09372  M01S00198.1da7    +++|          LDD    EO
09373  M01S00199.1da7    +++|          UJN    SDO2        PROCESS NEXT PARTITION
09374  M01S00200.1da7    +++|
Line S00201 Modification History
M01 (Added by) 1da7
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09375  M02S00201.ns2783  ---| SDO3     RJM    IEE         ISSUE E,E EVENT
Line S00001 Modification History
M01 (Added by) 1da5
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09376  M02S00001.ns2783  ---|          LDC    4000        CLEAR BUFFER COUNT
09377  M02S00002.ns2783  ---|          STM    RQLN,DI
Line S04977 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09378  M01S04977.ns2783  ---|          LJM    CMP7        EXIT
Line S02120 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09379  M01S02120.ns2783  +++| SDO3     RJM    RDO         REPORT DRIVE OFF-LINE
09380  M01S02121.ns2783  +++|          LJM    CMP10       ABANDON REQUEST (RETRY LATER)
09381  M00S04978.1da     +++| SDT      SPACE  4,10
09382  M00S04979.1da     +++|**        SDT - SET DATA TRANSFER MODE.
09383  M00S04980.1da     +++|*
09384  M00S04981.1da     +++|*         ENTRY  (TM) = 0 TO STREAM DATA.
09385  M00S04982.1da     +++|*
09386  M00S04983.1da     +++|*         EXIT   TO *ERR* IF ERROR.
09387  M00S04984.1da     +++|*
09388  M00S04985.1da     +++|*         CALLS  ATT, SOC, WCB.
09389  M00S04986.1da     +++|
09390  M00S04987.1da     +++|
09391  M00S04988.1da     +++| SDT      SUBR               ENTRY/EXIT
09392  M00S04989.1da     +++|          LDC    C0209       LOAD ATTRIBUTE OPERATION CODE
09393  M00S04990.1da     +++|          RJM    SOC         SET OPERATION CODE AND CONTROLLER
09394  M00S04991.1da     +++|          LDC    0#46E
09395  M00S04992.1da     +++|          STML   CPBF+FCP    PARAMETER 6E
09396  M00S04993.1da     +++|          LDDL   TM
09397  M00S04994.1da     +++|          ADC    0#C080
09398  M00S04995.1da     +++|          STML   CPBF+FCP+1  MODE FOR DATA
09399  M00S04996.1da     +++|          LDN    0
09400  M00S04997.1da     +++|          STML   CPBF+FCP+2
09401  M00S04998.1da     +++|          LDN    14          COMMAND PACKET LENGTH
09402  M00S04999.1da     +++|          RJM    WCB         WRITE COMMAND PACKET
09403  M00S05000.1da     +++|          LDN    CMSS
09404  M00S05001.1da     +++|          RJM    ATT         PROCESS ATTENTION
09405  M00S05002.1da     +++|          ZJP    SDTX        IF SUCCESSFUL
Line S05003 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
09406  M01S05003.283l840 ---|          LCN    ELCA
Line S00197 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
09407  M01S00197.283l840 +++|          LCN    ELCA        LOAD CONTROLLER ATTRIBUTES FAILURE
09408  M00S05004.1da     +++|          RJM    ERR         PROCESS ERROR
09409  M00S05005.1da     +++| SEC      SPACE  4,15
09410  M00S05006.1da     +++|**        SEC - SET ERROR CODE.
09411  M00S05007.1da     +++|*
Line S05008 Modification History
M01 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09412  M01S05008.1da8    ---|*         ENTRY  (EO) = EST ORDINAL.
09413  M01S05009.1da8    ---|*                (DI) = DEVICE STATUS BLOCK ADDRESS.
Line S00468 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09414  M01S00468.1da8    +++|*         ENTRY  (CI) = CONTROLLER STATE TABLE ADDRESS.
09415  M01S00469.1da8    +++|*                (DI) = DEVICE STATE TABLE ADDRESS.
09416  M01S00470.1da8    +++|*                (EO) = EST ORDINAL.
09417  M00S05010.1da     +++|*
Line S05011 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09418  M01S05011.ns2783  ---|*         USES   RF, T4, T5, UC, WB+3, WB+4, CM - CM+4.
Line S02122 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09419  M01S02122.ns2783  +++|*         USES   RF, T5, UC, WB+3, WB+4.
09420  M00S05012.1da     +++|*
Line S05013 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
09421  M01S05013.273l780 ---|*         CALLS  CFM, CPF, DRT, IMR, IOM, LDP, RCS, SES.
Line S00341 Modification History
M01 (Added by) 273l780
M02 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
09422  M02S00341.ns2750  ---|*         CALLS  CFM, CPF, CRP, DRT, IMR, IOM, LDP, RCS, SES.
Line S00197 Modification History
M01 (Added by) ns2750
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09423  M02S00197.ns2783  ---|*         CALLS  CEA, CFM, CPF, CRP, DRT, IMR, IOM, LDP, RCS, SES.
Line S05014 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09424  M01S05014.ns2783  ---|*
09425  M01S05015.ns2783  ---|*         MACROS SFA.
Line S02123 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09426  M01S02123.ns2783  +++|*         CALLS  CAC, CEA, CEC, CFM, CPF, CRP, DCE, DRT, IMR, IOM, LDP.
09427  M00S05016.1da     +++|
09428  M00S05017.1da     +++|
09429  M00S05018.1da     +++|*         THE *SETS* MONITOR REQUEST IS USED TO MOVE THE I/O REQUEST
09430  M00S05019.1da     +++|*         TO AN ALTERNATE CHANNEL.  THE I/O BUFFER IS ONLY DELINKED
09431  M00S05020.1da     +++|*         IF THE REQUEST IS CHANNEL SPECIFIC.
09432  M00S05021.1da     +++|
Line S05022 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09433  M01S05022.ns2783  ---| SEC6     LDML   DVTP,DI
09434  M01S05023.ns2783  ---|          SHN    21-17
Line S05024 Modification History
M01 (Removed by) 1da8
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09435  M02S05024.ns2783  ---|          PJN    SEC7        IF RESTORE NOT ENABLED
Line S00471 Modification History
M01 (Added by) 1da8
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09436  M02S00471.ns2783  ---|          PJN    SEC7        IF RESTORE NOT IN PROGRESS
Line S05025 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09437  M01S05025.ns2783  ---|          LDC    4000
09438  M01S05026.ns2783  ---|          STM    RQLN,DI     ENSURE NO BUFFERS GET DELINKED
Line S02124 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09439  M01S02124.ns2783  +++| SEC6     LDM    RSDI        CHECK IF RESTORE IN PROGRESS
09440  M01S02125.ns2783  +++|          LMD    DI
09441  M01S02126.ns2783  +++|          NJN    SEC7        IF NO RESTORE IN PROGRESS ON THIS DEVICE
Line S05027 Modification History
M01 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09442  M01S05027.1da8    ---|          LDC    0#8000
Line S00472 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09443  M01S00472.1da8    +++|          LDC    100000
Line S05028 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09444  M01S05028.ns2783  ---|          STML   RMUX,DI     DISABLE REQUEST MULTIPLEXING
Line S02127 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09445  M01S02127.ns2783  +++|          STML   RMUX        DISABLE REQUEST MULTIPLEXING
09446  M00S05029.1da     +++|          UJN    SECX        RETURN
09447  M00S05030.1da     +++|
09448  M00S05031.1da     +++| SEC7     LDN    1           BUFFER COUNT TO BE DELINKED
09449  M00S05032.1da     +++|          STD    WB+3
09450  M00S05033.1da     +++|          LDN    SETS        INSERT CODE IN *CBT*, RELEASE INTERLOCK
09451  M00S05034.1da     +++|          RJM    IMR
09452  M00S05035.1da     +++|*         LDN    0           SET INTERLOCK RELEASED (FOR *CMP*)
09453  M00S05036.1da     +++|          STM    RQLN,DI
09454  M00S05037.1da     +++|          SOD    UC          DECREMENT UNIT ACTIVITY COUNT
09455  M00S05038.1da     +++|
09456  M00S05039.1da     +++| SEC      SUBR               ENTRY/EXIT
09457  M00S05040.1da     +++|          LDN    0
09458  M00S05041.1da     +++|          STD    RF          CLEAR RESET IN PROGRESS FLAG
09459  M00S05042.1da     +++|          RJM    IOM         CLEAR OPERATOR MESSAGE
Line S05043 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09460  M01S05043.ns2783  ---|          RJM    LDP
Line S02128 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09461  M01S02128.ns2783  +++|          RJM    LDP         LOAD DEVICE PARAMETERS
09462  M00S05044.1da     +++|          LDML   EDBF+FALT
09463  M00S05045.1da     +++|          SHN    -2          CREATE INDEX FROM FAULT CODE
09464  M00S05046.1da     +++|          STD    T5
09465  M00S05047.1da     +++|          LDM    TMSE,T5
09466  M00S05048.1da     +++|          STD    WB+4        SET MASS STORAGE ERROR CODE
Line S05049 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09467  M01S05049.ns2783  ---|          LDN    STDE
09468  M01S05050.ns2783  ---|          RJM    SES         SET ERROR STATUS IN MST
09469  M00S05051.1da     ---|          RJM    DRT         DETERMINE REQUEST TYPE
09470  M00S05052.1da     ---|          NJP    SEC6        IF I/O REQUEST
Line S05053 Modification History
M01 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09471  M01S05053.1da8    ---|          LDM    PNUN,DI
09472  M01S05054.1da8    ---|          SHN    -6          CONTROLLER BLOCK INDEX
09473  M01S05055.1da8    ---|          STD    T5
09474  M01S05056.1da8    ---|          LDML   CSTB,T5
09475  M01S05057.1da8    ---|          LPC    137777      CLEAR RESET FLAG
09476  M01S05058.1da8    ---|          STML   CSTB,T5
Line S05059 Modification History
M01 (Removed by) ns2767
M02 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09477  M02S05059.1da8    ---|          LDM    DVTP,DI     CLEAR INTERNAL REQUEST BITS
09478  M02S05060.1da8    ---|          STM    DVTP,DI
Line S00342 Modification History
M01 (Added by) 273l780
M02 (Removed by) ns2767
M03 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09479  M03S00342.1da8    ---|          RJM    CRP         CLEAR RESTORE IN PROGRESS IN *BDLL*
Line S00071 Modification History
M01 (Added by) ns2767
M02 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09480  M02S00071.1da8    ---|          LDML   DVTP,DI     CLEAR *RESTORE IN PROGRESS* FLAG
Line S00473 Modification History
M01 (Added by) 1da8
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09481  M02S00473.ns2783  ---|          LDML   CSTB,CI
Line S02129 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09482  M01S02129.ns2783  +++|          LDML   CTST,CI
Line S00474 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09483  M01S00474.1da8    +++|          SHN    21-15
Line S00475 Modification History
M01 (Added by) 1da8
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09484  M02S00475.ns2783  ---|          MJN    SEC0        IF CONTROLLER DEAD
Line S02130 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09485  M01S02130.ns2783  +++|          MJN    SEC1        IF CONTROLLER DEAD
Line S00476 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09486  M01S00476.1da8    +++|          SHN    -21+15+22
09487  M01S00477.1da8    +++|          LPC    137777      CLEAR RESET FLAG (BIT 14)
Line S00478 Modification History
M01 (Added by) 1da8
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09488  M02S00478.ns2783  ---|          STML   CSTB,CI
09489  M02S00479.ns2783  ---| SEC0     LDML   DVTP,DI     CLEAR *RESTORE IN PROGRESS* FLAG
Line S00072 Modification History
M01 (Added by) ns2767
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09490  M02S00072.ns2783  ---|          LPC    77777
09491  M02S00073.ns2783  ---|          STML   DVTP,DI
09492  M02S00074.ns2783  ---|          RJM    CRP         CLEAR *RESTORE IN PROGRESS* IN *BDLL*
Line S02131 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09493  M01S02131.ns2783  +++|          STML   CTST,CI
09494  M01S02132.ns2783  +++| SEC1     RJM    CRP         CLEAR *RESTORE IN PROGRESS*
09495  M00S05061.1da     +++|          RJM    LDP         LOAD DEVICE PARAMETERS
09496  M00S05062.1da     +++|          LDD    CM+3
09497  M00S05063.1da     +++|          SHN    21-LMLF+14
Line S05064 Modification History
M01 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
09498  M01S05064.ns2750  ---|          PJN    SEC1        IF NOT LIST MICROCODE REVISION
Line S00198 Modification History
M01 (Added by) ns2750
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09499  M02S00198.ns2783  ---|          PJN    SEC1        IF *LIST MICROCODE REVISION* NOT SET
Line S02133 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09500  M01S02133.ns2783  +++|          PJN    SEC2        IF *LIST MICROCODE REVISION* NOT SET
09501  M00S05065.1da     +++|          LPN    77
09502  M00S05066.1da     +++|          LMD    IR+4
Line S05067 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09503  M01S05067.ns2783  ---|          NJN    SEC1        IF REQUEST NOT FOR THIS DRIVER
Line S02134 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09504  M01S02134.ns2783  +++|          NJN    SEC2        IF REQUEST NOT FOR THIS DRIVER
Line S05068 Modification History
M01 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
09505  M01S05068.ns2750  ---|          LDC    6S6+LMLF    BITS - 1 TO CLEAR/STARTING BIT
Line S00199 Modification History
M01 (Added by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
09506  M01S00199.ns2750  +++|          LDC    6S6+LMLF    BITS - 1 TO CLEAR / STARTING BIT
09507  M00S05069.1da     +++|          RJM    CPF         CLEAR SPECIAL REQUEST BIT IN *PUT*
Line S05070 Modification History
M01 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
09508  M01S05070.ns2750  ---| SEC1     SFA    EST,EO      CALCULATE EST ADDRESS
Line S00200 Modification History
M01 (Added by) ns2750
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09509  M02S00200.ns2783  ---| SEC1     RJM    LDP
Line S02135 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09510  M01S02135.ns2783  +++| SEC2     RJM    LDP         LOAD DEVICE PARAMETERS
Line S00201 Modification History
M01 (Added by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
09511  M01S00201.ns2750  +++|          LDD    CM+3
09512  M01S00202.ns2750  +++|          SHN    21-ECAF+14
Line S00203 Modification History
M01 (Added by) ns2750
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09513  M02S00203.ns2783  ---|          PJN    SEC1.1      IF *ENABLE CONTROLLER ACTIVITY* NOT SET
09514  M02S00204.ns2783  ---|          RJM    CEA         CLEAR REQUEST, IF FOR THIS CHANNEL
09515  M02S00205.ns2783  ---| SEC1.1   SFA    EST,EO      CALCULATE EST ADDRESS
Line S05071 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09516  M01S05071.ns2783  ---|          ADK    EQDE
09517  M01S05072.ns2783  ---|          CRD    CM          READ *EQDE* WORD
09518  M01S05073.ns2783  ---|          LDN    3
09519  M01S05074.ns2783  ---|          STD    T4
09520  M01S05075.ns2783  ---|          LDN    CM
09521  M01S05076.ns2783  ---|          STD    CM
09522  M01S05077.ns2783  ---| SEC2     SOD    T4
09523  M01S05078.ns2783  ---|          ZJN    SEC3        IF NO ALTERNATE CHANNEL
09524  M01S05079.ns2783  ---|          AOD    CM
09525  M01S05080.ns2783  ---|          LDI    CM
09526  M01S05081.ns2783  ---|          SHN    -11
09527  M01S05082.ns2783  ---|          LMN    4
09528  M01S05083.ns2783  ---|          NJN    SEC2        IF CHANNEL DOWN
09529  M01S05084.ns2783  ---|          LDI    CM
09530  M01S05085.ns2783  ---|          LPN    77
09531  M01S05086.ns2783  ---|          LMD    IR+4
09532  M01S05087.ns2783  ---|          ZJN    SEC2        IF THIS CHANNEL IS UP
09533  M01S05088.ns2783  ---|          LDD    EO          DOWN CHANNEL ON THIS DEVICE
09534  M01S05089.ns2783  ---|          RJM    RCS
09535  M01S05090.ns2783  ---|          UJN    SEC4        COMPLETE PROCESSING
Line S02136 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09536  M01S02136.ns2783  +++|          PJN    SEC3        IF *ENABLE CONTROLLER ACTIVITY* NOT SET
09537  M01S02137.ns2783  +++|          RJM    CEC         CHECK IF REQUEST IS FOR THIS CHANNEL
09538  M01S02138.ns2783  +++|          NJN    SEC3        IF REQUEST IS NOT FOR THIS CHANNEL
09539  M01S02139.ns2783  +++|          RJM    CEA         CLEAR REQUEST
09540  M01S02140.ns2783  +++| SEC3     RJM    CAC         CHECK FOR ALTERNATE CHANNEL
09541  M01S02141.ns2783  +++|          NJN    SEC4        IF NO ALTERNATE CHANNEL
09542  M01S02142.ns2783  +++|          RJM    DCE         DOWN CHANNEL ON EQUIPMENT
09543  M01S02143.ns2783  +++|          UJN    SEC5        COMPLETE PROCESSING
09544  M00S05091.1da     +++|
Line S05092 Modification History
M01 (Removed by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
09545  M01S05092.ns2750  ---| SEC3     LDC    4S6+DUNF    BITS - 1 TO CLEAR/STARTING BIT
Line S00206 Modification History
M01 (Added by) ns2750
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09546  M02S00206.ns2783  ---| SEC3     LDC    3S6+ECAF+1  BITS - 1 TO CLEAR / STARTING BIT
Line S02144 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09547  M01S02144.ns2783  +++| SEC4     LDC    3S6+ECAF+1  BITS - 1 TO CLEAR / STARTING BIT
09548  M00S05093.1da     +++|          RJM    CPF         CLEAR SPECIAL REQUEST BITS IN *PUT*
09549  M00S05094.1da     +++|          RJM    CFM         ENSURE *FORMAT PENDING* CLEARED IN MST
Line S05095 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09550  M01S05095.ns2783  ---| SEC4     LJM    SECX        RETURN
Line S02145 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09551  M01S02145.ns2783  +++| SEC5     LJM    SECX        RETURN
09552  M01S02146.ns2783  +++| SEO      SPACE  4,15
09553  M01S02147.ns2783  +++|**        SEO - SET EST ORDINAL.
09554  M01S02148.ns2783  +++|*
09555  M01S02149.ns2783  +++|*         ENTRY  (DI) = DEVICE STATE TABLE ADDRESS.
09556  M01S02150.ns2783  +++|*                (CB) = CBT ORDINAL.
09557  M01S02151.ns2783  +++|*
09558  M01S02152.ns2783  +++|*         EXIT   (A) = (EO) = EST ORDINAL.
09559  M01S02153.ns2783  +++|*
09560  M01S02154.ns2783  +++|*         USES   EO, CW - CW+4.
09561  M01S02155.ns2783  +++|*
09562  M01S02156.ns2783  +++|*         CALLS  DRT.
09563  M01S02157.ns2783  +++|*
09564  M01S02158.ns2783  +++|*         MACROS CBTE, PUTE.
09565  M01S02159.ns2783  +++|
09566  M01S02160.ns2783  +++|
09567  M01S02161.ns2783  +++| SEO1     LDD    CW+1        GET EST ORDINAL FROM *PUT*
09568  M01S02162.ns2783  +++| SEO2     STD    EO          SET EST ORDINAL
09569  M01S02163.ns2783  +++|
09570  M01S02164.ns2783  +++| SEO      SUBR               ENTRY/EXIT
09571  M01S02165.ns2783  +++|          LDI    DI
09572  M01S02166.ns2783  +++|          ERRNZ  PUTO        CODE DEPENDS ON VALUE
09573  M01S02167.ns2783  +++|          SHN    PUTLS
09574  M01S02168.ns2783  +++|          PUTE   *
09575  M01S02169.ns2783  +++|          ADC    UNCT        FETCH UNIT CONTROL WORD
09576  M01S02170.ns2783  +++|          CRD    CW
09577  M01S02171.ns2783  +++|          RJM    DRT         DETERMINE REQUEST TYPE
09578  M01S02172.ns2783  +++|          ZJN    SEO1        IF NOT I/O REQUEST
09579  M01S02173.ns2783  +++|          LDD    CB          *CBT* ORDINAL
09580  M01S02174.ns2783  +++|          SHN    CBTLS
09581  M01S02175.ns2783  +++|          CBTE   *
09582  M01S02176.ns2783  +++|          ADC    FSTC
09583  M01S02177.ns2783  +++|          CRD    CW          GET EST ORDINAL FROM *CBT*
09584  M01S02178.ns2783  +++|          LDD    CW
09585  M01S02179.ns2783  +++|          UJN    SEO2        SET EST ORDINAL AND RETURN
Line S05096 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
09586  M01S05096.283l840 ---|          SPACE  4,10
Line S00198 Modification History
M01 (Added by) 283l840
M02 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09587  M02S00198.1da8    ---| SEP      SPACE  4,15
Line S00480 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09588  M01S00480.1da8    +++| SEP      SPACE  4,30
Line S00199 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
09589  M01S00199.283l840 +++|**        SEP - SET ERROR PROCESSING INTERLOCK.
09590  M01S00200.283l840 +++|*
Line S00201 Modification History
M01 (Added by) 283l840
M02 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09591  M02S00201.1da8    ---|*         ENTRY  (DI) = DEVICE STATUS BLOCK ADDRESS.
Line S00481 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09592  M01S00481.1da8    +++|*         ENTRY  (DI) = DEVICE STATE TABLE ADDRESS.
Line S00202 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
09593  M01S00202.283l840 +++|*                (EO) = EST ORDINAL.
09594  M01S00203.283l840 +++|*
09595  M01S00204.283l840 +++|*         EXIT   (A) .EQ. 0, IF INTERLOCK SET FOR THIS DEVICE.
09596  M01S00205.283l840 +++|*                (A) .NE. 0, IF ALREADY SET FOR A DIFFERENT DEVICE.
Line S00206 Modification History
M01 (Added by) 283l840
M02 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09597  M02S00206.1da8    ---|*                (ERFL) = DEVICE STATUS BLOCK OF DEVICE WITH ERROR.
Line S00482 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09598  M01S00482.1da8    +++|*                (ERFL) = DEVICE STATE TABLE OF DEVICE WITH ERROR.
Line S00207 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09599  M02S00207.ns2783  ---|*                (ERIT) NONZERO IF RECOVERY INTERLOCK SET.
Line S00483 Modification History
M01 (Added by) 1da8
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09600  M02S00483.ns2783  ---|*                (IPPS,DI) = VALUE OF (CB) ON ENTRY TO *SEP*.
09601  M02S00484.ns2783  ---|*                (SEPA,DI) = VALUE OF (PA) ON ENTRY TO *SEP*.
09602  M02S00485.ns2783  ---|*                (SEAD,DI) = VALUE OF (ADDR,DI) ON ENTRY TO *SEP*.
Line S02180 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09603  M01S02180.ns2783  +++|*                TO *CMP10*, IF RESTORE IN PROGRESS ON OTHER MF.
Line S00208 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
09604  M01S00208.283l840 +++|*
Line S00209 Modification History
M01 (Added by) 283l840
M02 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09605  M02S00209.1da8    ---|*         USES   PA, T1, T5, CM - CM+4.
Line S00486 Modification History
M01 (Added by) 1da8
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09606  M02S00486.ns2783  ---|*         USES   CB, PA, T1, T5, CM - CM+4.
Line S02181 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09607  M01S02181.ns2783  +++|*         USES   T1, CM - CM+4.
Line S00210 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
09608  M01S00210.283l840 +++|*
Line S00211 Modification History
M01 (Added by) 283l840
M02 (Removed by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
09609  M02S00211.1da7    ---|*         CALLS  CBD, DAS.
Line S00202 Modification History
M01 (Added by) 1da7
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09610  M02S00202.ns2783  ---|*         CALLS  CBD, DAS, LNU.
Line S02182 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09611  M01S02182.ns2783  +++|*         CALLS  CBI, CDS, CMR, DAS, LNE, SEO, UBP.
Line S00212 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
09612  M01S00212.283l840 +++|*
Line S00213 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09613  M02S00213.ns2783  ---|*         MACROS DELAY, MONITOR, SFA, SMSTF.
Line S00487 Modification History
M01 (Added by) 1da8
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09614  M02S00487.ns2783  ---|*
09615  M02S00488.ns2783  ---|*         NOTE - THE VALUES OF (CB), (PA) AND (ADDR,DI) ARE SAVED
09616  M02S00489.ns2783  ---|*                IN THE DEVICE STATE TABLE ON ENTRY TO THIS ROUTINE.
09617  M02S00490.ns2783  ---|*                THESE VALUES ARE RESTORED BOTH ON EXIT FROM THIS
09618  M02S00491.ns2783  ---|*                ROUTINE, AND ON EXIT FROM THE ROUTINE *WAC*.  IT IS
09619  M02S00492.ns2783  ---|*                REQUIRED THAT NO PROCESSING WHICH WILL INVALIDATE
09620  M02S00493.ns2783  ---|*                THESE VALUES BE PERFORMED BETWEEN THE CALL TO *SEP*
09621  M02S00494.ns2783  ---|*                AND THE CALL TO *WAC*.
Line S02183 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09622  M01S02183.ns2783  +++|*         MACROS DELAY, SMSTF, MONITOR.
Line S00214 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
09623  M01S00214.283l840 +++|
09624  M01S00215.283l840 +++|
Line S00216 Modification History
M01 (Added by) 283l840
M02 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09625  M02S00216.1da8    ---|
09626  M02S00217.1da8    ---| SEP      SUBR               ENTRY/EXIT
Line S00495 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09627  M01S00495.1da8    +++| SEP      CON    0           ENTRY
Line S00218 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
09628  M01S00218.283l840 +++|          LDML   SEP         SAVE RETURN ADDRESS
09629  M01S00219.283l840 +++|          STML   SEPR,DI
Line S00220 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09630  M02S00220.ns2783  ---|          LDDL   PA          SAVE (PA)
09631  M02S00221.ns2783  ---|          STML   SEPA,DI
Line S00496 Modification History
M01 (Added by) 1da8
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09632  M02S00496.ns2783  ---|          LDML   ADDR,DI     SAVE (ADDR,DI)
09633  M02S00497.ns2783  ---|          STML   SEAD,DI
09634  M02S00498.ns2783  ---|          LDD    CB          SAVE CURRENT *CBT* ORDINAL
09635  M02S00499.ns2783  ---|          STM    IPPS,DI
Line S00222 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
09636  M01S00222.283l840 +++| SEP1     LDM    ERFL
Line S00223 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09637  M02S00223.ns2783  ---|          NJP    SEP6        IF ERROR PROCESSING IN PROGRESS
Line S00224 Modification History
M01 (Added by) 283l840
M02 (Removed by) 1da7
M03 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09638  M03S00224.ns2783  ---|          LDD    EO
Line S00203 Modification History
M01 (Added by) 1da7
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09639  M02S00203.ns2783  ---| SEP1.1   RJM    LNU         LOCATE NEXT UNIT (USING *EO*)
09640  M02S00204.ns2783  ---|          ZJP    SEP5        IF NO MORE UNITS
Line S00225 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09641  M02S00225.ns2783  ---|          STD    T5
09642  M02S00226.ns2783  ---|          SFA    EST         READ EST ENTRY
09643  M02S00227.ns2783  ---|          ADK    EQDE
09644  M02S00228.ns2783  ---|          CRD    CM
09645  M02S00229.ns2783  ---|          LDD    CM
Line S02184 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09646  M01S02184.ns2783  +++|          ZJN    SEP3        IF ERROR PROCESSING FLAG NOT SET
09647  M01S02185.ns2783  +++| SEP2     LDML   SEPR,DI     GET RETURN ADDRESS
09648  M01S02186.ns2783  +++|          STDL   T1
09649  M01S02187.ns2783  +++|          LDM    ERFL        RETURN (A) = 0 IF ERROR IS ON THIS DEVICE
09650  M01S02188.ns2783  +++|          LMD    DI
09651  M01S02189.ns2783  +++|          LJM    0,T1        RETURN
09652  M01S02190.ns2783  +++|
09653  M01S02191.ns2783  +++|*         SET MMF ERROR PROCESSING INTERLOCKS, IF REQUIRED.
09654  M01S02192.ns2783  +++|
09655  M01S02193.ns2783  +++| SEP3     LDML   DVTP,DI
Line S00230 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
09656  M01S00230.283l840 +++|          SHN    21-11
Line S00231 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09657  M02S00231.ns2783  ---|          PJP    SEP4        IF NOT SHARED BUFFERED DEVICE
09658  M02S00232.ns2783  ---|          RJM    CBD         CHECK IF BST/BAT PROCESSING DISABLED
09659  M02S00233.ns2783  ---|          ZJN    SEP3        IF BST/BAT PROCESSING NOT DISABLED
09660  M02S00234.ns2783  ---|          LDN    ZERL
09661  M02S00235.ns2783  ---|          CRD    CM
09662  M02S00236.ns2783  ---|          LDN    SRIS        SET BUFFERED DEVICE RECOVERY INTERLOCK
Line S02194 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09663  M01S02194.ns2783  +++|          PJN    SEP6        IF NOT SHARED DEVICE
09664  M01S02195.ns2783  +++|          LDN    0           INITIALIZE PARTITION SEARCH
09665  M01S02196.ns2783  +++| SEP4     RJM    LNE         LOCATE NEXT EST FOR THIS DEVICE
09666  M01S02197.ns2783  +++|          ZJN    SEP6        IF NO MORE PARTITIONS TO PROCESS
09667  M01S02198.ns2783  +++|          RJM    CDS         CHECK DEVICE STATUS
09668  M01S02199.ns2783  +++|          MJP    SEP10       IF DEVICE NOT RECOVERED
09669  M01S02200.ns2783  +++|
09670  M01S02201.ns2783  +++|*         DEVICE RECOVERED.  SET ERROR INTERLOCK IN *BDT*.
09671  M01S02202.ns2783  +++|
09672  M01S02203.ns2783  +++|          LDD    EO          SET EST ORDINAL
09673  M01S02204.ns2783  +++|          STD    CM+4
09674  M01S02205.ns2783  +++|          LDN    SEPS        SET ERROR PROCESSING INTERLOCK IN *BDT*
Line S00237 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
09675  M01S00237.283l840 +++|          STD    CM+1
09676  M01S00238.283l840 +++|          MONITOR  MTEM
09677  M01S00239.283l840 +++|          LDD    CM+4
Line S00240 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09678  M02S00240.ns2783  ---|          NJN    SEP2        IF NOT SUCCESSFUL
09679  M02S00241.ns2783  ---|          LDN    1           SET INTERLOCK TYPE = RECOVERY INTERLOCK
09680  M02S00242.ns2783  ---|          STM    ERIT
09681  M02S00243.ns2783  ---|          UJN    SEP5        SET ERROR PROCESSING FLAG
Line S02206 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09682  M01S02206.ns2783  +++|          NJP    SEP13       IF NOT SUCCESSFUL
09683  M01S02207.ns2783  +++|          LDN    1           SET FLAG THAT SAYS THIS MF HAS INTERLOCK
09684  M01S02208.ns2783  +++|          STD    CM+2
09685  M01S02209.ns2783  +++|          LDN    26          BIT TO CHANGE
09686  M01S02210.ns2783  +++|          RJM    UBP         UPDATE *BDLL* PARAMETER
09687  M01S02211.ns2783  +++| SEP5     LDD    EO
09688  M01S02212.ns2783  +++|          UJN    SEP4        PROCESS NEXT PARTITION
Line S00244 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
09689  M01S00244.283l840 +++|
Line S00245 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09690  M02S00245.ns2783  ---| SEP2     RJM    DAS         PROCESS ACTIVITY ON OTHER DEVICES
Line S02213 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09691  M01S02213.ns2783  +++| SEP6     LDD    DI          SET ERROR PROCESSING FLAG
09692  M01S02214.ns2783  +++|          STM    ERFL
09693  M01S02215.ns2783  +++|
09694  M01S02216.ns2783  +++|*         SET ERROR PROCESSING FLAG(S) IN THE MST(S).
09695  M01S02217.ns2783  +++|
09696  M01S02218.ns2783  +++| SEP7     LDN    0           INITIALIZE PARTITION SEARCH
09697  M01S02219.ns2783  +++| SEP8     RJM    LNE         LOCATE NEXT EST FOR THIS DEVICE
09698  M01S02220.ns2783  +++|          ZJP    SEP2        IF NO MORE PARTITIONS
09699  M01S02221.ns2783  +++|          RJM    CDS         CHECK DEVICE STATUS
09700  M01S02222.ns2783  +++|          MJN    SEP9        IF DEVICE NOT RECOVERED
09701  M01S02223.ns2783  +++|          SMSTF  GDER        SET *ERROR RECOVERY IN PROGRESS* FLAG
09702  M01S02224.ns2783  +++| SEP9     LDD    EO
09703  M01S02225.ns2783  +++|          UJN    SEP8        CHECK FOR NEXT PARTITION
09704  M01S02226.ns2783  +++|
09705  M01S02227.ns2783  +++|*         DEVICE NOT RECOVERED.  SET RECOVERY ERROR INTERLOCK.
09706  M01S02228.ns2783  +++|
09707  M01S02229.ns2783  +++| SEP10    LDN    SRIS        SET RECOVERY ERROR PROCESSING INTERLOCK
09708  M01S02230.ns2783  +++| SEP11    STD    CM+1
09709  M01S02231.ns2783  +++|          MONITOR  MTEM
09710  M01S02232.ns2783  +++|          LDD    CM+4
09711  M01S02233.ns2783  +++|          SBN    2
09712  M01S02234.ns2783  +++|          ZJN    SEP13       IF REJECT (ANOTHER DRIVER HOLDS INTERLOCK)
09713  M01S02235.ns2783  +++|          LDD    DI
09714  M01S02236.ns2783  +++|          STM    ERFL        SET ERROR PROCESSING FLAG
09715  M01S02237.ns2783  +++|          STM    ERMF        SET RECOVERY INTERLOCK FLAG
09716  M01S02238.ns2783  +++|          LDD    CM+4
09717  M01S02239.ns2783  +++|          NJN    SEP12       IF CONFLICTING INTERLOCKS SET
09718  M01S02240.ns2783  +++|          RJM    SEO         RESTORE ORIGINAL EST ORDINAL
09719  M01S02241.ns2783  +++|          UJN    SEP7        RETURN SUCCESSFUL STATUS
09720  M01S02242.ns2783  +++|
09721  M01S02243.ns2783  +++|*         THE RECOVERY ERROR PROCESSING INTERLOCK WAS SET SUCCESSFULLY,
09722  M01S02244.ns2783  +++|*         BUT ONE OR MORE CONFLICTING *BDT* INTERLOCKS ARE STILL SET.
09723  M01S02245.ns2783  +++|*         *SEP* MUST WAIT, PERIODICALLY ISSUING *MTEM*/*GRIS* REQUESTS,
09724  M01S02246.ns2783  +++|*         UNTIL ALL CONFLICTING INTERLOCKS HAVE BEEN RELEASED.
09725  M01S02247.ns2783  +++|
09726  M01S02248.ns2783  +++| SEP12    RJM    DAS         PROCESS ACTIVITY ON OTHER DEVICES
Line S00246 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
09727  M01S00246.283l840 +++|          DELAY
Line S00247 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09728  M02S00247.ns2783  ---|          UJP    SEP1        RETRY INTERLOCK
Line S02249 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09729  M01S02249.ns2783  +++|          RJM    CMR         CHECK FOR MMF *RESTORE* FLAGS
09730  M01S02250.ns2783  +++|          NJN    SEP14       IF RESTORE IN PROGRESS ON OTHER MF
09731  M01S02251.ns2783  +++|          LDN    GRIS        GET RECOVERY INTERLOCK STATUS
09732  M01S02252.ns2783  +++|          UJN    SEP11       CHECK FOR CONFLICTING INTERLOCKS
Line S00248 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
09733  M01S00248.283l840 +++|
Line S00249 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09734  M02S00249.ns2783  ---| SEP3     LDN    ZERL
09735  M02S00250.ns2783  ---|          CRD    CM
09736  M02S00251.ns2783  ---|          LDN    SBDS        SET BUFFERED DEVICE INTERLOCK
09737  M02S00252.ns2783  ---|          STD    CM+1
09738  M02S00253.ns2783  ---|          LDD    EO          SET EST ORDINAL
09739  M02S00254.ns2783  ---|          STD    CM+4
09740  M02S00255.ns2783  ---|          MONITOR  MTEM
09741  M02S00256.ns2783  ---|          LDD    CM+4
09742  M02S00257.ns2783  ---|          NJN    SEP2        IF NOT SUCCESSFUL
09743  M02S00258.ns2783  ---|          STM    ERIT        SET INTERLOCK TYPE = DEVICE INTERLOCK
09744  M02S00259.ns2783  ---| SEP4     SMSTF  GDER        SET *ERROR RECOVERY IN PROGRESS* FLAG
Line S00205 Modification History
M01 (Added by) 1da7
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09745  M02S00205.ns2783  ---|          LDD    EO
09746  M02S00206.ns2783  ---|          UJP    SEP1.1      CHECK FOR NEXT UNIT
Line S02253 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09747  M01S02253.ns2783  +++|*         INTERLOCK ATTEMPT UNSUCCESSFUL.  THIS MEANS THAT ANOTHER MF
09748  M01S02254.ns2783  +++|*         HOLDS THE INTERLOCK (OR SOME OF THE INTERLOCKS) REQUIRED.
09749  M01S02255.ns2783  +++|*         TO AVOID A DEADLOCK, THIS MF MUST RELEASE ANY INTERLOCK
09750  M01S02256.ns2783  +++|*         THAT IT HOLDS, AND THEN RETRY THE INTERLOCK ATTEMPT LATER.
Line S00207 Modification History
M01 (Added by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
09751  M01S00207.1da7    +++|
Line S00260 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09752  M02S00260.ns2783  ---| SEP5     LDD    DI          SET ERROR PROCESSING FLAG
09753  M02S00261.ns2783  ---|          STM    ERFL
09754  M02S00262.ns2783  ---| SEP6     LDML   SEPA,DI     RESTORE (PA)
09755  M02S00263.ns2783  ---|          STDL   PA
Line S00500 Modification History
M01 (Added by) 1da8
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09756  M02S00500.ns2783  ---|          LDM    IPPS,DI     RESTORE (CB)
09757  M02S00501.ns2783  ---|          STD    CB
09758  M02S00502.ns2783  ---|          LDML   SEAD,DI     RESTORE (ADDR,DI)
09759  M02S00503.ns2783  ---|          STML   ADDR,DI
Line S00264 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09760  M02S00264.ns2783  ---|          LDML   SEPR,DI     GET RETURN ADDRESS
09761  M02S00265.ns2783  ---|          STDL   T1
09762  M02S00266.ns2783  ---|          LDM    ERFL        RETURN (A) = 0 IF ERROR IS ON THIS DEVICE
09763  M02S00267.ns2783  ---|          LMD    DI
09764  M02S00268.ns2783  ---|          LJM    0,T1        RETURN
Line S02257 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09765  M01S02257.ns2783  +++| SEP13    RJM    CBI         CLEAR *BDT* ERROR PROCESSING INTERLOCKS
09766  M01S02258.ns2783  +++|          RJM    DAS         PROCESS ACTIVITY ON OTHER DEVICES
09767  M01S02259.ns2783  +++|          DELAY
09768  M01S02260.ns2783  +++|          RJM    CMR         CHECK FOR MMF *RESTORE* FLAGS
09769  M01S02261.ns2783  +++|          NJN    SEP14       IF RESTORE IN PROGRESS ON OTHER MF
09770  M01S02262.ns2783  +++|          LJM    SEP1        RETRY INTERLOCK
Line S00269 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
09771  M01S00269.283l840 +++|
Line S02263 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09772  M01S02263.ns2783  +++| SEP14    LJM    CMP10       ABANDON REQUEST (RETRY LATER)
Line S00270 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
09773  M01S00270.283l840 +++|
Line S00271 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09774  M02S00271.ns2783  ---| ERFL     CON    0           DEVICE STATE TABLE OF DEVICE WITH ERROR
09775  M02S00272.ns2783  ---| ERIT     CON    0           INTERLOCK TYPE (NZ IF RECOVERY INTERLOCK)
Line S02264 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09776  M01S02264.ns2783  +++|
09777  M01S02265.ns2783  +++| ERFL     CON    0           ERROR PROCESSING FLAG
09778  M01S02266.ns2783  +++| ERMF     CON    0           RECOVERY INTERLOCK FLAG
Line S00273 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
09779  M01S00273.283l840 +++| SFP      SPACE  4,10
09780  M00S05097.1da     +++|**        SFP - SET COMMON FORMAT PARAMETERS.
09781  M00S05098.1da     +++|*
Line S05099 Modification History
M01 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09782  M01S05099.1da8    ---|*         ENTRY  (DI) = DEVICE STATUS BLOCK ADDRESS.
Line S00504 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09783  M01S00504.1da8    +++|*         ENTRY  (DI) = DEVICE STATE TABLE ADDRESS.
09784  M00S05100.1da     +++|*                (FC) = 0 IF DRIVE DECLUSTERED.
09785  M00S05101.1da     +++|*                (CN) = CONTROLLER NUMBER.
09786  M00S05102.1da     +++|*                (DN) = DRIVE NUMBER.
09787  M00S05103.1da     +++|*
09788  M00S05104.1da     +++|*         CALLS  SOU.
09789  M00S05105.1da     +++|
09790  M00S05106.1da     +++|
09791  M00S05107.1da     +++| SFP      SUBR               ENTRY/EXIT
09792  M00S05108.1da     +++|          LDC    C280E+1S17  FORMAT OPERATION CODE
09793  M00S05109.1da     +++|          RJM    SOU         SET OPERATION CODE AND UNIT
09794  M00S05110.1da     +++|          LDC    P02D5       PARAMETER TO SELECT DRIVE
09795  M00S05111.1da     +++|          STML   CPBF+FCP
09796  M00S05112.1da     +++|          LDM    PHYD,DI
09797  M00S05113.1da     +++|          SHN    10
09798  M00S05114.1da     +++|          STML   CPBF+FCP+1  DRIVE TO FORMAT
09799  M00S05115.1da     +++|          LDC    0#1E5
09800  M00S05116.1da     +++|          STML   CPBF+FCP+2  DO NOT READ HEADERS
09801  M00S05117.1da     +++|          LDD    FC
09802  M00S05118.1da     +++|          ZJN    SFPX        IF DRIVE DECLUSTERED
09803  M00S05119.1da     +++|          LDD    CN
09804  M00S05120.1da     +++|          SHN    10
09805  M00S05121.1da     +++|          ADD    DN
09806  M00S05122.1da     +++|          STML   CPBF+CUN    LOGICAL ADDRESS
09807  M00S05123.1da     +++|          UJP    SFPX        RETURN
09808  M00S05124.1da     +++| SFR      SPACE  4,15
09809  M00S05125.1da     +++|**        SFR - SEARCH FOR CONSECUTIVE REQUEST.
09810  M00S05126.1da     +++|*
09811  M00S05127.1da     +++|*         ENTRY  (A) = CURRENT *CBT* ORDINAL.
Line S05128 Modification History
M01 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09812  M01S05128.1da8    ---|*                (DI) = DEVICE STATUS BLOCK ADDRESS.
Line S00505 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09813  M01S00505.1da8    +++|*                (DI) = DEVICE STATE TABLE ADDRESS.
09814  M00S05129.1da     +++|*                (DT) = DRIVE TYPE.
09815  M00S05130.1da     +++|*
09816  M00S05131.1da     +++|*         EXIT   (NB) = 0 IF NO CONSECUTIVE REQUEST FOUND.
09817  M00S05132.1da     +++|*                     = *CBT* ORDINAL OF NEXT REQUEST.
09818  M00S05133.1da     +++|*                (NR - NR+4) = PHYSICAL ADDRESS OF NEXT REQUEST.
09819  M00S05134.1da     +++|*
09820  M00S05135.1da     +++|*         USES   NB, CM - CM+4, NR - NR+4, T1 - T6.
09821  M00S05136.1da     +++|*
09822  M00S05137.1da     +++|*         MACROS CBTE.
09823  M00S05138.1da     +++|
09824  M00S05139.1da     +++|
Line S00527 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09825  M01S00527.284l847 +++| SFR9     LDN    0
09826  M01S00528.284l847 +++|          STD    NB
09827  M01S00529.284l847 +++|
09828  M00S05140.1da     +++| SFR      SUBR               ENTRY/EXIT
09829  M00S05141.1da     +++|          SHN    CBTLS
09830  M00S05142.1da     +++|          CBTE   *
09831  M00S05143.1da     +++|          ADC    PAD1        FETCH SEEK PARAMETERS FROM *CBT*
09832  M00S05144.1da     +++|          CRD    CM
09833  M00S05145.1da     +++|          ADN    IOLK-PAD1   (T1) = I/O LINK-UP FLAGS
09834  M00S05146.1da     +++|          CRD    T1
09835  M00S05147.1da     +++|          LDM    ERCT,DI
Line S05148 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09836  M01S05148.284l847 ---|          NJN    SFR3        IF IN ERROR RECOVERY
Line S00530 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09837  M01S00530.284l847 +++|          NJN    SFR9        IF IN ERROR RECOVERY
Line S00001 Modification History
M01 (Added by) 1da9
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09838  M02S00001.ns2783  ---|          LDM    PSBF,DT     SET NUMBER OF SECTORS PER BUFFER
09839  M02S00002.ns2783  ---|          LPN    77
Line S02267 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09840  M01S02267.ns2783  +++|          LDML   PSBF,DT     SET NUMBER OF SECTORS PER BUFFER
09841  M01S02268.ns2783  +++|          SHN    -14
Line S00003 Modification History
M01 (Added by) 1da9
Seq #  *Modification Id* Act 
----------------------------+
09842  M01S00003.1da9    +++|          STD    T0
Line S05149 Modification History
M01 (Removed by) ns2775
Seq #  *Modification Id* Act 
----------------------------+
09843  M01S05149.ns2775  ---|          LDM    CYLN,DI
09844  M01S05150.ns2775  ---|          ADN    7
09845  M01S05151.ns2775  ---|          SBM    MC,DT
09846  M01S05152.ns2775  ---|          PJN    SFR1        IF LAST 8 CYLINDERS
Line S05153 Modification History
M01 (Removed by) 284l847
M02 (Removed by) ns2775
Seq #  *Modification Id* Act 
----------------------------+
09847  M02S05153.ns2775  ---|          LDM    SPC,DT
Line S00531 Modification History
M01 (Added by) 284l847
M02 (Removed by) ns2775
Seq #  *Modification Id* Act 
----------------------------+
09848  M02S00531.ns2775  ---|          LDML   PSCY,DT     SET SECTOR COUNT FOR 8 CYLINDERS
Line S05154 Modification History
M01 (Removed by) ns2775
Seq #  *Modification Id* Act 
----------------------------+
09849  M01S05154.ns2775  ---|          SHN    3
09850  M01S05155.ns2775  ---|          UJN    SFR2        SECTOR COUNT USED IN WRITE COMMAND
09851  M01S05156.ns2775  ---|
Line S05157 Modification History
M01 (Removed by) 284l847
M02 (Removed by) ns2775
Seq #  *Modification Id* Act 
----------------------------+
09852  M02S05157.ns2775  ---| SFR1     LDM    STS,DT      SECTOR COUNT USED IN WRITE COMMAND
Line S00532 Modification History
M01 (Added by) 284l847
M02 (Removed by) ns2775
Seq #  *Modification Id* Act 
----------------------------+
09853  M02S00532.ns2775  ---| SFR1     LDM    STS,DT      SET SECTOR COUNT FOR .LT. 8 CYLINDERS
Line S05158 Modification History
M01 (Removed by) 284l847
M02 (Removed by) ns2775
Seq #  *Modification Id* Act 
----------------------------+
09854  M02S05158.ns2775  ---| SFR2     SBM    CBCT,DI
Line S00533 Modification History
M01 (Added by) 284l847
M02 (Removed by) ns2775
Seq #  *Modification Id* Act 
----------------------------+
09855  M02S00533.ns2775  ---| SFR2     SBM    CSCT,DI
Line S00061 Modification History
M01 (Added by) ns2775
M02 (Removed by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
09856  M02S00061.1da7    ---|          RJM    DSS         DETERMINE STREAMING SECTOR COUNT
09857  M02S00062.1da7    ---|          SBM    CSCT,DI
Line S00208 Modification History
M01 (Added by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
09858  M01S00208.1da7    +++|          LDM    CYLN,DI
09859  M01S00209.1da7    +++| SFR1     SBM    MC,DT
09860  M01S00210.1da7    +++|          MJN    SFR1.1      IF IN THE CORRECT PARTITION
09861  M01S00211.1da7    +++|          SBN    1
09862  M01S00212.1da7    +++|          PJN    SFR1        IF NOT AT MAINTENANCE TRACK
09863  M01S00213.1da7    +++| SFR1.1   ADN    7
09864  M01S00214.1da7    +++|          PJN    SFR1.2      IF WITHIN LAST 8 CYLINDERS
09865  M01S00215.1da7    +++|          LDML   PSCY,DT     SET SECTOR COUNT FOR 8 CYLINDERS
09866  M01S00216.1da7    +++|          SHN    3
09867  M01S00217.1da7    +++|          UJN    SFR2        CONTINUE
09868  M01S00218.1da7    +++|
09869  M01S00219.1da7    +++| SFR1.2   LDM    STS,DT      SET SECTOR COUNT FOR .LT. 8 CYLINDERS
Line S02269 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09870  M01S02269.ns2783  +++|          LPC    777
Line S00220 Modification History
M01 (Added by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
09871  M01S00220.1da7    +++| SFR2     SBM    CSCT,DI
Line S05159 Modification History
M01 (Removed by) 1da9
Seq #  *Modification Id* Act 
----------------------------+
09872  M01S05159.1da9    ---|          SBN    1
Line S00004 Modification History
M01 (Added by) 1da9
Seq #  *Modification Id* Act 
----------------------------+
09873  M01S00004.1da9    +++|          SBD    T0          LESS NUMBER OF SECTORS PER BUFFER
Line S05160 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09874  M01S05160.284l847 ---|          ZJN    SFR4        IF TIME TO CURTAIL STREAMING
Line S00534 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09875  M01S00534.284l847 +++|          ZJN    SFR3        IF TIME TO CURTAIL STREAMING
09876  M00S05161.1da     +++|          LDD    T1+2
09877  M01S00535.284l847 +++|          ZJN    SFR3        IF NO REQUEST AVAILABLE
09878  M00S05162.1da     +++|          STD    NB
Line S05163 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09879  M01S05163.284l847 ---|          ZJN    SFRX        IF NO REQUEST AVAILABLE
09880  M00S05164.1da     ---|          SHN    CBTLS
09881  M00S05165.1da     ---|          CBTE   *
09882  M00S05166.1da     ---|          ADC    PAD1        PHYSICAL ADDRESS OF NEXT REQUEST
09883  M00S05167.1da     ---|          CRD    NR
09884  M00S05168.1da     ---|          ADN    IOLK-PAD1   I/O LINK-UP WORD OF NEXT REQUEST
09885  M00S05169.1da     ---|          CRD    T2
09886  M00S05170.1da     ---|          LDD    T2          COMPARE LINK-UP FLAGS
09887  M00S05171.1da     ---|          LMD    T1
09888  M00S05172.1da     ---|          LPC    DRFM+ILFM
09889  M00S05173.1da     ---|          ZJN    SFR5        IF SAME DIRECTION AND INTERLOCKED
09890  M01S05174.284l847 ---| SFR3     LDN    0
09891  M01S05175.284l847 ---| SFR4     STD    NB
09892  M01S05176.284l847 ---|          UJP    SFRX        RETURN
Line S00536 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09893  M01S00536.284l847 +++| SFR3     UJP    SFR9        RETURN
09894  M00S05177.1da     +++|
Line S05178 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09895  M01S05178.284l847 ---| SFR5     LDD    NR+1        CHECK SEEK PARAMETERS
Line S00537 Modification History
M01 (Added by) 284l847
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09896  M02S00537.ns2783  ---| SFR5     LDM    PSBF,DT     CALCULATE NEXT SECTOR
09897  M02S00538.ns2783  ---|          LPN    77
Line S02270 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
09898  M01S02270.ns2783  +++| SFR5     LDML   PSBF,DT     CALCULATE NEXT SECTOR
09899  M01S02271.ns2783  +++|          SHN    -14
Line S00539 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09900  M01S00539.284l847 +++|          RAD    CM+2
09901  M01S00540.284l847 +++|          LDD    NR+1        CHECK SEEK PARAMETERS
09902  M00S05179.1da     +++|          SBD    CM+1
09903  M00S05180.1da     +++|          ZJN    SFR6        IF SAME CYLINDER
09904  M00S05181.1da     +++|          SBN    1
09905  M00S05182.1da     +++|          NJN    SFR3        IF NOT NEXT CYLINDER
Line S05183 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09906  M01S05183.284l847 ---|          LDD    CM+2
09907  M01S05184.284l847 ---|          LMM    LSOC,DT
09908  M01S05185.284l847 ---|          NJN    SFR3        IF NOT LAST SECTOR ON CYLINDER
09909  M01S05186.284l847 ---|          LDD    NR+2
09910  M01S05187.284l847 ---|          UJN    SFR7        CHECK NEXT TRACK / SECTOR
Line S00541 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09911  M01S00541.284l847 +++|          LDD    CM+2        CALCULATED NEXT SECTOR
09912  M01S00542.284l847 +++|          SBM    LSOC,DT
09913  M01S00543.284l847 +++|          PJN    SFR7        IF END OF CYLINDER REACHED
09914  M01S00544.284l847 +++|          UJN    SFR3        RETURN WITH NO CONSECUTIVE REQUEST
09915  M00S05188.1da     +++|
09916  M00S05189.1da     +++| SFR6     LDD    CM+2        CHECK NEXT SECTOR
Line S05190 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09917  M01S05190.284l847 ---|          ADN    1
09918  M00S05191.1da     ---|          LMD    NR+2
09919  M00S05192.1da     ---|          ZJN    SFR8        IF NEXT SECTOR ON SAME TRACK
09920  M01S05193.284l847 ---|          LDD    CM+2
Line S00545 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09921  M01S00545.284l847 +++|          LDD    CM+2
09922  M00S05194.1da     +++|          LPN    77
Line S05195 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09923  M01S05195.284l847 ---|          LMM    SPT,DT
09924  M01S05196.284l847 ---|          NJN    SFR3        IF NOT LAST SECTOR ON TRACK
09925  M01S05197.284l847 ---|          LDD    CM+2
Line S00546 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09926  M01S00546.284l847 +++|          SBM    PSPT,DT
09927  M01S00547.284l847 +++|          MJN    SFR3        IF NOT AT END OF TRACK
09928  M01S00548.284l847 +++|          LMD    CM+2
09929  M01S00549.284l847 +++|          LPN    77
09930  M01S00550.284l847 +++|          LMD    CM+2
09931  M00S05198.1da     +++|          ADD    HN          SET NEXT TRACK
Line S00343 Modification History
M01 (Added by) 273l780
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09932  M02S00343.284l847 ---|          ERRNZ  HD0100-100  CODE DEPENDS ON VALUE
Line S05199 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09933  M01S05199.284l847 ---|          SCN    77
09934  M01S05200.284l847 ---|          LMD    NR+2
09935  M01S05201.284l847 ---| SFR7     NJN    SFR3        IF NOT NEXT SECTOR ON CONSECUTIVE TRACKS
Line S00551 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
09936  M01S00551.284l847 +++| SFR7     LMD    NR+2
09937  M01S00552.284l847 +++|          NJN    SFR3        IF NOT NEXT SECTOR ON CONSECUTIVE TRACKS
09938  M00S05202.1da     +++| SFR8     LJM    SFRX        RETURN
09939  M00S05203.1da     +++| SLB      SPACE  4,15
09940  M00S05204.1da     +++|**        SLB - SET LINKAGE BITS.
09941  M00S05205.1da     +++|*
09942  M00S05206.1da     +++|*         ENTRY  (A) = *CBT* ORDINAL.
09943  M00S05207.1da     +++|*                (RW) = READ / WRITE STATUS.
09944  M00S05208.1da     +++|*
09945  M00S05209.1da     +++|*         EXIT   LINKAGE BITS SET IN *CBT* ENTRY / UEM BUFFER.
09946  M00S05210.1da     +++|*
09947  M00S05211.1da     +++|*         USES   PB, T1, T2, T5, T6, UA, UA+1, CM - CM+4.
09948  M00S05212.1da     +++|*
09949  M00S05213.1da     +++|*         CALLS  RLB, SUA, WLB.
09950  M00S05214.1da     +++|*
09951  M00S05215.1da     +++|*         MACROS CBTE.
09952  M00S05216.1da     +++|
09953  M00S05217.1da     +++|
09954  M00S05218.1da     +++| SLB      SUBR               ENTRY/EXIT
09955  M00S05219.1da     +++|          STD    PB
09956  M00S05220.1da     +++|          RJM    SUA         SET UEM ADDRESS
09957  M00S05221.1da     +++|          LDN    PAD1
09958  M00S05222.1da     +++|          STD    T2
09959  M00S05223.1da     +++|          LDN    5           UEM WORD COUNT
09960  M00S05224.1da     +++|          STD    T5
09961  M00S05225.1da     +++|          LDML   SLBB,RW     SET PROCESSOR ADDRESS
09962  M00S05226.1da     +++|          STML   SLBA
09963  M00S05227.1da     +++| SLB1     LRD    UA          LOAD *R* REGISTER
09964  M00S05228.1da     +++|          LDD    PB
09965  M00S05229.1da     +++|          SHN    CBTLS       READ CONTROL BUFFER WORD
09966  M00S05230.1da     +++|          CBTE   *
09967  M00S05231.1da     +++|          ADC    0           FWA OF *CBT*
09968  M00S05232.1da     +++|          ADD    T2
09969  M00S05233.1da     +++|          CRD    CM
09970  M00S05234.1da     +++|          LDC    SBUF-4      SET BUFFER ADDRESS
09971  M00S05235.1da     +++|          STDL   T1
09972  M00S05236.1da     +++|          LDC    1S17        READ START OF BUFFER SEGMENT
09973  M00S05237.1da     +++|          CRML   SBUF,T5
09974  M00S05238.1da     +++|          LDN    CM+3        SET *CBT* ENTRY ADDRESS
09975  M00S05239.1da     +++|          STD    T6
09976  M00S05240.1da     +++|          RJM    0           MOVE LINKAGE BITS
09977  M00S05241.1da     +++| SLBA     EQU    *-1
09978  M00S05242.1da     +++|          LDN    10          ADVANCE *R* REGISTER IMAGE
09979  M00S05243.1da     +++|          RAD    UA+1
09980  M00S05244.1da     +++|          SHN    -14
09981  M00S05245.1da     +++|          RAD    UA
09982  M00S05246.1da     +++|          AOD    T2          ADVANCE CONTROL BUFFER WORD
09983  M00S05247.1da     +++|          LMN    PAD4+1
09984  M00S05248.1da     +++|          NJN    SLB1        IF NOT COMPLETE
09985  M00S05249.1da     +++|          UJP    SLBX        RETURN
09986  M00S05250.1da     +++|
Line S00344 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
09987  M01S00344.273l780 +++|
09988  M00S05251.1da     +++| SLBB     CONL   RLB
09989  M00S05252.1da     +++|          CONL   WLB
09990  M00S05253.1da     +++| SMD      SPACE  4,15
09991  M00S05254.1da     +++|**        SMD - SKIP MEDIA DEFECT DURING RESTORE.
09992  M00S05255.1da     +++|*
Line S05256 Modification History
M01 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09993  M01S05256.1da8    ---|*         ENTRY  (DI) = DEVICE STATUS BLOCK ADDRESS.
Line S00506 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
09994  M01S00506.1da8    +++|*         ENTRY  (DI) = DEVICE STATE TABLE ADDRESS.
09995  M00S05257.1da     +++|*                (T5) = PHYSICAL TRACK.
09996  M00S05258.1da     +++|*                (T6) = PHYSICAL SECTOR.
09997  M00S05259.1da     +++|*                (DT) = DRIVE TYPE.
09998  M00S05260.1da     +++|*
09999  M00S05261.1da     +++|*         EXIT   (A) = 0 IF NOT RESTORE.
10000  M00S05262.1da     +++|*
Line S05263 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
10001  M01S05263.284l847 ---|*         USES   T5.
Line S00553 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
10002  M01S00553.284l847 +++|*         USES   T5, T6.
10003  M00S05264.1da     +++|
10004  M00S05265.1da     +++|
10005  M00S05266.1da     +++| SMD4     LDN    0
10006  M00S05267.1da     +++|
10007  M00S05268.1da     +++| SMD      SUBR               ENTRY/EXIT
10008  M00S05269.1da     +++|          LDML   RPBF+OPC
10009  M00S05270.1da     +++|          LMC    CE005
10010  M00S05271.1da     +++|          NJN    SMD4        IF NOT RESTORE
10011  M00S05272.1da     +++|
10012  M00S05273.1da     +++|*         SET RCYL, RTSN TO THE PHYSICAL SECTOR AFTER THE FAILING ONE.
10013  M00S05274.1da     +++|
Line S05275 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
10014  M01S05275.284l847 ---|          LDD    T5
Line S00554 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
10015  M01S00554.284l847 +++|          AOD    T6          PHYSICAL SECTOR
10016  M01S00555.284l847 +++|          SHN    14
10017  M01S00556.284l847 +++|          ADD    T5          PHYSICAL TRACK
10018  M00S05276.1da     +++|          SHN    6
Line S05277 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
10019  M01S05277.284l847 ---|          ADD    T6
10020  M01S05278.284l847 ---|          ADN    1
Line S05279 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
10021  M01S05279.ns2783  ---|          STML   RTSN,DI
Line S02272 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
10022  M01S02272.ns2783  +++|          STM    RTSN
Line S05280 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
10023  M01S05280.284l847 ---|          LDD    T5
10024  M01S05281.284l847 ---|          LMN    PTCYEC-1
Line S00557 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
10025  M01S00557.284l847 +++|          AOD    T5
Line S00558 Modification History
M01 (Added by) 284l847
M02 (Removed by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
10026  M02S00558.1da7    ---|          LMM    PTCY,DT
Line S05282 Modification History
M01 (Removed by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
10027  M01S05282.1da7    ---|          ZJN    SMD1        IF LAST TRACK
Line S00221 Modification History
M01 (Added by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
10028  M01S00221.1da7    +++|          LDM    LSOC,DT
10029  M01S00222.1da7    +++|          SHN    -6
10030  M01S00223.1da7    +++|          SBD    T5
10031  M01S00224.1da7    +++|          MJN    SMD1        IF LAST TRACK
10032  M00S05283.1da     +++|          LDD    T6
Line S05284 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
10033  M01S05284.284l847 ---|          LMM    SPT,DT
10034  M01S05285.284l847 ---|          NJN    SMD2        IF NEXT RESTORE ADDRESS ALREADY SET
10035  M01S05286.284l847 ---|          AOD    T5
Line S00559 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
10036  M01S00559.284l847 +++|          SBM    PSPT,DT
10037  M01S00560.284l847 +++|          MJN    SMD2        IF NEXT RESTORE ADDRESS ALREADY SET
10038  M01S00561.284l847 +++|          SHN    14          POTENTIAL RESIDUAL SECTOR NUMBER
10039  M01S00562.284l847 +++|          ADD    T5
10040  M00S05287.1da     +++|          SHN    6
Line S05288 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
10041  M01S05288.ns2783  ---|          STML   RTSN,DI
Line S02273 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
10042  M01S02273.ns2783  +++|          STM    RTSN
10043  M00S05289.1da     +++|          UJN    SMD2        SET REQUESTS TO MULTIPLEX
10044  M00S05290.1da     +++|
Line S05291 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
10045  M01S05291.284l847 ---| SMD1     LDML   LSOC,DT
10046  M01S05292.284l847 ---|          ADN    1
10047  M01S05293.284l847 ---|          LMML   RTSN,DI
10048  M01S05294.284l847 ---|          NJN    SMD2        IF NEXT RESTORE ADDRESS ALREADY SET
Line S00563 Modification History
M01 (Added by) 284l847
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
10049  M02S00563.ns2783  ---| SMD1     LDML   RTSN,DI
Line S02274 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
10050  M01S02274.ns2783  +++| SMD1     LDM    RTSN
Line S00564 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
10051  M01S00564.284l847 +++|          SBM    LSOC,DT
10052  M01S00565.284l847 +++|          MJN    SMD2        IF NEXT RESTORE ADDRESS ALREADY SET
Line S05295 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
10053  M01S05295.ns2783  ---|          STML   RTSN,DI
10054  M01S05296.ns2783  ---|          AOML   RCYL,DI
10055  M01S05297.ns2783  ---| SMD2     LDML   RMUX,DI
Line S02275 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
10056  M01S02275.ns2783  +++|          STM    RTSN
10057  M01S02276.ns2783  +++|          AOM    RCYL
10058  M01S02277.ns2783  +++| SMD2     LDML   RMUX
10059  M00S05298.1da     +++|          SHN    21-17
10060  M00S05299.1da     +++|          MJN    SMD3        IF MULTIPLEXING I/O REQUESTS DISABLED
10061  M00S05300.1da     +++|          LDN    IRBR
Line S05301 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
10062  M01S05301.ns2783  ---|          STML   RMUX,DI     I/O REQUESTS BEFORE NEXT RESTORE
Line S02278 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
10063  M01S02278.ns2783  +++|          STML   RMUX        I/O REQUESTS BEFORE NEXT RESTORE
10064  M00S05302.1da     +++| SMD3     UJP    SMDX        RETURN
10065  M00S05303.1da     +++| SOC      SPACE  4,10
10066  M00S05304.1da     +++|**        SOC - SET OPERATION CODE AND CONTROLLER.
10067  M00S05305.1da     +++|*
10068  M00S05306.1da     +++|*         ENTRY  (A) = OPERATION CODE.
10069  M00S05307.1da     +++|*                (CN) = CONTROLLER NUMBER.
10070  M00S05308.1da     +++|
10071  M00S05309.1da     +++|
10072  M00S05310.1da     +++| SOC      SUBR               ENTRY/EXIT
10073  M00S05311.1da     +++|          STML   CPBF+OPC
10074  M00S05312.1da     +++|          LDD    CN
10075  M00S05313.1da     +++|          SHN    10
10076  M00S05314.1da     +++|          LMC    0#FF
10077  M00S05315.1da     +++|          STM    CPBF+CUN
10078  M00S05316.1da     +++|          UJN    SOCX        RETURN
Line S05317 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
10079  M01S05317.ns2783  ---| SOU      SPACE  4,10
Line S02279 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
10080  M01S02279.ns2783  +++| SOU      SPACE  4,15
10081  M00S05318.1da     +++|**        SOU - SET OPERATION CODE AND UNIT.
10082  M00S05319.1da     +++|*
10083  M00S05320.1da     +++|*         ENTRY  (A) = 1/X, 17/YY.
10084  M00S05321.1da     +++|*                  WHERE X = 0 IF (DN) IS THE DRIVE NUMBER.
10085  M00S05322.1da     +++|*                          = 1 IF (PHYD,DI) IS THE DRIVE NUMBER.
10086  M00S05323.1da     +++|*                        YY = OPERATION CODE.
10087  M00S05324.1da     +++|*                (CN) = CONTROLLER NUMBER.
10088  M00S05325.1da     +++|*                (DN) = DRIVE NUMBER.
Line S05326 Modification History
M01 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
10089  M01S05326.1da8    ---|*                (DI) = DEVICE STATUS BLOCK ADDRESS.
Line S00507 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
10090  M01S00507.1da8    +++|*                (DI) = DEVICE STATE TABLE ADDRESS.
10091  M00S05327.1da     +++|*
10092  M00S05328.1da     +++|*         EXIT   (A) = UNIT NUMBER FOR COMMAND PACKET.
10093  M00S05329.1da     +++|
10094  M00S05330.1da     +++|
10095  M00S05331.1da     +++| SOU      SUBR               ENTRY/EXIT
10096  M00S05332.1da     +++|          STML   CPBF+OPC
10097  M00S05333.1da     +++|          MJN    SOU1        IF USING PHYSICAL DRIVE
10098  M00S05334.1da     +++|          LDD    CN          MERGE CONTROLLER + DRIVE NUMBERS
10099  M00S05335.1da     +++|          SHN    10
10100  M00S05336.1da     +++|          LMD    DN
10101  M00S05337.1da     +++|          UJN    SOU2        SET FACILITY ADDRESS
10102  M00S05338.1da     +++|
10103  M00S05339.1da     +++| SOU1     LDD    CN          MERGE CONTROLLER + DRIVE NUMBERS
10104  M00S05340.1da     +++|          SHN    10
10105  M00S05341.1da     +++|          ADM    PHYD,DI
10106  M00S05342.1da     +++| SOU2     STM    CPBF+CUN
10107  M00S05343.1da     +++|          UJN    SOUX        RETURN
10108  M00S05344.1da     +++| SRF      SPACE  4,10
10109  M00S05345.1da     +++|**        SRF - SET DRIVER RELOAD FLAG.
10110  M00S05346.1da     +++|*
10111  M00S05347.1da     +++|*         EXIT   (A) = 0.
10112  M00S05348.1da     +++|*
10113  M00S05349.1da     +++|*         USES   CM+1 - CM+4.
10114  M00S05350.1da     +++|*
10115  M00S05351.1da     +++|*         CALLS  DCR.
10116  M00S05352.1da     +++|*
10117  M00S05353.1da     +++|*         MACROS MONITOR, CHTE.
10118  M00S05354.1da     +++|
10119  M00S05355.1da     +++|
10120  M00S05356.1da     +++| SRF      SUBR               ENTRY/EXIT
10121  M00S05357.1da     +++|          RJM    DCR         DROP CHANNEL RESERVATION
10122  M00S05358.1da     +++|*         LDN    0
10123  M00S05359.1da     +++|          STD    CM+2        CLEAR UNUSED BYTE
10124  M00S05360.1da     +++|          CHTE   *
10125  M00S05361.1da     +++|          LDC    CTALL*2     ADDRESS OF CHANNEL CONTROLWARE TABLE ENTRY
10126  M00S05362.1da     +++|          STD    CM+4
10127  M00S05363.1da     +++|          SHN    -14
10128  M00S05364.1da     +++|          STD    CM+3
10129  M00S05365.1da     +++|          LDN    1           SET NUMBER OF REQUESTS
10130  M00S05366.1da     +++|          STD    CM+1
10131  M00S05367.1da     +++|          LDD    MA          STORE REQUEST IN MESSAGE BUFFER
10132  M00S05368.1da     +++|          CWM    SRFA,CM+1
10133  M00S05369.1da     +++|          MONITOR  UTEM      SET RELOAD FLAG
10134  M00S05370.1da     +++|*         LDN    0
10135  M00S05371.1da     +++|          UJN    SRFX        RETURN
10136  M00S05372.1da     +++|
Line S00345 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
10137  M01S00345.273l780 +++|
10138  M00S05373.1da     +++| SRFA     VFD    1/0,5/0,6/1,6/,42/1
Line S00274 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
10139  M01S00274.283l840 +++| SRI      SPACE  4,30
10140  M01S00275.283l840 +++|**        SRI - SET SLAVE RESET INTERLOCK.
10141  M01S00276.283l840 +++|*
10142  M01S00277.283l840 +++|*         IN A MMF ENVIRONMENT, DAS MUST BE CONFIGURED WITH MORE
10143  M01S00278.283l840 +++|*         THAN ONE DRIVER ACCESSING EACH CONTROLLER.  TO PREVENT AN
10144  M01S00279.283l840 +++|*         ENDLESS SEQUENCE OF SLAVE RESETS UNDER SOME ERROR CONDITIONS,
10145  M01S00280.283l840 +++|*         AN EXTENDED MEMORY FLAG REGISTER INTERLOCK IS USED TO ENSURE
10146  M01S00281.283l840 +++|*         THAT ONLY ONE DRIVER TRIES TO PERFORM A SLAVE RESET AT ANY
10147  M01S00282.283l840 +++|*         ONE TIME.  IF *1DA* ATTEMPTS TO SET THIS INTERLOCK AND
10148  M01S00283.283l840 +++|*         DETERMINES THAT IT IS HELD BY ANOTHER DRIVER, IT WILL WAIT
Line S00284 Modification History
M01 (Added by) 283l840
M02 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
10149  M02S00284.1da8    ---|*         UNTIL THE INTERLOCK IS CLEAR, AND THEN WILL PERFORM A LOGICAL
10150  M02S00285.1da8    ---|*         RESET RATHER THAN A SLAVE RESET.  THE ERROR COUNT WILL BE
10151  M02S00286.1da8    ---|*         DECREMENTED IN THIS CASE TO ENSURE THAT A SLAVE RESET WILL
10152  M02S00287.1da8    ---|*         BE PERFORMED ON THE NEXT RETRY, SHOULD THE CURRENT RETRY
10153  M02S00288.1da8    ---|*         FAIL.
Line S00508 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
10154  M01S00508.1da8    +++|*         UNTIL THE INTERLOCK IS CLEAR, AND THEN CLEAR THE BUFFER COUNT
10155  M01S00509.1da8    +++|*         AND COMPLETE THE CURRENT REQUEST.  THE REQUEST WILL BE
10156  M01S00510.1da8    +++|*         RETRIED ON A SUBSEQUENT PASS THROUGH THE MAIN LOOP.
Line S00289 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
10157  M01S00289.283l840 +++|*
10158  M01S00290.283l840 +++|*         ENTRY  (RW) = 0, IF SLAVE RESET.
Line S02280 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
10159  M01S02280.ns2783  +++|*                (CRIB) .NE. 0, IF SLAVE RESET INTERLOCK ALREADY SET.
Line S00291 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
10160  M01S00291.283l840 +++|*
Line S00292 Modification History
M01 (Added by) 283l840
M02 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
10161  M02S00292.1da8    ---|*         EXIT   (RW) = 1, IF ANOTHER SLAVE RESET WAS IN PROGRESS.
10162  M02S00293.1da8    ---|*                (ERCT,DI) DECREMENTED, IF (RW) CHANGED.
10163  M02S00294.1da8    ---|*                INTERLOCK SET, IF FIRST *IFR* CALL SUCCESSFUL.
Line S00511 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
10164  M01S00511.1da8    +++|*         EXIT   INTERLOCK SET, IF FIRST *IFR* CALL SUCCESSFUL.
Line S00295 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
10165  M02S00295.ns2783  ---|*                (CRIA+1) NONZERO, IF INTERLOCK SET.
Line S00512 Modification History
M01 (Added by) 1da8
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
10166  M02S00512.ns2783  ---|*                TO *CMP9*, IF FIRST *IFR* CALL UNSUCCESSFUL.
Line S02281 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
10167  M01S02281.ns2783  +++|*                (CRIB) .NE. 0, IF SLAVE RESET INTERLOCK SET.
10168  M01S02282.ns2783  +++|*                TO *CMP10*, IF FIRST *IFR* CALL UNSUCCESSFUL.
Line S00296 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
10169  M01S00296.283l840 +++|*
10170  M01S00297.283l840 +++|*         CALLS  IFR.
Proceed to Part 9
cdc/nos2.source/opl.opl871/deck/1da.008.txt ยท Last modified: by 127.0.0.1