12 Modifications

Seq #  *Modification Id* Act 
----------------------------+

Seq #  *Modification Id* Act 
----------------------------+
01238  M02S01087.ns2750  ---|

Seq #  *Modification Id* Act 
----------------------------+
01239  M02S01088.ns2750  ---| SPD8     LDD    RW

Seq #  *Modification Id* Act 
----------------------------+
01240  M02S01089.ns2750  ---|          ZJN    SPD10       IF SPIN-DOWN

Seq #  *Modification Id* Act 
----------------------------+
01241  M03S01090.ns2750  ---|          LDM    SREQ

Seq #  *Modification Id* Act 
----------------------------+
01242  M02S00032.ns2750  ---|          LDM    SREQ,DI

Seq #  *Modification Id* Act 
----------------------------+
01243  M02S01091.ns2750  ---|          ZJN    SPD9        IF SPIN-UP INITIATED BY DRIVER

Seq #  *Modification Id* Act 
----------------------------+
01244  M02S01092.ns2750  ---|          LDN    DUNF

Seq #  *Modification Id* Act 
----------------------------+
01245  M02S01093.ns2750  ---|          RJM    CPF         CLEAR DEVICE UNAVAILABLE

Seq #  *Modification Id* Act 
----------------------------+
01246  M02S01094.ns2750  ---|

Seq #  *Modification Id* Act 
----------------------------+
01247  M02S01095.ns2750  ---|*         COMPLETE DEVICE INITIALIZATION.

Seq #  *Modification Id* Act 
----------------------------+
01248  M02S01096.ns2750  ---|

Seq #  *Modification Id* Act 
----------------------------+
01249  M02S01097.ns2750  ---| SPD9     LDN    0           CLEAR OPERATOR MESSAGE

Seq #  *Modification Id* Act 
----------------------------+
01250  M02S01098.ns2750  ---|          RJM    IOM

Seq #  *Modification Id* Act 
----------------------------+
01251  M03S01099.ns2750  ---| SPD10    LDM    ERAD        SET RETURN ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
01252  M02S00033.ns2750  ---| SPD10    LDM    ERAD,DI     SET RETURN ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
01253  M02S01100.ns2750  ---|          STD    PA

Seq #  *Modification Id* Act 
----------------------------+
01254  M02S01101.ns2750  ---|          LDN    0           INDICATE OPERATION SUCCESSFUL

Seq #  *Modification Id* Act 
----------------------------+
01255  M02S01102.ns2750  ---|          LJM    0,PA        RETURN TO CALLER

Seq #  *Modification Id* Act 
----------------------------+
01256  M02S01103.ns2750  ---|

Seq #  *Modification Id* Act 
----------------------------+
01257  M02S01104.ns2750  ---|

Seq #  *Modification Id* Act 
----------------------------+
01258  M02S01105.ns2750  ---| SPDA     DATA   C* EQ000, SPIN UP PENDING.*

Seq #  *Modification Id* Act 
----------------------------+
01259  M02S01106.ns2750  ---|

Seq #  *Modification Id* Act 
----------------------------+
01260  M02S01107.ns2750  ---| SPDB     BSS    0           DISK MODES

Seq #  *Modification Id* Act 
----------------------------+
01261  M02S01108.ns2750  ---|          CONL   0#4000

Seq #  *Modification Id* Act 
----------------------------+
01262  M02S01109.ns2750  ---|          CONL   0#8000

Seq #  *Modification Id* Act 
----------------------------+
01263  M02S01110.ns2750  ---|

Seq #  *Modification Id* Act 
----------------------------+
01264  M02S01111.ns2750  ---| SPDC     BSS    0           TIMEOUT VALUES

Seq #  *Modification Id* Act 
----------------------------+
01265  M02S01112.ns2750  ---|          CON    1*60D

Seq #  *Modification Id* Act 
----------------------------+
01266  M02S01113.ns2750  ---|          CON    4*60D

Seq #  *Modification Id* Act 
----------------------------+
01267  M02S01114.ns2750  ---|

Seq #  *Modification Id* Act 
----------------------------+
01268  M02S01115.ns2750  ---| SPDD     BSS    0           MESSAGE ADDRESSES

Seq #  *Modification Id* Act 
----------------------------+
01269  M02S01116.ns2750  ---|          CON    0

Seq #  *Modification Id* Act 
----------------------------+
01270  M02S01117.ns2750  ---|          CON    SPDA

Seq #  *Modification Id* Act 
----------------------------+
01271  M02S01118.ns2750  ---|

Seq #  *Modification Id* Act 
----------------------------+
01272  M02S01119.ns2750  ---| SPDE     BSS    0           FAULT CODES

Seq #  *Modification Id* Act 
----------------------------+
01273  M02S01120.ns2750  ---|          CON    ESDF

Seq #  *Modification Id* Act 
----------------------------+
01274  M02S01121.ns2750  ---|          CON    ESUF
01275  M01S01122.1xd     +++|          TITLE  SELECTIVE RESET PROCESSING.

Seq #  *Modification Id* Act 
----------------------------+
01276  M02S01123.1xd5    ---| SRS      SPACE  4,10
01277  M01S00078.1xd5    +++| SRS      SPACE  4,20
01278  M01S01124.1xd     +++|**        SRS - SELECTIVE RESET PROCESSING.
01279  M01S00079.1xd5    +++|*
01280  M01S00080.1xd5    +++|*         ENTRY  (A) = 6/FLAG,12/RADD.
01281  M01S00081.1xd5    +++|*                      (FLAG) = 0 FOR SLAVE RESET.
01282  M01S00082.1xd5    +++|*                      (FLAG) = 1 FOR LOGICAL RESET.
01283  M01S00083.1xd5    +++|*                      (RADD) = RETURN ADDRESS.
01284  M01S00084.1xd5    +++|*                (CN) = CONTROLLER NUMBER.
01285  M01S00085.1xd5    +++|*                (ADDR,DI) = 0 FOR ALL DRIVES ON CONTROL MODULE.
01286  M01S00086.1xd5    +++|*
01287  M01S00087.1xd5    +++|*         EXIT   TO *ERR* IF ERROR.
01288  M01S00088.1xd5    +++|*                TO *CMP9* FOR NON-CONTROLLING DRIVES ON SLAVE RESET.
01289  M01S00089.1xd5    +++|*
01290  M01S00090.1xd5    +++|*         USES   PA, RF, RW, T1, T5.
01291  M01S00091.1xd5    +++|*
01292  M01S00092.1xd5    +++|*         CALLS  ATT, C2D, IOM, LND, RIF, SCA, SRP, STO, XMD.
01293  M01S01125.1xd     +++|
01294  M01S01126.1xd     +++|

Seq #  *Modification Id* Act 
----------------------------+
01295  M02S01127.1xd5    ---| SRS      BSS    0

Seq #  *Modification Id* Act 
----------------------------+
01296  M02S01128.1xd5    ---|          SHN    14-0        POSITION RESET OPTION

Seq #  *Modification Id* Act 
----------------------------+
01297  M02S01129.1xd5    ---|          LMC    CMP

Seq #  *Modification Id* Act 
----------------------------+
01298  M02S01130.1xd5    ---| SRS1     STM    ERAD        SET RETURN ADDRESS
01299  M01S00093.1xd5    +++| SRS      BSS    0           ENTRY
01300  M01S00094.1xd5    +++|          STM    ERAD,DI     SET RETURN ADDRESS
01301  M01S01131.1xd     +++|          SHN    -14
01302  M01S01132.1xd     +++|          STD    RW          SAVE RESET OPTION

Seq #  *Modification Id* Act 
----------------------------+
01303  M02S01133.272l774 ---|          STM    RWST
01304  M01S00034.272l774 +++|          STM    RWST,DI
01305  M01S01134.1xd     +++| SRS2     LDC    0           CHECK RESET ACTIVITY
01306  M01S01135.1xd     +++| SRSA     EQU    *-1
01307  M01S01136.1xd     +++|          ZJN    SRS4        IF NONE IN PROGRESS
01308  M01S01137.1xd     +++| SRS3     RJM    XMD         RETURN TO MAIN LOOP
01309  M01S01138.1xd     +++|          UJN    SRS2        CHECK RESET IN PROGRESS
01310  M01S01139.1xd     +++|

Seq #  *Modification Id* Act 
----------------------------+
01311  M02S01140.1xd5    ---| SRS4     LDN    1           GET RESET INTERLOCK

Seq #  *Modification Id* Act 
----------------------------+
01312  M02S01141.1xd5    ---|          RJM    SRI

Seq #  *Modification Id* Act 
----------------------------+
01313  M02S01142.1xd5    ---|          NJN    SRS3        IF RESET IN PROGRESS ELSEWHERE

Seq #  *Modification Id* Act 
----------------------------+
01314  M02S01143.1xd5    ---|          LDD    DI
01315  M01S00095.1xd5    +++| SRS4     LDD    DI
01316  M01S01144.1xd     +++|          STM    SRSA        SET LOCAL RESET IN PROGRESS

Seq #  *Modification Id* Act 
----------------------------+
01317  M02S01145.ns2714  ---|          LDM    PNUN

Seq #  *Modification Id* Act 
----------------------------+
01318  M02S01146.ns2714  ---|          SHN    -3          SET CONTROLLER BLOCK INDEX

Seq #  *Modification Id* Act 
----------------------------+
01319  M02S01147.ns2714  ---|          STD    T5

Seq #  *Modification Id* Act 
----------------------------+
01320  M02S01148.ns2714  ---|          LDC    1S15        DISABLE CONTROLLER ACTIVITY

Seq #  *Modification Id* Act 
----------------------------+
01321  M02S01149.ns2714  ---|          RAML   CSTB,T5

Seq #  *Modification Id* Act 
----------------------------+
01322  M02S01150.ns2714  ---|          SBN    DSTBE       INITIALIZE FOR DRIVE SCAN

Seq #  *Modification Id* Act 
----------------------------+
01323  M02S01151.ns2714  ---|          STD    T7

Seq #  *Modification Id* Act 
----------------------------+
01324  M02S01152.ns2714  ---| SRS5     RJM    LND         LOCATE NEXT DRIVE

Seq #  *Modification Id* Act 
----------------------------+
01325  M02S00029.1xd5    ---| SRS5     LMD    DI

Seq #  *Modification Id* Act 
----------------------------+
01326  M02S00030.1xd5    ---|          RJM    LND         LOCATE NEXT DRIVE

Seq #  *Modification Id* Act 
----------------------------+
01327  M02S01153.1xd5    ---|          STD    DI
01328  M01S00096.1xd5    +++|          LDN    0
01329  M01S00097.1xd5    +++| SRS5     RJM    LND         LOCATE NEXT DRIVE
01330  M01S01154.1xd     +++|          ZJN    SRS7        IF NO MORE DRIVES ON CONTROLLER
01331  M01S01155.1xd     +++|          LDM    SRSE,RW

Seq #  *Modification Id* Act 
----------------------------+
01332  M02S01156.1xd5    ---|          STM    ADDR        SET DRIVE PROCESSING ADDRESS
01333  M01S00098.1xd5    +++|          STM    ADDR,T7     SET DRIVE PROCESSING ADDRESS
01334  M01S01157.1xd     +++|          STM    SRSC

Seq #  *Modification Id* Act 
----------------------------+
01335  M02S01158.1xd5    ---|          ZJN    SRS5        IF NOT SLAVE RESET

Seq #  *Modification Id* Act 
----------------------------+
01336  M02S01159.1xd5    ---| SRS6     RJM    SUI         SET UNIT INTERLOCK

Seq #  *Modification Id* Act 
----------------------------+
01337  M02S01160.1xd5    ---|          ZJN    SRS5        IF UNIT ASSIGNED THIS DRIVER

Seq #  *Modification Id* Act 
----------------------------+
01338  M02S01161.1xd5    ---|          WAIT   512

Seq #  *Modification Id* Act 
----------------------------+
01339  M02S01162.1xd5    ---|          UJN    SRS6        RETRY ACQUIRING INTERLOCK
01340  M01S00099.1xd5    +++|          LDN    1
01341  M01S00100.1xd5    +++|          UJN    SRS5        CHECK FOR NEXT DRIVE
01342  M01S01163.1xd     +++|

Seq #  *Modification Id* Act 
----------------------------+
01343  M02S01164.1xd5    ---| SRS7     LDM    SRSA        RESTORE DEVICE INDEX

Seq #  *Modification Id* Act 
----------------------------+
01344  M02S01165.1xd5    ---|          STD    DI

Seq #  *Modification Id* Act 
----------------------------+
01345  M02S00031.1xd5    ---|          LDC    1S15        DISABLE CONTROLLER ACTIVITY

Seq #  *Modification Id* Act 
----------------------------+
01346  M02S00032.1xd5    ---|          RAML   CSTB,T5

Seq #  *Modification Id* Act 
----------------------------+
01347  M02S01166.1xd5    ---|          LDD    RW          RESET SLAVE / LOGICAL INTERFACE

Seq #  *Modification Id* Act 
----------------------------+
01348  M02S01167.1xd5    ---|          RJM    RIF

Seq #  *Modification Id* Act 
----------------------------+
01349  M03S01168.1xd5    ---|          LDM    SRSD,RW     DEFINE TIMEOUT

Seq #  *Modification Id* Act 
----------------------------+
01350  M02S00002.1xd5    ---|          LDN    60D         DEFINE RESET TIMEOUT
01351  M01S00101.1xd5    +++| SRS7     LDM    PNUN,DI

Seq #  *Modification Id* Act 
----------------------------+
01352  M02S00102.272l774 ---|          SHN    -3          CONTROLLER BLOCK INDEX
01353  M01S00035.272l774 +++|          SHN    -6          CONTROLLER BLOCK INDEX
01354  M01S00103.1xd5    +++|          STD    T5
01355  M01S00104.1xd5    +++|          LDD    RW
01356  M01S00105.1xd5    +++|          LMN    1
01357  M01S00106.1xd5    +++|          SHN    17-0        BIT 15 SET IF SLAVE RESET
01358  M01S00107.1xd5    +++|          STDL   T1
01359  M01S00108.1xd5    +++|          LDML   CSTB,T5     SET / CLEAR SLAVE RESET IN PROGRESS FLAG
01360  M01S00109.1xd5    +++|          LPC    -1S15
01361  M01S00110.1xd5    +++|          LMDL   T1
01362  M01S00111.1xd5    +++|          STML   CSTB,T5
01363  M01S00112.1xd5    +++|          RJM    RIF         RESET SLAVE / LOGICAL INTERFACE
01364  M01S00113.1xd5    +++|          LDN    60D         RESET TIMEOUT = 1 MINUTE
01365  M01S01169.1xd     +++|          RJM    STO
01366  M01S01170.1xd     +++|          LDD    CN          CONVERT CONTROL MODULE NUMBER
01367  M01S01171.1xd     +++|          RJM    C2D
01368  M01S01172.1xd     +++|          SHN    6           INSERT IN MESSAGE
01369  M01S01173.1xd     +++|          LMN    1R
01370  M01S01174.1xd     +++|          STM    SRSH+1      INSERT IN FAILURE MESSAGE
01371  M01S01175.1xd     +++|          STM    SRSG+1
01372  M01S00114.1xd5    +++|          LDD    RW
01373  M01S00115.1xd5    +++|          NJN    SRS7.1      IF LOGICAL RESET
01374  M01S01176.1xd     +++|          LDC    SRSG        ACTIVATE OPERATOR MESSAGE
01375  M01S01177.1xd     +++|          STM    IOMA

Seq #  *Modification Id* Act 
----------------------------+
01376  M02S01178.1xd5    ---|          LDN    ASRT        WAIT ON ASYNC INTERRUPT
01377  M01S00116.1xd5    +++|          LCN    1
01378  M01S00117.1xd5    +++|          RJM    IOM
01379  M01S00118.1xd5    +++| SRS7.1   LDN    ASRT        WAIT ON ASYNC INTERRUPT
01380  M01S01179.1xd     +++|          RJM    ATT

Seq #  *Modification Id* Act 
----------------------------+
01381  M02S01180.1xd5    ---|          NJN    SRS8        IF INTERRUPT TIMEOUT OR NONE
01382  M01S00119.1xd5    +++|          NJN    SRS8        IF ERROR
01383  M01S01181.1xd     +++|

Seq #  *Modification Id* Act 
----------------------------+
01384  M02S01182.1xd5    ---|*         SEARCH REPONSE PACKET FOR MACHINE EXCEPTION PARAMETER.
01385  M01S00120.1xd5    +++|*         SEARCH RESPONSE PACKET FOR MACHINE EXCEPTION PARAMETER.
01386  M01S01183.1xd     +++|
01387  M01S01184.1xd     +++|          LDN    ID16        LOOK FOR MACHINE EXCEPTION
01388  M01S01185.1xd     +++|          RJM    SRP
01389  M01S01186.1xd     +++|          MJN    SRS8        IF PARAMETER NOT FOUND
01390  M01S01187.1xd     +++|          LDML   RPBF+6,T3
01391  M01S01188.1xd     +++|          LPC    0#FEE0      CHECK OPERATIONAL + READY TRANSITION
01392  M01S01189.1xd     +++|          LMC    0#6000
01393  M01S01190.1xd     +++|          ZJN    SRS9        IF CONTROLLER RESET SUCCESSFUL
01394  M01S01191.1xd     +++| SRS8     LCN    ESRE
01395  M01S01192.1xd     +++|          RJM    ERR         PROCESS ERROR
01396  M01S01193.1xd     +++|
01397  M01S01194.1xd     +++| SRS9     RJM    SCA         SET CONTROLLER ATTRIBUTES

Seq #  *Modification Id* Act 
----------------------------+
01398  M02S01195.1xd5    ---|*         LDN    0

Seq #  *Modification Id* Act 
----------------------------+
01399  M02S01196.1xd5    ---|          STM    SRSA        CLEAR RESET INTERLOCKS

Seq #  *Modification Id* Act 
----------------------------+
01400  M02S01197.1xd5    ---|          RJM    SRI

Seq #  *Modification Id* Act 
----------------------------+
01401  M02S01198.1xd5    ---|*         LDN    0           CLEAR RESET IN PROGRESS FLAG

Seq #  *Modification Id* Act 
----------------------------+
01402  M02S01199.1xd5    ---|          STD    RF
01403  M01S00121.1xd5    +++|*         LDN    0           CLEAR RESET INTERLOCK
01404  M01S00122.1xd5    +++|          STM    SRSA
01405  M01S00123.1xd5    +++|          STD    RF          CLEAR RESET IN PROGRESS FLAG
01406  M01S01200.1xd     +++|          RJM    IOM         CLEAR OPERATOR MESSAGE

Seq #  *Modification Id* Act 
----------------------------+
01407  M02S01201.272l774 ---|          LDM    PNUN

Seq #  *Modification Id* Act 
----------------------------+
01408  M02S01202.272l774 ---|          SHN    -3          CONTROLLER BLOCK INDEX
01409  M01S00036.272l774 +++|          LDM    PNUN,DI
01410  M01S00037.272l774 +++|          SHN    -6          CONTROLLER BLOCK INDEX
01411  M01S01203.1xd     +++|          STD    T5
01412  M01S01204.1xd     +++|          LDML   CSTB,T5     ENABLE CONTROLLER ACTIVITY

Seq #  *Modification Id* Act 
----------------------------+
01413  M02S01205.1xd5    ---|          LPC    37777
01414  M01S00124.1xd5    +++|          LPC    -1S14-1S15
01415  M01S01206.1xd     +++|          STML   CSTB,T5

Seq #  *Modification Id* Act 
----------------------------+
01416  M02S01207.1xd5    ---|          LDC    0           CHECK RESET COMPLETION
01417  M01S00125.1xd5    +++|
01418  M01S00126.1xd5    +++|*         SLAVE RESET - WAIT FOR ASYNC INTERRUPT ON CONTROLLING UNIT.
01419  M01S00127.1xd5    +++|*         IF THE DRIVE INTERRUPT FOR THE CONTROLLING UNIT IS RECEIVED
01420  M01S00128.1xd5    +++|*         BEFORE THE CONTROLLER INTERRUPT, *IHD* WILL CLEAR *SRSC*
01421  M01S00129.1xd5    +++|*         AND THROW AWAY THE INTERRUPT.
01422  M01S00130.1xd5    +++|
01423  M01S00131.1xd5    +++| SRS10    LDC    0           CHECK RESET COMPLETION
01424  M01S00132.1xd5    +++|*         LDC    (NONZERO)   (SLAVE RESET - MAY BE CLEARED BY *IHD*)
01425  M01S01208.1xd     +++| SRSC     EQU    *-1

Seq #  *Modification Id* Act 
----------------------------+
01426  M02S01209.1xd5    ---|          ZJP    SPD10       IF CONTROLLING DRIVE COMPLETE
01427  M01S00133.1xd5    +++|          ZJN    SRS11       IF CONTROLLING DRIVE COMPLETE
01428  M01S00134.1xd5    +++|          LDC    7*60D       TIMEOUT = 7 MINUTES
01429  M01S00135.1xd5    +++|          RJM    STO
01430  M01S00136.1xd5    +++|          LDN    ASRT        WAIT ON ASYNC INTERRUPT

Seq #  *Modification Id* Act 
----------------------------+
01431  M02S00137.1xd6a   ---|          RJM    ATT
01432  M01S00001.1xd6a   +++|          RJM    ATT         (RETURN TO *SRS11* IF INTERRUPT TIMEOUT)
01433  M01S01210.1xd     +++|

Seq #  *Modification Id* Act 
----------------------------+
01434  M02S01211.1xd5    ---|*         TIMEOUT NON-OPERATIONAL / NON-EXISTENT DRIVES.
01435  M01S00138.1xd5    +++|*         COMPLETE RESET PROCESSING.
01436  M01S01212.1xd     +++|

Seq #  *Modification Id* Act 
----------------------------+
01437  M02S01213.1xd5    ---| SRS10    LDC    6*60D       SET TIMEOUT
01438  M01S00139.1xd5    +++| SRS11    LDN    0           REENABLE ACCESS TO CONTROLLING DEVICE
01439  M01S00140.1xd5    +++|          STM    ADDR,DI
01440  M01S00002.1xd6a   +++|          STM    ATTN,DI
01441  M01S00003.1xd6a   +++|          RJM    IOM         CLEAR OPERATOR MESSAGE
01442  M01S00141.1xd5    +++|          LDM    ERAD,DI
01443  M01S00142.1xd5    +++|          STD    PA
01444  M01S00143.1xd5    +++|          LJM    0,PA        RETURN TO CALLER
01445  M01S00144.1xd5    +++|
01446  M01S00145.1xd5    +++|*         SLAVE RESET - WAIT FOR ASYNC INTERRUPTS ON OTHER UNITS.
01447  M01S00004.1xd6a   +++|*         ENTRY TO THIS CODE IS FORCED BY CODE AT *SRS5*.
01448  M01S00005.1xd6a   +++|*         IF A DRIVE INTERRUPT FOR A NONCONTROLLING UNIT IS RECEIVED
01449  M01S00006.1xd6a   +++|*         BEFORE ENTRY AT *SRS12*, *VIS* WILL CLEAR *ADDR* FOR THE
01450  M01S00007.1xd6a   +++|*         DRIVE AND THROW AWAY THE INTERRUPT.
01451  M01S00146.1xd5    +++|
01452  M01S00147.1xd5    +++| SRS12    LDC    8D*60D      TIMEOUT = 8 MINUTES
01453  M01S01214.1xd     +++|          RJM    STO

Seq #  *Modification Id* Act 
----------------------------+
01454  M02S01215.1xd5    ---| SRS11    RJM    XMD         RETURN TO MAIN LOOP

Seq #  *Modification Id* Act 
----------------------------+
01455  M02S01216.1xd5    ---|          RJM    CTO         CHECK TIMEOUT

Seq #  *Modification Id* Act 
----------------------------+
01456  M02S01217.1xd5    ---|          MJN    SRS11       IF NOT TIMED OUT

Seq #  *Modification Id* Act 
----------------------------+
01457  M02S01218.1xd5    ---|          LDN    STNR        SET NOT READY ERROR IN MST

Seq #  *Modification Id* Act 
----------------------------+
01458  M02S01219.1xd5    ---|          RJM    SES

Seq #  *Modification Id* Act 
----------------------------+
01459  M02S01220.1xd5    ---|          LJM    CMP9        COMPLETE RESET PROCESSING
01460  M01S00148.1xd5    +++|          LDN    ASRT        WAIT FOR ASYNC INTERRUPT
01461  M01S00149.1xd5    +++|          RJM    ATT         (RETURN TO *SRS13* IF INTERRUPT TIMEOUT)

Seq #  *Modification Id* Act 
----------------------------+
01462  M02S00150.1xd6    ---| SRS13    LJM    CMP9        REENABLE ACCESS TO DEVICE
01463  M01S00002.1xd6    +++| SRS13    LDN    0
01464  M01S00003.1xd6    +++|          RJM    IOM         CLEAR OPERATOR MESSAGE
01465  M01S00004.1xd6    +++|          LJM    CMP9        REENABLE ACCESS TO DRIVE
01466  M01S01221.1xd     +++|

Seq #  *Modification Id* Act 
----------------------------+
01467  M02S01222.1xd4    ---|

Seq #  *Modification Id* Act 
----------------------------+
01468  M02S01223.1xd4    ---| SRSD     BSS    0           RESET TIMEOUT VALUES

Seq #  *Modification Id* Act 
----------------------------+
01469  M02S01224.1xd4    ---|          CON    60D

Seq #  *Modification Id* Act 
----------------------------+
01470  M02S01225.1xd4    ---|          CON    3
01471  M01S01226.1xd     +++|
01472  M01S01227.1xd     +++| SRSE     BSS    0           DRIVE PROCESSING ADDRESSES

Seq #  *Modification Id* Act 
----------------------------+
01473  M02S01228.1xd5    ---|          CON    SRS10

Seq #  *Modification Id* Act 
----------------------------+
01474  M02S01229.1xd5    ---|          CON    0
01475  M01S00151.1xd5    +++|          CON    SRS12       SLAVE RESET
01476  M01S00152.1xd5    +++|          CON    0           LOGICAL RESET
01477  M01S01230.1xd     +++|
01478  M01S01231.1xd     +++| SRSG     DATA   C*CM3 BEING RESET ON CCHNN.*
01479  M01S01232.1xd     +++|
01480  M01S01233.1xd     +++| SRSH     DATA   C*CM3 RESET FAILURE ON CCHNN.*
01481  M01S01234.1xd     +++|          TITLE  INTERRUPT DRIVEN SUBROUTINES.

Seq #  *Modification Id* Act 
----------------------------+
01482  M02S00153.ns2750  ---| BOR      SPACE  4,10
01483  M01S00003.ns2750  +++| BOR      SPACE  4,20
01484  M01S00154.1xd5    +++|**        BOR - BREAK OPPOSITE RESERVE.
01485  M01S00155.1xd5    +++|*
01486  M01S00156.1xd5    +++|*         EXECUTE A DRIVE RESET FOR THE SPECIFIED DRIVE.  THIS IS DONE
01487  M01S00157.1xd5    +++|*         FOR EACH DRIVE AT DRIVER INITIALIZATION TIME TO BREAK ANY
01488  M01S00158.1xd5    +++|*         DRIVE RESERVES WHICH MAY BE HELD BY THE OPPOSITE ACCESS.
01489  M01S00006.273l780 +++|*         ALSO CLEAR CONTROLLER OVER TEMPERATURE STATUS IN MST WORD
01490  M01S00007.273l780 +++|*         *BDLL*.
01491  M01S00159.1xd5    +++|*
01492  M01S00160.1xd5    +++|*         ENTRY  (CN) = CONTROLLER NUMBER.
01493  M01S00161.1xd5    +++|*                (DN) = DRIVE NUMBER.
01494  M01S00162.1xd5    +++|*
01495  M01S00163.1xd5    +++|*         EXIT   TO *CMP*.
01496  M01S00164.1xd5    +++|*
01497  M01S00004.ns2750  +++|*         USES   CM+2, T7.
01498  M01S00005.ns2750  +++|*

Seq #  *Modification Id* Act 
----------------------------+
01499  M02S00165.273l780 ---|*         CALLS  EDR.
01500  M01S00008.273l780 +++|*         CALLS  EDR, UBP.
01501  M01S00166.1xd5    +++|
01502  M01S00167.1xd5    +++|
01503  M01S00168.1xd5    +++| BOR      BSS    0           ENTRY
01504  M01S00009.273l780 +++|          LDN    0           CLEAR CONTROLLER OVER TEMPERATURE FLAG
01505  M01S00006.ns2750  +++|          STD    CM+2
01506  M01S00007.ns2750  +++|          LDC    63*100      LOW ORDER BIT TO CHANGE TIMES 100
01507  M01S00008.ns2750  +++|          STD    T7
01508  M01S00009.ns2750  +++|          LDC    BDLL*100+1  6/WORD, 6/BITS TO CHANGE
01509  M01S00010.273l780 +++|          RJM    UBP         UPDATE *BDLL* PARAMETER
01510  M01S00169.1xd5    +++|          RJM    EDR         EXECUTE DRIVE RESET
01511  M01S00170.1xd5    +++|          LDML   IPPS,DI     CLEAR *BREAK OPPOSITE RESERVE* FLAG
01512  M01S00171.1xd5    +++|          LPC    -1S13
01513  M01S00172.1xd5    +++|          STML   IPPS,DI
01514  M01S00173.1xd5    +++|          LJM    CMP         COMPLETE REQUEST
01515  M01S01235.1xd     +++| EDR      SPACE  4,15
01516  M01S01236.1xd     +++|**        EDR - EXECUTE DRIVE (POWER ON) RESET.
01517  M01S01237.1xd     +++|*
01518  M01S01238.1xd     +++|*         ENTRY  (CN) = CONTROLLER NUMBER.
01519  M01S01239.1xd     +++|*                (DN) = DRIVE NUMBER.
01520  M01S01240.1xd     +++|*
01521  M01S01241.1xd     +++|*         EXIT   (A) = 0 IF COMMAND COMPLETED.
01522  M01S00038.272l774 +++|*                TO CALLER VIA *RTC*.
01523  M01S01242.1xd     +++|*
01524  M01S01243.1xd     +++|*         ERROR  TO *ERR* IF NOT COMMAND COMPLETED.
01525  M01S01244.1xd     +++|*
01526  M01S01245.1xd     +++|*         USES   TO.
01527  M01S01246.1xd     +++|*

Seq #  *Modification Id* Act 
----------------------------+
01528  M02S01247.272l774 ---|*         CALLS  ATT, RTC, WCB.
01529  M01S00039.272l774 +++|*         CALLS  ATT, WCB.
01530  M01S01248.1xd     +++|
01531  M01S01249.1xd     +++|
01532  M01S01250.1xd     +++| EDR      CON    0
01533  M01S01251.1xd     +++|          LDM    EDR         SET RETURN ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
01534  M02S01252.1xd5    ---| EDR1     STM    RADD
01535  M01S00174.1xd5    +++|          STM    RADD,DI
01536  M01S01253.1xd     +++|          LDC    C0800       SETUP ABORT COMMAND
01537  M01S01254.1xd     +++|          STM    CPBF+OPC
01538  M01S01255.1xd     +++|          LDD    CN          CONTROLLER NUMBER
01539  M01S01256.1xd     +++|          SHN    10
01540  M01S01257.1xd     +++|          LMD    DN          APPEND FACILITY ADDRESS
01541  M01S01258.1xd     +++|          STM    CPBF+CUN
01542  M01S01259.1xd     +++|          LDC    P0254       PARAMETER ID = DRIVE RESET
01543  M01S01260.1xd     +++|          STM    CPBF+FCP
01544  M01S01261.1xd     +++|          LDC    0#400       SELECT POWER ON RESET
01545  M01S01262.1xd     +++|          STM    CPBF+FCP+1
01546  M01S01263.1xd     +++|          LDN    30D         TIMEOUT = 30 SECONDS
01547  M01S01264.1xd     +++|          STD    TO
01548  M01S01265.1xd     +++|          LDN    BCPL+3      WRITE COMMAND BLOCK
01549  M01S01266.1xd     +++|          RJM    WCB
01550  M01S01267.1xd     +++|          LDN    CMSS        WAIT ON INTERRUPT
01551  M01S01268.1xd     +++|          RJM    ATT
01552  M01S01269.1xd     +++|          ZJP    RTC         IF COMMAND COMPLETE
01553  M01S01270.1xd     +++|          LCN    EDRS
01554  M01S01271.1xd     +++|          RJM    ERR         PROCESS ERROR
01555  M01S01272.1xd     +++| GDS      SPACE  4,15
01556  M01S01273.1xd     +++|**        GDS - GET DRIVE STATUS.
01557  M01S01274.1xd     +++|*
01558  M01S01275.1xd     +++|*         ENTRY  (CN) = CONTROLLER NUMBER.
01559  M01S01276.1xd     +++|*                (DN) = DRIVE NUMBER.
01560  M01S01277.1xd     +++|*
01561  M01S01278.1xd     +++|*         EXIT   (A) = DRIVE CONDITION FLAGS.
01562  M01S00040.272l774 +++|*                TO CALLER VIA *RTC*.
01563  M01S01279.1xd     +++|*
01564  M01S01280.1xd     +++|*         ERROR  TO *ERR* IF COMMAND COMPLETE NOT RECEIVED.
01565  M01S01281.1xd     +++|*
01566  M01S01282.1xd     +++|*         USES   TO.
01567  M01S01283.1xd     +++|*

Seq #  *Modification Id* Act 
----------------------------+
01568  M02S01284.272l774 ---|*         CALLS  ATT, RTC, WCB.
01569  M01S00041.272l774 +++|*         CALLS  ATT, WCB.
01570  M01S01285.1xd     +++|
01571  M01S01286.1xd     +++|
01572  M01S01287.1xd     +++| GDS      CON    0
01573  M01S01288.1xd     +++|          LDM    GDS         SET RETURN ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
01574  M02S01289.272l774 ---|          STM    RADD
01575  M01S00042.272l774 +++|          STM    RADD,DI
01576  M01S01290.1xd     +++|          LDC    C0301       SETUP REPORT STATUS COMMAND
01577  M01S01291.1xd     +++|          STML   CPBF+OPC
01578  M01S01292.1xd     +++|          LDD    CN          CONTROLLER NUMBER
01579  M01S01293.1xd     +++|          SHN    10
01580  M01S01294.1xd     +++|          LMD    DN          FORM FACILITY ADDRESS
01581  M01S01295.1xd     +++|          STM    CPBF+CUN
01582  M01S01296.1xd     +++|          LDN    2           TIMEOUT = 2 SECONDS
01583  M01S01297.1xd     +++|          STD    TO
01584  M01S01298.1xd     +++|          LDN    BCPL        WRITE COMMAND BLOCK
01585  M01S01299.1xd     +++|          RJM    WCB
01586  M01S01300.1xd     +++|          LDN    CMSS        WAIT ON INTERRUPT
01587  M01S01301.1xd     +++|          RJM    ATT
01588  M01S01302.1xd     +++|          ZJN    GDS2        IF COMMAND COMPLETE
01589  M01S01303.1xd     +++|          LCN    ERDS
01590  M01S01304.1xd     +++|          RJM    ERR         PROCESS ERROR
01591  M01S01305.1xd     +++|
01592  M01S01306.1xd     +++| GDS2     LDML   RPBF+6      RETURN DRIVE CONDITION TO CALLER
01593  M01S01307.1xd     +++|*         LJM    RTC
01594  M01S01308.1xd     +++| RTC      SPACE  4,10
01595  M01S01309.1xd     +++|**        RTC - RETURN TO CALLER.
01596  M01S01310.1xd     +++|*
01597  M01S01311.1xd     +++|*         USES   PA.
01598  M01S01312.1xd     +++|
01599  M01S01313.1xd     +++|
01600  M01S01314.1xd     +++| RTC      STD    T0          SAVE 12 BITS OF *A* REGISTER
01601  M01S01315.1xd     +++|          LMD    T0

Seq #  *Modification Id* Act 
----------------------------+
01602  M02S01316.272l774 ---|          LMM    RADD        SET RETURN ADDRESS
01603  M01S00043.272l774 +++|          LMM    RADD,DI     SET RETURN ADDRESS
01604  M01S01317.1xd     +++|          STD    PA
01605  M01S01318.1xd     +++|          LMD    PA          RESTORE *A* REGISTER
01606  M01S01319.1xd     +++|          LMD    T0
01607  M01S01320.1xd     +++|          LJM    0,PA        RETURN TO CALLER
01608  M01S01321.1xd     +++| SCA      SPACE  4,15
01609  M01S01322.1xd     +++|**        SCA - SET CONTROLLER ATTRIBUTES.
01610  M01S01323.1xd     +++|*
01611  M01S01324.1xd     +++|*         ENTRY  (CN) = CONTROLLER NUMBER.
01612  M01S01325.1xd     +++|*
01613  M01S01326.1xd     +++|*         EXIT   (A) = 0 IF COMMAND COMPLETED.
01614  M01S00044.272l774 +++|*                TO CALLER VIA *RTC*.
01615  M01S01327.1xd     +++|*
01616  M01S01328.1xd     +++|*         ERROR  TO *ERR* IF NOT COMMAND COMPLETED.
01617  M01S01329.1xd     +++|*
01618  M01S01330.1xd     +++|*         USES   TO.
01619  M01S01331.1xd     +++|*

Seq #  *Modification Id* Act 
----------------------------+
01620  M02S01332.272l774 ---|*         CALLS  ATT, RTC, WCB.
01621  M01S00045.272l774 +++|*         CALLS  ATT, WCB.
01622  M01S01333.1xd     +++|
01623  M01S01334.1xd     +++|
01624  M01S01335.1xd     +++| SCA      CON    0
01625  M01S01336.1xd     +++|          LDM    SCA         SET RETURN ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
01626  M02S01337.272l774 ---|          STM    RADD
01627  M01S00046.272l774 +++|          STM    RADD,DI
01628  M01S01338.1xd     +++|          LDC    C0209       SETUP LOAD ATTRIBUTES COMMAND
01629  M01S01339.1xd     +++|          STM    CPBF+OPC
01630  M01S01340.1xd     +++|          LDD    CN          CONTROLLER NUMBER
01631  M01S01341.1xd     +++|          SHN    10
01632  M01S01342.1xd     +++|          LMC    0#FF        APPEND FACILITY ADDRESS
01633  M01S01343.1xd     +++|          STM    CPBF+CUN
01634  M01S01344.1xd     +++|          LDC    P01D1       DISABLE PERFORMANCE LOG
01635  M01S01345.1xd     +++|          STM    CPBF+FCP
01636  M01S01346.1xd     +++|          ADK    P02D2-P01D1 ENABLE MASTER TERMINATE
01637  M01S01347.1xd     +++|          STM    CPBF+FCP+1
01638  M01S01348.1xd     +++|          ADK    P02D3-P02D2 DISABLE EXTENT RESPONSE
01639  M01S01349.1xd     +++|          STM    CPBF+FCP+3
01640  M01S01350.1xd     +++|          LDC    0#100       SET PARAMETERS
01641  M01S01351.1xd     +++|          STM    CPBF+FCP+2
01642  M01S01352.1xd     +++|          STM    CPBF+FCP+4
01643  M01S01353.1xd     +++|          LDN    2           TIMEOUT = 2 SECONDS
01644  M01S01354.1xd     +++|          STD    TO
01645  M01S01355.1xd     +++|          LDN    BCPL+11     WRITE COMMAND BLOCK
01646  M01S01356.1xd     +++|          RJM    WCB
01647  M01S01357.1xd     +++|          LDN    CMSS        WAIT ON INTERRUPT
01648  M01S01358.1xd     +++|          RJM    ATT
01649  M01S01359.1xd     +++|          ZJP    RTC         IF COMMAND COMPLETE
01650  M01S01360.1xd     +++|          LCN    ELCA
01651  M01S01361.1xd     +++|          RJM    ERR         PROCESS ERROR
01652  M01S00175.1xd5    +++| SDA      SPACE  4,20
01653  M01S00176.1xd5    +++|**        SDA - SET DRIVE ATTRIBUTES.
01654  M01S00177.1xd5    +++|*
01655  M01S00178.1xd5    +++|*         SET THE FACILITY BUSY TIMEOUT FOR THE SPECIFIED DRIVE TO
01656  M01S00179.1xd5    +++|*         15 SECONDS.  THIS IS DONE TO PREVENT ERRORS WHEN ANOTHER
01657  M01S00180.1xd5    +++|*         CONTROL MODULE ACCESSES A DRIVE TO PERFORM SWEEP CYCLING,
01658  M01S00181.1xd5    +++|*         OR WHEN A DRIVE IS TIED UP RUNNING DIAGNOSTICS AFTER A
01659  M01S00182.1xd5    +++|*         SLAVE RESET FROM THE OTHER ACCESS.
01660  M01S00183.1xd5    +++|*
01661  M01S00184.1xd5    +++|*         ENTRY  (CN) = CONTROLLER NUMBER.
01662  M01S00185.1xd5    +++|*                (DN) = DRIVE NUMBER.
01663  M01S00186.1xd5    +++|*
01664  M01S00187.1xd5    +++|*         EXIT   TO *CMP* IF COMMAND COMPLETED.
01665  M01S00188.1xd5    +++|*
01666  M01S00189.1xd5    +++|*         ERROR  TO *ERR* IF ERROR.
01667  M01S00190.1xd5    +++|*
01668  M01S00191.1xd5    +++|*         USES   TO.
01669  M01S00192.1xd5    +++|*
01670  M01S00193.1xd5    +++|*         CALLS  ATT, WCB.
01671  M01S00194.1xd5    +++|
01672  M01S00195.1xd5    +++|
01673  M01S00196.1xd5    +++| SDA      BSS    0           ENTRY
01674  M01S00197.1xd5    +++|
01675  M01S00198.1xd5    +++|*         REPORT DEVICE ATTRIBUTES.
01676  M01S00199.1xd5    +++|
01677  M01S00200.1xd5    +++|          LDC    C0200       SETUP REPORT ATTRIBUTES COMMAND
01678  M01S00201.1xd5    +++|          STML   CPBF+OPC
01679  M01S00202.1xd5    +++|          LDD    CN          SET FACILITY ADDRESS
01680  M01S00203.1xd5    +++|          SHN    10
01681  M01S00204.1xd5    +++|          LMD    DN
01682  M01S00205.1xd5    +++|          STM    CPBF+CUN
01683  M01S00206.1xd5    +++|          LDC    P036C       REQUEST ATTRIBUTE PARAMETER
01684  M01S00207.1xd5    +++|          STML   CPBF+FCP
01685  M01S00208.1xd5    +++|          LDC    0#406F      REQUEST ATTRIBUTE 6F
01686  M01S00209.1xd5    +++|          STML   CPBF+FCP+1
01687  M01S00210.1xd5    +++|          LDN    40D         TIMEOUT = 40 SECONDS
01688  M01S00211.1xd5    +++|          STD    TO
01689  M01S00212.1xd5    +++|          LDN    BCPL+4      WRITE COMMAND BLOCK
01690  M01S00213.1xd5    +++|          RJM    WCB
01691  M01S00214.1xd5    +++|          LDN    CMSS        WAIT FOR INTERRUPT
01692  M01S00215.1xd5    +++|          RJM    ATT
01693  M01S00216.1xd5    +++|          NJP    SDA2        IF ERROR
01694  M01S00217.1xd5    +++|
01695  M01S00218.1xd5    +++|*         SET FACILITY BUSY TIMEOUT TO 15 SECONDS.
01696  M01S00219.1xd5    +++|
01697  M01S00220.1xd5    +++|          LDML   RPBF+25     CHECK CURRENT TIMEOUT VALUE
01698  M01S00221.1xd5    +++|          LMC    0#E4
01699  M01S00222.1xd5    +++|          NJN    SDA1        IF TIMEOUT VALUE NOT CORRECT
01700  M01S00223.1xd5    +++|          LDML   RPBF+26
01701  M01S00224.1xd5    +++|          LMC    0#E1C0
01702  M01S00225.1xd5    +++|          ZJP    SDA4        IF TIMEOUT VALUE ALREADY CORRECT
01703  M01S00226.1xd5    +++| SDA1     LDC    0#E4        SET TIMEOUT VALUE TO 15 SECONDS
01704  M01S00227.1xd5    +++|          STML   RPBF+25
01705  M01S00228.1xd5    +++|          LDC    0#E1C0
01706  M01S00229.1xd5    +++|          STML   RPBF+26
01707  M01S00230.1xd5    +++|
01708  M01S00231.1xd5    +++|*         LOAD DEVICE ATTRIBUTES.
01709  M01S00232.1xd5    +++|
01710  M01S00233.1xd5    +++|          LDC    C0209       SETUP LOAD ATTRIBUTES COMMAND
01711  M01S00234.1xd5    +++|          STML   CPBF+OPC
01712  M01S00235.1xd5    +++|          LDD    CN          SET FACILITY ADDRESS
01713  M01S00236.1xd5    +++|          SHN    10
01714  M01S00237.1xd5    +++|          LMD    DN
01715  M01S00238.1xd5    +++|          STM    CPBF+CUN
01716  M01S00239.1xd5    +++|          LDN    40D         TIMEOUT = 40 SECONDS
01717  M01S00240.1xd5    +++|          STD    TO
01718  M01S00241.1xd5    +++|          LDN    BCPL+50     WRITE COMMAND BLOCK
01719  M01S00242.1xd5    +++|          RJM    WCB
01720  M01S00243.1xd5    +++|          LDN    CMSS        WAIT FOR INTERRUPT
01721  M01S00244.1xd5    +++|          RJM    ATT
01722  M01S00245.1xd5    +++|          ZJN    SDA3        IF COMMAND COMPLETE
01723  M01S00246.1xd5    +++| SDA2     LCN    ERDA
01724  M01S00247.1xd5    +++|          RJM    ERR         PROCESS ERROR
01725  M01S00248.1xd5    +++|
01726  M01S00249.1xd5    +++|*         SAVE NEW ATTRIBUTES IN EEPROM.
01727  M01S00250.1xd5    +++|
01728  M01S00251.1xd5    +++| SDA3     LDC    C020A       SETUP SAVE ATTRIBUTES COMMAND
01729  M01S00252.1xd5    +++|          STML   CPBF+OPC
01730  M01S00253.1xd5    +++|          LDD    CN          SET FACILITY ADDRESS
01731  M01S00254.1xd5    +++|          SHN    10
01732  M01S00255.1xd5    +++|          LMC    0#FF
01733  M01S00256.1xd5    +++|          STM    CPBF+CUN
01734  M01S00257.1xd5    +++|          LDN    40D         TIMEOUT = 40 SECONDS
01735  M01S00258.1xd5    +++|          STD    TO
01736  M01S00259.1xd5    +++|          LDN    BCPL        WRITE COMMAND BLOCK
01737  M01S00260.1xd5    +++|          RJM    WCB
01738  M01S00261.1xd5    +++|          LDN    CMSS        WAIT FOR INTERRUPT
01739  M01S00262.1xd5    +++|          RJM    ATT
01740  M01S00263.1xd5    +++|          NJN    SDA2        IF ERROR
01741  M01S00264.1xd5    +++| SDA4     LDML   IPPS,DI     CLEAR *SET DRIVE ATTRIBUTES* FLAG
01742  M01S00265.1xd5    +++|          LPC    -1S14
01743  M01S00266.1xd5    +++|          STML   IPPS,DI
01744  M01S00267.1xd5    +++|          LJM    CMP         COMPLETE REQUEST
01745  M01S01362.1xd     +++|          TITLE  SUBROUTINES.
01746  M01S01363.1xd     +++| ACE      SPACE  4,10
01747  M01S01364.1xd     +++|**        ACE - ANALYZE CHANNEL ERROR.
01748  M01S01365.1xd     +++|*
01749  M01S01366.1xd     +++|*         ENTRY  (RBUF) = CHANNEL STATUS REGISTER.
01750  M01S01367.1xd     +++|*
01751  M01S01368.1xd     +++|*         EXIT   (A) = 0 IF NO CHANNEL ERROR.
01752  M01S01369.1xd     +++|*                    = CHANNEL ERROR FAULT CODE.
01753  M01S01370.1xd     +++|
01754  M01S01371.1xd     +++|
01755  M01S01372.1xd     +++| ACE3     LDN    ECCM        SET CHANNEL DETECTED CM ERROR
01756  M01S01373.1xd     +++|
01757  M01S01374.1xd     +++| ACE      SUBR               ENTRY/EXIT
01758  M01S01375.1xd     +++|          LDM    RBUF+5
01759  M01S01376.1xd     +++|          LPN    2
01760  M01S01377.1xd     +++|          ZJN    ACEX        IF NO CHANNEL ERROR
01761  M01S01378.1xd     +++|          LDM    RBUF
01762  M01S01379.1xd     +++|          LPN    76
01763  M01S01380.1xd     +++|          NJN    ACE3        IF ERROR IN MEMORY
01764  M01S01381.1xd     +++|          LDM    RBUF+1
01765  M01S01382.1xd     +++|          SHN    -5
01766  M01S01383.1xd     +++|          ZJN    ACE2        IF NOT PARITY / IPI CHANNEL ERROR
01767  M01S01384.1xd     +++|          LPN    2
01768  M01S01385.1xd     +++|          ZJN    ACE1        IF NOT PARITY ERROR
01769  M01S01386.1xd     +++|          LDN    ECPE&ECIE
01770  M01S01387.1xd     +++| ACE1     LMN    ECIE&ECER   FAULT ANALYSIS CODE
01771  M01S01388.1xd     +++| ACE2     LMN    ECER
01772  M01S01389.1xd     +++|          UJN    ACEX        RETURN
01773  M01S01390.1xd     +++| AME      SPACE  4,10
01774  M01S01391.1xd     +++|**        AME - ATTEMPT MONITOR EXCHANGE.
01775  M01S01392.1xd     +++|*
01776  M01S01393.1xd     +++|*         EXIT   (A) = 0.
01777  M01S01394.1xd     +++|*

Seq #  *Modification Id* Act 
----------------------------+
01778  M02S01395.ns2714  ---|*         USES   CM - CM+4.
01779  M01S00033.ns2714  +++|*         USES   CW - CW+4.
01780  M01S01396.1xd     +++|*
01781  M01S01397.1xd     +++|*         MACROS EXPE.
01782  M01S01398.1xd     +++|
01783  M01S01399.1xd     +++|
01784  M01S01400.1xd     +++| AME      SUBR               ENTRY/EXIT
01785  M01S01401.1xd     +++|          EXPE   *
01786  M01S01402.1xd     +++| AME1     LDC    6           CHECK FOR (MA) NON-ZERO

Seq #  *Modification Id* Act 
----------------------------+
01787  M02S01403.ns2714  ---|          CRD    CM

Seq #  *Modification Id* Act 
----------------------------+
01788  M02S01404.ns2714  ---|          LDD    CM

Seq #  *Modification Id* Act 
----------------------------+
01789  M02S01405.ns2714  ---|          ADD    CM+1
01790  M01S00034.ns2714  +++|          CRD    CW
01791  M01S00035.ns2714  +++|          LDD    CW+1
01792  M01S00036.ns2714  +++|          ADD    CW
01793  M01S01406.1xd     +++|          NJN    AME1        IF EXCHANGE PACKAGE NOT READY
01794  M01S01407.1xd     +++|          EXPE   *
01795  M01S01408.1xd     +++| AME2     LDC    0           SET (B0) NON-ZERO
01796  M01S01409.1xd     +++|          CWM    AMEA,ON
01797  M01S01410.1xd     +++|          SBN    1           EXCHANGE MONITOR
01798  M01S01411.1xd     +++|          MXN    0

Seq #  *Modification Id* Act 
----------------------------+
01799  M02S01412.ns2714  ---|          CRD    CM

Seq #  *Modification Id* Act 
----------------------------+
01800  M02S01413.ns2714  ---|          LDD    CM+4
01801  M01S00037.ns2714  +++|          CRD    CW
01802  M01S00038.ns2714  +++|          LDD    CW+4
01803  M01S01414.1xd     +++|          ZJN    AMEX        IF EXCHANGE TAKEN
01804  M01S01415.1xd     +++|          LDN    28D
01805  M01S01416.1xd     +++|          SBN    1
01806  M01S01417.1xd     +++|          NJN    *-1         IF NOT 20 MICROSECONDS ELAPSED
01807  M01S01418.1xd     +++|          UJN    AME2        RETRY EXCHANGE
01808  M01S01419.1xd     +++|
01809  M01S01420.1xd     +++|
01810  M01S01421.1xd     +++| AMEA     VFD    24/0        (P)
01811  M01S01422.1xd     +++|          VFD    18/0        (A0)
01812  M01S01423.1xd     +++|          VFD    18/0        (B0)
01813  M01S01424.1xd     +++| ATT      SPACE  4,10
01814  M01S01425.1xd     +++|**        ATT - PROCESS ATTENTION.
01815  M01S01426.1xd     +++|*
01816  M01S01427.1xd     +++|*         ENTRY  (A) = EXPECTED STATUS RESPONSE TYPE.
01817  M01S00005.1xd6    +++|*                (DI) = DEVICE STATUS BLOCK ADDRESS.
01818  M01S01428.1xd     +++|*
01819  M01S01429.1xd     +++|*         EXIT   VIA ROUTINE *ECI*.
01820  M01S01430.1xd     +++|*
01821  M01S01431.1xd     +++|*         ERROR  TO *ERR* IF INTERRUPT TIMEOUT.
01822  M01S00008.1xd6a   +++|*                TO *SRS11* IF TIMEOUT OF SLAVE RESET INTERRUPT FOR
01823  M01S00009.1xd6a   +++|*                              CONTROLLING DRIVE.
01824  M01S00268.1xd5    +++|*                TO *SRS13* IF TIMEOUT OF SLAVE RESET INTERRUPT FOR
01825  M01S00269.1xd5    +++|*                              NON-CONTROLLING DRIVE.
01826  M01S01432.1xd     +++|*

Seq #  *Modification Id* Act 
----------------------------+
01827  M02S01433.1xd6    ---|*         CALLS  CTO, XMD.
01828  M01S00006.1xd6    +++|*         USES   T5.
01829  M01S00007.1xd6    +++|*
01830  M01S00008.1xd6    +++|*         CALLS  CTO, IOM, XMD.
01831  M01S01434.1xd     +++|
01832  M01S01435.1xd     +++|
01833  M01S01436.1xd     +++| ATT      CON    0           ENTRY

Seq #  *Modification Id* Act 
----------------------------+
01834  M02S01437.272l774 ---|          STM    EEST
01835  M01S00047.272l774 +++|          STM    EEST,DI
01836  M01S01438.1xd     +++|          LDM    ATT         SAVE RETURN ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
01837  M02S01439.272l774 ---|          STM    ATTN
01838  M01S00048.272l774 +++|          STM    ATTN,DI
01839  M01S01440.1xd     +++| ATT1     RJM    XMD         RETURN TO MAIN LOOP

Seq #  *Modification Id* Act 
----------------------------+
01840  M02S01441.1xd5    ---| ATT2     EQU    ATT1+2

Seq #  *Modification Id* Act 
----------------------------+
01841  M02S01442.1xd5    ---|

Seq #  *Modification Id* Act 
----------------------------+
01842  M02S01443.1xd5    ---|*         RETURN HERE THROUGH *ECI* IF NO INTERRUPT RECEIVED.

Seq #  *Modification Id* Act 
----------------------------+
01843  M02S01444.1xd5    ---|

Seq #  *Modification Id* Act 
----------------------------+
01844  M02S01445.1xd5    ---|          RJM    CTO
01845  M01S00270.1xd5    +++| ATT2     RJM    CTO         CHECK FOR TIMEOUT

Seq #  *Modification Id* Act 
----------------------------+
01846  M02S01446.1xd6    ---|          MJN    ATT1        IF NOT TIMEOUT

Seq #  *Modification Id* Act 
----------------------------+
01847  M02S00271.1xd6    ---|          LDM    ATTN,DI
01848  M01S00009.1xd6    +++|          PJP    ATT5        IF TIMEOUT

Seq #  *Modification Id* Act 
----------------------------+
01849  M02S00010.1xd6a   ---|          LDM    ATTN,DI
01850  M01S00010.1xd6a   +++|          LDM    PNUN,DI     CHECK FOR SLAVE RESET
01851  M01S00011.1xd6a   +++|          SHN    -6
01852  M01S00012.1xd6a   +++|          STD    T5
01853  M01S00013.1xd6a   +++|          LDML   CSTB,T5
01854  M01S00014.1xd6a   +++|          SHN    21-17
01855  M01S00015.1xd6a   +++|          PJN    ATT2.1      IF NO SLAVE RESET IN PROGRESS
01856  M01S00016.1xd6a   +++|          LDC    SRSG        *CM3 BEING RESET ON CCHNN.*
01857  M01S00017.1xd6a   +++|          STM    IOMA
01858  M01S00018.1xd6a   +++|          LCN    1
01859  M01S00019.1xd6a   +++|          UJN    ATT4        ISSUE OPERATOR MESSAGE
01860  M01S00020.1xd6a   +++|
01861  M01S00021.1xd6a   +++| ATT2.1   LDM    ATTN,DI     CHECK INTERRUPT RETURN ADDRESS
01862  M01S00011.1xd6    +++|          LMC    SRS13
01863  M01S00012.1xd6    +++|          ZJN    ATT3        IF WAITING FOR ASYNCH AFTER RESET
01864  M01S00013.1xd6    +++|          LMC    SRS11&SRS13
01865  M01S00014.1xd6    +++|          ZJN    ATT3        IF WAITING FOR ASYNCH AFTER RESET

Seq #  *Modification Id* Act 
----------------------------+
01866  M02S00015.ns2750  ---|          LMC    SPDG&SRS11

Seq #  *Modification Id* Act 
----------------------------+
01867  M02S00016.ns2750  ---|          NJN    ATT1        IF NOT SPIN UP/DOWN

Seq #  *Modification Id* Act 
----------------------------+
01868  M02S00017.ns2750  ---|          LDM    RWST,DI

Seq #  *Modification Id* Act 
----------------------------+
01869  M02S00018.ns2750  ---|          STD    T5

Seq #  *Modification Id* Act 
----------------------------+
01870  M02S00019.ns2750  ---|          LDM    SPDD,T5

Seq #  *Modification Id* Act 
----------------------------+
01871  M02S00020.ns2750  ---|          UJN    ATT4        ISSUE OPERATOR MESSAGE
01872  M01S00010.ns2750  +++|          UJN    ATT1        RETURN TO MAIN LOOP
01873  M01S00021.1xd6    +++|

Seq #  *Modification Id* Act 
----------------------------+
01874  M02S00022.1xd6a   ---| ATT3     LDM    PNUN,DI

Seq #  *Modification Id* Act 
----------------------------+
01875  M02S00023.1xd6a   ---|          SHN    -6

Seq #  *Modification Id* Act 
----------------------------+
01876  M02S00024.1xd6a   ---|          STD    T5

Seq #  *Modification Id* Act 
----------------------------+
01877  M02S00025.1xd6a   ---|          LDM    CSTB,T5

Seq #  *Modification Id* Act 
----------------------------+
01878  M02S00026.1xd6a   ---|          SHN    21-17

Seq #  *Modification Id* Act 
----------------------------+
01879  M02S00027.1xd6a   ---|          MJP    ATT1        IF SLAVE RESET IN PROGRESS

Seq #  *Modification Id* Act 
----------------------------+
01880  M02S00028.1xd6a   ---|          LDC    SPDA        SPIN UP PENDING MESSAGE
01881  M01S00022.1xd6a   +++| ATT3     LDC    SPDA        SPIN UP PENDING MESSAGE
01882  M01S00029.1xd6    +++| ATT4     RJM    IOM         ISSUE OPERATOR MESSAGE
01883  M01S00030.1xd6    +++|          UJP    ATT1        RETURN TO MAIN LOOP
01884  M01S00031.1xd6    +++|
01885  M01S00032.1xd6    +++| ATT5     LDM    ATTN,DI
01886  M01S00272.1xd5    +++|          LMC    SRS13
01887  M01S00273.1xd5    +++|          ZJP    SRS13       IF WAITING FOR SLAVE RESET INTERRUPT
01888  M01S00023.1xd6a   +++|          LMC    SRS11&SRS13
01889  M01S00024.1xd6a   +++|          ZJP    SRS11       IF WAITING FOR SLAVE RESET INTERRUPT
01890  M01S00274.1xd5    +++|          LDN    0           CLEAR INTERRUPT AND REENTRY ADDRESSES
01891  M01S00275.1xd5    +++|          STM    ATTN,DI
01892  M01S00276.1xd5    +++|          STM    ADDR,DI
01893  M01S01447.1xd     +++|          LDN    ETIT
01894  M01S01448.1xd     +++|          RJM    ERR         PROCESS ERROR
01895  M01S00011.ns2750  +++|
01896  M01S00012.ns2750  +++|
01897  M01S00013.ns2750  +++| SPDA     DATA   C* EQ000, SPIN UP PENDING.*
01898  M01S00011.273l780 +++| CCO      SPACE  4,20
01899  M01S00012.273l780 +++|**        CCO - CHECK FOR CONTROLLER OVER TEMPERATURE.
01900  M01S00013.273l780 +++|*
01901  M01S00014.273l780 +++|*         THIS ROUTINE SEARCHES THE RESPONSE PACKET FOR STATUS
01902  M01S00015.273l780 +++|*         INDICATING AN OVER TEMPERATURE CONDITION.  IF THERE IS
01903  M01S00016.273l780 +++|*         AN OVER TEMPERATURE CONDITION, AN ERROR IS OPTIONALLY
01904  M01S00017.273l780 +++|*         LOGGED TO THE BML, A BIT INDICATING OVER TEMPERATURE IS
01905  M01S00018.273l780 +++|*         SET IN *BDLL*, AND AN OPERATOR ACTION MESSAGE IS GENERATED.
01906  M01S00019.273l780 +++|*
01907  M01S00020.273l780 +++|*         ENTRY  (A) = 0 IF BML MESSAGE SHOULD NOT BE ISSUED.
01908  M01S00021.273l780 +++|*

Seq #  *Modification Id* Act 
----------------------------+
01909  M02S00022.ns2750  ---|*         USES   CM+1, CM+3, CM+4, T7.
01910  M01S00014.ns2750  +++|*         USES   CM+1 - CM+4, T7.
01911  M01S00023.273l780 +++|*
01912  M01S00024.273l780 +++|*         CALLS  IDM, SRP, UBP.
01913  M01S00025.273l780 +++|*
01914  M01S00026.273l780 +++|*         MACROS MONITOR.
01915  M01S00027.273l780 +++|
01916  M01S00028.273l780 +++|
01917  M01S00029.273l780 +++| CCO      SUBR               ENTRY/EXIT
01918  M01S00030.273l780 +++|          STD    T7
01919  M01S00031.273l780 +++|          LDN    ID16
01920  M01S00032.273l780 +++|          RJM    SRP         SEARCH RESPONSE PACKET
01921  M01S00033.273l780 +++|          MJN    CCOX        IF PARAMETER 16 NOT FOUND
01922  M01S00034.273l780 +++|          LDML   RPBF+6,T3
01923  M01S00035.273l780 +++|          SHN    21-11
01924  M01S00036.273l780 +++|          PJN    CCOX        IF NOT CONTROLLER OVER TEMPERATURE
01925  M01S00037.273l780 +++|          LDM    EDBF+FALT
01926  M01S00038.273l780 +++|          STM    CCOA        SAVE VALUES FROM CURRENT MESSAGE
01927  M01S00039.273l780 +++|          LDM    EDBF+FCS2
01928  M01S00040.273l780 +++|          STM    CCOA+1
01929  M01S00041.273l780 +++|          LDM    MSGL+1
01930  M01S00042.273l780 +++|          STM    CCOA+2
01931  M01S00043.273l780 +++|          LDN    ECOT
01932  M01S00044.273l780 +++|          STM    EDBF+FALT   FINAL FAULT CODE
01933  M01S00045.273l780 +++|          LDD    T7
01934  M01S00046.273l780 +++|          ZJN    CCO1        IF NOT ISSUING MESSAGE TO BML
01935  M01S00047.273l780 +++|
01936  M01S00048.273l780 +++|*         HPA DOES NOT DISPLAY THE DATA WITH SYMPTOM 0111 WHEN THE
01937  M01S00049.273l780 +++|*         ERROR IS RECOVERABLE, SO TWO MESSAGES ARE ISSUED TO THE BML.
01938  M01S00050.273l780 +++|
01939  M01S00051.273l780 +++|          LCN    0
01940  M01S00052.273l780 +++|          STM    EDBF+FCS2   SET NO STATUS FOR *HPA*
01941  M01S00053.273l780 +++|          LDN    5
01942  M01S00054.273l780 +++|          STM    MSGL+1      MESSAGE LENGTH
01943  M01S00055.273l780 +++|          LDD    HN
01944  M01S00056.273l780 +++|          ERRNZ  HD0100-100  CODE DEPENDS ON VALUE
01945  M01S00057.273l780 +++|          RJM    IDM         ISSUE INITIAL BML MESSAGE
01946  M01S00058.273l780 +++|          LDN    3
01947  M01S00059.273l780 +++|          STM    MSGL+1      MESSAGE LENGTH
01948  M01S00060.273l780 +++|          LDC    HD0111
01949  M01S00061.273l780 +++|          RJM    IDM         ISSUE FINAL BML MESSAGE
01950  M01S00062.273l780 +++|          LDM    CCOA
01951  M01S00063.273l780 +++|          STM    EDBF+FALT   RESTORE VALUES IN MESSAGE
01952  M01S00064.273l780 +++|          LDM    CCOA+1
01953  M01S00065.273l780 +++|          STM    EDBF+FCS2
01954  M01S00066.273l780 +++|          LDM    CCOA+2
01955  M01S00067.273l780 +++|          STM    MSGL+1
01956  M01S00068.273l780 +++|
01957  M01S00069.273l780 +++|*         SET OVER TEMPERATURE BIT IN *BDLL*.
01958  M01S00070.273l780 +++|

Seq #  *Modification Id* Act 
----------------------------+
01959  M02S00071.ns2750  ---| CCO1     LDN    1
01960  M01S00015.ns2750  +++| CCO1     LDN    1           NEW VALUE
01961  M01S00016.ns2750  +++|          STD    CM+2
01962  M01S00017.ns2750  +++|          LDC    63*100      LOW ORDER BIT TO CHANGE TIMES 100
01963  M01S00018.ns2750  +++|          STD    T7
01964  M01S00019.ns2750  +++|          LDC    BDLL*100+1  6/WORD, 6/BITS TO CHANGE
01965  M01S00072.273l780 +++|          RJM    UBP         UPDATE *BDLL* PARAMETER
01966  M01S00073.273l780 +++|          LDN    EEVS
01967  M01S00074.273l780 +++|          STD    CM+1        ENTER EVENT
01968  M01S00075.273l780 +++|          LDN    0
01969  M01S00076.273l780 +++|          STD    CM+3
01970  M01S00077.273l780 +++|          LDN    CEDE        *CHECK E,E DISPLAY* EVENT
01971  M01S00078.273l780 +++|          STD    CM+4
01972  M01S00079.273l780 +++|          MONITOR  EATM
01973  M01S00080.273l780 +++|          UJP    CCOX        RETURN
01974  M01S00081.273l780 +++|
01975  M01S00082.273l780 +++|
01976  M01S00083.273l780 +++| CCOA     BSS    3           SAVE AREA FOR VALUES FROM CURRENT MESSAGE
01977  M01S01449.1xd     +++| CCR      SPACE  4,15
01978  M01S01450.1xd     +++|**        CCR - CHECK FOR CHANNEL REQUEST.
01979  M01S01451.1xd     +++|*
01980  M01S01452.1xd     +++|*         ENTRY  (UC) = UNIT ACTIVITY COUNT.
01981  M01S01453.1xd     +++|*                (IR+4) = CHANNEL NUMBER.
01982  M01S01454.1xd     +++|*
01983  M01S01455.1xd     +++|*         EXIT   (A) = 0 IF CHANNEL DOWN.
01984  M01S01456.1xd     +++|*
01985  M01S01457.1xd     +++|*         USES   CM - CM+4.
01986  M01S01458.1xd     +++|*
01987  M01S01459.1xd     +++|*         CALLS  DCR, RCT, SRF.
01988  M01S01460.1xd     +++|*
01989  M01S01461.1xd     +++|*         MACROS DELAY, MONITOR.
01990  M01S01462.1xd     +++|
01991  M01S01463.1xd     +++|
01992  M01S01464.1xd     +++| CCR3     RJM    SRF         SET DRIVER RELOAD FLAG
01993  M01S01465.1xd     +++| CCR4     LDD    CR
01994  M01S01466.1xd     +++|
01995  M01S01467.1xd     +++| CCR      SUBR   PRS3        ENTRY/EXIT
01996  M01S01468.1xd     +++|          RJM    RCT         READ CHANNEL TABLE
01997  M01S01469.1xd     +++|          SHN    21-5
01998  M01S01470.1xd     +++|          MJN    CCR3        IF CHANNEL GLOBALLY DOWN
01999  M01S01471.1xd     +++|          LPN    40
02000  M01S01472.1xd     +++|          ZJN    CCR4        IF CHANNEL NOT REQUESTED
02001  M01S01473.1xd     +++|          STM    CHRQ        DISABLE NEW ACTIVITY
02002  M01S01474.1xd     +++|          LDD    UC
02003  M01S01475.1xd     +++|          NJN    CCRX        IF CURRENT ACTIVITY
02004  M01S01476.1xd     +++|          RJM    DCR         DROP CHANNEL RESERVATION
02005  M01S01477.1xd     +++|*         LDN    0
02006  M01S01478.1xd     +++|          STM    CHRQ        ENABLE NEW ACTIVITY
02007  M01S01479.1xd     +++| CCR1     LDD    CR
02008  M01S01480.1xd     +++|          NJN    CCRX        IF CHANNEL RESERVED
02009  M01S01481.1xd     +++|
02010  M01S01482.1xd     +++|*         ENTERED HERE FROM *PRS*.
02011  M01S01483.1xd     +++|
02012  M01S01484.1xd     +++| CCR2     DELAY              WAIT AWHILE
02013  M01S01485.1xd     +++|          LDD    IR+4
02014  M01S01486.1xd     +++|          STD    CM+1        ATTEMPT TO RESERVE CHANNEL
02015  M01S01487.1xd     +++|          MONITOR  CCHM
02016  M01S01488.1xd     +++|          LDD    CM+2        SET RESERVATION STATUS
02017  M01S01489.1xd     +++|          STD    CR
02018  M01S01490.1xd     +++|          RJM    RCT         READ CHANNEL TABLE
02019  M01S01491.1xd     +++|          LPN    40
02020  M01S01492.1xd     +++|          ZJN    CCR1        IF CHANNEL NOT DOWN
02021  M01S01493.1xd     +++|          LJM    CCR3        SET DRIVER RELOAD FLAG
02022  M01S01494.1xd     +++| CDA      SPACE  4,10
02023  M01S01495.1xd     +++|**        CDA - CONVERT PHYSICAL TO LOGICAL DISK ADDRESS.
02024  M01S01496.1xd     +++|*
02025  M01S01497.1xd     +++|*         ENTRY  (T4) = CYLINDER NUMBER.
02026  M01S01498.1xd     +++|*                (T5) = PHYSICAL TRACK + SECTOR.
02027  M01S01499.1xd     +++|*
02028  M01S01500.1xd     +++|*         EXIT   (T6) = LOGICAL TRACK.
02029  M01S01501.1xd     +++|*                (T7) = LOGICAL SECTOR.
02030  M01S01502.1xd     +++|*
02031  M01S01503.1xd     +++|*         USES   T3, T4, T5.
02032  M01S01504.1xd     +++|
02033  M01S01505.1xd     +++|
02034  M01S01506.1xd     +++|*         MULTIPLY THE CYLINDER VALUE BY THE NUMBER OF LOGICAL
02035  M01S01507.1xd     +++|*         SECTORS PER CYLINDER.
02036  M01S01508.1xd     +++|
02037  M01S01509.1xd     +++| CDA2     LDK    LSCY
02038  M01S01510.1xd     +++|          RAD    T7          ADVANCE LOGICAL SECTOR COUNT
02039  M01S01511.1xd     +++|          SHN    -14
02040  M01S01512.1xd     +++|          RAD    T3
02041  M01S01513.1xd     +++| CDA3     SOD    T4
02042  M01S01514.1xd     +++|          PJN    CDA2        IF NOT END OF CONVERSION
02043  M01S01515.1xd     +++|
02044  M01S01516.1xd     +++|*         DIVIDE THE ACCUMULATED LOGICAL SECTOR COUNT BY THE
02045  M01S01517.1xd     +++|*         SUM OF (LOGICAL + GAP) SECTORS PER LOGICAL TRACK.
02046  M01S01518.1xd     +++|
02047  M01S01519.1xd     +++| CDA4     AOD    T6          ADVANCE LOGICAL TRACK NUMBER
02048  M01S01520.1xd     +++|          LDK    -LSLT
02049  M01S01521.1xd     +++|          RAD    T7
02050  M01S01522.1xd     +++|          PJN    CDA4        IF NO UNDERFLOW
02051  M01S01523.1xd     +++|          AOD    T7
02052  M01S01524.1xd     +++|          SOD    T3
02053  M01S01525.1xd     +++|          PJN    CDA4        IF DIVISION INCOMPLETE
02054  M01S01526.1xd     +++|
02055  M01S01527.1xd     +++| CDA      SUBR               ENTRY/EXIT
02056  M01S01528.1xd     +++|          LDD    T5
02057  M01S01529.1xd     +++|          SHN    14          EXTRACT PHYSICAL TRACK
02058  M01S01530.1xd     +++|          STD    T5
02059  M01S01531.1xd     +++|          SHN    CFLP-14     CONVERT PHYSICAL TO LOGICAL SECTOR
02060  M01S01532.1xd     +++|          STD    T7
02061  M01S01533.1xd     +++|          LDN    0           CLEAR SECTOR COUNT ACCUMULATOR
02062  M01S01534.1xd     +++|          STD    T3

Seq #  *Modification Id* Act 
----------------------------+
02063  M02S01535.1xd5    ---|          LCN    0           INITIALIZE LOGICAL TRACK CALCULATION
02064  M01S00277.1xd5    +++|          LDC    4000-1      INITIALIZE LOGICAL TRACK CALCULATION
02065  M01S01536.1xd     +++|          STD    T6
02066  M01S01537.1xd     +++|
02067  M01S01538.1xd     +++|*         MULTIPLY THE TRACK VALUE BY THE NUMBER OF LOGICAL
02068  M01S01539.1xd     +++|*         SECTORS PER PHYSICAL TRACK.
02069  M01S01540.1xd     +++|
02070  M01S01541.1xd     +++| CDA1     SOD    T5
02071  M01S01542.1xd     +++|          MJN    CDA3        IF END OF CONVERSION
02072  M01S01543.1xd     +++|          LDK    LSPT
02073  M01S01544.1xd     +++|          RAD    T7          ADVANCE LOGICAL SECTOR COUNT
02074  M01S01545.1xd     +++|          SHN    -14
02075  M01S01546.1xd     +++|          RAD    T3
02076  M01S01547.1xd     +++|          UJN    CDA1        LOOP ON CONVERSION
02077  M01S00020.ns2750  +++| CEA      SPACE  4,15
02078  M01S00021.ns2750  +++|**        CEA - CLEAR *ENABLE CONTROLLER ACTIVITY* REQUEST.
02079  M01S00022.ns2750  +++|*
02080  M01S00023.ns2750  +++|*         ENTRY  (EO) = EST ORDINAL FOR DEVICE.
02081  M01S00024.ns2750  +++|*                (IR+4) = CHANNEL NUMBER.
02082  M01S00025.ns2750  +++|*
02083  M01S00026.ns2750  +++|*         EXIT   CHANNEL ENABLE BIT CLEARED IN *MST* WORD *BDLL*.
02084  M01S00027.ns2750  +++|*                SPECIAL REQUEST BIT CLEARED IF BOTH CHANNELS ENABLED.
02085  M01S00028.ns2750  +++|*
02086  M01S00029.ns2750  +++|*         USES   CM - CM+4, T1 - T1+4, T7.
02087  M01S00030.ns2750  +++|*
02088  M01S00031.ns2750  +++|*         CALLS  CPF, UBP.
02089  M01S00032.ns2750  +++|*
02090  M01S00033.ns2750  +++|*         MACROS SFA.
02091  M01S00034.ns2750  +++|
02092  M01S00035.ns2750  +++|
02093  M01S00036.ns2750  +++| CEA      SUBR               ENTRY/EXIT
02094  M01S00037.ns2750  +++|          SFA    EST,EO
02095  M01S00038.ns2750  +++|          ADK    EQDE
02096  M01S00039.ns2750  +++|          CRD    T1          READ *EQDE* WORD
02097  M01S00040.ns2750  +++|          LDD    T1+1
02098  M01S00041.ns2750  +++|          LMD    IR+4
02099  M01S00042.ns2750  +++|          LPN    77
02100  M01S00043.ns2750  +++|          ZJN    CEA1        IF THIS IS THE FIRST CHANNEL
02101  M01S00044.ns2750  +++|          LDN    1
02102  M01S00045.ns2750  +++| CEA1     ADN    49D
02103  M01S00046.ns2750  +++|          SHN    6           LOW ORDER BIT TO CHANGE TIMES 100
02104  M01S00047.ns2750  +++|          STD    T7
02105  M01S00048.ns2750  +++|          LDN    0           NEW VALUE
02106  M01S00049.ns2750  +++|          STD    CM+2
02107  M01S00050.ns2750  +++|          LDC    BDLL*100+1  6/WORD, 6/BITS TO CHANGE
02108  M01S00051.ns2750  +++|          RJM    UBP         CLEAR ENABLE CHANNEL BIT IN *BDLL*
02109  M01S00052.ns2750  +++|          LDD    T1+4
02110  M01S00053.ns2750  +++|          SHN    3
02111  M01S00054.ns2750  +++|          ADN    BDLL
02112  M01S00055.ns2750  +++|          CRD    CM
02113  M01S00056.ns2750  +++|          LDD    CM
02114  M01S00057.ns2750  +++|          LPN    6
02115  M01S00058.ns2750  +++|          NJN    CEAX        IF OTHER CHANNEL STILL NOT ENABLED
02116  M01S00059.ns2750  +++|          LDN    ECAF        CLEAR SPECIAL REQUEST IN *PUT*
02117  M01S00060.ns2750  +++|          RJM    CPF
02118  M01S00061.ns2750  +++|          UJN    CEAX        RETURN
02119  M01S01548.1xd     +++| CFR      SPACE  4,10
02120  M01S01549.1xd     +++|**        CFR - CHECK *PUT* FOR REQUEST.
02121  M01S01550.1xd     +++|*
02122  M01S01551.1xd     +++|*         ENTRY  (DI) = DEVICE STATUS BLOCK ADDRESS.
02123  M01S01552.1xd     +++|*

Seq #  *Modification Id* Act 
----------------------------+
02124  M02S01553.ns2714  ---|*         USES   T2.
02125  M01S00039.ns2714  +++|*         ERROR  TO *ERR*.
02126  M01S01554.1xd     +++|*

Seq #  *Modification Id* Act 
----------------------------+
02127  M02S01555.ns2714  ---|*         CALLS  ECI, IDU, IIO, ISR.

Seq #  *Modification Id* Act 
----------------------------+
02128  M02S00040.1xd5    ---|*         USES   T2, CM - CM+4.

Seq #  *Modification Id* Act 
----------------------------+
02129  M02S00278.ns2750  ---|*         USES   T2, CM+3.
02130  M01S00062.ns2750  +++|*         USES   CM+3.
02131  M01S00041.ns2714  +++|*
02132  M01S00042.ns2714  +++|*         CALLS  CMP8, ECI, IDU, IIO, ISR.
02133  M01S01556.1xd     +++|
02134  M01S01557.1xd     +++|

Seq #  *Modification Id* Act 
----------------------------+
02135  M02S01558.ns2750  ---| CFR4     ZJN    CFR7        IF NO SPECIAL REQUEST

Seq #  *Modification Id* Act 
----------------------------+
02136  M02S01559.ns2750  ---|          RJM    ISR         IDENTIFY SPECIAL REQUEST

Seq #  *Modification Id* Act 
----------------------------+
02137  M02S01560.ns2750  ---| CFR5     RJM    IDU         INTERLOCK DISK UNIT

Seq #  *Modification Id* Act 
----------------------------+
02138  M02S01561.ns2750  ---|          NJN    CFRX        IF DRIVE UNAVAILABLE
02139  M01S00063.ns2750  +++| CFR5     LDD    CB          INITIATE I/O
02140  M01S00064.ns2750  +++|          RJM    IIO
02141  M01S00065.ns2750  +++|          ZJN    CFRX        IF I/O NOT ENABLED ON THIS ACCESS
02142  M01S00066.ns2750  +++|          RJM    IDU         INTERLOCK DISK UNIT
02143  M01S00067.ns2750  +++|          NJN    CFRX        IF INTERLOCK NOT AVAILABLE

Seq #  *Modification Id* Act 
----------------------------+
02144  M02S00043.272l774 ---|          LDM    ENAD
02145  M01S00049.272l774 +++|          LDM    ENAD,DI
02146  M01S00044.ns2714  +++|          ZJN    CFR6        IF CONTROLLER FUNCTIONAL
02147  M01S00045.ns2714  +++|          LDN    ECMD
02148  M01S00046.ns2714  +++|          RJM    ERR         PROCESS ERROR
02149  M01S01562.1xd     +++|
02150  M01S01563.1xd     +++|*         EXIT TO PROCESSOR AS APPLICABLE WITH -
02151  M01S01564.1xd     +++|*                (PO) = *PUT* ORDINAL.
02152  M01S01565.1xd     +++|*                (CB) = *CBT* ORDINAL.
02153  M01S01566.1xd     +++|*                (EO) = EST ORDINAL.
02154  M01S01567.1xd     +++|*                (RW) = READ / WRITE FLAG.
02155  M01S01568.1xd     +++|*                (CN) = CONTROLLER NUMBER.
02156  M01S01569.1xd     +++|*                (DN) = DRIVE NUMBER.
02157  M01S01570.1xd     +++|*                (WB - WB+4) = *UNCT* WORD OF *PUT* ENTRY.
02158  M01S01571.1xd     +++|

Seq #  *Modification Id* Act 
----------------------------+
02159  M02S01572.ns2714  ---|          LJM    0,PA        EXIT TO PROCESSOR
02160  M01S00047.ns2714  +++| CFR6     LJM    0,PA        EXIT TO PROCESSOR
02161  M01S01573.1xd     +++|

Seq #  *Modification Id* Act 
----------------------------+
02162  M02S01574.ns2750  ---| CFR7     LDD    CB          INITIATE I/O

Seq #  *Modification Id* Act 
----------------------------+
02163  M02S01575.ns2750  ---|          RJM    IIO

Seq #  *Modification Id* Act 
----------------------------+
02164  M02S01576.ns2750  ---|          NJN    CFR5        IF I/O ENABLED ON THIS ACCESS

Seq #  *Modification Id* Act 
----------------------------+
02165  M02S01577.ns2750  ---|
02166  M01S01578.1xd     +++| CFR      SUBR               ENTRY/EXIT
02167  M01S01579.1xd     +++|          RJM    ECI         EXAMINE CONTROLLER INTERRUPTS
02168  M01S00279.1xd5    +++|*         RJM    CMP8        (TERMINATION PROCESSING)
02169  M01S01580.1xd     +++| CFRA     EQU    *-1

Seq #  *Modification Id* Act 
----------------------------+
02170  M02S01581.1xd5    ---|*         RJM    CMP8        (TERMINATION PROCESSING)

Seq #  *Modification Id* Act 
----------------------------+
02171  M03S01582.1xd5    ---|          LDM    SRSA

Seq #  *Modification Id* Act 
----------------------------+
02172  M02S00048.1xd5    ---|*         LDM    SRSA

Seq #  *Modification Id* Act 
----------------------------+
02173  M02S01583.1xd5    ---|          NJN    CFRX        IF RESET IN PROGRESS

Seq #  *Modification Id* Act 
----------------------------+
02174  M02S01584.1xd5    ---|          LDD    CM+3
02175  M01S00280.1xd5    +++|          NJN    CFRX        IF RESET OR ERROR IN PROGRESS

Seq #  *Modification Id* Act 
----------------------------+
02176  M02S00281.ns2750  ---|          LDML   IPPS,DI
02177  M01S00068.ns2750  +++|          LDML   IPPS,DI     CHECK FOR INTERNAL SPECIAL REQUESTS
02178  M01S00282.1xd5    +++|          SHN    6-15
02179  M01S00283.1xd5    +++|          LPC    300
02180  M01S00284.1xd5    +++|          ZJN    CFR1        IF ALL INTERNAL SPECIAL REQUESTS PROCESSED
02181  M01S00285.1xd5    +++|          STD    CM+3        SET INTERNAL SPECIAL REQUESTS
02182  M01S00286.1xd5    +++| CFR1     LDD    CM+3        CHECK FOR SPECIAL REQUEST

Seq #  *Modification Id* Act 
----------------------------+
02183  M02S01585.ns2750  ---|          SCN    1           CLEAR DEVICE UNAVAILABLE

Seq #  *Modification Id* Act 
----------------------------+
02184  M02S01586.ns2750  ---|          STD    T2
02185  M01S01587.1xd     +++|          NJN    CFR2        IF SPECIAL REQUEST PRESENT

Seq #  *Modification Id* Act 
----------------------------+
02186  M02S01588.1xd5    ---|          LMD    CM+3

Seq #  *Modification Id* Act 
----------------------------+
02187  M02S01589.1xd5    ---| CFR1     NJN    CFRX        IF DEVICE UNAVAILABLE FOR I/O

Seq #  *Modification Id* Act 
----------------------------+
02188  M02S00287.ns2750  ---|          LDD    CM+3

Seq #  *Modification Id* Act 
----------------------------+
02189  M02S00288.ns2750  ---|          NJN    CFRX        IF DEVICE UNAVAILABLE FOR I/O
02190  M01S01590.1xd     +++|          ADD    WB+3
02191  M01S01591.1xd     +++|          ZJN    CFRX        IF NO I/O REQUEST
02192  M01S01592.1xd     +++| CFR2     LDD    CM+4
02193  M01S01593.1xd     +++|          ZJN    CFR3        IF UNIT NOT INTERLOCKED
02194  M01S01594.1xd     +++|          LMD    OA

Seq #  *Modification Id* Act 
----------------------------+
02195  M02S01595.ns2750  ---|          NJN    CFRX        IF NOT INTERLOCKED BY THIS DRIVER

Seq #  *Modification Id* Act 
----------------------------+
02196  M03S01596.ns2750  ---| CFR3     LDC    0

Seq #  *Modification Id* Act 
----------------------------+
02197  M03S01597.ns2750  ---| CFRB     EQU    *-1         (*PUT* POINTER WORD ADDRESS)

Seq #  *Modification Id* Act 
----------------------------+
02198  M03S01598.ns2750  ---|          CRD    CM

Seq #  *Modification Id* Act 
----------------------------+
02199  M03S01599.ns2750  ---|          LDD    CM+3        CHECK RESET INTERLOCK

Seq #  *Modification Id* Act 
----------------------------+
02200  M03S01600.ns2750  ---|          SHN    21-XDSR+XDSR/12D*12D

Seq #  *Modification Id* Act 
----------------------------+
02201  M03S01601.ns2750  ---|          MJN    CFRX        IF SELECTIVE RESET IN PROGRESS

Seq #  *Modification Id* Act 
----------------------------+
02202  M03S01602.ns2750  ---|          LDD    T2

Seq #  *Modification Id* Act 
----------------------------+
02203  M02S00289.ns2750  ---| CFR3     LDD    T2

Seq #  *Modification Id* Act 
----------------------------+
02204  M02S01603.ns2750  ---|          UJP    CFR4        CHECK FOR SPECIAL REQUEST
02205  M01S00069.ns2750  +++|          NJN    CFRX        IF UNIT INTERLOCKED BY OTHER DRIVER
02206  M01S00070.ns2750  +++| CFR3     LDD    CM+3        CHECK FOR SPECIAL REQUEST
02207  M01S00071.ns2750  +++|          ZJP    CFR5        IF NO SPECIAL REQUEST
02208  M01S00072.ns2750  +++|          RJM    ISR         IDENTIFY AND PROCESS SPECIAL REQUEST
02209  M01S00073.ns2750  +++|          UJP    CFR1        CHECK FOR ANOTHER REQUEST
02210  M01S01604.1xd     +++| CMC      SPACE  4,10
02211  M01S01605.1xd     +++|**        CMC - CHECK MONITOR COMPLETE.
02212  M01S01606.1xd     +++|*

Seq #  *Modification Id* Act 
----------------------------+
02213  M02S01607.1xd5    ---|*         EXIT   (A) = (CM) = 0.
02214  M01S00290.1xd5    +++|*         EXIT   (A) = (CW) = 0.
02215  M01S01608.1xd     +++|*

Seq #  *Modification Id* Act 
----------------------------+
02216  M02S01609.ns2714  ---|*         USES   CM - CM+4.
02217  M01S00049.ns2714  +++|*         USES   CW - CW+4.
02218  M01S01610.1xd     +++|*
02219  M01S01611.1xd     +++|*         CALLS  AME.
02220  M01S01612.1xd     +++|*
02221  M01S01613.1xd     +++|*         MACROS DELAY.
02222  M01S01614.1xd     +++|
02223  M01S01615.1xd     +++|
02224  M01S01616.1xd     +++| CMC      SUBR               ENTRY/EXIT
02225  M01S01617.1xd     +++| CMC1     LDD    OA

Seq #  *Modification Id* Act 
----------------------------+
02226  M02S01618.ns2714  ---|          CRD    CM

Seq #  *Modification Id* Act 
----------------------------+
02227  M02S01619.ns2714  ---|          LDD    CM
02228  M01S00050.ns2714  +++|          CRD    CW
02229  M01S00051.ns2714  +++|          LDD    CW
02230  M01S01620.1xd     +++|          ZJN    CMCX        IF NO REQUEST WAITING FOR RESPONSE
02231  M01S01621.1xd     +++|          SHN    21-13
02232  M01S01622.1xd     +++|          PJN    CMC2        IF NOT TO RETRY REQUEST
02233  M01S01623.1xd     +++|          SHN    13-21
02234  M01S01624.1xd     +++|          LPC    177         CLEAR FLAGS

Seq #  *Modification Id* Act 
----------------------------+
02235  M02S01625.ns2714  ---|          STD    CM
02236  M01S00052.ns2714  +++|          STD    CW
02237  M01S01626.1xd     +++|          LDD    OA          UPDATE OUTPUT REGISTER

Seq #  *Modification Id* Act 
----------------------------+
02238  M02S01627.ns2714  ---|          CWD    CM
02239  M01S00053.ns2714  +++|          CWD    CW
02240  M01S01628.1xd     +++|          RJM    AME         REISSUE REQUEST
02241  M01S01629.1xd     +++| CMC2     DELAY
02242  M01S01630.1xd     +++|          UJN    CMC1        RECHECK OUTPUT REGISTER
02243  M01S01631.1xd     +++| CMP      SPACE  4,15
02244  M01S01632.1xd     +++|**        CMP - COMPLETE PROCESSING.
02245  M01S01633.1xd     +++|*
02246  M01S01634.1xd     +++|*         ENTRY  (SF) = DEVICE SELECTED STATUS.
02247  M01S01635.1xd     +++|*                (UC) = UNIT ACTIVITY COUNT.
02248  M01S01636.1xd     +++|*                (RW) = READ / WRITE STATUS.
02249  M01S01637.1xd     +++|*
02250  M01S01638.1xd     +++|*         EXIT   TO *XMD2*.
02251  M01S01639.1xd     +++|*                (UC) = UNIT ACTIVITY COUNT DECREMENTED.
02252  M01S01640.1xd     +++|*

Seq #  *Modification Id* Act 
----------------------------+
02253  M02S01641.1xd5    ---|*         USES   WB+3, WB+4.
02254  M01S00291.1xd5    +++|*         USES   UC, WB+3, WB+4.
02255  M01S01642.1xd     +++|*
02256  M01S01643.1xd     +++|*         CALLS  CMC, DCM, IDM, IMR.
02257  M01S01644.1xd     +++|
02258  M01S01645.1xd     +++|

Seq #  *Modification Id* Act 
----------------------------+
02259  M02S01646.272l774 ---| CMP      LDM    ERCT
02260  M01S00050.272l774 +++| CMP      LDM    ERCT,DI
02261  M01S01647.1xd     +++|          ZJN    CMP4        IF NO ERRORS

Seq #  *Modification Id* Act 
----------------------------+
02262  M02S01648.ns2714  ---|          AOM    ERCT

Seq #  *Modification Id* Act 
----------------------------+
02263  M02S01649.ns2714  ---|          LDN    3           SET BASIC MESSAGE LENGTH

Seq #  *Modification Id* Act 
----------------------------+
02264  M02S01650.ns2714  ---|          STM    MSGL+1

Seq #  *Modification Id* Act 
----------------------------+
02265  M02S01651.ns2714  ---| CMP1     LDC    HD0105

Seq #  *Modification Id* Act 
----------------------------+
02266  M02S01652.ns2714  ---|          RJM    IDM         ISSUE FINAL BML ERROR MESSAGE

Seq #  *Modification Id* Act 
----------------------------+
02267  M02S01653.ns2714  ---| CMP2     LDM    RQLN

Seq #  *Modification Id* Act 
----------------------------+
02268  M02S01654.ns2714  ---|          SCN    77          CLEAR PROCESSED BUFFER COUNT

Seq #  *Modification Id* Act 
----------------------------+
02269  M02S01655.ns2714  ---|          STM    RQLN

Seq #  *Modification Id* Act 
----------------------------+
02270  M02S01656.ns2714  ---|          LDN    0           CLEAR ERROR COUNT
02271  M01S00054.ns2714  +++|          LDN    3
02272  M01S00055.ns2714  +++|          STM    MSGL+1      SET BASIC MESSAGE LENGTH

Seq #  *Modification Id* Act 
----------------------------+
02273  M02S00056.272l774 ---| CMP1     AOM    ERCT

Seq #  *Modification Id* Act 
----------------------------+
02274  M02S00057.272l774 ---|          LDC    HD0105      ISSUE FINAL BML MESSAGE
02275  M01S00051.272l774 +++| CMP1     AOM    ERCT,DI
02276  M01S00052.272l774 +++|          LDC    HD0111      ISSUE FINAL BML MESSAGE
02277  M01S00058.ns2714  +++|          RJM    IDM

Seq #  *Modification Id* Act 
----------------------------+
02278  M02S00059.1xd5    ---| CMP2     LDN    0           CLEAR ERROR COUNT

Seq #  *Modification Id* Act 
----------------------------+
02279  M02S01657.1xd5    ---|          STM    ERCT

Seq #  *Modification Id* Act 
----------------------------+
02280  M03S01658.1xd5    ---|          STM    ERFL        CLEAR ERROR PROCESSING IN PROGRESS

Seq #  *Modification Id* Act 
----------------------------+
02281  M03S01659.1xd5    ---|          STM    ESAD

Seq #  *Modification Id* Act 
----------------------------+
02282  M02S00060.1xd5    ---|          LDM    ERFL        CHECK ERROR PROCESSING

Seq #  *Modification Id* Act 
----------------------------+
02283  M02S00061.1xd5    ---|          LMD    DI

Seq #  *Modification Id* Act 
----------------------------+
02284  M02S00062.1xd5    ---|          NJN    CMP4        IF NOT ON THIS UNIT

Seq #  *Modification Id* Act 
----------------------------+
02285  M02S00063.1xd5    ---|          STM    ERFL
02286  M01S00292.1xd5    +++| CMP2     LDN    0           FORCE CLEAR OF ERROR COUNT / ERROR FLAG
02287  M01S00293.1xd5    +++|          STM    CMPA
02288  M01S01660.1xd     +++| CMP4     RJM    DCM         DESELECT CONTROLLER
02289  M01S01661.1xd     +++|
02290  M01S01662.1xd     +++|*         INCLUDE *PROBE* DATA IN FINAL *BIOM* REQUEST.
02291  M01S01663.1xd     +++|
02292  M01S01664.1xd     +++|          LDD    RW          SET DATA TRANSFER DIRECTION
02293  M01S01665.1xd     +++|          SHN    13-0

Seq #  *Modification Id* Act 
----------------------------+
02294  M02S01666.272l774 ---|          LMM    CBCT        APPEND CUMULATIVE BUFFER COUNT
02295  M01S00053.272l774 +++|          LMM    CBCT,DI     APPEND CUMULATIVE BUFFER COUNT
02296  M01S01667.1xd     +++|          STD    WB+4

Seq #  *Modification Id* Act 
----------------------------+
02297  M02S01668.272l774 ---|          LDM    RQLN
02298  M01S00054.272l774 +++|          LDM    RQLN,DI

Seq #  *Modification Id* Act 
----------------------------+
02299  M02S01669.1xd5    ---| CMP5     ZJN    CMP7        IF UNIT NOT INTERLOCKED
02300  M01S00294.1xd5    +++| CMP5     ZJN    CMP6        IF UNIT NOT INTERLOCKED
02301  M01S01670.1xd     +++|          STD    WB+3
02302  M01S01671.1xd     +++|          LDN    DCBS        DELINK BUFFERS / RELEASE UNIT INTERLOCK
02303  M01S01672.1xd     +++|          RJM    IMR
02304  M01S00295.1xd5    +++|          RJM    CMC         CHECK FOR MONITOR COMPLETE
02305  M01S01673.1xd     +++|*         LDN    0           CLEAR UNIT INTERLOCKED

Seq #  *Modification Id* Act 
----------------------------+
02306  M02S01674.272l774 ---|          STM    RQLN
02307  M01S00055.272l774 +++|          STM    RQLN,DI
02308  M01S01675.1xd     +++|          SOD    UC          ADJUST UNIT ACTIVITY COUNT

Seq #  *Modification Id* Act 
----------------------------+
02309  M02S01676.1xd5    ---| CMP7     LDN    0
02310  M01S00296.1xd5    +++| CMP6     LDC    1
02311  M01S00297.1xd5    +++| CMPA     EQU    *-1
02312  M01S00298.1xd5    +++|          NJN    CMP7        IF ERCT/ERFL SHOULD NOT BE CLEARED
02313  M01S00299.1xd5    +++|          STM    ERCT,DI     CLEAR ERROR COUNT
02314  M01S00300.1xd5    +++|          AOM    CMPA
02315  M01S00301.1xd5    +++|          LDM    ERFL        CHECK ERROR PROCESSING
02316  M01S00302.1xd5    +++|          LMD    DI
02317  M01S00303.1xd5    +++|          NJN    CMP7        IF NOT ON THIS UNIT
02318  M01S00304.1xd5    +++|          STM    ERFL
02319  M01S00305.1xd5    +++| CMP7     RJM    CMC         CHECK FOR MONITOR COMPLETE
02320  M01S00306.1xd5    +++|*         LDN    0

Seq #  *Modification Id* Act 
----------------------------+
02321  M02S01677.272l774 ---|          STM    ADDR        CLEAR REQUEST IN PROGRESS

Seq #  *Modification Id* Act 
----------------------------+
02322  M02S00307.272l774 ---|          STM    ATTN,DI

Seq #  *Modification Id* Act 
----------------------------+
02323  M02S01678.272l774 ---|          STM    SREQ

Seq #  *Modification Id* Act 
----------------------------+
02324  M03S01679.272l774 ---|          STM    IPPS        CLEAR I/O IN PROGRESS

Seq #  *Modification Id* Act 
----------------------------+
02325  M02S01680.272l774 ---|          STM    CBCT

Seq #  *Modification Id* Act 
----------------------------+
02326  M02S00064.272l774 ---|          STM    ESAD        ENABLE NEXT PASS THROUGH ERROR PROCESSOR
02327  M01S00056.272l774 +++|          STM    ADDR,DI     CLEAR REQUEST IN PROGRESS
02328  M01S00057.272l774 +++|          STM    ATTN,DI
02329  M01S00058.272l774 +++|          STM    SREQ,DI
02330  M01S00059.272l774 +++|          STM    CBCT,DI
02331  M01S00060.272l774 +++|          STM    ESAD,DI     ENABLE NEXT PASS THROUGH ERROR PROCESSOR

Seq #  *Modification Id* Act 
----------------------------+
02332  M02S01681.1xd5    ---|          RJM    CMC
02333  M01S00308.1xd5    +++|          LDML   IPPS,DI     CLEAR I/O IN PROGRESS
02334  M01S00309.1xd5    +++|          LPC    170000
02335  M01S00310.1xd5    +++|          STML   IPPS,DI
02336  M01S01682.1xd     +++|          LJM    XMD2        RETURN
02337  M01S01683.1xd     +++|
02338  M01S01684.1xd     +++|*         TERMINATION PROCESSING.
02339  M01S01685.1xd     +++|
02340  M01S01686.1xd     +++| CMP8     CON    0
02341  M01S01687.1xd     +++| CMP9     LDN    0           CLEAR *PROBE* DATA
02342  M01S01688.1xd     +++|          STD    WB+4

Seq #  *Modification Id* Act 
----------------------------+
02343  M02S01689.272l774 ---|          LDM    RQLN        SET REQUEST QUEUE EMPTY
02344  M01S00061.272l774 +++|          LDM    RQLN,DI     SET REQUEST QUEUE EMPTY
02345  M01S01690.1xd     +++|          SCN    77
02346  M01S01691.1xd     +++|          UJP    CMP5        RELEASE UNIT INTERLOCK
02347  M01S01692.1xd     +++| CPF      SPACE  4,10

Seq #  *Modification Id* Act 
----------------------------+
02348  M02S01693.1xd5    ---|**        CLEAR *PUT* FLAG.

Seq #  *Modification Id* Act 
----------------------------+
02349  M02S00311.ns2750  ---|**        CPF - CLEAR *PUT* FLAG.
02350  M01S00074.ns2750  +++|**        CPF - CLEAR *PUT* FLAG IN *PILL*.
02351  M01S01694.1xd     +++|*

Seq #  *Modification Id* Act 
----------------------------+
02352  M02S01695.ns2750  ---|*         ENTRY  (A) = BIT NUMBER TO CLEAR IN *PILL* WORD.
02353  M01S00075.ns2750  +++|*         ENTRY  (A) = 6/N, 6/B.
02354  M01S00076.ns2750  +++|*                      N = NUMBER OF BITS - 1 TO CLEAR.
02355  M01S00077.ns2750  +++|*                      B = LOW ORDER BIT NUMBER TO CLEAR.
02356  M01S01696.1xd     +++|*

Seq #  *Modification Id* Act 
----------------------------+
02357  M02S01697.1xd5    ---|*         EXIT   (A) = 0.

Seq #  *Modification Id* Act 
----------------------------+
02358  M02S01698.1xd5    ---|*

Seq #  *Modification Id* Act 
----------------------------+
02359  M02S01699.1xd5    ---|*         USES   T6, T7, CM - CM+4.

Proceed to Part 2