User Tools

Site Tools


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

Deck 1DA Part 002

24 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
02415  M00S01523.1da     +++|          RJM    ATT
02416  M00S01524.1da     +++|          NJN    SRS3        IF NOT ASYNCHRONOUS RESPONSE
02417  M00S01525.1da     +++|
02418  M00S01526.1da     +++|*         SEARCH RESPONSE PACKET FOR MACHINE EXCEPTION PARAMETER.
02419  M00S01527.1da     +++|
02420  M00S01528.1da     +++|          LDN    ID16        LOOK FOR MACHINE EXCEPTION
02421  M00S01529.1da     +++|          RJM    SRP
02422  M00S01530.1da     +++|          MJN    SRS3        IF PARAMETER NOT FOUND
02423  M00S01531.1da     +++|          LDML   RPBF+6,T3
02424  M00S01532.1da     +++|          LPC    0#FEE0      CHECK OPERATIONAL + READY TRANSITION
02425  M00S01533.1da     +++|          LMC    0#6000
02426  M00S01534.1da     +++|          ZJN    SRS4        IF CONTROLLER RESET SUCCESSFUL
Line S01535 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
02427  M01S01535.283l840 ---| SRS3     LCN    ESRE
Line S00021 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
02428  M01S00021.283l840 +++| SRS3     LCN    ESRE        SELECTIVE RESET ERROR
02429  M00S01536.1da     +++|          RJM    ERR         PROCESS ERROR
02430  M00S01537.1da     +++|
02431  M00S01538.1da     +++| SRS4     RJM    CCA         CHECK CONTROLLER ATTRIBUTES
Line S00302 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02432  M01S00302.ns2783  +++|          RJM    GCS         GET CONTROLLER SERIAL NUMBER
Line S01539 Modification History
M01 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
02433  M01S01539.1da8    ---|          LDN    0
Line S00150 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
02434  M01S00150.1da8    +++|          LDM    RWST,DI
02435  M01S00151.1da8    +++|          NJN    SRS5        IF NOT SLAVE RESET
02436  M01S00152.1da8    +++|          LDC    ERRC+100000 *EQXXX, UXX, CMX RESET COMPLETE.*
02437  M01S00153.1da8    +++|          RJM    IEM         ISSUE ERRORLOG MESSAGE
Line S00154 Modification History
M01 (Added by) 1da8
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02438  M02S00154.ns2783  ---| SRS5     LDN    0
Line S01540 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02439  M01S01540.ns2783  ---|          STM    SRSA        CLEAR RESET INTERLOCKS
02440  M01S01541.ns2783  ---|          STD    RF
02441  M01S01542.ns2783  ---|          RJM    IOM         CLEAR OPERATOR MESSAGE
Line S00022 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02442  M02S00022.ns2783  ---|          RJM    CRI         CLEAR SLAVE RESET INTERLOCK, IF SET
Line S01543 Modification History
M01 (Removed by) 1da8
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02443  M02S01543.ns2783  ---|          LDM    PNUN,DI
02444  M02S01544.ns2783  ---|          SHN    -6          CONTROLLER BLOCK INDEX
02445  M02S01545.ns2783  ---|          STD    T5
02446  M02S01546.ns2783  ---|          LDML   CSTB,T5     ENABLE CONTROLLER ACTIVITY
Line S00155 Modification History
M01 (Added by) 1da8
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02447  M02S00155.ns2783  ---|          LDML   CSTB,CI     ENABLE CONTROLLER ACTIVITY
Line S00303 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02448  M01S00303.ns2783  +++| SRS5     RJM    CRF         CLEAR RESET FLAGS
02449  M01S00304.ns2783  +++|          LDML   CTST,CI     ENABLE CONTROLLER ACTIVITY
Line S00015 Modification History
M01 (Added by) 1da1
Seq #  *Modification Id* Act 
----------------------------+
02450  M01S00015.1da1    +++|          STDL   T0
Line S01547 Modification History
M01 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
02451  M01S01547.1da8    ---|          LPC    37777
02452  M01S01548.1da8    ---|          STML   CSTB,T5
Line S00156 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
02453  M01S00156.1da8    +++|          LPC    37777       CLEAR BITS 15 AND 14
Line S00157 Modification History
M01 (Added by) 1da8
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02454  M02S00157.ns2783  ---|          STML   CSTB,CI
Line S00305 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02455  M01S00305.ns2783  +++|          STML   CTST,CI
Line S00016 Modification History
M01 (Added by) 1da1
Seq #  *Modification Id* Act 
----------------------------+
02456  M01S00016.1da1    +++|          LDDL   T0
02457  M01S00017.1da1    +++|          SHN    21-16
02458  M01S00018.1da1    +++|          MJP    CMP         IF PROCESSING INITIAL LOGICAL RESET
Line S01549 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02459  M01S01549.ns2783  ---|          LDML   ERAD,DI     RETURN ADDRESS
Line S00306 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02460  M01S00306.ns2783  +++|          LDML   SRSB        RETURN ADDRESS
02461  M00S01550.1da     +++|          STDL   PA
02462  M00S01551.1da     +++|          LJM    0,PA        RETURN TO CALLER
Line S00036 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
02463  M01S00036.273l780 +++|
02464  M00S01552.1da     +++|
02465  M00S01553.1da     +++| SRSA     CON    0           DI OF CONTROLLING DRIVE FOR RESET
Line S00307 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02466  M01S00307.ns2783  +++| SRSB     CON    0           RETURN ADDRESS
02467  M00S01554.1da     +++|
02468  M00S01555.1da     +++| SRSG     DATA   C*CM3 BEING RESET ON CCHNN.*
02469  M00S01556.1da     +++|
02470  M00S01557.1da     +++| SRST     BSS    0
Line S01558 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
02471  M01S01558.284l847 ---|          CONL   12D*60D     SLAVE RESET TIMEOUT
02472  M01S01559.284l847 ---|          CONL   30D         LOGICAL RESET TIMEOUT
Line S00260 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
02473  M01S00260.284l847 +++|          CONL   SRTO        SLAVE RESET TIMEOUT
02474  M01S00261.284l847 +++|          CONL   CBTO        LOGICAL RESET TIMEOUT
02475  M00S01560.1da     +++|          TITLE  SUBROUTINES.
02476  M00S01561.1da     +++| ACE      SPACE  4,10
02477  M00S01562.1da     +++|**        ACE - ANALYZE CHANNEL ERROR.
02478  M00S01563.1da     +++|*
02479  M00S01564.1da     +++|*         ENTRY  (RBUF) = CHANNEL STATUS REGISTER.
02480  M00S01565.1da     +++|*
02481  M00S01566.1da     +++|*         EXIT   (A) = 0 IF ERROR FLAG NOT SET.
02482  M00S01567.1da     +++|*                    = CHANNEL ERROR FAULT CODE.
02483  M00S01568.1da     +++|
02484  M00S01569.1da     +++|
02485  M00S01570.1da     +++| ACE3     LDN    ECCM        SET CHANNEL DETECTED CM ERROR
02486  M00S01571.1da     +++|
02487  M00S01572.1da     +++| ACE      SUBR               ENTRY/EXIT
02488  M00S01573.1da     +++|          LDM    RBUF+5
02489  M00S01574.1da     +++|          LPN    2
02490  M00S01575.1da     +++|          ZJN    ACEX        IF CHANNEL ERROR FLAG NOT SET
02491  M00S01576.1da     +++|          LDM    RBUF
02492  M00S01577.1da     +++|          LPN    76
02493  M00S01578.1da     +++|          NJN    ACE3        IF ERROR IN MEMORY
02494  M00S01579.1da     +++|          LDM    RBUF+1
02495  M00S01580.1da     +++|          SHN    -5
02496  M00S01581.1da     +++|          ZJN    ACE2        IF NOT PARITY / IPI CHANNEL ERROR
02497  M00S01582.1da     +++|          LPN    2
02498  M00S01583.1da     +++|          ZJN    ACE1        IF NOT PARITY ERROR
Line S01584 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
02499  M01S01584.283l840 ---|          LDN    ECPE&ECIE
02500  M01S01585.283l840 ---| ACE1     LMN    ECIE&ECER   FAULT ANALYSIS CODE
02501  M01S01586.283l840 ---| ACE2     LMN    ECER
Line S00023 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
02502  M01S00023.283l840 +++|
02503  M01S00024.283l840 +++|*         SET FAULT ANALYSIS CODE.
02504  M01S00025.283l840 +++|
02505  M01S00026.283l840 +++|          LDN    ECPE&ECIE   CHANNEL PARITY ERROR
02506  M01S00027.283l840 +++| ACE1     LMN    ECIE&ECER   IPI CHANNEL ERROR FLAG
02507  M01S00028.283l840 +++| ACE2     LMN    ECER        CHANNEL DETECTED ERROR
02508  M00S01587.1da     +++|          UJN    ACEX        RETURN
02509  M00S01588.1da     +++| AME      SPACE  4,10
02510  M00S01589.1da     +++|**        AME - ATTEMPT MONITOR EXCHANGE.
02511  M00S01590.1da     +++|*
02512  M00S01591.1da     +++|*         EXIT   (A) = 0.
02513  M00S01592.1da     +++|*
02514  M00S01593.1da     +++|*         USES   CW - CW+4.
02515  M00S01594.1da     +++|*
02516  M00S01595.1da     +++|*         MACROS EXPE.
02517  M00S01596.1da     +++|
02518  M00S01597.1da     +++|
02519  M00S01598.1da     +++| AME      SUBR               ENTRY/EXIT
02520  M00S01599.1da     +++|          EXPE   *
02521  M00S01600.1da     +++| AME1     LDC    6           CHECK FOR (MA) NON-ZERO
02522  M00S01601.1da     +++|          CRD    CW
02523  M00S01602.1da     +++|          LDD    CW+1
02524  M00S01603.1da     +++|          ADD    CW
02525  M00S01604.1da     +++|          NJN    AME1        IF EXCHANGE PACKAGE NOT READY
02526  M00S01605.1da     +++|          EXPE   *
02527  M00S01606.1da     +++| AME2     LDC    0           SET (B0) NON-ZERO
02528  M00S01607.1da     +++|          CWM    AMEA,ON
02529  M00S01608.1da     +++|          SBN    1           EXCHANGE MONITOR
02530  M00S01609.1da     +++|          MXN    0
02531  M00S01610.1da     +++|          CRD    CW
02532  M00S01611.1da     +++|          LDD    CW+4
02533  M00S01612.1da     +++|          ZJN    AMEX        IF EXCHANGE TAKEN
02534  M00S01613.1da     +++|          LDN    28D
02535  M00S01614.1da     +++|          SBN    1
02536  M00S01615.1da     +++|          NJN    *-1         IF NOT 20 MICROSECONDS ELAPSED
02537  M00S01616.1da     +++|          UJN    AME2        RETRY EXCHANGE
02538  M00S01617.1da     +++|
Line S00037 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
02539  M01S00037.273l780 +++|
02540  M00S01618.1da     +++| AMEA     VFD    24/0        (P)
02541  M00S01619.1da     +++|          VFD    18/0        (A0)
02542  M00S01620.1da     +++|          VFD    18/0        (B0)
02543  M00S01621.1da     +++| ATT      SPACE  4,10
02544  M00S01622.1da     +++|**        ATT - PROCESS ATTENTION.
02545  M00S01623.1da     +++|*
02546  M00S01624.1da     +++|*         ENTRY  (A) = EXPECTED STATUS RESPONSE TYPE.
Line S01625 Modification History
M01 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
02547  M01S01625.1da8    ---|*                (DI) = DEVICE STATUS BLOCK ADDRESS.
Line S00158 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
02548  M01S00158.1da8    +++|*                (DI) = DEVICE STATE TABLE ADDRESS.
02549  M00S01626.1da     +++|*
02550  M00S01627.1da     +++|*         EXIT   VIA *ECI* IF INTERRUPT RECEIVED.
02551  M00S01628.1da     +++|*                TO *ERR* IF NO INTERRUPT.
Line S00308 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02552  M01S00308.ns2783  +++|*                (ATTA) = INTERRUPT ADDRESS FOR LAST INTERRUPT TIMEOUT.
02553  M00S01629.1da     +++|*
02554  M00S01630.1da     +++|*         CALLS  CTO, DAS.
02555  M00S01631.1da     +++|
02556  M00S01632.1da     +++|
02557  M00S01633.1da     +++| ATT      CON    0           ENTRY
02558  M00S01634.1da     +++|          STML   EEST,DI
02559  M00S01635.1da     +++|          LDML   ATT         SAVE RETURN ADDRESS
02560  M00S01636.1da     +++|          STML   ATTN,DI
02561  M00S01637.1da     +++| ATT1     RJM    DAS         RETURN TO MAIN LOOP
02562  M00S01638.1da     +++|
02563  M00S01639.1da     +++|*         RETURN HERE THROUGH *ECI* IF NO INTERRUPT RECEIVED.
02564  M00S01640.1da     +++|
02565  M00S01641.1da     +++|          RJM    CTO
02566  M00S01642.1da     +++|          MJN    ATT1        IF NOT TIMEOUT
Line S00309 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02567  M01S00309.ns2783  +++|          LDML   ATTN,DI     SAVE ADDRESS
02568  M01S00310.ns2783  +++|          STML   ATTA
02569  M00S01643.1da     +++|          LDN    0
Line S01644 Modification History
M01 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
02570  M01S01644.1da8    ---|          STML   ATTN,DI     ATTENTION NO LONGER EXPECTED
Line S00159 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
02571  M01S00159.1da8    +++|          STML   ATTN,DI     CLEAR ATTENTION PROCESSING ADDRESS
02572  M01S00160.1da8    +++|          STML   ADDR,DI     CLEAR REENTRY ADDRESS
Line S01645 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
02573  M01S01645.283l840 ---|          LDN    ETIT
Line S00029 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
02574  M01S00029.283l840 +++|          LDN    ETIT        INTERRUPT TIMEOUT
02575  M00S01646.1da     +++|          RJM    ERR         PROCESS ERROR
Line S00030 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02576  M02S00030.ns2783  ---| CBD      SPACE  4,10
02577  M02S00031.ns2783  ---|**        CBD - CHECK IF BST/BAT PROCESSING DISABLED.
Line S00311 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02578  M01S00311.ns2783  +++|
02579  M01S00312.ns2783  +++|
02580  M01S00313.ns2783  +++| ATTA     CON    0           ADDRESS FOR INTERRUPT TIMEOUT
02581  M01S00314.ns2783  +++| CAA      SPACE  4,10
02582  M01S00315.ns2783  +++|**        CAA - CHECK IF ACCESS TO PARITY DEVICE IS ALLOWED.
Line S00032 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
02583  M01S00032.283l840 +++|*
Line S00316 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02584  M01S00316.ns2783  +++|*         ENTRY  (DI) = DEVICE STATE TABLE ADDRESS.
02585  M01S00317.ns2783  +++|*                (DVTP,DI) BIT 7 SET, TIME TO CHECK FOR MMF *RESTORE*.
02586  M01S00318.ns2783  +++|*
02587  M01S00319.ns2783  +++|*         EXIT   (A) = 0, IF ACCESS ALLOWED.
02588  M01S00320.ns2783  +++|*
02589  M01S00321.ns2783  +++|*         CALLS  CMR, DMP, EMP.
02590  M01S00322.ns2783  +++|
02591  M01S00323.ns2783  +++|
02592  M01S00324.ns2783  +++| CAA8     LDN    0           INDICATE ACCESS ALLOWED
02593  M01S00325.ns2783  +++|
02594  M01S00326.ns2783  +++| CAA      SUBR               ENTRY/EXIT
02595  M01S00327.ns2783  +++|          LDML   ADDR,DI
02596  M01S00328.ns2783  +++|*         UJN    CAA8        (NO SHARED DEVICES CONFIGURED)
02597  M01S00329.ns2783  +++| CAAA     EQU    *-2
02598  M01S00330.ns2783  +++|          NJN    CAA8        IF REQUEST IN PROGRESS ON THIS DEVICE
02599  M01S00331.ns2783  +++|          LDM    RSIN        CHECK IF RESTORE INTERLOCK SET
02600  M01S00332.ns2783  +++|          LMD    DI
02601  M01S00333.ns2783  +++|          ZJN    CAAX        IF INTERLOCK SET FOR THIS DEVICE
02602  M01S00334.ns2783  +++|          LDML   DVTP,DI
02603  M01S00335.ns2783  +++|          SHN    21-7
02604  M01S00336.ns2783  +++|          MJN    CAA2        IF TIME TO CHECK FOR MMF RESTORE
02605  M01S00337.ns2783  +++| CAA1     LDML   DVTP,DI     CHECK IF ACCESS ALLOWED
02606  M01S00338.ns2783  +++|          SHN    0-10
02607  M01S00339.ns2783  +++|          LPN    21          *ACCESS DISABLED* AND *RESTORE INITIATION*
02608  M01S00340.ns2783  +++|          UJN    CAAX        RETURN
02609  M01S00341.ns2783  +++|
02610  M01S00342.ns2783  +++| CAA2     LDML   DVTP,DI     CLEAR *CHECK MMF PARITY ACCESS* BIT
02611  M01S00343.ns2783  +++|          LPC    177577
02612  M01S00344.ns2783  +++|          STML   DVTP,DI
02613  M01S00345.ns2783  +++|          SHN    21-10       CHECK MMF RESTORE BITS
02614  M01S00346.ns2783  +++|          MJN    CAA5        IF *MMF RESTORE INITIATION* FLAG SET
02615  M01S00347.ns2783  +++|          RJM    CMR         CHECK MMF RESTORE FLAGS IN MST
02616  M01S00348.ns2783  +++|          PJN    CAA7        IF RESTORE INITIATION NOT IN PROGRESS
02617  M01S00349.ns2783  +++|          LDML   DVTP,DI     SET *MMF RESTORE INITIATION* FLAG
02618  M01S00350.ns2783  +++|          LPC    177377
02619  M01S00351.ns2783  +++|          LMC    400
02620  M01S00352.ns2783  +++|          STML   DVTP,DI
02621  M01S00353.ns2783  +++| CAA3     RJM    DMP         DISABLE MMF PARITY DEVICE ACCESS
02622  M01S00354.ns2783  +++| CAA4     UJN    CAA1        RETURN ACCESS PERMISSION
02623  M01S00355.ns2783  +++|
02624  M01S00356.ns2783  +++| CAA5     RJM    CMR         CHECK MMF RESTORE FLAGS IN MST
02625  M01S00357.ns2783  +++|          PJN    CAA6        IF RESTORE INITIATION COMPLETE
02626  M01S00358.ns2783  +++|          LDML   DVTP,DI     CHECK MMF RESTORE BITS
02627  M01S00359.ns2783  +++|          SHN    21-14
02628  M01S00360.ns2783  +++|          PJN    CAA3        IF *DISABLE* FLAG NOT SET
02629  M01S00361.ns2783  +++|          UJN    CAA4        RETURN ACCESS PERMISSION
02630  M01S00362.ns2783  +++|
02631  M01S00363.ns2783  +++| CAA6     RJM    EMP         ENABLE MMF PARITY ACCESS, IF POSSIBLE
02632  M01S00364.ns2783  +++|          UJN    CAA4        RETURN ACCESS PERMISSION
02633  M01S00365.ns2783  +++|
02634  M01S00366.ns2783  +++| CAA7     LDML   DVTP,DI     CHECK MMF RESTORE BITS
02635  M01S00367.ns2783  +++|          SHN    0-13
02636  M01S00368.ns2783  +++|          LPN    3
02637  M01S00369.ns2783  +++|          ZJN    CAA4        IF NEITHER *ENABLE* OR *DISABLE* BIT SET
02638  M01S00370.ns2783  +++|          LDM    CMRA
02639  M01S00371.ns2783  +++|          NJN    CAA4        IF RESTORE STILL IN PROGRESS
02640  M01S00372.ns2783  +++|          UJN    CAA6        ENABLE MMF PARITY ACCESS
02641  M01S00373.ns2783  +++| CAB      SPACE  4,10
02642  M01S00374.ns2783  +++|**        CAB - CHECK ACGL *MMF PARITY DEVICE ACCESS* BIT.
02643  M01S00375.ns2783  +++|*
Line S00033 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
02644  M01S00033.283l840 +++|*         ENTRY  (EO) = EST ORDINAL.
02645  M01S00034.283l840 +++|*
Line S00035 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02646  M02S00035.ns2783  ---|*         EXIT   (A) = 0, IF BST/BAT PROCESSING IS NOT DISABLED.
02647  M02S00036.ns2783  ---|*                (T5) = EST ORDINAL.
Line S00376 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02648  M01S00376.ns2783  +++|*         EXIT   (A) = 0, IF THE BIT FOR THIS MAINFRAME IS CLEAR.
Line S00037 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
02649  M01S00037.283l840 +++|*
Line S00038 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02650  M02S00038.ns2783  ---|*         USES   T5, CM - CM+4.
Line S00377 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02651  M01S00377.ns2783  +++|*         USES   CM - CM+4.
Line S00039 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
02652  M01S00039.283l840 +++|*
Line S00040 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02653  M02S00040.ns2783  ---|*         MACROS SFA.
Line S00378 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02654  M01S00378.ns2783  +++|*         CALLS  REE.
Line S00041 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
02655  M01S00041.283l840 +++|
02656  M01S00042.283l840 +++|
Line S00043 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2775
Seq #  *Modification Id* Act 
----------------------------+
02657  M02S00043.ns2775  ---|CBD       SUBR               ENTRY/EXIT
Line S00007 Modification History
M01 (Added by) ns2775
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02658  M02S00007.ns2783  ---| CBD      SUBR               ENTRY/EXIT
Line S00379 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02659  M01S00379.ns2783  +++| CAB      SUBR               ENTRY/EXIT
02660  M01S00380.ns2783  +++|          RJM    REE         READ EST ENTRY
02661  M01S00381.ns2783  +++|          LDD    CM+4
02662  M01S00382.ns2783  +++|          SHN    3
02663  M01S00383.ns2783  +++|          ADN    ACGL
02664  M01S00384.ns2783  +++|          CRD    CM
02665  M01S00385.ns2783  +++|          LDD    CM
02666  M01S00386.ns2783  +++|          LPN    0           (MACHINE MASK FOR THIS MF)
02667  M01S00387.ns2783  +++| CABA     EQU    *-1
02668  M01S00388.ns2783  +++|          UJN    CABX        RETURN
02669  M01S00389.ns2783  +++| CAC      SPACE  4,15
02670  M01S00390.ns2783  +++|**        CAC - CHECK FOR ALTERNATE CHANNEL.
02671  M01S00391.ns2783  +++|*
02672  M01S00392.ns2783  +++|*         ENTRY  (EO) = EST ORDINAL.
02673  M01S00393.ns2783  +++|*
02674  M01S00394.ns2783  +++|*         EXIT   (A) = 0, IF ALTERNATE CHANNEL DEFINED AND UP.
02675  M01S00395.ns2783  +++|*                (CM - CM+4) = *EQDE* WORD OF EST.
02676  M01S00396.ns2783  +++|*                (T1) = INDEX INTO (CM+1) FOR THIS CHANNEL.
02677  M01S00397.ns2783  +++|*                (T2) = INDEX INTO (CM+1) FOR ALTERNATE CHANNEL.
02678  M01S00398.ns2783  +++|*                (T6) = MST ADDRESS / 10B.
02679  M01S00399.ns2783  +++|*
02680  M01S00400.ns2783  +++|*         USES   T2.
02681  M01S00401.ns2783  +++|*
02682  M01S00402.ns2783  +++|*         CALLS  CCI.
02683  M01S00403.ns2783  +++|
02684  M01S00404.ns2783  +++|
02685  M01S00405.ns2783  +++| CAC      SUBR               ENTRY/EXIT
02686  M01S00406.ns2783  +++|          RJM    CCI         CALCULATE CHANNEL INDEX
02687  M01S00407.ns2783  +++|          LMN    1
02688  M01S00408.ns2783  +++|          STD    T2
02689  M01S00409.ns2783  +++|          LDM    CM+1,T2     CHECK ALTERNATE CHANNEL
02690  M01S00410.ns2783  +++|          SHN    -11         CHECK IF ALTERNATE CHANNEL DEFINED AND UP
02691  M01S00411.ns2783  +++|          LMN    4
02692  M01S00412.ns2783  +++|          UJN    CACX        RETURN
02693  M01S00413.ns2783  +++| CAN      SPACE  4,10
02694  M01S00414.ns2783  +++|**        CAN - CONVERT ASCII NUMBER TO DISPLAY CODE.
02695  M01S00415.ns2783  +++|*
02696  M01S00416.ns2783  +++|*         ENTRY  (T3) = ADDRESS OF OUTPUT BUFFER.
02697  M01S00417.ns2783  +++|*                (T4) = ADDRESS OF 6-DIGIT ASCII NUMBER.
02698  M01S00418.ns2783  +++|*
02699  M01S00419.ns2783  +++|*         EXIT   (T3) ADVANCED.
02700  M01S00420.ns2783  +++|*                (T4) ADVANCED.
02701  M01S00421.ns2783  +++|*
02702  M01S00422.ns2783  +++|*         USES   T1, T3, T4.
02703  M01S00423.ns2783  +++|
02704  M01S00424.ns2783  +++|
02705  M01S00425.ns2783  +++| CAN      SUBR               ENTRY/EXIT
02706  M01S00426.ns2783  +++|          LDDL   T3
02707  M01S00427.ns2783  +++|          ADN    3
02708  M01S00428.ns2783  +++|          STDL   T1
02709  M01S00429.ns2783  +++| CAN1     LDIL   T4
02710  M01S00430.ns2783  +++|          SHN    -10
02711  M01S00431.ns2783  +++|          SBN    60-33       CONVERT ASCII TO DISPLAY CODE
02712  M01S00432.ns2783  +++|          SHN    6
02713  M01S00433.ns2783  +++|          STI    T3          UPPER CHARACTER OF WORD
02714  M01S00434.ns2783  +++|          LDIL   T4
02715  M01S00435.ns2783  +++|          LPC    377
02716  M01S00436.ns2783  +++|          SBN    60-33       CONVERT ASCII TO DISPLAY CODE
02717  M01S00437.ns2783  +++|          RAI    T3          LOWER CHARACTER OF WORD
02718  M01S00438.ns2783  +++|          AODL   T4
02719  M01S00439.ns2783  +++|          AODL   T3
02720  M01S00440.ns2783  +++|          LMDL   T1
02721  M01S00441.ns2783  +++|          NJN    CAN1        IF MORE CHARACTERS TO CONVERT
02722  M01S00442.ns2783  +++|          UJN    CANX        RETURN
02723  M01S00443.ns2783  +++| CBB      SPACE  4,10
02724  M01S00444.ns2783  +++|**        CBB - CHECK BDLL *DISABLE ACCESS* BIT.
02725  M01S00445.ns2783  +++|*
02726  M01S00446.ns2783  +++|*         ENTRY  (DI) = DEVICE STATE TABLE INDEX.
02727  M01S00447.ns2783  +++|*
02728  M01S00448.ns2783  +++|*         EXIT   (A) .LT. 0, IF THE BIT FOR THIS CHANNEL IS SET.
02729  M01S00449.ns2783  +++|*                (A) .GE. 0, IF THE BIT FOR THIS CHANNEL IS CLEAR.
02730  M01S00450.ns2783  +++|*                (T1) = CHANNEL INDEX.
02731  M01S00451.ns2783  +++|*
02732  M01S00452.ns2783  +++|*         CALLS  CCI, RBD.
02733  M01S00453.ns2783  +++|
02734  M01S00454.ns2783  +++|
02735  M01S00455.ns2783  +++| CBB      SUBR               ENTRY/EXIT
02736  M01S00456.ns2783  +++|          RJM    CCI         CALCULATE CHANNEL INDEX
02737  M01S00457.ns2783  +++|          LDC    SHNI+21-7
02738  M01S00458.ns2783  +++|          SBD    T1
02739  M01S00459.ns2783  +++|          STM    CBBA
02740  M01S00460.ns2783  +++|          RJM    RBD         READ *BDLL*
02741  M01S00461.ns2783  +++|          LDD    CM+3        CHECK *DISABLE ACCESS* BIT IN *BDLL*
02742  M01S00462.ns2783  +++|          SHN    21-7        CHECK IF BIT SET FOR FIRST CHANNEL
02743  M01S00463.ns2783  +++|*         SHN    21-10       (CHECK IF BIT SET FOR SECOND CHANNEL)
02744  M01S00464.ns2783  +++| CBBA     EQU    *-1
02745  M01S00465.ns2783  +++|          UJN    CBBX        RETURN
02746  M01S00466.ns2783  +++| CBC      SPACE  4,10
02747  M01S00467.ns2783  +++|**        CBC - CLEAR BUFFER COUNT.
02748  M01S00468.ns2783  +++|*
02749  M01S00469.ns2783  +++|*         ENTRY  (DI) = DEVICE STATE TABLE ADDRESS.
02750  M01S00470.ns2783  +++|*
02751  M01S00471.ns2783  +++|*         EXIT   (A) = (RQLN,DI).
02752  M01S00472.ns2783  +++|*                BUFFER COUNT IN (RQLN,DI) CLEARED.
02753  M01S00473.ns2783  +++|
02754  M01S00474.ns2783  +++|
02755  M01S00475.ns2783  +++| CBC      SUBR               ENTRY/EXIT
02756  M01S00476.ns2783  +++|          LDM    RQLN,DI
02757  M01S00477.ns2783  +++|          LPC    4000
02758  M01S00478.ns2783  +++|          STM    RQLN,DI
02759  M01S00479.ns2783  +++|          UJN    CBCX        RETURN
02760  M01S00480.ns2783  +++| CBI      SPACE  4,10
02761  M01S00481.ns2783  +++|**        CBI - CLEAR *BDT* ERROR PROCESSING INTERLOCKS.
02762  M01S00482.ns2783  +++|*
02763  M01S00483.ns2783  +++|*         ENTRY  (DI) = DEVICE STATE TABLE ADDRESS.
02764  M01S00484.ns2783  +++|*                (EO) = EST ORDINAL.
02765  M01S00485.ns2783  +++|*
02766  M01S00486.ns2783  +++|*         USES   CM - CM+4.
02767  M01S00487.ns2783  +++|*
02768  M01S00488.ns2783  +++|*         CALLS  LNE, RBD, UBP.
02769  M01S00489.ns2783  +++|*
02770  M01S00490.ns2783  +++|*         MACROS MONITOR.
02771  M01S00491.ns2783  +++|
02772  M01S00492.ns2783  +++|
02773  M01S00493.ns2783  +++| CBI      SUBR               ENTRY/EXIT
02774  M01S00494.ns2783  +++|          LDN    0           INITIALIZE PARTITION SEARCH
02775  M01S00495.ns2783  +++| CBI1     RJM    LNE         LOCATE NEXT EST FOR THIS DEVICE
02776  M01S00496.ns2783  +++|          ZJN    CBIX        IF NO MORE PARTITIONS
02777  M01S00497.ns2783  +++|          RJM    RBD         READ *BDLL*
02778  M01S00498.ns2783  +++|          LDD    CM+3        CHECK IF THIS MF HOLDS INTERLOCK
02779  M01S00499.ns2783  +++|          SHN    21-12
02780  M01S00500.ns2783  +++|          PJN    CBI2        IF THIS MF DOES NOT HOLD INTERLOCK
02781  M01S00501.ns2783  +++|          LDN    CEPS        CLEAR ERROR PROCESSING INTERLOCK
02782  M01S00502.ns2783  +++|          STD    CM+1
Line S00044 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
02783  M01S00044.283l840 +++|          LDD    EO          SET EST ORDINAL
Line S00045 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02784  M02S00045.ns2783  ---|          STD    T5
02785  M02S00046.ns2783  ---|          SFA    EST         READ EST ENTRY
02786  M02S00047.ns2783  ---|          ADK    EQDE
02787  M02S00048.ns2783  ---|          CRD    CM
02788  M02S00049.ns2783  ---|          LDD    CM
02789  M02S00050.ns2783  ---|          LPN    40
02790  M02S00051.ns2783  ---|          ZJN    CBDX        IF NOT SHARED BUFFERED DEVICE
02791  M02S00052.ns2783  ---|          LDD    CM+4
02792  M02S00053.ns2783  ---|          SHN    3
02793  M02S00054.ns2783  ---|          ADK    BDLL        READ *BDLL*
02794  M02S00055.ns2783  ---|          CRD    CM
02795  M02S00056.ns2783  ---|          LDD    CM+3
02796  M02S00057.ns2783  ---|          LPC    4000        *BST/BAT PROCESSING DISABLED* FLAG
02797  M02S00058.ns2783  ---|          UJN    CBDX        RETURN
Line S00503 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02798  M01S00503.ns2783  +++|          STD    CM+4
02799  M01S00504.ns2783  +++|          MONITOR  MTEM
02800  M01S00505.ns2783  +++|*         LDN    0           CLEAR FLAG THAT SAYS THIS MF HAS INTERLOCK
02801  M01S00506.ns2783  +++|          STD    CM+2
02802  M01S00507.ns2783  +++|          LDN    26          BIT TO CHANGE
02803  M01S00508.ns2783  +++|          RJM    UBP         UPDATE *BDLL* PARAMETER
02804  M01S00509.ns2783  +++| CBI2     LDD    EO
02805  M01S00510.ns2783  +++|          UJN    CBI1        CHECK FOR NEXT PARTITION
02806  M00S01647.1da     +++| CCA      SPACE  4,20
02807  M00S01648.1da     +++|**        CCA - CHECK CONTROLLER ATTRIBUTES.
02808  M00S01649.1da     +++|*               - DISABLE USAGE STATISTIC COUNTING.
02809  M00S01650.1da     +++|*               - ENABLE MASTER TERMINATE.
02810  M00S01651.1da     +++|*               - DISABLE EXTENT RESPONSE FOR MASTER TERMINATE.
02811  M00S01652.1da     +++|*               - ENABLE REPORTING DEVICE FAULT LOG.
02812  M00S01653.1da     +++|*               - SET SPEED SELECTION TO 10 MB IF 10 MB CHANNEL.
02813  M00S01654.1da     +++|*               - SET SPEED SELECTION TO 25 MB IF 25 MB CHANNEL.
02814  M00S01655.1da     +++|*
Line S01656 Modification History
M01 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
02815  M01S01656.1da8    ---|*         ENTRY  (DI) = DEVICE STATUS BLOCK ADDRESS.
Line S00161 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
02816  M01S00161.1da8    +++|*         ENTRY  (DI) = DEVICE STATE TABLE ADDRESS.
02817  M00S01657.1da     +++|*                (CT) = CHANNEL TYPE.
02818  M00S01658.1da     +++|*
Line S01659 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02819  M01S01659.ns2783  ---|*         EXIT   TO *SRS1* IF CHANNEL SPEED WRONG.
Line S00511 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02820  M01S00511.ns2783  +++|*         EXIT   TO *SRS1* WITH (RW) = 0, IF CHANNEL SPEED WRONG.
02821  M01S00512.ns2783  +++|*                TO *ERR*, IF LOAD CONTROLLER ATTRIBUTES ERROR.
02822  M00S01660.1da     +++|*
02823  M00S01661.1da     +++|*         USES   RW, TM, T1 - T3.
02824  M00S01662.1da     +++|*
02825  M00S01663.1da     +++|*         CALLS  ATT, IDT, SDT, SOC, WCB.
02826  M00S01664.1da     +++|
02827  M00S01665.1da     +++|
02828  M00S01666.1da     +++| CCA      SUBR               ENTRY/EXIT
02829  M00S01667.1da     +++|
02830  M00S01668.1da     +++|*         RESTORE CONTROLLER ATTRIBUTES.
02831  M00S01669.1da     +++|
02832  M00S01670.1da     +++|          LDC    C0202       RESTORE ATTRIBUTES OPERATION CODE
02833  M00S01671.1da     +++|          RJM    SOC         SET OPERATION CODE AND CONTROLLER
02834  M00S01672.1da     +++|          LDN    6           COMMAND PACKET LENGTH
02835  M00S01673.1da     +++|          RJM    WCB         WRITE COMMAND PACKET
02836  M00S01674.1da     +++|          LDN    CMSS
02837  M00S01675.1da     +++|          RJM    ATT         PROCESS ATTENTION
Line S01676 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
02838  M01S01676.284l847 ---|          NJP    CCA4        IF NOT SUCCESSFUL
Line S00262 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
02839  M01S00262.284l847 +++|          NJP    CCA1.1      IF NOT SUCCESSFUL
02840  M00S01677.1da     +++|          RJM    SDT         SET DATA TRANSFER MODE FOR INTERLOCK
02841  M00S01678.1da     +++|
02842  M00S01679.1da     +++|*         CHECK ATTRIBUTE PARAMETERS D1, D2, D3, D4, AND D6.
02843  M00S01680.1da     +++|
02844  M00S01681.1da     +++|          LDC    C0200       REPORT ATTRIBUTES OPERATION CODE
02845  M00S01682.1da     +++|          RJM    SOC         SET OPERATION CODE AND CONTROLLER
02846  M00S01683.1da     +++|          LDC    0#76C
02847  M00S01684.1da     +++|          STML   CPBF+FCP
02848  M00S01685.1da     +++|          LDC    0#80D1      REPORT PARAMETERS D1,D2,D3,D4,D6
02849  M00S01686.1da     +++|          STML   CPBF+FCP+1
02850  M00S01687.1da     +++|          LDC    0#D2D3
02851  M00S01688.1da     +++|          STML   CPBF+FCP+2
02852  M00S01689.1da     +++|          LDC    0#D4D6
02853  M00S01690.1da     +++|          STML   CPBF+FCP+3
02854  M00S01691.1da     +++|          LDN    14D         COMMAND PACKET LENGTH
02855  M00S01692.1da     +++|          RJM    IDT         INPUT DATA TO PP
02856  M00S01693.1da     +++|          LDN    0
02857  M00S01694.1da     +++|          STDL   T1
02858  M00S01695.1da     +++|          STDL   T2
02859  M00S01696.1da     +++|          STDL   T3
02860  M00S01697.1da     +++|          STDL   TM          DATA TRANSFER MODE IS STREAMING
02861  M00S01698.1da     +++| CCA1     LDML   ATTB,T1
02862  M00S01699.1da     +++|          LMML   CCAA,T1
Line S01700 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
02863  M01S01700.284l847 ---|          NJP    CCA4        IF PARAMETER ID NOT FOUND
Line S00263 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
02864  M01S00263.284l847 +++| CCA1.1   NJN    CCA2.1      IF PARAMETER ID NOT FOUND
02865  M00S01701.1da     +++|          AODL   T1
02866  M00S01702.1da     +++|          SBN    11
02867  M00S01703.1da     +++|          PJN    CCA2        IF ALL PARAMETERS CHECKED
02868  M00S01704.1da     +++|          LDML   ATTB,T1
02869  M00S01705.1da     +++|          LMML   CCAA,T1
02870  M00S01706.1da     +++|          NJN    CCA3        IF PARAMETER SET WRONG
02871  M00S01707.1da     +++|          AODL   T1
Line S01708 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
02872  M01S01708.273l780 ---|          UJN    CCA1        GO CHECK NEXT PARAMETER
Line S00038 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
02873  M01S00038.273l780 +++|          UJN    CCA1        CHECK NEXT PARAMETER
02874  M00S01709.1da     +++|
02875  M00S01710.1da     +++| CCA2     LDML   ATTB+13
02876  M00S01711.1da     +++|          LPC    0#F02
02877  M00S01712.1da     +++|          LMML   CTS,CT
02878  M00S01713.1da     +++|          NJN    CCA3        IF ATTRIBUTE D6 INCORRECT
02879  M00S01714.1da     +++|          RJM    ATT         WAIT FOR COMPLETION RESPONSE
02880  M00S01715.1da     +++|          RJM    SDT         SET DATA TRANSFER MODE TO STREAMING
02881  M00S01716.1da     +++|          LJM    CCAX        EXIT
02882  M00S01717.1da     +++|
Line S00264 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
02883  M01S00264.284l847 +++| CCA2.1   LCN    ELCA        LOAD CONTROLLER ATTRIBUTES FAILURE
02884  M01S00265.284l847 +++|          RJM    ERR         PROCESS ERROR
02885  M01S00266.284l847 +++|
02886  M00S01718.1da     +++|*         LOAD/SAVE ATTRIBUTES.
02887  M00S01719.1da     +++|
02888  M00S01720.1da     +++| CCA3     LDML   CCAA,T3     BUILD COMMAND PACKET
02889  M00S01721.1da     +++|          STML   CPBF+FCP,T3
02890  M00S01722.1da     +++|          AODL   T3
02891  M00S01723.1da     +++|          LMN    11
02892  M00S01724.1da     +++|          NJN    CCA3        IF MORE PARAMETER WORDS TO MOVE
02893  M00S01725.1da     +++|          LDML   ATTB+11
Line S01726 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
02894  M01S01726.273l780 ---|          STML   CPBF+FCP+11  PORT A,B CONTROLLER ADDRESS
Line S00039 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
02895  M01S00039.273l780 +++|          STML   CPBF+FCP+11 PORT A,B CONTROLLER ADDRESS
02896  M00S01727.1da     +++|          LDML   ATTB+12
Line S01728 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
02897  M01S01728.273l780 ---|          STML   CPBF+FCP+12  PORT C,D CONTROLLER ADDRESS
Line S00040 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
02898  M01S00040.273l780 +++|          STML   CPBF+FCP+12 PORT C,D CONTROLLER ADDRESS
02899  M00S01729.1da     +++|          LDML   ATTB+13
02900  M00S01730.1da     +++|          LPC    0#F0FD
02901  M00S01731.1da     +++|          LMML   CTS,CT
Line S01732 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
02902  M01S01732.273l780 ---|          STML   CPBF+FCP+13  SELECT CHANNEL TRANSFER RATE
Line S00041 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
02903  M01S00041.273l780 +++|          STML   CPBF+FCP+13 SELECT CHANNEL TRANSFER RATE
02904  M00S01733.1da     +++|          RJM    ATT         WAIT FOR COMPLETION RESPONSE
02905  M00S01734.1da     +++|          LDM    RPBF
02906  M00S01735.1da     +++|          LMN    10
Line S01736 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
02907  M01S01736.284l847 ---|          NJP    CCA4        IF ERROR
Line S00267 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
02908  M01S00267.284l847 +++| CCA3.1   NJP    CCA2.1      IF ERROR
02909  M00S01737.1da     +++|          LDC    C0209       LOAD ATTRIBUTE OPERATION CODE
02910  M00S01738.1da     +++|          RJM    SOC         SET OPERATION CODE AND CONTROLLER
02911  M00S01739.1da     +++|          LDC    P02D1
02912  M00S01740.1da     +++|          STM    CPBF+FCP    RESTORE WORD WIPED OUT BY *ATT*
02913  M00S01741.1da     +++|          LDN    30D         COMMAND PACKET LENGTH
02914  M00S01742.1da     +++|          RJM    WCB         WRITE COMMAND PACKET
02915  M00S01743.1da     +++|          LDN    CMSS
02916  M00S01744.1da     +++|          RJM    ATT         PROCESS ATTENTION
Line S01745 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
02917  M01S01745.284l847 ---|          NJN    CCA4        IF NOT SUCCESSFUL
Line S00268 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
02918  M01S00268.284l847 +++|          NJN    CCA3.1      IF NOT SUCCESSFUL
02919  M00S01746.1da     +++|          RJM    SDT         SET DATA TRANSFER MODE
02920  M00S01747.1da     +++|          LDC    C020A       SAVE ATTRIBUTE OPERATION CODE
02921  M00S01748.1da     +++|          RJM    SOC         SET OPERATION CODE AND CONTROLLER
02922  M00S01749.1da     +++|          LDN    6
02923  M00S01750.1da     +++|          RJM    WCB         WRITE COMMAND PACKET
02924  M00S01751.1da     +++|          LDN    CMSS
02925  M00S01752.1da     +++|          RJM    ATT         PROCESS ATTENTION
Line S01753 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
02926  M01S01753.284l847 ---|          NJN    CCA4        IF NOT SUCCESSFUL
Line S00269 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
02927  M01S00269.284l847 +++|          NJN    CCA3.1      IF NOT SUCCESSFUL
02928  M00S01754.1da     +++|          LDML   ATTB+13
02929  M00S01755.1da     +++|          LPC    0#F02
02930  M00S01756.1da     +++|          LMML   CTS,CT
02931  M00S01757.1da     +++|          ZJP    CCAX        IF CHANNEL TRANSFER SPEED CORRECT
02932  M00S01758.1da     +++|          LDN    0
02933  M00S01759.1da     +++|          STD    RW
Line S01760 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02934  M01S01760.ns2783  ---|          STML   RWST,DI     INDICATE SLAVE RESET
Line S01761 Modification History
M01 (Removed by) 273l780
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02935  M02S01761.ns2783  ---|          LJM    SRS1        GO DO SLAVE RESET
Line S00042 Modification History
M01 (Added by) 273l780
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02936  M02S00042.ns2783  ---|          LJM    SRS1        ISSUE SLAVE RESET
Line S00513 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02937  M01S00513.ns2783  +++|          LJM    SRS1        FORCE SLAVE RESET
Line S01762 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
02938  M01S01762.284l847 ---|
Line S01763 Modification History
M01 (Removed by) 283l840
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
02939  M02S01763.284l847 ---| CCA4     LCN    ELCA
Line S00059 Modification History
M01 (Added by) 283l840
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
02940  M02S00059.284l847 ---| CCA4     LCN    ELCA        LOAD CONTROLLER ATTRIBUTES FAILURE
Line S01764 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
02941  M01S01764.284l847 ---|          RJM    ERR         PROCESS ERROR
02942  M00S01765.1da     +++|
Line S00043 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
02943  M01S00043.273l780 +++|
02944  M00S01766.1da     +++| CCAA     BSS    0           EXPECTED CONTROLLER ATTRIBUTES
02945  M00S01767.1da     +++|          CONL   P02D1,0#100
02946  M00S01768.1da     +++|          CONL   P02D2,0#100
02947  M00S01769.1da     +++|          CONL   P02D3,0#100
02948  M00S01770.1da     +++|          CONL   P02D4,0#100
02949  M00S01771.1da     +++|          CONL   0#7D6
Line S00514 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02950  M01S00514.ns2783  +++| CCI      SPACE  4,15
02951  M01S00515.ns2783  +++|**        CCI - CALCULATE CHANNEL INDEX.
02952  M01S00516.ns2783  +++|*
02953  M01S00517.ns2783  +++|*         ENTRY  (EO) = EST ORDINAL.
02954  M01S00518.ns2783  +++|*                (IR+4) = CHANNEL SERVICED BY THIS DRIVER.
02955  M01S00519.ns2783  +++|*
02956  M01S00520.ns2783  +++|*         EXIT   (A) = (T1) = INDEX INTO (CM+1) FOR THIS CHANNEL.
02957  M01S00521.ns2783  +++|*                (CM - CM+4) = *EQDE* WORD OF EST.
02958  M01S00522.ns2783  +++|*
02959  M01S00523.ns2783  +++|*         USES   T1.
02960  M01S00524.ns2783  +++|*
02961  M01S00525.ns2783  +++|*         CALLS  REE.
02962  M01S00526.ns2783  +++|
02963  M01S00527.ns2783  +++|
02964  M01S00528.ns2783  +++| CCI      SUBR               ENTRY/EXIT
02965  M01S00529.ns2783  +++|          RJM    REE         READ EST ENTRY
02966  M01S00530.ns2783  +++|          LDD    CM+1        EXTRACT CHANNEL
02967  M01S00531.ns2783  +++|          LMD    IR+4
02968  M01S00532.ns2783  +++|          LPN    77
02969  M01S00533.ns2783  +++|          ZJN    CCI1        IF PATH SERVICED BY THIS DRIVER
02970  M01S00534.ns2783  +++|          LDN    1
02971  M01S00535.ns2783  +++| CCI1     STD    T1          SET CHANNEL BYTE INDEX
02972  M01S00536.ns2783  +++|          UJN    CCIX        RETURN
Line S00044 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
02973  M01S00044.273l780 +++| CCO      SPACE  4,20
02974  M01S00045.273l780 +++|**        CCO - CHECK FOR CONTROLLER OVER TEMPERATURE.
02975  M01S00046.273l780 +++|*
02976  M01S00047.273l780 +++|*         THIS ROUTINE SEARCHES THE RESPONSE PACKET FOR STATUS
02977  M01S00048.273l780 +++|*         INDICATING AN OVER TEMPERATURE CONDITION.  IF THERE IS
02978  M01S00049.273l780 +++|*         AN OVER TEMPERATURE CONDITION, AN ERROR IS OPTIONALLY
02979  M01S00050.273l780 +++|*         LOGGED TO THE BML, A BIT INDICATING OVER TEMPERATURE IS
02980  M01S00051.273l780 +++|*         SET IN *BDLL*, AND AN OPERATOR ACTION MESSAGE IS GENERATED.
02981  M01S00052.273l780 +++|*
02982  M01S00053.273l780 +++|*         ENTRY  (A) = 0 IF BML MESSAGE SHOULD NOT BE ISSUED.
02983  M01S00054.273l780 +++|*                (DT) = DRIVE TYPE.
02984  M01S00055.273l780 +++|*
Line S00056 Modification History
M01 (Added by) 273l780
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02985  M02S00056.ns2783  ---|*         USES   T7, CM+1 - CM+4.
Line S00537 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02986  M01S00537.ns2783  +++|*         USES   CM+2, T7.
Line S00057 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
02987  M01S00057.273l780 +++|*
Line S00058 Modification History
M01 (Added by) 273l780
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02988  M02S00058.ns2783  ---|*         CALLS  IDM, SRP, UBP.
02989  M02S00059.ns2783  ---|*
02990  M02S00060.ns2783  ---|*         MACROS MONITOR.
Line S00538 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
02991  M01S00538.ns2783  +++|*         CALLS  IDM, IEE, SRP, UBP.
Line S00061 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
02992  M01S00061.273l780 +++|
02993  M01S00062.273l780 +++|
02994  M01S00063.273l780 +++| CCO      SUBR               ENTRY/EXIT
02995  M01S00064.273l780 +++|          STD    T7
02996  M01S00065.273l780 +++|          LDN    ID16
02997  M01S00066.273l780 +++|          RJM    SRP         SEARCH RESPONSE PACKET
02998  M01S00067.273l780 +++|          MJN    CCOX        IF PARAMETER 16 NOT FOUND
02999  M01S00068.273l780 +++|          LDML   RPBF+6,T3
03000  M01S00069.273l780 +++|          SHN    21-11
03001  M01S00070.273l780 +++|          PJN    CCOX        IF NOT CONTROLLER OVER TEMPERATURE
03002  M01S00071.273l780 +++|          LDM    MSID
03003  M01S00072.273l780 +++|          STM    CCOA        SAVE VALUES FROM CURRENT MESSAGE
03004  M01S00073.273l780 +++|          LDM    EDBF+FALT
03005  M01S00074.273l780 +++|          STM    CCOA+1
03006  M01S00075.273l780 +++|          LDM    EDBF+FCS2
03007  M01S00076.273l780 +++|          STM    CCOA+2
03008  M01S00077.273l780 +++|          LDM    MSGL+1
03009  M01S00078.273l780 +++|          STM    CCOA+3
Line S00079 Modification History
M01 (Added by) 273l780
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03010  M02S00079.ns2783  ---|          LDM    BMID,DT
Line S00539 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03011  M01S00539.ns2783  +++|          LDML   BMID,DT
03012  M01S00540.ns2783  +++|          SHN    -11
Line S00080 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
03013  M01S00080.273l780 +++|          STM    MSID        ERROR MESSAGE ID
Line S00081 Modification History
M01 (Added by) 273l780
M02 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
03014  M02S00081.283l840 ---|          LDN    ECOT
Line S00060 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
03015  M01S00060.283l840 +++|          LDN    ECOT        CONTROLLER OVERTEMPERATURE
Line S00082 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
03016  M01S00082.273l780 +++|          STM    EDBF+FALT   FINAL FAULT CODE
03017  M01S00083.273l780 +++|          LDD    T7
03018  M01S00084.273l780 +++|          ZJP    CCO1        IF NOT ISSUING MESSAGE TO BML
03019  M01S00085.273l780 +++|
03020  M01S00086.273l780 +++|*         *HPA* DOES NOT DISPLAY THE DATA WITH SYMPTOM 0111 WHEN THE
03021  M01S00087.273l780 +++|*         ERROR IS RECOVERABLE, SO TWO MESSAGES ARE ISSUED TO THE BML.
03022  M01S00088.273l780 +++|
03023  M01S00089.273l780 +++|          LCN    0
03024  M01S00090.273l780 +++|          STM    EDBF+FCS2   SET NO STATUS FOR *HPA*
03025  M01S00091.273l780 +++|          LDN    5
03026  M01S00092.273l780 +++|          STM    MSGL+1      MESSAGE LENGTH
03027  M01S00093.273l780 +++|          LDD    HN
03028  M01S00094.273l780 +++|          ERRNZ  HD0100-100  CODE DEPENDS ON VALUE
03029  M01S00095.273l780 +++|          RJM    IDM         ISSUE INITIAL BML MESSAGE
03030  M01S00096.273l780 +++|          LDN    3
03031  M01S00097.273l780 +++|          STM    MSGL+1      MESSAGE LENGTH
03032  M01S00098.273l780 +++|          LDC    HD0111
03033  M01S00099.273l780 +++|          RJM    IDM         ISSUE FINAL BML MESSAGE
03034  M01S00100.273l780 +++|          LDM    CCOA
03035  M01S00101.273l780 +++|          STM    MSID        RESTORE VALUES IN CURRENT MESSAGE
03036  M01S00102.273l780 +++|          LDM    CCOA+1
03037  M01S00103.273l780 +++|          STM    EDBF+FALT
03038  M01S00104.273l780 +++|          LDM    CCOA+2
03039  M01S00105.273l780 +++|          STM    EDBF+FCS2
03040  M01S00106.273l780 +++|          LDM    CCOA+3
03041  M01S00107.273l780 +++|          STM    MSGL+1
03042  M01S00108.273l780 +++|
03043  M01S00109.273l780 +++|*         SET OVER TEMPERATURE BIT IN *BDLL*.
03044  M01S00110.273l780 +++|
03045  M01S00111.273l780 +++| CCO1     LDN    1           NEW VALUE
03046  M01S00112.273l780 +++|          STD    CM+2
Line S00113 Modification History
M01 (Added by) 273l780
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03047  M02S00113.ns2783  ---|          LDC    63*100      LOW ORDER BIT TO CHANGE TIMES 100
03048  M02S00114.ns2783  ---|          STD    T7
03049  M02S00115.ns2783  ---|          LDC    BDLL*100+1  6/WORD, 6/BITS TO CHANGE
Line S00541 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03050  M01S00541.ns2783  +++|          LDN    63          BIT TO CHANGE
Line S00116 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
03051  M01S00116.273l780 +++|          RJM    UBP         UPDATE *BDLL* PARAMETER
Line S00117 Modification History
M01 (Added by) 273l780
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03052  M02S00117.ns2783  ---|          LDN    EEVS
03053  M02S00118.ns2783  ---|          STD    CM+1        ENTER EVENT
03054  M02S00119.ns2783  ---|          LDN    0
03055  M02S00120.ns2783  ---|          STD    CM+3
03056  M02S00121.ns2783  ---|          LDN    CEDE        *CHECK E,E DISPLAY* EVENT
03057  M02S00122.ns2783  ---|          STD    CM+4
03058  M02S00123.ns2783  ---|          MONITOR  EATM
Line S00542 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03059  M01S00542.ns2783  +++|          RJM    IEE         ISSUE *CHECK E,E DISPLAY* EVENT
Line S00124 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
03060  M01S00124.273l780 +++|          UJP    CCOX        RETURN
03061  M01S00125.273l780 +++|
03062  M01S00126.273l780 +++|
03063  M01S00127.273l780 +++| CCOA     BSS    4           SAVE AREA FOR VALUES FROM CURRENT MESSAGE
03064  M00S01772.1da     +++| CCR      SPACE  4,15
03065  M00S01773.1da     +++|**        CCR - CHECK FOR CHANNEL REQUEST.
03066  M00S01774.1da     +++|*
03067  M00S01775.1da     +++|*         ENTRY  (UC) = UNIT ACTIVITY COUNT.
03068  M00S01776.1da     +++|*                (IR+4) = CHANNEL NUMBER.
Line S01777 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03069  M01S01777.ns2783  ---|*                AT *CCR4* FROM *PRS*.
Line S00543 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03070  M01S00543.ns2783  +++|*                AT *CCR2* FROM */3DZ/BST*.
03071  M00S01778.1da     +++|*
03072  M00S01779.1da     +++|*         EXIT   (A) = 0 IF CHANNEL DOWN.
Line S01780 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03073  M01S01780.ns2783  ---|*                TO *PRS3* IF ENTRY WAS FROM *PRS*.
Line S00544 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03074  M01S00544.ns2783  +++|*                TO */3DZ/BST2* IF ENTRY WAS FROM */3DZ/BST*.
03075  M00S01781.1da     +++|*
03076  M00S01782.1da     +++|*         USES   CM+1, CR.
03077  M00S01783.1da     +++|*
03078  M00S01784.1da     +++|*         CALLS  DCR, RCT, SRF.
03079  M00S01785.1da     +++|*
03080  M00S01786.1da     +++|*         MACROS DELAY, MONITOR.
03081  M00S01787.1da     +++|
03082  M00S01788.1da     +++|
03083  M00S01789.1da     +++| CCR3     RJM    SRF         SET DRIVER RELOAD FLAG
03084  M00S01790.1da     +++| CCR4     LDD    CR
03085  M00S01791.1da     +++|
Line S01792 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03086  M01S01792.ns2783  ---| CCR      SUBR   PRS3        ENTRY/EXIT
Line S00545 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03087  M01S00545.ns2783  +++| CCR      SUBR   /3DZ/BST2   ENTRY/EXIT
03088  M00S01793.1da     +++|          RJM    RCT         READ CHANNEL TABLE
03089  M00S01794.1da     +++|          SHN    21-5
03090  M00S01795.1da     +++|          MJN    CCR3        IF CHANNEL GLOBALLY DOWN
03091  M00S01796.1da     +++|          LPN    40
03092  M00S01797.1da     +++|          ZJN    CCR4        IF CHANNEL NOT REQUESTED
03093  M00S01798.1da     +++|          STM    CHRQ        DISABLE NEW ACTIVITY
03094  M00S01799.1da     +++|          LDD    UC
03095  M00S01800.1da     +++|          NJN    CCRX        IF CURRENT ACTIVITY
03096  M00S01801.1da     +++|          RJM    DCR         DROP CHANNEL RESERVATION
03097  M00S01802.1da     +++|*         LDN    0
03098  M00S01803.1da     +++|          STM    CHRQ        ENABLE NEW ACTIVITY
03099  M00S01804.1da     +++| CCR1     LDD    CR
03100  M00S01805.1da     +++|          NJN    CCRX        IF CHANNEL RESERVED
03101  M00S01806.1da     +++|
03102  M00S01807.1da     +++|*         ENTERED HERE FROM *PRS*.
03103  M00S01808.1da     +++|
03104  M00S01809.1da     +++| CCR2     DELAY              WAIT AWHILE
03105  M00S01810.1da     +++|          LDD    IR+4
03106  M00S01811.1da     +++|          STD    CM+1        ATTEMPT TO RESERVE CHANNEL
03107  M00S01812.1da     +++|          MONITOR  CCHM
03108  M00S01813.1da     +++|          LDD    CM+2        SET RESERVATION STATUS
03109  M00S01814.1da     +++|          STD    CR
03110  M00S01815.1da     +++|          RJM    RCT         READ CHANNEL TABLE
03111  M00S01816.1da     +++|          LPN    40
03112  M00S01817.1da     +++|          ZJN    CCR1        IF CHANNEL NOT DOWN
03113  M00S01818.1da     +++|          UJP    CCR3        SET DRIVER RELOAD FLAG
Line S01819 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03114  M01S01819.ns2783  ---| CDA      SPACE  4,10
Line S00546 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03115  M01S00546.ns2783  +++| CCS      SPACE  4,10
03116  M01S00547.ns2783  +++|**        CCS - CHECK CHANNEL STATE FOR SPECIFIED DEVICE.
03117  M01S00548.ns2783  +++|*
03118  M01S00549.ns2783  +++|*         ENTRY  (EO) = EST ORDINAL.
03119  M01S00550.ns2783  +++|*                (IR+4) = CHANNEL SERVICED BY THIS DRIVER.
03120  M01S00551.ns2783  +++|*
03121  M01S00552.ns2783  +++|*         EXIT   (A) = CHANNEL STATE.
03122  M01S00553.ns2783  +++|*
03123  M01S00554.ns2783  +++|*         CALLS  CCI.
03124  M01S00555.ns2783  +++|
03125  M01S00556.ns2783  +++|
03126  M01S00557.ns2783  +++| CCS      SUBR               ENTRY/EXIT
03127  M01S00558.ns2783  +++|          RJM    CCI         CALCULATE CHANNEL INDEX
03128  M01S00559.ns2783  +++|          LDM    CM+1,T1
03129  M01S00560.ns2783  +++|          SHN    -11
03130  M01S00561.ns2783  +++|          SCN    4
03131  M01S00562.ns2783  +++|          UJN    CCSX        RETURN
03132  M01S00563.ns2783  +++| CDA      SPACE  4,15
03133  M00S01820.1da     +++|**        CDA - CONVERT DISK ADDRESS.
03134  M00S01821.1da     +++|*
Line S01822 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
03135  M01S01822.284l847 ---|*         ENTRY  (T4) = CYLINDER NUMBER.
Line S00270 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
03136  M01S00270.284l847 +++|*         ENTRY  (T4) = RELATIVE CYLINDER NUMBER.
03137  M00S01823.1da     +++|*                (T5) = PHYSICAL TRACK.
03138  M00S01824.1da     +++|*                (T7) = LOGICAL SECTOR WITHIN PHYSICAL TRACK.
03139  M00S01825.1da     +++|*                (DT) = DRIVE TYPE.
03140  M00S01826.1da     +++|*
03141  M00S01827.1da     +++|*         EXIT   (T6) = LOGICAL TRACK.
03142  M00S01828.1da     +++|*
Line S01829 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03143  M01S01829.ns2783  ---|*         USES   T3 - T7.
Line S00564 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03144  M01S00564.ns2783  +++|*         USES   T1, T3 - T7, CM - CM+4.
03145  M01S00565.ns2783  +++|*
03146  M01S00566.ns2783  +++|*         CALLS  REE.
03147  M00S01830.1da     +++|
03148  M00S01831.1da     +++|
Line S01832 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03149  M01S01832.ns2783  ---|*         MULTIPLY THE CYLINDER VALUE BY THE NUMBER OF LOGICAL
03150  M01S01833.ns2783  ---|*         SECTORS PER CYLINDER.
03151  M01S01834.ns2783  ---|
Line S01835 Modification History
M01 (Removed by) 284l847
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03152  M02S01835.ns2783  ---| CDA2     LDML   SPC,DT
03153  M02S01836.ns2783  ---|          SHN    5           32 LOGICAL SECTORS PER PHYSICAL SECTOR
Line S00271 Modification History
M01 (Added by) 284l847
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03154  M02S00271.ns2783  ---| CDA2     LDML   PSCY,DT
03155  M02S00272.ns2783  ---| CDAB     SHN    **          PHYSICAL SECTORS TO LOGICAL SECTORS
Line S01837 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03156  M01S01837.ns2783  ---|          RAD    T7          ADVANCE LOGICAL SECTOR COUNT
03157  M01S01838.ns2783  ---|          SHN    -14
03158  M01S01839.ns2783  ---|          RAD    T3
03159  M01S01840.ns2783  ---| CDA3     SOD    T4
03160  M01S01841.ns2783  ---|          PJN    CDA2        IF NOT END OF CONVERSION
03161  M01S01842.ns2783  ---|
03162  M01S01843.ns2783  ---|*         DIVIDE THE ACCUMULATED LOGICAL SECTOR COUNT BY THE
03163  M01S01844.ns2783  ---|*         SUM OF (LOGICAL + GAP) SECTORS PER LOGICAL TRACK.
03164  M01S01845.ns2783  ---|
03165  M01S01846.ns2783  ---| CDA4     AOD    T6          ADVANCE LOGICAL TRACK NUMBER
03166  M01S01847.ns2783  ---|          LDN    0
03167  M01S01848.ns2783  ---|          SBML   LSLT,DT
03168  M01S01849.ns2783  ---|          RAD    T7
03169  M01S01850.ns2783  ---|          PJN    CDA4        IF NO UNDERFLOW
03170  M01S01851.ns2783  ---|          AOD    T7
03171  M01S01852.ns2783  ---|          SOD    T3
03172  M01S01853.ns2783  ---|          PJN    CDA4        IF DIVISION INCOMPLETE
03173  M01S01854.ns2783  ---|
03174  M00S01855.1da     +++| CDA      SUBR               ENTRY/EXIT
Line S00567 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03175  M01S00567.ns2783  +++|          RJM    REE         READ EST ENTRY
03176  M01S00568.ns2783  +++|          LDD    CM+4
03177  M01S00569.ns2783  +++|          SHN    3
03178  M01S00570.ns2783  +++|          ADN    MDGL
03179  M01S00571.ns2783  +++|          CRD    CM
03180  M01S00572.ns2783  +++|          LDD    CM+1        SINGLE UNIT SECTOR LIMIT
03181  M01S00573.ns2783  +++|          STD    T1
03182  M00S01856.1da     +++|          LDN    0           CLEAR SECTOR COUNT ACCUMULATOR
03183  M00S01857.1da     +++|          STD    T3
03184  M00S01858.1da     +++|          LDC    3777        INITIALIZE LOGICAL TRACK CALCULATION
03185  M00S01859.1da     +++|          STD    T6
Line S00273 Modification History
M01 (Added by) 284l847
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03186  M02S00273.ns2783  ---|          LDM    CFS,DT     SET UP PHYSICAL TO LOGICAL SHIFTS
03187  M02S00274.ns2783  ---|          SHN    -6
Line S00574 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03188  M01S00574.ns2783  +++|          LDML   CFS,DT      SET UP PHYSICAL TO LOGICAL SHIFTS
03189  M01S00575.ns2783  +++|          SHN    -14
Line S00275 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
03190  M01S00275.284l847 +++|          ADK    SHNI
03191  M01S00276.284l847 +++|          STM    CDAA
03192  M01S00277.284l847 +++|          STM    CDAB
03193  M00S01860.1da     +++|
Line S01861 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03194  M01S01861.ns2783  ---|*         MULTIPLY THE TRACK VALUE BY THE NUMBER OF LOGICAL
Line S00576 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03195  M01S00576.ns2783  +++|*         MULTIPLY THE PHYSICAL TRACK NUMBER BY THE NUMBER OF LOGICAL
03196  M00S01862.1da     +++|*         SECTORS PER PHYSICAL TRACK.
03197  M00S01863.1da     +++|
03198  M00S01864.1da     +++| CDA1     SOD    T5
03199  M00S01865.1da     +++|          MJN    CDA3        IF END OF CONVERSION
Line S01866 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
03200  M01S01866.284l847 ---|          LDML   SPT,DT
03201  M01S01867.284l847 ---|          ADN    1
03202  M01S01868.284l847 ---|          SHN    5           32 LOGICAL SECTORS PER PHYSICAL SECTOR
Line S00278 Modification History
M01 (Added by) 284l847
M02 (Removed by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
03203  M02S00278.1da7    ---|          LDML   PSPT,DT
Line S00010 Modification History
M01 (Added by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
03204  M01S00010.1da7    +++|          LDM    PSPT,DT
Line S00279 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
03205  M01S00279.284l847 +++| CDAA     SHN    **          PHYSICAL SECTORS TO LOGICAL SECTORS
03206  M00S01869.1da     +++|          RAD    T7          ADVANCE LOGICAL SECTOR COUNT
03207  M00S01870.1da     +++|          SHN    -14
03208  M00S01871.1da     +++|          RAD    T3
03209  M00S01872.1da     +++|          UJN    CDA1        LOOP ON CONVERSION
Line S00577 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03210  M01S00577.ns2783  +++|
03211  M01S00578.ns2783  +++|*         MULTIPLY THE CYLINDER NUMBER BY THE NUMBER OF LOGICAL SECTORS
03212  M01S00579.ns2783  +++|*         PER CYLINDER.
03213  M01S00580.ns2783  +++|
03214  M01S00581.ns2783  +++| CDA2     LDML   PSCY,DT
03215  M01S00582.ns2783  +++| CDAB     SHN    **          PHYSICAL SECTORS TO LOGICAL SECTORS
03216  M01S00583.ns2783  +++|          RAD    T7          ADVANCE LOGICAL SECTOR COUNT
03217  M01S00584.ns2783  +++|          SHN    -14
03218  M01S00585.ns2783  +++|          RAD    T3
03219  M01S00586.ns2783  +++| CDA3     SOD    T4
03220  M01S00587.ns2783  +++|          PJN    CDA2        IF NOT END OF CONVERSION
03221  M01S00588.ns2783  +++|
03222  M01S00589.ns2783  +++|*         DIVIDE THE ACCUMULATED LOGICAL SECTOR COUNT BY THE NUMBER OF
03223  M01S00590.ns2783  +++|*         LOGICAL SECTORS PER LOGICAL TRACK.  THE SINGLE UNIT SECTOR
03224  M01S00591.ns2783  +++|*         LIMIT IS USED, BECAUSE ONLY THE LOGICAL TRACK NUMBER (AND
03225  M01S00592.ns2783  +++|*         NOT THE LOGICAL SECTOR NUMBER) IS OF INTEREST.
03226  M01S00593.ns2783  +++|
03227  M01S00594.ns2783  +++| CDA4     AOD    T6          ADVANCE LOGICAL TRACK NUMBER
03228  M01S00595.ns2783  +++|          LDN    0
03229  M01S00596.ns2783  +++|          SBD    T1          SINGLE UNIT SECTOR LIMIT
03230  M01S00597.ns2783  +++|          RAD    T7
03231  M01S00598.ns2783  +++|          PJN    CDA4        IF NO UNDERFLOW
03232  M01S00599.ns2783  +++|          AOD    T7
03233  M01S00600.ns2783  +++|          SOD    T3
03234  M01S00601.ns2783  +++|          PJN    CDA4        IF DIVISION INCOMPLETE
03235  M01S00602.ns2783  +++|          LJM    CDAX        RETURN
03236  M01S00603.ns2783  +++| CDS      SPACE  4,15
03237  M01S00604.ns2783  +++|**        CDS - CHECK DEVICE STATUS.
03238  M01S00605.ns2783  +++|*
03239  M01S00606.ns2783  +++|*         ENTRY  (EO) = EST ORDINAL.
03240  M01S00607.ns2783  +++|*
03241  M01S00608.ns2783  +++|*         EXIT   (A) .LT. 0, IF DEVICE HAS NOT BEEN RECOVERED.
03242  M01S00609.ns2783  +++|*                (A) .GT. 0, IF DEVICE IS RECOVERD AND SHARED.
03243  M01S00610.ns2783  +++|*                (A) .EQ. 0, IF DEVICE IS RECOVERD AND NOT SHARED.
03244  M01S00611.ns2783  +++|*                (CM - CM+4) = *EQDE* WORD OF EST ENTRY.
03245  M01S00612.ns2783  +++|*
03246  M01S00613.ns2783  +++|*         CALLS  REE.
03247  M01S00614.ns2783  +++|
03248  M01S00615.ns2783  +++|
03249  M01S00616.ns2783  +++| CDS      SUBR               ENTRY/EXIT
03250  M01S00617.ns2783  +++|          RJM    REE         READ EST ENTRY
03251  M01S00618.ns2783  +++|          LDD    CM
03252  M01S00619.ns2783  +++|          SHN    21-6
03253  M01S00620.ns2783  +++|          MJN    CDSX        IF DEVICE UNAVAILABLE (NOT RECOVERED)
03254  M01S00621.ns2783  +++|          LDD    CM
03255  M01S00622.ns2783  +++|          LPC    1000        ISOLATE *SHARED* STATUS
03256  M01S00623.ns2783  +++|          UJN    CDSX        RETURN
Line S01873 Modification History
M01 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
03257  M01S01873.1da8    ---| CDT      SPACE  4,20
Line S00162 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
03258  M01S00162.1da8    +++| CDT      SPACE  4,25
03259  M00S01874.1da     +++|**        CDT - CHECK DRIVE TYPE.
03260  M00S01875.1da     +++|*
03261  M00S01876.1da     +++|*         VERIFY THAT THE CONFIGURED DRIVE MATCHES THE ACTUAL DRIVE
03262  M00S01877.1da     +++|*         TYPE.  IF A DRIVE IS ACCESSED FROM 2 CONTROLLERS, THE DRIVE
03263  M00S01878.1da     +++|*         COULD BE RECLUSTERED FROM ONE CONTROLLER AND THE OTHER ONE
03264  M00S01879.1da     +++|*         WOULD NOT KNOW THE CHANGE OCCURRED.  A SLAVE RESET MUST BE
03265  M00S01880.1da     +++|*         ISSUED TO CAUSE THE CONTROLLER TO REEVALUATE THE DRIVE.
03266  M00S01881.1da     +++|*
03267  M00S01882.1da     +++|*         ENTRY  (DN) = DRIVE NUMBER.
Line S01883 Modification History
M01 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
03268  M01S01883.1da8    ---|*                (DI) = DEVICE STATUS BLOCK ADDRESS.
Line S00163 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
03269  M01S00163.1da8    +++|*                (DI) = DEVICE STATE TABLE ADDRESS.
03270  M00S01884.1da     +++|*                (DT) = DRIVE TYPE.
03271  M00S01885.1da     +++|*
03272  M00S01886.1da     +++|*         EXIT   TO *CMP* WITH CHECK DRIVE BIT CLEAR IF CORRECT
03273  M00S01887.1da     +++|*                  NUMBER OF PHYSICAL DRIVES IN THE LOGICAL UNIT AND
03274  M00S01888.1da     +++|*                  THE DRIVE ATTRIBUTES ARE CORRECT.
Line S00061 Modification History
M01 (Added by) 283l840
M02 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
03275  M02S00061.1da8    ---|*                TO *CMP* IF ERROR IN PROGRESS ON A DIFFERENT DEVICE.
Line S00164 Modification History
M01 (Added by) 1da8
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03276  M02S00164.ns2783  ---|*                TO *CMP9* IF ERROR IN PROGRESS ON A DIFFERENT DEVICE.
Line S00624 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03277  M01S00624.ns2783  +++|*                TO *CMP10* IF ERROR IN PROGRESS ON A DIFFERENT DEVICE.
03278  M00S01889.1da     +++|*                TO *ERR* IF ERROR.
03279  M00S01890.1da     +++|*
Line S01891 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
03280  M01S01891.273l780 ---|*         USES   DI, T2, T3.
Line S00128 Modification History
M01 (Added by) 273l780
M02 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
03281  M02S00128.1da8    ---|*         USES   CM+2, DI, T2, T3, T7.
Line S00165 Modification History
M01 (Added by) 1da8
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03282  M02S00165.ns2783  ---|*         USES   CM+2, T2, T3, T7.
Line S00625 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03283  M01S00625.ns2783  +++|*         USES   CM+2, T2, T3.
03284  M00S01892.1da     +++|*
Line S01893 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
03285  M01S01893.273l780 ---|*         CALLS  ATT, CUF, DDT, LDP, LND, VDA.
Line S00129 Modification History
M01 (Added by) 273l780
M02 (Removed by) ns2767
Seq #  *Modification Id* Act 
----------------------------+
03286  M02S00129.ns2767  ---|*         CALLS  ATT, CUF, DDT, LDP, LND, UBP, VDA.
Line S00007 Modification History
M01 (Added by) ns2767
M02 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
03287  M02S00007.283l840 ---|*         CALLS  ATT, CUF, DDT, LDP, LND, RDO, UBP, VDA.
Line S00062 Modification History
M01 (Added by) 283l840
M02 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
03288  M02S00062.1da8    ---|*         CALLS  ATT, CUF, DDT, LDP, LND, RDO, SEP, UBP, VDA.
Line S00166 Modification History
M01 (Added by) 1da8
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03289  M02S00166.ns2783  ---|*         CALLS  ATT, CUF, DDT, IEE, RDO, SEP, UBP, VDA, WAC.
Line S00626 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03290  M01S00626.ns2783  +++|*         CALLS  ATT, COD, CUF, DDT, SEP, UBP, VDA, WAC.
03291  M00S01894.1da     +++|
03292  M00S01895.1da     +++|
03293  M00S01896.1da     +++| CDT      BSS    0           ENTRY
03294  M00S01897.1da     +++|
03295  M00S01898.1da     +++|*         ALLOW ACTIVITY ON OTHER DRIVES TO COMPLETE BEFORE REPORTING
03296  M00S01899.1da     +++|*         ATTRIBUTE 68 FOR THE CONTROLLER.  EVEN IF ISSUED, IT WOULD
03297  M00S01900.1da     +++|*         NOT BE EXECUTED UNTIL ALL COMMANDS IN PROGRESS COMPLETE.
03298  M00S01901.1da     +++|
Line S01902 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
03299  M01S01902.283l840 ---|          LDD    DI
Line S01903 Modification History
M01 (Removed by) ns2767
M02 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
03300  M02S01903.283l840 ---|          STM    ERFL        TO PREVENT OTHER ACTIVITY
Line S00008 Modification History
M01 (Added by) ns2767
M02 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
03301  M02S00008.283l840 ---|          STM    ERFL        PREVENT OTHER ACTIVITY
Line S00063 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
03302  M01S00063.283l840 +++|          RJM    SEP         SET ERROR PROCESSING INTERLOCK
Line S00064 Modification History
M01 (Added by) 283l840
M02 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
03303  M02S00064.1da8    ---|          NJP    CMP         IF ERROR IN PROGRESS ON A DIFFERENT DEVICE
Line S01904 Modification History
M01 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
03304  M01S01904.1da8    ---|          LDC    CDT1
03305  M01S01905.1da8    ---|          STML   ADDR,DI     RETURN ADDRESS IF NO RESPONSE
03306  M01S01906.1da8    ---| CDT1     LDN    1
03307  M01S01907.1da8    ---| CDT2     LMN    1
03308  M01S01908.1da8    ---|          RJM    LND         LOCATE DRIVE
03309  M01S01909.1da8    ---|          ZJN    CDT3        IF NO MORE DRIVES ON CONTROLLER
03310  M01S01910.1da8    ---|          LDML   ADDR,T7
03311  M01S01911.1da8    ---|          ZJN    CDT2        IF NO ACTIVITY ON DRIVE
03312  M01S01912.1da8    ---|          LDD    T7
03313  M01S01913.1da8    ---|          LMD    DI
03314  M01S01914.1da8    ---|          ZJN    CDT2        IF CURRENT DRIVE
03315  M01S01915.1da8    ---|          LDD    T7
03316  M01S01916.1da8    ---|          STD    DI
03317  M01S01917.1da8    ---|          RJM    LDP         LOAD DEVICE PARAMETERS
03318  M01S01918.1da8    ---|          LJM    0,PA        CHECK FOR TIMEOUT ON ACTIVE DRIVE
Line S00167 Modification History
M01 (Added by) 1da8
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03319  M02S00167.ns2783  ---|          NJP    CMP9        IF ERROR IN PROGRESS ON A DIFFERENT DEVICE
Line S00627 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03320  M01S00627.ns2783  +++|          NJP    CMP10       IF ERROR IN PROGRESS ON A DIFFERENT DEVICE
Line S00168 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
03321  M01S00168.1da8    +++|          RJM    WAC         WAIT FOR OTHER ACTIVITY TO COMPLETE
03322  M00S01919.1da     +++|
Line S01920 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
03323  M01S01920.273l780 ---| CDT3     LDD    DN
Line S00130 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
03324  M01S00130.273l780 +++|*         CLEAR CONTROLLER OVER TEMPERATURE BIT IN *BDLL*.
03325  M01S00131.273l780 +++|
Line S00132 Modification History
M01 (Added by) 273l780
M02 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
03326  M02S00132.1da8    ---| CDT3     LDN    0           NEW VALUE
Line S00169 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
03327  M01S00169.1da8    +++|          LDN    0           SET NEW VALUE
Line S00133 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
03328  M01S00133.273l780 +++|          STD    CM+2
Line S00134 Modification History
M01 (Added by) 273l780
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03329  M02S00134.ns2783  ---|          LDC    63*100      LOW ORDER BIT TO CHANGE TIMES 100
03330  M02S00135.ns2783  ---|          STD    T7
03331  M02S00136.ns2783  ---|          LDC    BDLL*100+1  6/WORD, 6/BITS TO CHANGE
Line S00628 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03332  M01S00628.ns2783  +++|          LDN    63          BIT TO CHANGE
Line S00137 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
03333  M01S00137.273l780 +++|          RJM    UBP         UPDATE *BDLL* PARAMETER
03334  M01S00138.273l780 +++|
03335  M01S00139.273l780 +++|*         CHECK DRIVE CONFIGURATION.
03336  M01S00140.273l780 +++|
03337  M01S00141.273l780 +++|          LDD    DN
03338  M00S01921.1da     +++|          STM    PHYD,DI     PHYSICAL DRIVE
03339  M00S01922.1da     +++|          RJM    DDT         DETERMINE DRIVE TYPE
Line S01923 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03340  M01S01923.ns2783  ---|          MJP    CDT8        IF DRIVE NOT FOUND
03341  M01S01924.ns2783  ---|          LDM    TOTD,DI     TOTAL DRIVES FOUND
Line S00629 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03342  M01S00629.ns2783  +++|          MJN    CDT1        IF DRIVE NOT FOUND
03343  M01S00630.ns2783  +++|          LDM    DDTA        TOTAL DRIVES FOUND
03344  M00S01925.1da     +++|          STD    T2
Line S01926 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
03345  M01S01926.284l847 ---|          LMM    TD,DT       TOTAL DRIVES EXPECTED
Line S00280 Modification History
M01 (Added by) 284l847
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03346  M02S00280.ns2783  ---|          SBM    DD,DT       TOTAL DRIVES EXPECTED
03347  M02S00281.ns2783  ---|          SBM    PD,DT
Line S01927 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03348  M01S01927.ns2783  ---|          NJN    CDT5        IF ERROR
03349  M01S01928.ns2783  ---|          LDD    T2
Line S00631 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03350  M01S00631.ns2783  +++|          SBD    DD          TOTAL DRIVES EXPECTED
03351  M01S00632.ns2783  +++|          SBD    PD
03352  M01S00633.ns2783  +++|          ZJN    CDT2        IF CORRECT DRIVE COUNT
03353  M01S00634.ns2783  +++| CDT1     LCN    ERDA        REPORT DEVICE ATTRIBUTES ERROR
03354  M01S00635.ns2783  +++|          RJM    ERR         PROCESS ERROR
03355  M01S00636.ns2783  +++|
03356  M01S00637.ns2783  +++| CDT2     LDD    T2
03357  M00S01929.1da     +++|          SHN    1
03358  M00S01930.1da     +++|          RAD    T3
03359  M00S01931.1da     +++|          LDM    ATTB,T3
03360  M00S01932.1da     +++|          SHN    21-4
03361  M00S01933.1da     +++|          PJN    CDT4        IF NO PARITY DRIVE
03362  M00S01934.1da     +++|          SOD    T2
03363  M00S01935.1da     +++| CDT4     LDD    T2          TOTAL DATA DRIVES FOUND
Line S01936 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03364  M01S01936.ns2783  ---|          LMM    DD,DT       EXPECTED DATA DRIVES
03365  M01S01937.ns2783  ---|          NJN    CDT5        IF ERROR
Line S00638 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03366  M01S00638.ns2783  +++|          LMD    DD          EXPECTED DATA DRIVES
03367  M01S00639.ns2783  +++|          NJN    CDT1        IF ERROR
03368  M00S01938.1da     +++|          LDM    ATTB,T3
03369  M00S01939.1da     +++|          SHN    21-11
Line S01940 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03370  M01S01940.ns2783  ---|          PJP    CDT8        IF NOT CLUSTERED
Line S00640 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03371  M01S00640.ns2783  +++|          PJN    CDT1        IF NOT CLUSTERED
03372  M00S01941.1da     +++|          RJM    ATT         WAIT FOR COMPLETION RESPONSE
03373  M00S01942.1da     +++|          LDC    C0302       REPORT ADDRESSEE STATUS OPERATION CODE
03374  M00S01943.1da     +++|          RJM    CUF         CHECK IF UNIT FORMATTED
Line S01944 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03375  M01S01944.ns2783  ---| CDT5     NJN    CDT8        IF NOT FORMATTED
Line S01945 Modification History
M01 (Removed by) 284l847
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03376  M02S01945.ns2783  ---|          LDM    DVTP,DI
03377  M02S01946.ns2783  ---|          SBN    DTED
03378  M02S01947.ns2783  ---|          ZJN    CDT6        IF 5833_1P
03379  M02S01948.ns2783  ---|          SBN    DTEF-DTED
Line S01949 Modification History
M01 (Removed by) ns2768
M02 (Removed by) 284l847
M03 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03380  M03S01949.ns2783  ---|          NJN    CDT7        IF NOT 5833_2P
Line S00087 Modification History
M01 (Added by) ns2768
M02 (Removed by) 284l847
M03 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03381  M03S00087.ns2783  ---|          ZJN    CDT6        IF 5833_2P
03382  M03S00088.ns2783  ---|          SBN    DTEH-DTEF
03383  M03S00089.ns2783  ---|          NJN    CDT7        IF NOT 5838_1P
Line S00282 Modification History
M01 (Added by) 284l847
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03384  M02S00282.ns2783  ---|          LDM    PD,DT       PARITY DRIVE INDICATOR
03385  M02S00283.ns2783  ---|          ZJN    CDT7        IF NOT PARITY DRIVE
Line S01950 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03386  M01S01950.ns2783  ---| CDT6     LDML   RPBF+11
03387  M01S01951.ns2783  ---|          SHN    21-11
03388  M01S01952.ns2783  ---|          PJN    CDT7        IF NO OFF-LINE DRIVE
Line S00009 Modification History
M01 (Added by) ns2767
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03389  M02S00009.ns2783  ---|          SHN    12          SET PHYSICAL DRIVE ID
03390  M02S00010.ns2783  ---|          LPN    37
03391  M02S00011.ns2783  ---|          STM    PHYD,DI
03392  M02S00012.ns2783  ---|          RJM    RDO         REPORT DRIVE OFF-LINE
Line S00011 Modification History
M01 (Added by) 1da7
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03393  M02S00011.ns2783  ---|          RJM    IEE         ISSUE E,E EVENT
Line S00013 Modification History
M01 (Added by) ns2767
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03394  M02S00013.ns2783  ---| CDT7     RJM    VDA         VERIFY DRIVE ATTRIBUTES
Line S00641 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03395  M01S00641.ns2783  +++|          NJN    CDT1        IF NOT FORMATTED
03396  M01S00642.ns2783  +++|          RJM    VDA         VERIFY DRIVE ATTRIBUTES
03397  M01S00643.ns2783  +++|          RJM    COD         CHECK FOR OFFLINE DRIVE
03398  M00S01953.1da     +++|          LDML   DVTP,DI
Line S01954 Modification History
M01 (Removed by) ns2767
Seq #  *Modification Id* Act 
----------------------------+
03399  M01S01954.ns2767  ---|          LPC    0#1FFF
03400  M01S01955.ns2767  ---|          LMC    0#4000      CAUSE CHECK OF OFF-LINE DRIVE
03401  M01S01956.ns2767  ---|          STML   DVTP,DI
03402  M01S01957.ns2767  ---| CDT7     RJM    VDA         VERIFY DRIVE ATTRIBUTES
03403  M01S01958.ns2767  ---|          LDML   DVTP,DI
03404  M01S01959.ns2767  ---|          LPC    0#DFFF      CLEAR CHECK DRIVE TYPE
Line S00014 Modification History
M01 (Added by) ns2767
Seq #  *Modification Id* Act 
----------------------------+
03405  M01S00014.ns2767  +++|          LPC    157777      CLEAR *CHECK DRIVE TYPE* FLAG
03406  M00S01960.1da     +++|          STML   DVTP,DI
03407  M00S01961.1da     +++|          LJM    CMP         EXIT
Line S01962 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03408  M01S01962.ns2783  ---|
Line S01963 Modification History
M01 (Removed by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03409  M02S01963.ns2783  ---| CDT8     LCN    ERDA
Line S00065 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03410  M02S00065.ns2783  ---| CDT8     LCN    ERDA        REPORT DEVICE ATTRIBUTES ERROR
Line S01964 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03411  M01S01964.ns2783  ---|          RJM    ERR         PROCESS ERROR
Line S00002 Modification History
M01 (Added by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03412  M01S00002.ns2750  +++| CEA      SPACE  4,15
03413  M01S00003.ns2750  +++|**        CEA - CLEAR *ENABLE CONTROLLER ACTIVITY* REQUEST.
03414  M01S00004.ns2750  +++|*
03415  M01S00005.ns2750  +++|*         ENTRY  (EO) = EST ORDINAL FOR DEVICE.
03416  M01S00006.ns2750  +++|*                (IR+4) = CHANNEL NUMBER.
03417  M01S00007.ns2750  +++|*
03418  M01S00008.ns2750  +++|*         EXIT   CHANNEL ENABLE BIT CLEARED IN *MST* WORD *BDLL*.
Line S00009 Modification History
M01 (Added by) ns2750
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03419  M02S00009.ns2783  ---|*                SPECIAL REQUEST BIT CLEARED IF BOTH CHANNELS ENABLED.
Line S00644 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03420  M01S00644.ns2783  +++|*                SPECIAL REQUEST BIT CLEARED.
Line S00010 Modification History
M01 (Added by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03421  M01S00010.ns2750  +++|*
Line S00011 Modification History
M01 (Added by) ns2750
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03422  M02S00011.ns2783  ---|*         USES   CM - CM+4, T1 - T1+4, T7.
Line S00645 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03423  M01S00645.ns2783  +++|*         USES   CM+2.
Line S00012 Modification History
M01 (Added by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03424  M01S00012.ns2750  +++|*
Line S00013 Modification History
M01 (Added by) ns2750
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03425  M02S00013.ns2783  ---|*         CALLS  CPF, UBP.
Line S00646 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03426  M01S00646.ns2783  +++|*         CALLS  CCI, CPF, UBP.
03427  M01S00647.ns2783  +++|
03428  M01S00648.ns2783  +++|
03429  M01S00649.ns2783  +++| CEA      SUBR               ENTRY/EXIT
03430  M01S00650.ns2783  +++|          RJM    CCI         CALCULATE CHANNEL INDEX
03431  M01S00651.ns2783  +++|          LDN    0           NEW VALUE
03432  M01S00652.ns2783  +++|          STD    CM+2
03433  M01S00653.ns2783  +++|          LDD    T1          BIT TO CHANGE
03434  M01S00654.ns2783  +++|          ADN    49D
03435  M01S00655.ns2783  +++|          RJM    UBP         CLEAR ENABLE CHANNEL BIT IN *BDLL*
03436  M01S00656.ns2783  +++|          LDN    ECAF        CLEAR SPECIAL REQUEST IN *PUT*
03437  M01S00657.ns2783  +++|          RJM    CPF
03438  M01S00658.ns2783  +++|          UJN    CEAX        RETURN
03439  M01S00659.ns2783  +++| CEC      SPACE  4,10
03440  M01S00660.ns2783  +++|**        CEC - CHECK FOR *ENABLE CONTROLLER ACTIVITY* REQUEST.
03441  M01S00661.ns2783  +++|*
03442  M01S00662.ns2783  +++|*         EXIT   (A) = 0, IF REQUEST IS FOR THIS CHANNEL.
03443  M01S00663.ns2783  +++|*
03444  M01S00664.ns2783  +++|*         USES   T1 - T7, CM.
Line S00014 Modification History
M01 (Added by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03445  M01S00014.ns2750  +++|*
03446  M01S00015.ns2750  +++|*         MACROS SFA.
03447  M01S00016.ns2750  +++|
03448  M01S00017.ns2750  +++|
Line S00018 Modification History
M01 (Added by) ns2750
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03449  M02S00018.ns2783  ---| CEA      SUBR               ENTRY/EXIT
03450  M02S00019.ns2783  ---|          SFA    EST,EO
Line S00665 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03451  M01S00665.ns2783  +++| CEC      SUBR               ENTRY/EXIT
03452  M01S00666.ns2783  +++|          SFA    EST,EO      CHECK EST ENTRY
Line S00020 Modification History
M01 (Added by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03453  M01S00020.ns2750  +++|          ADK    EQDE
Line S00021 Modification History
M01 (Added by) ns2750
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03454  M02S00021.ns2783  ---|          CRD    T1          READ *EQDE* WORD
03455  M02S00022.ns2783  ---|          LDD    T1+1
Line S00667 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03456  M01S00667.ns2783  +++|          CRD    T1
03457  M01S00668.ns2783  +++|          LDD    T1+4
03458  M01S00669.ns2783  +++|          SHN    3
03459  M01S00670.ns2783  +++|          ADN    BDLL        CHECK IF REQUEST IS FOR THIS CHANNEL
03460  M01S00671.ns2783  +++|          CRD    T4
03461  M01S00672.ns2783  +++|          LDD    T4
03462  M01S00673.ns2783  +++|          SHN    -1
03463  M01S00674.ns2783  +++|          LPN    3
03464  M01S00675.ns2783  +++|          STD    T4
03465  M01S00676.ns2783  +++|          ZJN    CECX        IF NEITHER CHANNEL FLAG IS SET
03466  M01S00677.ns2783  +++|          SBN    3
03467  M01S00678.ns2783  +++|          ZJN    CECX        IF BOTH CHANNEL FLAGS ARE SET
03468  M01S00679.ns2783  +++|          LDM    T1,T4       COMPARE REQUESTED CHANNEL TO THIS CHANNEL
Line S00023 Modification History
M01 (Added by) ns2750
Seq #  *Modification Id* Act 
----------------------------+
03469  M01S00023.ns2750  +++|          LMD    IR+4
03470  M01S00024.ns2750  +++|          LPN    77
Line S00025 Modification History
M01 (Added by) ns2750
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03471  M02S00025.ns2783  ---|          ZJN    CEA1        IF THIS IS THE FIRST CHANNEL
03472  M02S00026.ns2783  ---|          LDN    1
03473  M02S00027.ns2783  ---| CEA1     ADN    49D
03474  M02S00028.ns2783  ---|          SHN    6           LOW ORDER BIT TO CHANGE TIMES 100
03475  M02S00029.ns2783  ---|          STD    T7
03476  M02S00030.ns2783  ---|          LDN    0           NEW VALUE
03477  M02S00031.ns2783  ---|          STD    CM+2
03478  M02S00032.ns2783  ---|          LDC    BDLL*100+1  6/WORD, 6/BITS TO CHANGE
03479  M02S00033.ns2783  ---|          RJM    UBP         CLEAR ENABLE CHANNEL BIT IN *BDLL*
03480  M02S00034.ns2783  ---|          LDD    T1+4
03481  M02S00035.ns2783  ---|          SHN    3
03482  M02S00036.ns2783  ---|          ADN    BDLL
03483  M02S00037.ns2783  ---|          CRD    CM
03484  M02S00038.ns2783  ---|          LDD    CM
03485  M02S00039.ns2783  ---|          LPN    6
03486  M02S00040.ns2783  ---|          NJN    CEAX        IF OTHER CHANNEL STILL NOT ENABLED
03487  M02S00041.ns2783  ---|          LDN    ECAF        CLEAR SPECIAL REQUEST IN *PUT*
03488  M02S00042.ns2783  ---|          RJM    CPF
03489  M02S00043.ns2783  ---|          UJN    CEAX        RETURN
Line S00066 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03490  M02S00066.ns2783  ---| CEP      SPACE  4,10
Line S00680 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03491  M01S00680.ns2783  +++|          UJN    CECX        RETURN
03492  M01S00681.ns2783  +++| CEP      SPACE  4,15
Line S00067 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
03493  M01S00067.283l840 +++|**        CEP - CLEAR ERROR PROCESSING INTERLOCK.
03494  M01S00068.283l840 +++|*
Line S00069 Modification History
M01 (Added by) 283l840
M02 (Removed by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
03495  M02S00069.1da8    ---|*         ENTRY  (DI) = DEVICE STATUS BLOCK ADDRESS.
Line S00170 Modification History
M01 (Added by) 1da8
Seq #  *Modification Id* Act 
----------------------------+
03496  M01S00170.1da8    +++|*         ENTRY  (DI) = DEVICE STATE TABLE ADDRESS.
Line S00070 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
03497  M01S00070.283l840 +++|*                (EO) = EST ORDINAL.
Line S00071 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03498  M02S00071.ns2783  ---|*                (ERIT) = NONZERO IF RECOVERY INTERLOCK SET.
Line S00682 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03499  M01S00682.ns2783  +++|*                (ERPA) = (DI), IF ERROR PROCESSING ACTIVE ON DEVICE.
03500  M01S00683.ns2783  +++|*                (ERFL) = (DI), IF E.P. INTERLOCK SET FOR THIS DEVICE.
03501  M01S00684.ns2783  +++|*                (ERMF) = (DI), IF MMF RECOVERY INTERLOCK SET.
Line S00072 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
03502  M01S00072.283l840 +++|*
Line S00073 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03503  M02S00073.ns2783  ---|*         USES   T5, CM - CM+4.
Line S00685 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03504  M01S00685.ns2783  +++|*         EXIT   (ERPA) = (ERRA) = 0, IF ERROR PROCESSING ACTIVE.
03505  M01S00686.ns2783  +++|*                (ERFL) = (ERRA) = 0, IF INTERLOCK SET.
03506  M01S00687.ns2783  +++|*                (ERMF) = 0, IF MMF RECOVERY INTERLOCK SET.
03507  M01S00688.ns2783  +++|*                MMF INTERLOCK(S) CLEARED.
Line S00074 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
03508  M01S00074.283l840 +++|*
Line S00012 Modification History
M01 (Added by) 1da7
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03509  M02S00012.ns2783  ---|*         CALLS  LNU.
Line S00689 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03510  M01S00689.ns2783  +++|*         CALLS  CBI, CDS, LNE.
03511  M01S00690.ns2783  +++|*
03512  M01S00691.ns2783  +++|*         MACROS CMSTF, MONITOR.
Line S00013 Modification History
M01 (Added by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
03513  M01S00013.1da7    +++|
Line S00075 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03514  M02S00075.ns2783  ---|*         MACROS CMSTF, MONITOR, SFA.
Line S00076 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
03515  M01S00076.283l840 +++|
Line S00692 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03516  M01S00692.ns2783  +++| CEP      SUBR               ENTRY/EXIT
03517  M01S00693.ns2783  +++|          LDM    ERPA        CHECK IF ERROR PROCESSING ACTIVE
03518  M01S00694.ns2783  +++|          LMD    DI
03519  M01S00695.ns2783  +++|          NJN    CEP1        IF NOT ACTIVE ON THIS DEVICE
03520  M01S00696.ns2783  +++|          STM    ERPA        CLEAR ERROR PROCESSING ACTIVE FLAG
03521  M01S00697.ns2783  +++|          STM    ERRA        ENABLE NEXT PASS THROUGH ERROR PROCESSOR
03522  M01S00698.ns2783  +++| CEP1     LDM    ERFL        CHECK IF ERROR PROCESSING INTERLOCK SET
03523  M01S00699.ns2783  +++|          LMD    DI
03524  M01S00700.ns2783  +++|          NJN    CEPX        IF NOT SET ON THIS DEVICE
03525  M01S00701.ns2783  +++|          STM    ERFL        CLEAR ERROR PROCESSING INTERLOCK FLAG
Line S00077 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
03526  M01S00077.283l840 +++|
Line S00014 Modification History
M01 (Added by) 1da7
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03527  M02S00014.ns2783  ---| CEP1     LDN    CBDS        CLEAR BUFFERED DEVICE INTERLOCK
Line S00702 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03528  M01S00702.ns2783  +++|*         CLEAR ERROR PROCESSING FLAGS IN *MST*.
03529  M01S00703.ns2783  +++|
03530  M01S00704.ns2783  +++| CEP2     LDN    0           INITIALIZE PARTITION SEARCH
03531  M01S00705.ns2783  +++| CEP3     RJM    LNE         LOCATE NEXT EST FOR THIS DEVICE
03532  M01S00706.ns2783  +++|          ZJN    CEP5        IF NO MORE PARTITIONS TO PROCESS
03533  M01S00707.ns2783  +++|          RJM    CDS         CHECK DEVICE STATUS
03534  M01S00708.ns2783  +++|          MJN    CEP4        IF DEVICE NOT RECOVERED
03535  M01S00709.ns2783  +++|          CMSTF  GDER        CLEAR *ERROR RECOVERY IN PROGRESS* FLAG
03536  M01S00710.ns2783  +++| CEP4     LDD    EO
03537  M01S00711.ns2783  +++|          UJN    CEP3        CHECK FOR NEXT PARTITION
03538  M01S00712.ns2783  +++|
03539  M01S00713.ns2783  +++|*         CLEAR MMF INTERLOCKS, IF SET.
03540  M01S00714.ns2783  +++|
03541  M01S00715.ns2783  +++| CEP5     LDM    ERMF        CHECK IF RECOVERY ERROR INTERLOCK SET
03542  M01S00716.ns2783  +++|          ZJN    CEP6        IF INTERLOCK NOT SET
03543  M01S00717.ns2783  +++|          LDN    CRIS        CLEAR RECOVERY ERROR PROCESSING INTERLOCK
Line S00015 Modification History
M01 (Added by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
03544  M01S00015.1da7    +++|          STD    CM+1
Line S00016 Modification History
M01 (Added by) 1da7
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03545  M02S00016.ns2783  ---|          LDD    EO          SET EST ORDINAL
03546  M02S00017.ns2783  ---|          STD    CM+4
Line S00018 Modification History
M01 (Added by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
03547  M01S00018.1da7    +++|          MONITOR  MTEM
Line S00019 Modification History
M01 (Added by) 1da7
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03548  M02S00019.ns2783  ---| CEP2     CMSTF  GDER        CLEAR *ERROR RECOVERY IN PROGRESS* FLAG
03549  M02S00020.ns2783  ---|          LDD    EO
03550  M02S00021.ns2783  ---|          UJN    CEP0.1      CHECK FOR NEXT UNIT LINKED TO *PUT*
Line S00718 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03551  M01S00718.ns2783  +++|*         LDN    0           CLEAR RECOVERY ERROR INTERLOCK FLAG
03552  M01S00719.ns2783  +++|          STM    ERMF
03553  M01S00720.ns2783  +++| CEP6     RJM    CBI         CLEAR *BDT* ERROR PROCESSING INTERLOCKS
03554  M01S00721.ns2783  +++|          UJP    CEPX        RETURN
03555  M01S00722.ns2783  +++| CET      SPACE  4,10
03556  M01S00723.ns2783  +++|**        CET - CHECK ELAPSED TIME.
03557  M01S00724.ns2783  +++|*
03558  M01S00725.ns2783  +++|*         ENTRY  (CETB) = TIME OF LAST GLOBAL MST CHECK.
03559  M01S00726.ns2783  +++|*
03560  M01S00727.ns2783  +++|*         EXIT   (A) .LT. 0, IF NOT TIME TO CHECK GLOBAL MST-S.
03561  M01S00728.ns2783  +++|*                (DVTP) BIT 7 SET FOR SHARED PARITY DEVICES, IF TIME.
03562  M01S00729.ns2783  +++|*                (CETB) UPDATED, IF TIME TO CHECK GLOBAL MST-S.
03563  M01S00730.ns2783  +++|*
03564  M01S00731.ns2783  +++|*         USES   T1, T2, CM - CM+4.
Line S00022 Modification History
M01 (Added by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
03565  M01S00022.1da7    +++|
Line S00023 Modification History
M01 (Added by) 1da7
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03566  M02S00023.ns2783  ---| CEP3     STM    ERFL        CLEAR ERROR PROCESSING FLAG
Line S00024 Modification History
M01 (Added by) 1da7
Seq #  *Modification Id* Act 
----------------------------+
03567  M01S00024.1da7    +++|
Line S00078 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03568  M02S00078.ns2783  ---| CEP      SUBR               ENTRY/EXIT
Line S00079 Modification History
M01 (Added by) 283l840
M02 (Removed by) 1da7
M03 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03569  M03S00079.ns2783  ---|          LDD    EO          SET EST ORDINAL
Line S00025 Modification History
M01 (Added by) 1da7
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03570  M02S00025.ns2783  ---|          LDN    0           SET UP TO LOCATE FIRST UNIT FOR *PUT*
03571  M02S00026.ns2783  ---| CEP0.1   RJM    LNU         LOCATE NEXT UNIT (USING *EO*)
03572  M02S00027.ns2783  ---|          ZJN    CEP3        IF NO MORE UNITS
Line S00080 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03573  M02S00080.ns2783  ---|          STD    T5
03574  M02S00081.ns2783  ---|          SFA    EST         READ EST ENTRY
03575  M02S00082.ns2783  ---|          ADK    EQDE
Line S00732 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03576  M01S00732.ns2783  +++| CET      SUBR               ENTRY/EXIT
03577  M01S00733.ns2783  +++|          LDK    RTCL        GET CURRENT CLOCK
Line S00083 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
03578  M01S00083.283l840 +++|          CRD    CM
Line S00084 Modification History
M01 (Added by) 283l840
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03579  M02S00084.ns2783  ---|          LDD    CM
Line S00734 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
03580  M01S00734.ns2783  +++|          LDD    CM+1        COMPARE LOW ORDER BYTE OF SECONDS
03581  M01S00735.ns2783  +++|          SBM    CETB        CALCULATE ELAPSED TIME
03582  M01S00736.ns2783  +++|          PJN    CET1        IF NO UNDERFLOW
03583  M01S00737.ns2783  +++|          ADC    10000       CORRECT FOR UNDERFLOW
03584  M01S00738.ns2783  +++| CET1     SBN    SBUR
03585  M01S00739.ns2783  +++|          MJN    CETX        IF ELAPSED TIME LESS THAN *SBUR* SECONDS
03586  M01S00740.ns2783  +++|          LDD    CM+1        SAVE CURRENT CLOCK VALUE
03587  M01S00741.ns2783  +++|          STM    CETB
03588  M01S00742.ns2783  +++|
03589  M01S00743.ns2783  +++|*         SET *CHECK MMF ACCESS* FLAGS FOR ALL SHARED PARITY DEVICES.
03590  M01S00744.ns2783  +++|
03591  M01S00745.ns2783  +++|          LDC    DSTB-DSTBE
03592  M01S00746.ns2783  +++|*         UJN    CETX        (NO SHARED DEVICES CONFIGURED)
03593  M01S00747.ns2783  +++| CETA     EQU    *-2
03594  M01S00748.ns2783  +++|          STD    T1
03595  M01S00749.ns2783  +++| CET2     LDN    DSTBE       PROCESS NEXT DEVICE
03596  M01S00750.ns2783  +++|          RAD    T1
03597  M01S00751.ns2783  +++|          LMM    DASB
03598  M01S00752.ns2783  +++|          ZJN    CETX        IF NO MORE DEVICES TO PROCESS
03599  M01S00753.ns2783  +++|          LDM    DVTP,T1
03600  M01S00754.ns2783  +++|          LPN    77
03601  M01S00755.ns2783  +++|          STD    T2          DRIVE TYPE
03602  M01S00756.ns2783  +++|          LDML   DM,T2
03603  M01S00757.ns2783  +++|          SHN    21-17
03604  M01S00758.ns2783  +++|          PJN    CET2        IF NOT PARITY DEVICE
Proceed to Part 3
cdc/nos2.source/opl.opl871/deck/1da.002.txt ยท Last modified: by 127.0.0.1