Deck 1HY Part 001

12 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
01596  M01S01492.1hy     +++|          LDD    WB+3
01597  M01S01493.1hy     +++|          SHN    0-13
01598  M01S01494.1hy     +++|          ZJN    CMP6        IF UNIT INTERLOCK NOT RELEASED
01599  M01S01495.1hy     +++|          SOD    UC
01600  M01S01496.1hy     +++|          LDN    0           CLEAR REQUEST IN PROGRESS
Line S01497 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01601  M02S01497.ns2769  ---| CMP6     STM    ADDR
Line S01498 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01602  M02S01498.ns2769  ---|          STM    CBCT        CLEAR *CBT* COUNT
Line S01499 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01603  M02S01499.ns2769  ---|          STM    RQIN
Line S01500 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01604  M02S01500.ns2769  ---|          STM    SREQ
01605  M01S00046.ns2769  +++| CMP6     STM    ADDR,DI
01606  M01S00047.ns2769  +++|          STM    CBCT,DI     CLEAR *CBT* COUNT
01607  M01S00048.ns2769  +++|          STM    RQIN,DI
01608  M01S00049.ns2769  +++|          STM    SREQ,DI
01609  M01S01501.1hy     +++|          RJM    CMC
01610  M01S01502.1hy     +++|          LJM    HYD3        RETURN
01611  M01S01503.1hy     +++| CMPA     EQU    *-1
01612  M01S01504.1hy     +++|
01613  M01S01505.1hy     +++| CMP7     LDN    0           SET REQUEST QUEUE EMPTY
Line S01506 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01614  M02S01506.ns2769  ---|          STM    RQIN
01615  M01S00050.ns2769  +++|          STM    RQIN,DI
01616  M01S01507.1hy     +++|          UJP    CMP5        RELEASE UNIT INTERLOCK
01617  M01S01508.1hy     +++| COS      SPACE  4,10
01618  M01S01509.1hy     +++|**        COS - CHECK OPERATIONAL STATUS.
01619  M01S01510.1hy     +++|*
01620  M01S01511.1hy     +++|*         ENTRY  (A) = POSITIVE MASK TO RETURN ON BIT(S) SET.
01621  M01S01512.1hy     +++|*                    = NEGATIVE MASK TO RETURN ON BIT(S) CLEAR.
01622  M01S01513.1hy     +++|*
01623  M01S01514.1hy     +++|*         EXIT   (A) = 0 IF CONDITION SET.
01624  M01S01515.1hy     +++|*                    .LT. 0 IF TIMEOUT.
01625  M01S01516.1hy     +++|*
01626  M01S01517.1hy     +++|*         ERROR  TO *ERR* IF ADAPTOR DROPPED SELECT ACTIVE.
01627  M01S01518.1hy     +++|*
01628  M01S01519.1hy     +++|*         USES   T2, T3.
01629  M01S01520.1hy     +++|*
01630  M01S01521.1hy     +++|*         CALLS  CTO, R1B.
01631  M01S01522.1hy     +++|
01632  M01S01523.1hy     +++|
01633  M01S01524.1hy     +++| COS3     SHN    12
01634  M01S01525.1hy     +++|          LPDL   T2          CHECK CONDITION MET
01635  M01S01526.1hy     +++|          LMDL   T3
01636  M01S01527.1hy     +++|          ZJN    COSX        IF CONDITION SET
01637  M01S01528.1hy     +++|          RJM    CTO
01638  M01S01529.1hy     +++|          MJN    COS2        IF NOT TIMEOUT
01639  M01S01530.1hy     +++|          LCN    0
01640  M01S01531.1hy     +++|
01641  M01S01532.1hy     +++| COS      SUBR               ENTRY/EXIT
01642  M01S01533.1hy     +++|          STDL   T2
01643  M01S01534.1hy     +++|          PJN    COS1        IF RETURN ON BIT(S) SET
01644  M01S01535.1hy     +++|          LMC    -0
01645  M01S01536.1hy     +++|          STDL   T2          COMPLEMENT MASK
01646  M01S01537.1hy     +++|          LDN    0
01647  M01S01538.1hy     +++| COS1     STDL   T3
01648  M01S01539.1hy     +++| COS2     LDC    FCRO        GET OPERATIONAL STATUS
01649  M01S01540.1hy     +++|          RJM    R1B
01650  M01S01541.1hy     +++|          SHN    21-11
01651  M01S01542.1hy     +++|          MJN    COS3        IF *SELECT* ACTIVE
01652  M01S01543.1hy     +++|          LDN    EDSA
01653  M01S01544.1hy     +++|          RJM    ERR         PROCESS ERROR
01654  M01S01545.1hy     +++| CPF      SPACE  4,10
01655  M01S01546.1hy     +++|**        CLEAR *PUT* FLAG.
01656  M01S01547.1hy     +++|*
01657  M01S01548.1hy     +++|*         ENTRY  (A) = BIT NUMBER TO CLEAR IN *PILL* WORD.
01658  M01S01549.1hy     +++|*
01659  M01S01550.1hy     +++|*         EXIT   (A) = 0.
01660  M01S01551.1hy     +++|*
01661  M01S01552.1hy     +++|*         USES   T6, T7, CM - CM+4.
01662  M01S01553.1hy     +++|*
01663  M01S01554.1hy     +++|*         CALLS  CMC.
01664  M01S01555.1hy     +++|*
01665  M01S01556.1hy     +++|*         MACROS MONITOR, PUTE.
01666  M01S01557.1hy     +++|
01667  M01S01558.1hy     +++|
01668  M01S01559.1hy     +++| CPF      SUBR               ENTRY/EXIT
01669  M01S01560.1hy     +++|          SHN    6
01670  M01S01561.1hy     +++|          STD    T7          SET BIT NUMBER
01671  M01S01562.1hy     +++|          LDC    PILL*100+1
01672  M01S01563.1hy     +++|          STD    T6          WORD OFFSET + FIELD WIDTH
01673  M01S01564.1hy     +++|          RJM    CMC
01674  M01S01565.1hy     +++|*         LDN    0           CLEAR UNUSED BYTE
01675  M01S01566.1hy     +++|          STD    CM+2
01676  M01S01567.1hy     +++|          LDD    MA          STORE MESSAGE BUFFER PARAMETERS
01677  M01S01568.1hy     +++|          CWD    T6
01678  M01S01569.1hy     +++|          LDN    1           PARAMETER WORD COUNT
01679  M01S01570.1hy     +++|          STD    CM+1
01680  M01S01571.1hy     +++|          LDD    PO
01681  M01S01572.1hy     +++|          SHN    PUTLS
01682  M01S01573.1hy     +++|          PUTE   *
01683  M01S01574.1hy     +++|          ADC    0           SET BASE *PUT* ENTRY ADDRESS
01684  M01S01575.1hy     +++|          STD    CM+4
01685  M01S01576.1hy     +++|          SHN    -14
01686  M01S01577.1hy     +++|          STD    CM+3
01687  M01S01578.1hy     +++|          MONITOR  UTEM      CLEAR *PUT* FLAG
01688  M01S01579.1hy     +++|*         LDN    0
01689  M01S01580.1hy     +++|          UJN    CPFX        RETURN
01690  M01S01581.1hy     +++| CSD      SPACE  4,15
01691  M01S01582.1hy     +++|**        CSD - CONNECT TO SLAVE DEVICE.
01692  M01S01583.1hy     +++|*
01693  M01S01584.1hy     +++|*         ENTRY  (UN) = UNIT NUMBER.
01694  M01S00008.ns2512  +++|*                (CB) = *CBT* ORDINAL IF I/O REQUEST.
01695  M01S01585.1hy     +++|*                (CM - CM+4) = EST ENTRY.
01696  M01S01586.1hy     +++|*
01697  M01S01587.1hy     +++|*         EXIT   (A) .NE. 0 IF UNIT CONNECTED.
01698  M01S01588.1hy     +++|*
Line S01589 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
01699  M02S01589.ns2512  ---|*         USES   T2.
Line S00009 Modification History
M01 (Added by) ns2512
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01700  M02S00009.253l688 ---|*         USES   T2, CM - CM+4.
01701  M01S00001.253l688 +++|*         USES   T2, T7, CM - CM+4.
01702  M01S01590.1hy     +++|*
01703  M01S01591.1hy     +++|*         ERROR  TO *ERR* IF SELECT REJECT.
01704  M01S01592.1hy     +++|*
01705  M01S01593.1hy     +++|*         CALLS  R1B, SSD, SUI.
01706  M01S00010.ns2512  +++|*
01707  M01S00011.ns2512  +++|*         MACROS CBTE.
01708  M01S01594.1hy     +++|
01709  M01S01595.1hy     +++|
Line S01596 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
01710  M02S01596.ns2512  ---| CSD4     LDN    0
Line S01597 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
01711  M02S01597.ns2512  ---|
01712  M01S01598.1hy     +++| CSD      SUBR               ENTRY/EXIT
01713  M01S01599.1hy     +++|          LDC    0
01714  M01S01600.1hy     +++| CHRQ     EQU    *-1
01715  M01S01601.1hy     +++|          NJN    CSD4        IF CHANNEL REQUESTED
Line S01602 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01716  M02S01602.ns2769  ---|          STM    LCMD
01717  M01S00051.ns2769  +++|          STM    LCMD,DI
01718  M01S01603.1hy     +++|
01719  M01S01604.1hy     +++|*         CHECK EST ENTRY FOR CHANNEL DOWN.
01720  M01S01605.1hy     +++|
01721  M01S01606.1hy     +++|          LDD    CM+1        EXTRACT CHANNEL
01722  M01S01607.1hy     +++|          LMD    IR+4
01723  M01S01608.1hy     +++|          LPN    77
01724  M01S01609.1hy     +++|          ZJN    CSD1        IF PATH SERVICED BY THIS DRIVER
01725  M01S01610.1hy     +++|          LDN    1
01726  M01S01611.1hy     +++| CSD1     ADN    CM+1        SET CHANNEL BYTE ADDRESS
01727  M01S01612.1hy     +++|          STD    T2
01728  M01S01613.1hy     +++|          LDI    T2          CHECK CHANNEL STATE
01729  M01S01614.1hy     +++|          SHN    -11
01730  M01S01615.1hy     +++|          LMN    4
Line S01616 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
01731  M02S01616.ns2512  ---|          ZJN    CSD3        IF CHANNEL UP AND AVAILABLE
Line S01617 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
01732  M02S01617.ns2512  ---|          LDN    0
Line S01618 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
01733  M02S01618.ns2512  ---| CSD2     UJN    CSDX        RETURN
Line S01619 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
01734  M02S01619.ns2512  ---|
Line S01620 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
01735  M02S01620.ns2512  ---| CSD3     RJM    SUI         SET UNIT INTERLOCK
01736  M01S00012.ns2512  +++|          ZJN    CSD6        IF CHANNEL UP AND AVAILABLE
01737  M01S00013.ns2512  +++|          SCN    1
01738  M01S00014.ns2512  +++|          NJN    CSD4        IF CHANNEL DOWN OR NOT ENABLED
01739  M01S00015.ns2512  +++|          LDD    CB
01740  M01S00016.ns2512  +++|          ZJN    CSDX        IF NOT I/O REQUEST
01741  M01S00017.ns2512  +++|          SHN    CBTLS
01742  M01S00018.ns2512  +++|          CBTE   *
Line S00019 Modification History
M01 (Added by) ns2512
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01743  M02S00019.253l688 ---|          ADC    HSLK        FETCH CHANNEL SELECT STATUS
01744  M01S00002.253l688 +++|          ADC    PAD4        GET CHANNEL FROM CBT ENTRY
01745  M01S00003.253l688 +++|          CRD    T7
01746  M01S00004.253l688 +++|          ADN    HSLK-PAD4   GET CHANNEL SELECT STATUS
01747  M01S00020.ns2512  +++|          CRD    CM
01748  M01S00021.ns2512  +++|          LDD    CM          CHECK ERROR FLAGS
01749  M01S00022.ns2512  +++|          SHN    0-12
01750  M01S00023.ns2512  +++|          ZJN    CSDX        IF NOT CHANNEL SPECIFIC REQUEST
Line S00024 Modification History
M01 (Added by) ns2512
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01751  M02S00024.253l688 ---|          LDD    CM
Line S00025 Modification History
M01 (Added by) ns2512
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
01752  M02S00025.253l688 ---|          LPN    77          CHECK CHANNEL
01753  M01S00005.253l688 +++|          LDD    T7          CHECK CHANNEL
01754  M01S00006.253l688 +++|          SHN    -6
01755  M01S00026.ns2512  +++|          LMD    IR+4
01756  M01S00027.ns2512  +++|          ZJN    CSD6        IF REQUEST FOR THIS DRIVER
01757  M01S00028.ns2512  +++| CSD4     LDN    0
01758  M01S00029.ns2512  +++| CSD5     UJP    CSDX        RETURN
01759  M01S00030.ns2512  +++|
01760  M01S00031.ns2512  +++| CSD6     RJM    SUI         SET UNIT INTERLOCK
01761  M01S01621.1hy     +++|          NJN    CSD4        IF ASSIGNED ELSEWHERE
01762  M01S00001.1hy7    +++|          LDC    FCIS
01763  M01S00002.1hy7    +++|          RJM    R1B         READ IDLE STATUS
01764  M01S00003.1hy7    +++|          STML   IDST
01765  M01S01622.1hy     +++|          RJM    SSD         SELECT *IHD*
01766  M01S01623.1hy     +++|
01767  M01S01624.1hy     +++|*         READ BIT SIGNIFICANT RESPONSE.
01768  M01S01625.1hy     +++|
01769  M01S01626.1hy     +++|          LDC    FCSO        FORCE SYNC OUT
01770  M01S01627.1hy     +++|          RJM    R1B
01771  M01S01628.1hy     +++|          STML   BSRN        SAVE RESPONSE
01772  M01S01629.1hy     +++|          LPML   TMSK,UN
Line S01630 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
01773  M02S01630.ns2512  ---|          NJN    CSD2        IF CORRECT UNIT SELECTED
01774  M01S00032.ns2512  +++|          NJN    CSD5        IF CORRECT UNIT SELECTED
01775  M01S01631.1hy     +++|          LDN    EICU
01776  M01S01632.1hy     +++|          RJM    ERR         PROCESS ERROR
01777  M01S01633.1hy     +++| CSR      SPACE  4,10
01778  M01S01634.1hy     +++|**        CSR - CLEAR SPECIAL REQUEST.
01779  M01S01635.1hy     +++|*
01780  M01S01636.1hy     +++|*         EXIT   TO *CMP*.
01781  M01S01637.1hy     +++|*
01782  M01S01638.1hy     +++|*         CALLS  CPF.
01783  M01S01639.1hy     +++|
01784  M01S01640.1hy     +++|
01785  M01S01641.1hy     +++| CSR      BSS    0           ENTRY
Line S01642 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01786  M02S01642.ns2769  ---|          LDM    SREQ
01787  M01S00052.ns2769  +++|          LDM    SREQ,DI
01788  M01S01643.1hy     +++|          ZJN    CSR1        IF REQUEST SELECTED BY DRIVER
01789  M01S01644.1hy     +++|          RJM    CPF
01790  M01S01645.1hy     +++| CSR1     LJM    CMP         COMPLETE PROCESSING
01791  M01S01646.1hy     +++| CTO      SPACE  4,10
01792  M01S01647.1hy     +++|**        CTO - CHECK TIMEOUT.
01793  M01S01648.1hy     +++|*
01794  M01S01649.1hy     +++|*         ENTRY  (PO) = *PUT* ORDINAL.
01795  M01S01650.1hy     +++|*
01796  M01S01651.1hy     +++|*         EXIT   (A) .LT. 0 IF NOT TIMEOUT.
01797  M01S01652.1hy     +++|*
01798  M01S01653.1hy     +++|*         USES   T6, T7, CM - CM+4.
01799  M01S01654.1hy     +++|*
01800  M01S01655.1hy     +++|*         MACROS FTTE.
01801  M01S01656.1hy     +++|
01802  M01S01657.1hy     +++|
01803  M01S01658.1hy     +++| CTO      SUBR               ENTRY/EXIT
01804  M01S01659.1hy     +++|          LDD    PO
01805  M01S01660.1hy     +++|          SHK    FTTLS       READ *FTT* ENTRY
01806  M01S01661.1hy     +++|          FTTE   *
01807  M01S01662.1hy     +++|          ADC    0
01808  M01S01663.1hy     +++|          CRD    CM
01809  M01S01664.1hy     +++|          LDC    RTCL        FETCH CURRENT CLOCK VALUE
01810  M01S01665.1hy     +++|          CRD    T6
01811  M01S01666.1hy     +++|          LDD    T6          CHECK ELAPSED TIME
01812  M01S01667.1hy     +++|          SBD    CM+3
01813  M01S01668.1hy     +++|          MJN    CTOX        IF NOT TIMEOUT
01814  M01S01669.1hy     +++|          SHN    14
01815  M01S01670.1hy     +++|          ADD    T7
01816  M01S01671.1hy     +++|          SBD    CM+4
01817  M01S01672.1hy     +++|          UJN    CTOX        RETURN
01818  M01S01673.1hy     +++| DCB      SPACE  4,15
01819  M01S01674.1hy     +++|**        DCB - DELINK CONTROL BUFFERS.
01820  M01S01675.1hy     +++|*
01821  M01S01676.1hy     +++|*         ENTRY  (A) = VALUE FOR BYTE 3 OF *BIOM* REQUEST.
01822  M01S01677.1hy     +++|*                (RW) = READ / WRITE STATUS.
01823  M01S01678.1hy     +++|*
01824  M01S01679.1hy     +++|*         EXIT   (A) = 0.
01825  M01S01680.1hy     +++|*                (WB+3) = BYTE 3 OF *BIOM* REQUEST.
01826  M01S01681.1hy     +++|*
01827  M01S01682.1hy     +++|*         USES   RC, T2, T3, WB+3.
01828  M01S01683.1hy     +++|*
01829  M01S01684.1hy     +++|*         CALLS  IMR, SLB.
01830  M01S01685.1hy     +++|
01831  M01S01686.1hy     +++|
Line S01687 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01832  M02S01687.ns2769  ---| DCB1     LDM    IORQ        EXTRACT *CBT* ORDINAL
01833  M01S00053.ns2769  +++| DCB1     LDM    IORQ,DI     EXTRACT *CBT* ORDINAL
01834  M01S01688.1hy     +++|          STD    PB
01835  M01S01689.1hy     +++|          RJM    SLB         SET LINKAGE BITS
Line S01690 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01836  M02S01690.ns2769  ---|          SOM    RQIN
01837  M01S00054.ns2769  +++|          SOM    RQIN,DI
01838  M01S01691.1hy     +++|          ZJN    DCB3        IF QUEUE NOW EMPTY
01839  M01S01692.1hy     +++|          STD    T3
01840  M01S01693.1hy     +++|          LDD    DI          ADDRESS OF FIRST QUEUE ENTRY
01841  M01S01694.1hy     +++|          ADN    IORQ+1
01842  M01S01695.1hy     +++|          STD    T2
01843  M01S01696.1hy     +++| DCB2     LDI    T2          MOVE STACK DOWN
01844  M01S01697.1hy     +++|          STM    -1,T2
01845  M01S01698.1hy     +++|          AOD    T2          ADVANCE LIST ADDRESS
01846  M01S01699.1hy     +++|          SOD    T3
01847  M01S01700.1hy     +++|          NJN    DCB2        IF NOT END OF MOVE
01848  M01S01701.1hy     +++|          SOD    RC
01849  M01S01702.1hy     +++|          NJN    DCB1        IF BUFFER COUNT NOT SATISFIED
01850  M01S01703.1hy     +++| DCB3     LDN    DCBS
01851  M01S01704.1hy     +++|          RJM    IMR         INITIATE MONITOR REQUEST
01852  M01S01705.1hy     +++|*         LDN    0
01853  M01S01706.1hy     +++|
01854  M01S01707.1hy     +++| DCB      SUBR               ENTRY/EXIT
01855  M01S01708.1hy     +++|          STD    WB+3
01856  M01S01709.1hy     +++|          ZJN    DCBX        IF NULL REQUEST
01857  M01S01710.1hy     +++|          LPN    77
01858  M01S01711.1hy     +++|          ZJN    DCB3        IF NO BUFFERS TO PROCESS
01859  M01S01712.1hy     +++|          STD    RC
01860  M01S01713.1hy     +++|          LDD    RW
01861  M01S01714.1hy     +++|          ZJN    DCB1        IF READ OPERATION
01862  M01S01715.1hy     +++|          LDN    0
01863  M01S01716.1hy     +++|          SBD    RC          ADJUST REQUEST QUEUE ENTRY COUNT
Line S01717 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01864  M02S01717.ns2769  ---|          RAM    RQIN
01865  M01S00055.ns2769  +++|          RAM    RQIN,DI
01866  M01S01718.1hy     +++|          UJN    DCB3        ISSUE MONITOR REQUEST
01867  M01S01719.1hy     +++| DCR      SPACE  4,10
01868  M01S01720.1hy     +++|**        DCR    DROP CHANNEL RESERVATION.
01869  M01S01721.1hy     +++|*
01870  M01S01722.1hy     +++|*         ENTRY  (CR) = 1 IF CHANNEL RESERVED.
01871  M01S01723.1hy     +++|*                (IR+4) = CHANNEL NUMBER.
01872  M01S01724.1hy     +++|*
01873  M01S01725.1hy     +++|*         EXIT   (A) = (CR) = 0.
01874  M01S01726.1hy     +++|*
01875  M01S01727.1hy     +++|*         USES   CM - CM+4.
01876  M01S01728.1hy     +++|*
01877  M01S01729.1hy     +++|*         MACROS MONITOR.
01878  M01S01730.1hy     +++|
01879  M01S01731.1hy     +++|
01880  M01S01732.1hy     +++| DCR      SUBR               ENTRY/EXIT
01881  M01S01733.1hy     +++|          LDD    CR
01882  M01S01734.1hy     +++|          ZJN    DCRX        IF CHANNEL NOT RESERVED
01883  M01S01735.1hy     +++|          LDD    IR+4
01884  M01S01736.1hy     +++|          STD    CM+1        DROP CHANNEL
01885  M01S01737.1hy     +++|          MONITOR  DCHM
01886  M01S01738.1hy     +++|*         LDN    0           SET CHANNEL NOT RESERVED
01887  M01S01739.1hy     +++|          STD    CR
01888  M01S01740.1hy     +++|          UJN    DCRX        RETURN
01889  M01S01741.1hy     +++| EIO      SPACE  4,10
01890  M01S01742.1hy     +++|**        EIO - ENTER I/O REQUEST QUEUE.
01891  M01S01743.1hy     +++|*
01892  M01S01744.1hy     +++|*         ENTRY  (A) = *CBT* ORDINAL.
01893  M01S01745.1hy     +++|*                (RW) = READ / WRITE STATUS.
01894  M01S01746.1hy     +++|*
01895  M01S01747.1hy     +++|*         EXIT   (PB) = *CBT* ORDINAL.
01896  M01S01748.1hy     +++|*
01897  M01S01749.1hy     +++|*         USES   T5.
01898  M01S01750.1hy     +++|*
01899  M01S01751.1hy     +++|*         CALLS  DCB, SLB.
01900  M01S01752.1hy     +++|
01901  M01S01753.1hy     +++|
01902  M01S01754.1hy     +++| EIO1     RJM    SLB         SET LINKAGE BITS
Line S01755 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01903  M02S01755.ns2769  ---| EIO2     AOM    CBCT
Line S01756 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01904  M02S01756.ns2769  ---|          AOM    RQIN        ADVANCE ENTRY COUNT
01905  M01S00056.ns2769  +++| EIO2     AOM    CBCT,DI
01906  M01S00057.ns2769  +++|          AOM    RQIN,DI     ADVANCE ENTRY COUNT
01907  M01S01757.1hy     +++|          SBM    EIOA,RW
01908  M01S01758.1hy     +++|          MJN    EIOX        IF QUEUE NOT FULL
01909  M01S01759.1hy     +++|          LDN    1
01910  M01S01760.1hy     +++|          RJM    DCB         DELINK 1ST BUFFER IN LIST
01911  M01S01761.1hy     +++|
01912  M01S01762.1hy     +++| EIO      SUBR               ENTRY/EXIT
01913  M01S01763.1hy     +++|          STD    PB
01914  M01S01764.1hy     +++|          LDD    RW
01915  M01S01765.1hy     +++|          NJN    EIO1        IF WRITE OPERATION
Line S01766 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01916  M02S01766.ns2769  ---|          LDM    RQIN
01917  M01S00058.ns2769  +++|          LDM    RQIN,DI
01918  M01S01767.1hy     +++|          ADD    DI          ADDRESS OF NEXT AVAILABLE SLOT
01919  M01S01768.1hy     +++|          STD    T5
01920  M01S01769.1hy     +++|          LDD    PB          ENTER *CBT* ORDINAL IN QUEUE
01921  M01S01770.1hy     +++|          STM    IORQ,T5
01922  M01S01771.1hy     +++|          UJN    EIO2        ADVANCE ENTRY COUNT
01923  M01S01772.1hy     +++|
01924  M01S01773.1hy     +++|
01925  M01S01774.1hy     +++| EIOA     BSS    0           DELINKING CRITERIA
01926  M01S01775.1hy     +++|          CON    3
01927  M01S01776.1hy     +++|          CON    10
01928  M01S01777.1hy     +++| ERR      SPACE  4,15
01929  M01S01778.1hy     +++|**        ERR - PROCESS ERRORS.
01930  M01S01779.1hy     +++|*
01931  M01S01780.1hy     +++|*         ENTRY  (A) = FAULT ANALYSIS CODE.
01932  M01S01781.1hy     +++|*                (CR) = CHANNEL RESERVATION STATUS.
01933  M01S01782.1hy     +++|*
01934  M01S01783.1hy     +++|*         EXIT   TO *CMP*.
01935  M01S01784.1hy     +++|*
01936  M01S01785.1hy     +++|*         USES   PA, T2, T3, T5, CM - CM+4, WB - WB+4.
01937  M01S01786.1hy     +++|*
01938  M01S01787.1hy     +++|*         CALLS  ACE, AMR, GDS, GSS, IEM, IMR, ISF, RCR, SCD, SET,
01939  M01S01788.1hy     +++|*                SRS, STF, STO, UHD, WFC.
01940  M01S01789.1hy     +++|
01941  M01S01790.1hy     +++|
01942  M01S01791.1hy     +++| ERR      CON    0           ENTRY
01943  M01S01792.1hy     +++|          STD    FC
Line S01793 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01944  M02S01793.ns2769  ---|          LDM    ESAD
01945  M01S00059.ns2769  +++|          LDM    ESAD,DI
01946  M01S01794.1hy     +++|          ZJN    ERR1        IF NEW PASS THRU PROCESSOR
01947  M01S01795.1hy     +++|          STD    PA
01948  M01S01796.1hy     +++|          LJM    0,PA        CONTINUE
01949  M01S01797.1hy     +++|
01950  M01S01798.1hy     +++| ERR1     STD    T5          CLEAR CHANNEL ACTIVE
01951  M01S01799.1hy     +++|          RJM    SCD
01952  M01S01800.1hy     +++|          AOM    UNSW        DISABLE UNIT SWITCH
01953  M01S01801.1hy     +++|          LDC    ERR5
Line S01802 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01954  M02S01802.ns2769  ---|          STM    ESAD        SET ERROR STEP ADDRESS
01955  M01S00060.ns2769  +++|          STM    ESAD,DI     SET ERROR STEP ADDRESS
01956  M01S01803.1hy     +++|
01957  M01S01804.1hy     +++|*         GENERATE BML ERROR MESSAGE.
01958  M01S01805.1hy     +++|
01959  M01S01806.1hy     +++|          LDD    FC          SET INITIAL FAULT CODE
01960  M01S01807.1hy     +++|          STM    CODE
01961  M01S01808.1hy     +++|          STM    FALT
01962  M01S01809.1hy     +++|          LDD    DT          SET SECTORS TRANSFERED COUNT
01963  M01S01810.1hy     +++|          SHN    21-0
Line S01811 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01964  M02S01811.ns2769  ---|          LMM    CBCT
01965  M01S00061.ns2769  +++|          LMM    CBCT,DI
01966  M01S01812.1hy     +++|          MJN    ERR2        IF LARGE SECTOR DEVICE
01967  M01S01813.1hy     +++|          SHN    2
01968  M01S01814.1hy     +++|          ERRNZ  PSBFDH*4-PSBFDF  CODE DEPENDS ON VALUE
01969  M01S01815.1hy     +++| ERR2     STM    STCT
Line S01816 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01970  M02S01816.ns2769  ---|          LDM    CYLN        SET SEEK ADDRESS - CYLINDER
01971  M01S00062.ns2769  +++|          LDM    CYLN,DI     SET SEEK ADDRESS - CYLINDER
01972  M01S01817.1hy     +++|          STM    ICYL
Line S01818 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01973  M02S01818.ns2769  ---|          LDM    TKSN        SEEK ADDRESS - TRACK AND SECTOR
01974  M01S00063.ns2769  +++|          LDM    TKSN,DI     SEEK ADDRESS - TRACK AND SECTOR
01975  M01S01819.1hy     +++|          STM    ITAS
01976  M01S01820.1hy     +++| ERR3     LCN    0           PRESET INTERMEDIATE FAULT CODES
01977  M01S01821.1hy     +++|          STM    FCS1
01978  M01S01822.1hy     +++|          STM    FCS2
01979  M01S01823.1hy     +++|          STM    FCS3
Line S01824 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
01980  M02S01824.ns2769  ---|          LDML   LCMD        SET LAST *IHD* COMMAND
01981  M01S00064.ns2769  +++|          LDML   LCMD,DI     SET LAST *IHD* COMMAND
01982  M01S01825.1hy     +++|          STML   LSCC
01983  M01S01826.1hy     +++|          LDM    FCNA        MOVE LAST CHANNEL FUNCTION
01984  M01S01827.1hy     +++|          STM    LCFN
01985  M01S01828.1hy     +++|          SCF.   ERR3,MR     ACQUIRE MAINTENANCE REGISTER ACCESS
01986  M01S01829.1hy     +++|          CON    LDCI
01987  M01S01830.1hy     +++|          IAN    CH          (FORCE CHANNEL TABLE ENTRY)
01988  M01S01831.1hy     +++|          ORG    *-1
01989  M01S01832.1hy     +++|          CON    RCSR+CH
01990  M01S01833.1hy     +++|          RJM    AMR         READ CHANNEL STATUS REGISTER
01991  M01S01834.1hy     +++|          DCN.   MR+40
01992  M01S01835.1hy     +++|          CCF.   *+2,MR      CLEAR CHANNEL FLAG
01993  M01S01836.1hy     +++|          LDN    0
01994  M01S01837.1hy     +++|          STD    T2          CLEAR INDICES
01995  M01S01838.1hy     +++|          STD    T3
01996  M01S01839.1hy     +++|          RJM    ACE         ANALYZE CHANNEL ERROR
01997  M01S01840.1hy     +++| ERR4     LDM    RBUF,T2
01998  M01S01841.1hy     +++|          SHN    10          PACK 8-BIT DATA
01999  M01S01842.1hy     +++|          LMM    RBUF+1,T2
02000  M01S01843.1hy     +++|          STML   RBUF,T3
02001  M01S01844.1hy     +++|          AOD    T3          ADVANCE INDEX
02002  M01S01845.1hy     +++|          SHN    1
02003  M01S01846.1hy     +++|          STD    T2          SET INDEX
02004  M01S01847.1hy     +++|          LMN    10
02005  M01S01848.1hy     +++|          NJN    ERR4        IF MORE REGISTER DATA
02006  M01S01849.1hy     +++|          LDN    ZERL
02007  M01S01850.1hy     +++|          CRM    RBUF+4,ON   CLEAR UNUSED BYTES
02008  M01S01851.1hy     +++|          LDD    CR
02009  M01S01852.1hy     +++|          ZJN    ERR6        IF FUNCTION TIMEOUT
02010  M01S01853.1hy     +++|          LDN    0
02011  M01S01854.1hy     +++|          STD    FC          CLEAR PRESENT FAULT CODE
02012  M01S01855.1hy     +++|          LDC    FCRT
02013  M01S01856.1hy     +++|          RJM    FCN         ISSUE READ *T* REGISTER FUNCTION
02014  M01S01857.1hy     +++|          ACN    CH
02015  M01S01858.1hy     +++|          LDN    3           INPUT REGISTER CONTENTS
02016  M01S01859.1hy     +++|          IAM    RBUF+7,CH
02017  M01S01860.1hy     +++|          DCN    CH+40
02018  M01S01861.1hy     +++| ERR5     LDD    FC          SET INTERMEDIATE FAULT CODE
02019  M01S01862.1hy     +++|          STM    FCS1
02020  M01S01863.1hy     +++| ERR6     LDC    EBUF+2*5    SET MESSAGE ASSEMBLY ADDRESS
02021  M01S01864.1hy     +++|          STD    T3
02022  M01S01865.1hy     +++|          LDC    17S12+DBUF  UNPACK HEX DATA
02023  M01S01866.1hy     +++|          RJM    UHD
02024  M01S01867.1hy     +++|          ADN    2           APPEND LENGTH OF NON-HEX DATA
02025  M01S01868.1hy     +++|          STD    ML
02026  M01S01869.1hy     +++|          LDC    ERR28       SET NEXT ERROR STEP
Line S01870 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02027  M02S01870.ns2769  ---|          STM    ESAD
02028  M01S00065.ns2769  +++|          STM    ESAD,DI
02029  M01S01871.1hy     +++|          LDN    0           CLEAR CHECK ATTENTION COUNT
Line S01872 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02030  M02S01872.ns2769  ---|          STM    CACT
02031  M01S00066.ns2769  +++|          STM    CACT,DI
02032  M01S01873.1hy     +++|          STM    RSVD        CLEAR RESERVED FIELD
02033  M01S01874.1hy     +++|          STD    FC
Line S01875 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02034  M02S01875.ns2769  ---|          LDM    RWST        SAVE READ / WRITE STATUS
Line S01876 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02035  M02S01876.ns2769  ---|          STM    IOST
02036  M01S00067.ns2769  +++|          LDM    RWST,DI     SAVE READ / WRITE STATUS
02037  M01S00068.ns2769  +++|          STM    IOST,DI
02038  M01S01877.1hy     +++|          LDD    CR
02039  M01S01878.1hy     +++|          ZJP    ERR51       IF FUNCTION TIMEOUT
02040  M01S01879.1hy     +++|          RJM    RCR
Line S01880 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02041  M02S01880.ns2769  ---|          LDM    LCMD
02042  M01S00069.ns2769  +++|          LDM    LCMD,DI
02043  M01S01881.1hy     +++|          ZJN    ERR14       IF NO ACTIVE COMMAND
Line S01882 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02044  M02S01882.ns2769  ---| ERR10    AOM    CACT        ADVANCE CHECK ATTENTION COUNT
02045  M01S00070.ns2769  +++| ERR10    AOM    CACT,DI     ADVANCE CHECK ATTENTION COUNT
02046  M01S01883.1hy     +++|          LMN    6
02047  M01S01884.1hy     +++|          ZJN    ERR14       IF DEVICE LOCKED UP
02048  M01S01885.1hy     +++|          LDN    3
02049  M01S01886.1hy     +++|          RJM    STO         SET TIMEOUT = 3 SECONDS
02050  M01S01887.1hy     +++|          LDN    0
02051  M01S01888.1hy     +++|          RJM    ATT         PROCESS ATTENTION
02052  M01S01889.1hy     +++| ERR11    SHN    -3
02053  M01S01890.1hy     +++|          STD    PA
02054  M01S01891.1hy     +++|          LDM    ERRB,PA     SET PROCESSOR ADDRESS
02055  M01S01892.1hy     +++| ERR12    STD    PA
02056  M01S01893.1hy     +++|          LJM    0,PA        EXIT TO PROCESSOR
02057  M01S01894.1hy     +++|
02058  M01S01895.1hy     +++| ERR13    LDC    FWEP        CLEAR ATTENTION
02059  M01S01896.1hy     +++|          RJM    WFC
02060  M01S01897.1hy     +++|          UJN    ERR10       LOOP FOR NEXT ATTENTION
02061  M01S01898.1hy     +++|
02062  M01S01899.1hy     +++| ERR14    RJM    SSD         SELECT SLAVE DEVICE
02063  M01S01900.1hy     +++|          LDC    ERR51
02064  M01S01901.1hy     +++|          LJM    SRS1        PROCESS SELECTIVE RESET
02065  M01S01902.1hy     +++|
02066  M01S01903.1hy     +++| ERR16    LDC    ERR51
02067  M01S01904.1hy     +++|          UJN    ERR20       SET POST PROCESSING ADDRESS
02068  M01S01905.1hy     +++|
02069  M01S01906.1hy     +++| ERR17    LDC    ERR38
02070  M01S01907.1hy     +++|          UJN    ERR20       SET POST PROCESSING ADDRESS
02071  M01S01908.1hy     +++|
02072  M01S01909.1hy     +++| ERR18    LDN    0           CLEAR INTERMEDIATE FAULT CODE
02073  M01S01910.1hy     +++|          STM    FCS2
Line S01911 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02074  M02S01911.ns2769  ---|          LDM    ENAD
02075  M01S00071.ns2769  +++|          LDM    ENAD,DI
02076  M01S01912.1hy     +++|          UJN    ERR12       EXIT TO POST PROCESSOR
02077  M01S01913.1hy     +++|
02078  M01S01914.1hy     +++| ERR19    LDC    ERR30       SET POST PROCESSING ADDRESS
Line S01915 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02079  M02S01915.ns2769  ---| ERR20    STM    ENAD
02080  M01S00072.ns2769  +++| ERR20    STM    ENAD,DI
02081  M01S01916.1hy     +++|          LDM    SLST+1      SAVE SYSTEM INTERVENTION CODE
Line S01917 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02082  M02S01917.ns2769  ---|          STM    SIST
02083  M01S00073.ns2769  +++|          STM    SIST,DI
02084  M01S01918.1hy     +++|          LDM    SLST+2      SAVE MANUAL INTERVENTION CODE
Line S01919 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02085  M02S01919.ns2769  ---|          STM    MIST
02086  M01S00074.ns2769  +++|          STM    MIST,DI
02087  M01S01920.1hy     +++|          LDD    SS          SAVE EXECUTION STATUS
Line S01921 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02088  M02S01921.ns2769  ---|          STM    GSST
02089  M01S00075.ns2769  +++|          STM    GSST,DI
02090  M01S01922.1hy     +++|          RJM    GDS         GET DEVICE STATUS
02091  M01S01923.1hy     +++|          LDC    FWCA
02092  M01S01924.1hy     +++|          RJM    WFC         CLEAR ATTENTION
02093  M01S01925.1hy     +++|          LDC    EBUF+6*5
02094  M01S01926.1hy     +++|          STD    T3          SET DESTINATION DATA ADDRESS
02095  M01S01927.1hy     +++|          LDC    STSBL*10000+SLST
02096  M01S01928.1hy     +++|          RJM    UHD         UNPACK HEX DATA
02097  M01S01929.1hy     +++|          RAD    ML
02098  M01S01930.1hy     +++|          LDN    1           SELECT DUMP OF ERROR REGISTER
Line S01931 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02099  M02S01931.ns2769  ---|          STM    RWST
02100  M01S00076.ns2769  +++|          STM    RWST,DI
02101  M01S01932.1hy     +++| ERR24    STD    RW          SET PROCESSOR INDEX
02102  M01S01933.1hy     +++|          LDC    ERR25
02103  M01S01934.1hy     +++|          LJM    LGE1        LOG *IHD* ERRORS
02104  M01S01935.1hy     +++|
Line S01936 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02105  M02S01936.ns2769  ---| ERR25    SOM    RWST
02106  M01S00077.ns2769  +++| ERR25    SOM    RWST,DI
02107  M01S01937.1hy     +++|          PJN    ERR24       IF YET TO DUMP ERROR LOG
02108  M01S01938.1hy     +++|          LJM    ERR18       EXIT TO POST PROCESSOR
02109  M01S01939.1hy     +++|
02110  M01S01940.1hy     +++| ERR28    LDD    FC          SET INTERMEDIATE FAULT CODE
02111  M01S01941.1hy     +++|          STM    FCS2
02112  M01S01942.1hy     +++|          LDC    ERR50       SET ERROR STEP
Line S01943 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02113  M02S01943.ns2769  ---|          STM    ESAD
02114  M01S00078.ns2769  +++|          STM    ESAD,DI
02115  M01S01944.1hy     +++|          LJM    ERR14       PROCESS SELECTIVE RESET
02116  M01S01945.1hy     +++|
Line S01946 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02117  M02S01946.ns2769  ---| ERR30    LDM    GSST        CHECK EXECUTION STATUS
02118  M01S00079.ns2769  +++| ERR30    LDM    GSST,DI     CHECK EXECUTION STATUS
02119  M01S01947.1hy     +++|          LPN    6
02120  M01S01948.1hy     +++|          ZJP    ERR51       IF NO INTERVENTION FLAGS
02121  M01S01949.1hy     +++|
02122  M01S01950.1hy     +++|*         ANALYZE INTERVENTION STATUS.
02123  M01S01951.1hy     +++|
02124  M01S01952.1hy     +++|          SHN    -2          SET LIST INDEX
02125  M01S01953.1hy     +++|          STD    T2
02126  M01S01954.1hy     +++|          ADN    MIST        SET STATUS WORD ADDRESS
02127  M01S01955.1hy     +++|          ADD    DI
02128  M01S01956.1hy     +++|          STD    T3
02129  M01S01957.1hy     +++|          LDM    ERRE,T2     SET LIST ADDRESS
02130  M01S01958.1hy     +++|          STD    T2
02131  M01S01959.1hy     +++| ERR31    LDN    2           ADVANCE LIST ADDRESS
02132  M01S01960.1hy     +++|          RAD    T2
02133  M01S01961.1hy     +++|          LDI    T2
02134  M01S01962.1hy     +++|          ZJN    ERR32       IF END OF LIST
02135  M01S01963.1hy     +++|          LMI    T3
02136  M01S01964.1hy     +++|          LPC    377
02137  M01S01965.1hy     +++|          NJN    ERR31       IF NOT MATCHING INTERVENTION CODE
02138  M01S01966.1hy     +++|
02139  M01S01967.1hy     +++|*         ATTEMPT ERROR SPECIFIC RECOVERY.
02140  M01S01968.1hy     +++|
02141  M01S01969.1hy     +++| ERR32    LDM    1,T2        SET PROCESSOR ADDRESS
02142  M01S01970.1hy     +++|          STD    T2
02143  M01S01971.1hy     +++|          LDC    ERR50       SET NEXT ERROR STEP
Line S01972 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02144  M02S01972.ns2769  ---|          STM    ESAD
02145  M01S00080.ns2769  +++|          STM    ESAD,DI
02146  M01S01973.1hy     +++|          LDN    0
02147  M01S01974.1hy     +++|          LJM    0,T2        EXIT TO PROCESSOR
02148  M01S01975.1hy     +++|
02149  M01S01976.1hy     +++| ERR36    LDN    EDNR        SET NOT READY ERROR
02150  M01S01977.1hy     +++|          STM    FALT
02151  M01S01978.1hy     +++|          LDML   SLST+5      CHECK SLAVE STATUS
02152  M01S01979.1hy     +++|          SHN    0-17
02153  M01S01980.1hy     +++|          NJN    ERR50       IF DISK SPINNING
Line S01981 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02154  M02S01981.ns2769  ---|          LDM    ERCT
02155  M01S00081.ns2769  +++|          LDM    ERCT,DI
02156  M01S01982.1hy     +++|          ZJN    ERR38       IF INITIAL RETRY
02157  M01S01983.1hy     +++|          LMN    CSRC
02158  M01S01984.1hy     +++|          NJN    ERR50       IF NOT FIRST ALTERNATE RETRY
02159  M01S01985.1hy     +++| ERR38    LDC    ERR50
02160  M01S01986.1hy     +++|          LJM    SPU1        PROCESS SPIN UP
02161  M01S01987.1hy     +++|
Line S01988 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02162  M02S01988.ns2769  ---| ERR40    LDM    IOST        RESTORE READ / WRITE STATUS
Line S01989 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02163  M02S01989.ns2769  ---|          STM    RWST
02164  M01S00082.ns2769  +++| ERR40    LDM    IOST,DI     RESTORE READ / WRITE STATUS
02165  M01S00083.ns2769  +++|          STM    RWST,DI
02166  M01S01990.1hy     +++|          STD    RW
02167  M01S01991.1hy     +++|          LDC    ERR44       RUN DIAGNOSTIC
02168  M01S01992.1hy     +++|          LJM    RND1
02169  M01S01993.1hy     +++|
02170  M01S01994.1hy     +++| ERR44    RJM    STF         PROCESS MEDIA ERROR
02171  M01S01995.1hy     +++|          LDN    EDPE&EOTC
02172  M01S01996.1hy     +++|*         UJN    ERR46       SET DATA PARITY ERROR
02173  M01S01997.1hy     +++|
02174  M01S01998.1hy     +++| ERR46    LMN    EOTC&ECPE
02175  M01S01999.1hy     +++|*         UJN    ERR47       SET OVER-TEMP CONDITION ERROR
02176  M01S02000.1hy     +++|
02177  M01S02001.1hy     +++| ERR47    LMN    ECPE&EDTF
02178  M01S02002.1hy     +++|*         UJN    ERR48       SET CHANNEL PARITY ERROR
02179  M01S02003.1hy     +++|
02180  M01S02004.1hy     +++| ERR48    LMN    EDTF        SET DIAGNOSTIC TIMEOUT ERROR
02181  M01S02005.1hy     +++| ERR49    STM    FALT
02182  M01S02006.1hy     +++|
02183  M01S02007.1hy     +++|*         COMPLETE ERROR PROCESSING.
02184  M01S02008.1hy     +++|
02185  M01S02009.1hy     +++| ERR50    LDD    FC          SET INTERMEDIATE FAULT CODE
02186  M01S02010.1hy     +++|          STM    FCS3
Line S02011 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02187  M02S02011.ns2769  ---| ERR51    LDM    IOST        RESTORE READ / WRITE STATUS
02188  M01S00084.ns2769  +++| ERR51    LDM    IOST,DI     RESTORE READ / WRITE STATUS
02189  M01S02012.1hy     +++|          STD    RW
02190  M01S02013.1hy     +++|          LDN    0           CLEAR ERROR STEP
Line S02014 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02191  M02S02014.ns2769  ---|          STM    ESAD
02192  M01S00085.ns2769  +++|          STM    ESAD,DI
02193  M01S02015.1hy     +++|          STM    UNSW        ENABLE UNIT SWITCH
Line S02016 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02194  M02S02016.ns2769  ---|          AOM    ERCT        ADVANCE ERROR COUNT
02195  M01S00086.ns2769  +++|          AOM    ERCT,DI     ADVANCE ERROR COUNT
02196  M01S02017.1hy     +++|          LMN    MERC
02197  M01S02018.1hy     +++|          NJN    ERR53       IF NOT RETRY LIMIT
02198  M01S02019.1hy     +++| ERR52    AOM    MISC
02199  M01S02020.1hy     +++|          RJM    SEC         SET ERROR CODE IN *CBT*
02200  M01S02021.1hy     +++|          LJM    CMP1        COMPLETE PROCESSING
02201  M01S02022.1hy     +++|
02202  M01S02023.1hy     +++| ERR53    LDN    HD0100-HD0100
02203  M01S02024.1hy     +++|          RJM    IEM         ISSUE ERROR MESSAGE
02204  M01S02025.1hy     +++|          LDM    FALT
02205  M01S02026.1hy     +++|          LMN    ETFN
02206  M01S02027.1hy     +++|          ZJN    ERR52       IF FUNCTION TIMEOUT ERROR
02207  M01S02028.1hy     +++|          LMN    EDTF&ETFN
02208  M01S02029.1hy     +++|          ZJN    ERR52       IF DIAGNOSTIC FAILURE
Line S02030 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02209  M02S02030.ns2769  ---|          LDM    SREQ
02210  M01S00087.ns2769  +++|          LDM    SREQ,DI
02211  M01S02031.1hy     +++|          NJN    ERR54       IF NOT I/O PROCESSING
Line S02032 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02212  M02S02032.ns2769  ---|          LDM    ERCT
02213  M01S00088.ns2769  +++|          LDM    ERCT,DI
02214  M01S02033.1hy     +++|          LMN    CSRC
02215  M01S02034.1hy     +++|          ZJN    ERR56       IF TIME FOR CHANNEL SWAP
02216  M01S02035.1hy     +++|          LMN    1&CSRC
02217  M01S02036.1hy     +++|          NJN    ERR54       IF NOT FIRST RETRY
Line S02037 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02218  M02S02037.ns2769  ---|          LDM    RQIN
02219  M01S00089.ns2769  +++|          LDM    RQIN,DI
02220  M01S02038.1hy     +++|          STD    WB+3
02221  M01S02039.1hy     +++|          LDN    IDSS        INHIBIT DATA STREAMING
02222  M01S02040.1hy     +++|          RJM    IMR
02223  M01S02041.1hy     +++| ERR54    LDC    4000        DISABLE RELEASE OF UNIT INTERLOCK
Line S02042 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02224  M02S02042.ns2769  ---|          STM    RQIN
02225  M01S00090.ns2769  +++|          STM    RQIN,DI
02226  M01S02043.1hy     +++|          LJM    CMP4        RETRY REQUEST
02227  M01S02044.1hy     +++|
02228  M01S02045.1hy     +++| ERR56    RJM    SEC         FORCE ALTERNATE CHANNEL SELECTION
02229  M01S02046.1hy     +++|          LDN    SSES
02230  M01S02047.1hy     +++|          RJM    ISF         SET SUSPECT STATE
02231  M01S02048.1hy     +++|*         LDN    0
02232  M01S02049.1hy     +++|          LJM    CMP2        COMPLETE PROCESSING
02233  M01S02050.1hy     +++|
02234  M01S02051.1hy     +++|
02235  M01S02052.1hy     +++| ERRB     BSS    0
02236  M01S02053.1hy     +++|          CON    ERR14       (IHD IDLE)
02237  M01S02054.1hy     +++|          CON    ERR13       READ DATA AVAILABLE
02238  M01S02055.1hy     +++|          CON    ERR13       BUFFER SPACE AVAILABLE
02239  M01S02056.1hy     +++|          CON    ERR14       (UNDEFINED)
02240  M01S02057.1hy     +++|          CON    ERR16       COMMAND BLOCK INDEPENDENT
02241  M01S02058.1hy     +++|          CON    ERR14       (UNDEFINED)
02242  M01S02059.1hy     +++|          CON    ERR17       UNSOLICITED ATTENTION
02243  M01S02060.1hy     +++|          CON    ERR19       COMMAND COMPLETE
02244  M01S02061.1hy     +++|
02245  M01S02062.1hy     +++| ERRC     BSS    0           MANUAL INTERVENTION CODES
02246  M01S02063.1hy     +++|          CON    0#C1,ERR36  DISK NOT READY
02247  M01S02064.1hy     +++|          CON    0#63,ERR47  ISI I/O PARITY ERROR
02248  M01S02065.1hy     +++|          CON    0#6A,ERR48  DIAGNOSTIC FAILURE
02249  M01S02066.1hy     +++|          CON    0#6B,ERR46  TEMPERATURE FAULT
02250  M01S02067.1hy     +++|          CON    0000,ERR51
02251  M01S02068.1hy     +++|
02252  M01S02069.1hy     +++| ERRD     BSS    0           SYSTEM INTERVENTION CODES
02253  M01S02070.1hy     +++|          CON    0#41,ERR40  UNABLE TO READ HEADER
02254  M01S02071.1hy     +++|          CON    0#42,ERR40  HEADER ERROR
02255  M01S02072.1hy     +++|          CON    0#43,ERR40  UNABLE TO READ DATA
02256  M01S02073.1hy     +++|          CON    0#A6,ERR48  DIAGNOSTIC FAILURE
02257  M01S02074.1hy     +++|          CON    0000,ERR51
02258  M01S02075.1hy     +++|
02259  M01S02076.1hy     +++| ERRE     BSS    0           LIST ADDRESSES
02260  M01S02077.1hy     +++|          CON    ERRC-2      MANUAL INTERVENTION CODES
02261  M01S02078.1hy     +++|          CON    ERRD-2      SYSTEM INTERVENTION CODES
02262  M01S02079.1hy     +++| FCN      SPACE  4,10
02263  M01S02080.1hy     +++|**        FCN - ISSUE FUNCTION.
02264  M01S02081.1hy     +++|*
02265  M01S02082.1hy     +++|*         ENTRY  (A) = FUNCTION CODE.
02266  M01S02083.1hy     +++|*
02267  M01S02084.1hy     +++|*         ERROR  TO *ERR*.
02268  M01S02085.1hy     +++|*
02269  M01S02086.1hy     +++|*         CALLS  RCS.
02270  M01S02087.1hy     +++|
02271  M01S02088.1hy     +++|
02272  M01S02089.1hy     +++| FCN      SUBR               ENTRY/EXIT
02273  M01S02090.1hy     +++|          STM    FCNA
02274  M01S02091.1hy     +++|          LDN    FTRC        SET INTERNAL REPEAT COUNT
02275  M01S02092.1hy     +++|          STD    T0
02276  M01S02093.1hy     +++| FCN1     FNC    0,CH        ISSUE FUNCTION
02277  M01S02094.1hy     +++| FCNA     EQU    *-1
02278  M01S02095.1hy     +++|          LDC    FTOD
02279  M01S02096.1hy     +++| FCN2     IJM    FCNX,CH     IF FUNCTION ACCEPTED
02280  M01S02097.1hy     +++|          SBN    1
02281  M01S02098.1hy     +++|          NJN    FCN2        IF NOT TIMED OUT
02282  M01S02099.1hy     +++|          DCN    CH+40
02283  M01S02100.1hy     +++|          SOD    T0
02284  M01S02101.1hy     +++|          NJN    FCN1        IF RETRY COUNT NOT SATISFIED
02285  M01S02102.1hy     +++|          STD    SF
02286  M01S02103.1hy     +++|*         LDN    0
02287  M01S02104.1hy     +++|          RJM    RCS         GLOBALLY DOWN CHANNEL
02288  M01S02105.1hy     +++|          LDN    ETFN
02289  M01S02106.1hy     +++|          RJM    ERR         PROCESS ERROR
02290  M01S02107.1hy     +++| GDS      SPACE  4,10
02291  M01S02108.1hy     +++|**        GDS - GET DEVICE STATUS.
02292  M01S02109.1hy     +++|*
02293  M01S02110.1hy     +++|*         CALLS  CFE, FCN, WFW.
02294  M01S02111.1hy     +++|
02295  M01S02112.1hy     +++|
02296  M01S02113.1hy     +++| GDS      SUBR               ENTRY/EXIT
02297  M01S02114.1hy     +++|          LDC    FWDS
02298  M01S02115.1hy     +++|          RJM    WFW         WRITE FUNCTION WORD
02299  M01S02116.1hy     +++|          ACN    CH
02300  M01S02117.1hy     +++|          LDN    DVSTL       INPUT DEVICE STATUS
02301  M01S02118.1hy     +++|          IAM    DVST,CH
02302  M01S02119.1hy     +++|          RJM    CFE
02303  M01S02120.1hy     +++|          LDC    FCCS        CLEAR COMMAND SEQUENCE
02304  M01S02121.1hy     +++|          RJM    FCN
02305  M01S02122.1hy     +++|          UJN    GDSX        RETURN
02306  M01S02123.1hy     +++| GSS      SPACE  4,15
02307  M01S02124.1hy     +++|**        GSS - GET SLAVE STATUS.
02308  M01S02125.1hy     +++|*
02309  M01S02126.1hy     +++|*         ENTRY  (A) = 0 TO IGNORE INTERVENTION STATUS.
02310  M01S02127.1hy     +++|*
02311  M01S02128.1hy     +++|*         EXIT   (A) = EXECUTION STATUS.
02312  M01S02129.1hy     +++|*                (SS) = STATUS FLAGS.
02313  M01S02130.1hy     +++|*
02314  M01S02131.1hy     +++|*         ERROR  TO *ERR* IF *INTERVENTION REQUIRED*.
02315  M01S02132.1hy     +++|*
02316  M01S02133.1hy     +++|*         USES   T2.
02317  M01S02134.1hy     +++|*
02318  M01S02135.1hy     +++|*         CALLS  CFE, WFW.
02319  M01S02136.1hy     +++|
02320  M01S02137.1hy     +++|
02321  M01S02138.1hy     +++| GSS5     LMN    ESCC        RESTORE EXECUTION STATUS
02322  M01S02139.1hy     +++|
02323  M01S02140.1hy     +++| GSS      SUBR               ENTRY/EXIT
02324  M01S02141.1hy     +++|          STD    T2
02325  M01S02142.1hy     +++|          LDC    FWSB
02326  M01S02143.1hy     +++|          RJM    WFW         WRITE FUNCTION WORD
02327  M01S02144.1hy     +++|          ACN    CH
02328  M01S02145.1hy     +++|          LDN    SLSTL       INPUT STATUS BLOCK
02329  M01S02146.1hy     +++|          IAM    SLST,CH
02330  M01S02147.1hy     +++|          RJM    CFE
02331  M01S02148.1hy     +++|          LDML   SLST        CHECK COMMAND BLOCK NUMBER
02332  M01S02149.1hy     +++|          LPN    17
02333  M01S02150.1hy     +++|          NJN    GSS4        IF INVALID BLOCK NUMBER
02334  M01S02151.1hy     +++|          LDML   SLST
02335  M01S02152.1hy     +++|          STML   EXST
02336  M01S02153.1hy     +++|          SHN    0-10        EXTRACT STATUS FLAGS
02337  M01S02154.1hy     +++|          STD    SS
02338  M01S02155.1hy     +++|          LPN    70          CHECK EXECUTION STATUS
02339  M01S02156.1hy     +++|          LMN    ESCC
02340  M01S02157.1hy     +++|          NJN    GSS5        IF NOT *COMMAND COMPLETE*
02341  M01S02158.1hy     +++|          LDD    T2
02342  M01S02159.1hy     +++| GSS1     ZJN    GSS5        IF NO INTERVENTION STATUS ANALYSIS
02343  M01S02160.1hy     +++|          LDD    SS
02344  M01S02161.1hy     +++|          LPN    6
02345  M01S02162.1hy     +++|          ZJN    GSS5        IF NO INTERVENTION FLAGS
02346  M01S02163.1hy     +++| GSS2     LDN    EIRQ
02347  M01S02164.1hy     +++| GSS3     RJM    ERR         PROCESS ERROR
02348  M01S02165.1hy     +++|
02349  M01S02166.1hy     +++| GSS4     LDN    ECBN
02350  M01S02167.1hy     +++|          UJN    GSS3        COMMAND BLOCK NUMBER
02351  M01S02168.1hy     +++| IBM      SPACE  4,20
02352  M01S02169.1hy     +++|**        IBM - ISSUE BML MESSAGE.
02353  M01S02170.1hy     +++|*
02354  M01S02171.1hy     +++|*         ENTRY  (A) = 6/ ML, 12/ SC
02355  M01S02172.1hy     +++|*                      ML = MESSAGE LENGTH (CM WORD COUNT).
02356  M01S02173.1hy     +++|*                      SC = MESSAGE SYMPTOM CODE.
02357  M01S02174.1hy     +++|*                (RW) = READ / WRITE FLAG.
02358  M01S02175.1hy     +++|*                (DT) = DEVICE TYPE.
02359  M01S02176.1hy     +++|*                (EO) = EST ORDINAL.
02360  M01S02177.1hy     +++|*                (UN) = UNIT NUMBER.
02361  M01S02178.1hy     +++|*                (MISC) = 1 IF UNRECOVERED ERROR.
02362  M01S02179.1hy     +++|*
02363  M01S02180.1hy     +++|*         EXIT   (A) = (MISC) = 0.
02364  M01S02181.1hy     +++|*
Line S02182 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02365  M02S02182.ns2769  ---|*         USES   T2, T3, CM - CM+4, WB - WB+4.
02366  M01S00091.ns2769  +++|*         USES   T2, T3.
02367  M01S02183.1hy     +++|*
Line S02184 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02368  M02S02184.ns2769  ---|*         CALLS  CMC, UEC.
Line S02185 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02369  M02S02185.ns2769  ---|*
Line S02186 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02370  M02S02186.ns2769  ---|*         MACROS DELAY, EMBE, EXECUTE, MONITOR.
02371  M01S00092.ns2769  +++|*         CALLS  CMC, IMB, UEC.
02372  M01S02187.1hy     +++|
02373  M01S02188.1hy     +++|
02374  M01S02189.1hy     +++| IBM      SUBR               ENTRY/EXIT
02375  M01S00029.271l716 +++|          LMC    D1HY*400
02376  M01S02190.1hy     +++|          STM    BMLM+1
02377  M01S02191.1hy     +++|          SHN    -14         SET MESSAGE LENGTH
02378  M01S02192.1hy     +++|          STD    T2
02379  M01S02193.1hy     +++|          ZJN    IBM1        IF BASIC MESSAGE ONLY
02380  M01S02194.1hy     +++|          LDN    1
02381  M01S02195.1hy     +++| IBM1     STD    T3
Line S02196 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02382  M02S02196.271l716 ---|          LDM    IBMC,T3     SET PROCESSING PATH
Line S02197 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02383  M02S02197.271l716 ---|          STM    IBMA
02384  M01S02198.1hy     +++|          LDD    DT
02385  M01S02199.1hy     +++|          ADC    RM0120      SET MESSAGE ID
02386  M01S02200.1hy     +++|          STM    BMLM
Line S02201 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02387  M02S02201.ns2769  ---|          LDML   CREG        SET PORT NUMBER
02388  M01S00093.ns2769  +++|          LDML   CREG,DI     SET PORT NUMBER
02389  M01S02202.1hy     +++|          SHN    6-16
02390  M01S02203.1hy     +++|*         LPC    100
02391  M01S02204.1hy     +++|          STM    PORT
02392  M01S02205.1hy     +++|          LDD    UN          SET UNIT NUMBER
02393  M01S02206.1hy     +++|          STM    UNIT
02394  M01S02207.1hy     +++|          LDD    EO          SET EST ORDINAL
02395  M01S02208.1hy     +++|          STM    ESTO
Line S02209 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02396  M02S02209.ns2769  ---|          LDM    ERCT        SET RETRY COUNT
02397  M01S00094.ns2769  +++|          LDM    ERCT,DI     SET RETRY COUNT
02398  M01S02210.1hy     +++|          SHN    5
02399  M01S02211.1hy     +++|          LMD    RW          MERGE READ / WRITE FLAG
02400  M01S02212.1hy     +++|          SHN    1
02401  M01S02213.1hy     +++|          RAM    MISC
02402  M01S02214.1hy     +++|          RJM    CMC         CHECK MONITOR COMPLETE
02403  M01S00095.ns2769  +++|          LDM    MAD1
02404  M01S00096.ns2769  +++|          NJN    IBM3        IF HEADER NOT REQUIRED
02405  M01S00097.ns2769  +++|          LDD    T2          PARTIAL MESSAGE LENGTH
02406  M01S00098.ns2769  +++|          ADN    3           HEADER LENGTH
02407  M01S00099.ns2769  +++|          STM    MSGL+1      COMPLETE MESSAGE LENGTH
02408  M01S00100.ns2769  +++|          LDM    MAD2        MESSAGE ADDRESS
02409  M01S00101.ns2769  +++|          STD    T0
02410  M01S00102.ns2769  +++|          LDN    3*5-1
02411  M01S00103.ns2769  +++|          STD    T3
02412  M01S00104.ns2769  +++| IBM2     SOD    T0          MOVE HEADER TO MESSAGE
02413  M01S00105.ns2769  +++|          LDM    MSGP,T3
02414  M01S00106.ns2769  +++|          STI    T0
02415  M01S00107.ns2769  +++|          SOD    T3
02416  M01S00108.ns2769  +++|          PJN    IBM2        IF MOVE NOT COMPLETE
02417  M01S00109.ns2769  +++|          LDD    T0
Line S02215 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02418  M02S02215.ns2769  ---| IBM2     LDN    ZERL
Line S02216 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02419  M02S02216.ns2769  ---|          CRD    CM          PRESET *UTEM* REQUEST
Line S02217 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02420  M02S02217.ns2769  ---|          EMBE   *
Line S02218 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02421  M02S02218.ns2769  ---|          LDC    0
Line S02219 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02422  M02S02219.ns2769  ---|          STD    CM+4        SET ADDRESS OF INTERLOCK WORD
Line S02220 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02423  M02S02220.ns2769  ---|          SHN    -14
Line S02221 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02424  M02S02221.ns2769  ---|          STD    CM+3
Line S02222 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02425  M02S02222.ns2769  ---|          MONITOR  UTEM      GET *EMB* INTERLOCK
Line S02223 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02426  M02S02223.ns2769  ---|          LDD    CM+1
Line S02224 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02427  M02S02224.ns2769  ---|          ZJN    IBM3        IF INTERLOCK OBTAINED
Line S02225 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02428  M02S02225.ns2769  ---|          DELAY
Line S02226 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02429  M02S02226.ns2769  ---|          UJN    IBM2        RETRY INTERLOCK ATTEMPT
Line S02227 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02430  M02S02227.ns2769  ---|
Line S02228 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02431  M02S02228.ns2769  ---| IBM3     LDC    0           READ INTERLOCK WORD
Line S02229 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02432  M02S02229.ns2769  ---|          EMBE   IBM3
Line S02230 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02433  M02S02230.ns2769  ---|          CRD    WB
Line S02231 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
M03 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02434  M03S02231.ns2769  ---|          LDN    3           SET BASIC MESSAGE LENGTH
Line S00030 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02435  M02S00030.ns2769  ---|          LDM    MAD1        GET MESSAGE ADDRESS
Line S00031 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02436  M02S00031.ns2769  ---|          ADN    MSGL+1-MSGP
Line S00032 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02437  M02S00032.ns2769  ---|          STD    T0          LOCATION OF MESSAGE LENGTH
Line S00033 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02438  M02S00033.ns2769  ---|          LMC    MSGL+1
Line S00034 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02439  M02S00034.ns2769  ---|          ZJN    IBM4        IF BASIC MESSAGE HEADER
Line S00035 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02440  M02S00035.ns2769  ---|          LDN    0
Line S00036 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02441  M02S00036.ns2769  ---|          STD    T2          CLEAR TWO PART MESSAGE
Line S00037 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02442  M02S00037.ns2769  ---|          STD    T3
Line S00038 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02443  M02S00038.ns2769  ---|          LDI    T0          EXTRACT MESSAGE LENGTH
Line S00039 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02444  M02S00039.ns2769  ---|          SBN    3
Line S00040 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02445  M02S00040.ns2769  ---| IBM4     ADN    3           SET BASIC MESSAGE LENGTH
Line S02232 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02446  M02S02232.ns2769  ---|          STD    CM
Line S02233 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02447  M02S02233.ns2769  ---|          ADD    T2          ADD LENGTH OF SECOND PART
Line S02234 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02448  M02S02234.ns2769  ---|          STM    MSGL+1
Line S02235 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02449  M02S02235.ns2769  ---|          ADD    WB+3        CURRENT WORD COUNT
Line S02236 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02450  M02S02236.ns2769  ---|          SBK    EMBLL-1
Line S02237 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
M03 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02451  M03S02237.ns2769  ---|          MJN    IBM4        IF ROOM IN BUFFER FOR MESSAGE
Line S00041 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02452  M02S00041.ns2769  ---|          MJN    IBM5        IF ROOM IN BUFFER FOR MESSAGE
Line S02238 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02453  M02S02238.ns2769  ---|          LDN    1
Line S02239 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02454  M02S02239.ns2769  ---|          STD    WB+1        SET DATA LOST FLAG
Line S02240 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
M03 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02455  M03S02240.ns2769  ---|          UJN    IBM6        CLEAR *EMB* INTERLOCK
Line S02241 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
M03 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02456  M03S02241.ns2769  ---|
Line S02242 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
M03 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02457  M03S02242.ns2769  ---| IBM4     LDC    1           WRITE ERROR MESSAGE TO *EMB*
Line S02243 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
M03 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02458  M03S02243.ns2769  ---|          EMBE   IBM4
Line S00042 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02459  M02S00042.ns2769  ---|          UJN    IBM7        CLEAR *EMB* INTERLOCK
Line S00043 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02460  M02S00043.ns2769  ---|
Line S00044 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02461  M02S00044.ns2769  ---| IBM5     LDM    IBMC,T3     SET PROCESSING PATH
Line S00045 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02462  M02S00045.ns2769  ---|          STM    IBMA
Line S00046 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02463  M02S00046.ns2769  ---|          EMBE   *
Line S00047 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02464  M02S00047.ns2769  ---|          LDC    1           WRITE ERROR MESSAGE TO *EMB*
Line S02244 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02465  M02S02244.ns2769  ---|          ADD    WB+3
Line S02245 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02466  M02S02245.ns2769  ---|          CWM    MSGP,CM
Line S02246 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02467  M02S02246.ns2769  ---| MAD1     EQU    *-1
Line S02247 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
M03 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02468  M03S02247.ns2769  ---| IBMA     UJN    IBM5        BASIC MESSAGE ONLY
Line S00048 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02469  M02S00048.ns2769  ---| IBMA     UJN    IBM6        BASIC MESSAGE ONLY
Line S02248 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02470  M02S02248.ns2769  ---|          ORG    *-1
Line S02249 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02471  M02S02249.ns2769  ---|          CWM    MBUF,T2     COPY SECOND PART OF MESSAGE
Line S02250 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02472  M02S02250.ns2769  ---| MAD2     EQU    *-1
Line S02251 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
M03 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02473  M03S02251.ns2769  ---| IBM5     LDD    CM          UPDATE LENGTH OF DATA IN *EMB*
Line S00049 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02474  M02S00049.ns2769  ---| IBM6     LDD    CM          UPDATE LENGTH OF DATA IN *EMB*
Line S02252 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02475  M02S02252.ns2769  ---|          ADD    T2
Line S02253 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02476  M02S02253.ns2769  ---|          RAD    WB+3
Line S02254 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02477  M02S02254.ns2769  ---|          LDD    WB+4
Line S02255 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02478  M02S02255.ns2769  ---|          LPN    2
Line S02256 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
M03 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02479  M03S02256.ns2769  ---|          NJN    IBM6        IF *1MD* ALREADY CALLED
Line S00050 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02480  M02S00050.ns2769  ---|          NJN    IBM7        IF *1MD* ALREADY CALLED
Line S02257 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02481  M02S02257.ns2769  ---|          STD    CM+1
Line S02258 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02482  M02S02258.ns2769  ---|          LDD    MA          STORE MESSAGE BUFFER FOR *1MD* CALL
Line S02259 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02483  M02S02259.ns2769  ---|          CWM    IBMB,ON
Line S02260 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02484  M02S02260.ns2769  ---|          EXECUTE  1MD,=
Line S02261 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02485  M02S02261.ns2769  ---|          MONITOR  RPPM      REQUEST PP FOR *1MD*
Line S02262 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02486  M02S02262.ns2769  ---|          LDD    CM+1
Line S02263 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
M03 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02487  M03S02263.ns2769  ---|          ZJN    IBM6        IF NO PP-S AVAILABLE
Line S00051 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02488  M02S00051.ns2769  ---|          ZJN    IBM7        IF NO PP-S AVAILABLE
Line S02264 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02489  M02S02264.ns2769  ---|          LDN    2
Line S02265 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02490  M02S02265.ns2769  ---|          RAD    WB+4
Line S02266 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
M03 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02491  M03S02266.ns2769  ---| IBM6     SOD    WB+4        CLEAR *EMB* INTERLOCK
Line S00052 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02492  M02S00052.ns2769  ---| IBM7     SOD    WB+4        CLEAR *EMB* INTERLOCK
Line S02267 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02493  M02S02267.ns2769  ---|          EMBE   *
Line S02268 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02494  M02S02268.ns2769  ---|          LDC    0           UPDATE *EMB* INFORMATION
Line S02269 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02495  M02S02269.ns2769  ---|          CWD    WB
02496  M01S00110.ns2769  +++| IBM3     RJM    IMB         ISSUE MESSAGE TO BUFFER
02497  M01S02270.1hy     +++|          RJM    UEC         UPDATE MST ERROR COUNT
Line S00053 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02498  M02S00053.ns2769  ---|          LDC    MSGP
Line S00054 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02499  M02S00054.ns2769  ---|          STM    MAD1        RESTORE BASIC ERROR MESSAGE ADDRESS
02500  M01S02271.1hy     +++|          LDC    MBUF
02501  M01S02272.1hy     +++|          STM    MAD2        RESTORE MESSAGE ADDRESS
02502  M01S02273.1hy     +++|          LDN    0
02503  M01S00111.ns2769  +++|          STM    MAD1
02504  M01S02274.1hy     +++|          STM    MISC        CLEAR UNRECOVERED ERROR STATUS
02505  M01S02275.1hy     +++|*         LDN    0
02506  M01S02276.1hy     +++|          LJM    IBMX        RETURN
Line S02277 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02507  M02S02277.ns2769  ---|
Line S02278 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02508  M02S02278.ns2769  ---|
Line S02279 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02509  M02S02279.ns2769  ---| IBMB     VFD    18/3L1MD,42/1    *1MD* CALL
Line S02280 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02510  M02S02280.ns2769  ---|
Line S02281 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02511  M02S02281.ns2769  ---| IBMC     BSS    0           PROCESSOR PATH
Line S02282 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02512  M02S02282.ns2769  ---|          LOC    IBMA
Line S02283 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
M03 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02513  M03S02283.ns2769  ---|          UJN    IBM5        BASIC MESSAGE TRANSFER
Line S00055 Modification History
M01 (Added by) 271l716
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02514  M02S00055.ns2769  ---|          UJN    IBM6        BASIC MESSAGE TRANSFER
Line S02284 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02515  M02S02284.ns2769  ---|          LOC    *O
Line S02285 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02516  M02S02285.ns2769  ---|          CON    CWMI+T2     TWO PART MESSAGE
02517  M01S02286.1hy     +++|
02518  M01S02287.1hy     +++|
02519  M01S00112.ns2769  +++| MAD1     CON    0           MESSAGE ADDRESS IF MESSAGE HAS HEADER.
02520  M01S00113.ns2769  +++| MAD2     CON    MBUF        MESSAGE ADDRESS IF HEADER MUST BE ADDED.
02521  M01S00114.ns2769  +++|
02522  M01S02288.1hy     +++| MSGP     CON    0           MESSAGE PREFIX
02523  M01S02289.1hy     +++|          CON    0
02524  M01S02290.1hy     +++| MSGL     CON    0,0         MESSAGE LENGTH
02525  M01S02291.1hy     +++|          CON    MLDY        MESSAGE TYPE
02526  M01S02292.1hy     +++|
02527  M01S02293.1hy     +++| BMLM     BSS    0           BML MESSAGE PREFIX
02528  M01S02294.1hy     +++|          VFD    12/RM0120   887 MESSAGE ID
02529  M01S02295.1hy     +++|          VFD    12/         SYMPTOM CODE
02530  M01S02296.1hy     +++|          VFD    6/,6/       CPP NUMBER, CHANNEL NUMBER
02531  M01S02297.1hy     +++| UNIT     VFD    6/0,6/      UNUSED, UNIT NUMBER
02532  M01S02298.1hy     +++| PORT     VFD    6/,6/0      PORT NUMBER, UNUSED
02533  M01S00115.ns2769  +++|
02534  M01S02299.1hy     +++| ESTO     VFD    12/         EST ORDINAL
02535  M01S02300.1hy     +++| MISC     VFD    6/,4/0,2/   RETRY COUNT, UNUSED, WRITE + REC FLAGS
02536  M01S02301.1hy     +++|          VFD    12/0        UNUSED
02537  M01S02302.1hy     +++| MFID     VFD    12/         MAINFRAME ID
02538  M01S02303.1hy     +++|          VFD    12/0        UNUSED
02539  M01S02304.1hy     +++| IEM      SPACE  4,10
02540  M01S02305.1hy     +++|**        IEM - ISSUE BML ERROR MESSAGE.
02541  M01S02306.1hy     +++|*
02542  M01S02307.1hy     +++|*         ENTRY  (A) = SYMPTOM CODE OFFSET FROM *HD0100*.
02543  M01S02308.1hy     +++|*                (ML) = MESSAGE LENGTH (CM WORD COUNT).
02544  M01S02309.1hy     +++|*
02545  M01S02310.1hy     +++|*         EXIT   (A) = (ML) = 0.
02546  M01S02311.1hy     +++|*
02547  M01S02312.1hy     +++|*         CALLS  IBM.
02548  M01S02313.1hy     +++|
02549  M01S02314.1hy     +++|
02550  M01S02315.1hy     +++| IEM      SUBR               ENTRY/EXIT
02551  M01S02316.1hy     +++|          ADD    HN
02552  M01S02317.1hy     +++|          ERRNZ  HD0100-100  CODE DEPENDS ON VALUE
02553  M01S02318.1hy     +++|          STD    T0
02554  M01S02319.1hy     +++|          LDC    EBUF        SET MESSAGE ADDRESS
02555  M01S02320.1hy     +++|          STM    MAD2
02556  M01S02321.1hy     +++|          LDD    ML          MESSAGE LENGTH
02557  M01S02322.1hy     +++|          SHN    14
02558  M01S02323.1hy     +++|          LMD    T0
02559  M01S02324.1hy     +++|          RJM    IBM         ISSUE ERROR MESSAGE
02560  M01S02325.1hy     +++|*         LDN    0
02561  M01S02326.1hy     +++|          STD    ML
02562  M01S02327.1hy     +++|          UJN    IEMX        RETURN
02563  M01S02328.1hy     +++| IIO      SPACE  4,15
02564  M01S02329.1hy     +++|**        IIO - INITIATE I/O.
02565  M01S02330.1hy     +++|*
02566  M01S02331.1hy     +++|*         ENTRY  (A) = (CB) = *CBT* ORDINAL.
02567  M01S02332.1hy     +++|*
02568  M01S02333.1hy     +++|*         EXIT   (A) = 0 IF I/O DISABLED ON THIS CHANNEL.
02569  M01S02334.1hy     +++|*                (RW) = READ / WRITE STATUS.
02570  M01S02335.1hy     +++|*                (PA) = PROCESSOR ADDRESS.
02571  M01S02336.1hy     +++|*                (TO) = SEEK TIMEOUT VALUE.
02572  M01S02337.1hy     +++|*                (NR - NR+4) = PHYSICAL ADDRESS OF REQUEST.
02573  M01S02338.1hy     +++|*
Line S02339 Modification History
M01 (Added by) 1hy
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
02574  M02S02339.253l688 ---|*         USES   T2 - T7.
02575  M01S00007.253l688 +++|*         USES   T1 - T7.
02576  M01S02340.1hy     +++|*
02577  M01S02341.1hy     +++|*         CALLS  PEF.
02578  M01S02342.1hy     +++|*
02579  M01S02343.1hy     +++|*         MACROS CBTE.
02580  M01S02344.1hy     +++|
02581  M01S02345.1hy     +++|
02582  M01S02346.1hy     +++| IIO3     STD    PA
02583  M01S02347.1hy     +++|          SCN    77          SET I/O DISABLED STATUS
02584  M01S02348.1hy     +++|
02585  M01S02349.1hy     +++| IIO      SUBR               ENTRY/EXIT
02586  M01S02350.1hy     +++|          SHN    CBTLS
02587  M01S02351.1hy     +++|          CBTE   *
02588  M01S02352.1hy     +++|          ADC    PAD1        FETCH SEEK PARAMETERS FROM *CBT*
02589  M01S02353.1hy     +++|          CRD    NR
Line S02354 Modification History
M01 (Added by) 1hy
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
02590  M02S02354.253l688 ---|          ADN    HSLK-PAD1   GET CHANNEL SELECT ERROR FLAGS
02591  M01S00008.253l688 +++|          ADN    PAD4-PAD1   GET CHANNEL FROM CBT ENTRY
02592  M01S00009.253l688 +++|          CRD    T1
02593  M01S00010.253l688 +++|          ADN    HSLK-PAD4   GET CHANNEL SELECT STATUS
02594  M01S02355.1hy     +++|          CRD    T2
02595  M01S02356.1hy     +++|          SBN    HSLK-IOLK   GET READ / WRITE FLAG
02596  M01S02357.1hy     +++|          CRD    T3
02597  M01S02358.1hy     +++|          LDD    T2          CHECK ERROR FLAGS
02598  M01S02359.1hy     +++|          SHN    0-12
02599  M01S02360.1hy     +++|          ZJN    IIO2        IF NO FLAGS
02600  M01S02361.1hy     +++|          SHN    -1
02601  M01S02362.1hy     +++|          STD    RW          PROCESS ERROR FLAGS
02602  M01S02363.1hy     +++|          RJM    PEF
02603  M01S02364.1hy     +++| IIO1     NJN    IIO3        IF I/O PREPROCESSING INDICATED
02604  M01S02365.1hy     +++| IIO2     LDD    NR+1
02605  M01S02366.1hy     +++|          STM    WCBA+5      SET CYLINDER IN COMMAND BLOCK
Line S02367 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02606  M02S02367.ns2769  ---|          STM    CYLN
02607  M01S00116.ns2769  +++|          STM    CYLN,DI
02608  M01S02368.1hy     +++|          LDD    NR+2
Line S02369 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02609  M02S02369.ns2769  ---|          STM    TKSN        TRACK + SECTOR
02610  M01S00117.ns2769  +++|          STM    TKSN,DI     TRACK + SECTOR
02611  M01S02370.1hy     +++|          SCN    77
02612  M01S02371.1hy     +++|          SHN    2
02613  M01S02372.1hy     +++|          LMD    NR+2        SEPARATE INTO 8 BIT FIELDS
02614  M01S02373.1hy     +++|          SCN    77
02615  M01S02374.1hy     +++|          LMD    NR+2        SET IN COMMAND BLOCK
02616  M01S02375.1hy     +++|          STML   WCBA+6
02617  M01S02376.1hy     +++|          LDD    T3
02618  M01S02377.1hy     +++|          SHN    22-11       EXTRACT WRITE DATA FLAG
02619  M01S02378.1hy     +++|          LPN    1
Line S02379 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02620  M02S02379.ns2769  ---|          STM    RWST        SET READ / WRITE STATUS
02621  M01S00118.ns2769  +++|          STM    RWST,DI     SET READ / WRITE STATUS
02622  M01S02380.1hy     +++|          STD    RW
02623  M01S02381.1hy     +++|          LDN    3
02624  M01S02382.1hy     +++|          STD    TO          SEEK TIMEOUT = 3 SECONDS
02625  M01S02383.1hy     +++|          LDC    PIO
02626  M01S02384.1hy     +++|          UJN    IIO1        SET PROCESSOR ADDRESS
02627  M01S02385.1hy     +++| IMR      SPACE  4,15
02628  M01S02386.1hy     +++|**        IMR - INITIATE MONITOR REQUEST.
02629  M01S02387.1hy     +++|*
02630  M01S02388.1hy     +++|*         ENTRY  (A) = *BIOM* SUBFUNCTION.
02631  M01S02389.1hy     +++|*                (PO) = *PUT* ORDINAL.
02632  M01S02390.1hy     +++|*                (WB+3 - WB+4) = *BIOM* PARAMETERS.
02633  M01S02391.1hy     +++|*
02634  M01S02392.1hy     +++|*         EXIT   (A) = 0.
02635  M01S02393.1hy     +++|*
02636  M01S02394.1hy     +++|*         USES   WB - WB+2.
02637  M01S02395.1hy     +++|*
02638  M01S02396.1hy     +++|*         CALLS  AME, CMC.
02639  M01S02397.1hy     +++|
02640  M01S02398.1hy     +++|
02641  M01S02399.1hy     +++| IMR2     RJM    AME         ATTEMPT MONITOR EXCHANGE
02642  M01S02400.1hy     +++|*         LDN    0
02643  M01S02401.1hy     +++|
02644  M01S02402.1hy     +++| IMR      SUBR               ENTRY/EXIT
02645  M01S02403.1hy     +++|          STD    WB+1
02646  M01S02404.1hy     +++|          LDD    PO          SET *PUT* ORDINAL
02647  M01S02405.1hy     +++|          STD    WB+2
02648  M01S02406.1hy     +++|          LDN    BIOM        SET MONITOR FUNCTION
02649  M01S02407.1hy     +++|          STD    WB
02650  M01S02408.1hy     +++|          RJM    CMC         CHECK MONITOR COMPLETE
02651  M01S02409.1hy     +++|          LDD    OA
02652  M01S02410.1hy     +++|          CWD    WB
02653  M01S02411.1hy     +++|          UJN    IMR2        ATTEMPT EXCHANGE
02654  M01S00019.1hy6    +++|IOM       SPACE  4,10
02655  M01S00020.1hy6    +++|**        IOM - ISSUE OPERATOR MESSAGE.
02656  M01S00021.1hy6    +++|*
Line S00022 Modification History
M01 (Added by) 1hy6
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02657  M02S00022.271l716 ---|*         (A) = MESSAGE ADDRESS.
Line S00023 Modification History
M01 (Added by) 1hy6
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02658  M02S00023.271l716 ---|*             = 0, TO CLEAR THE MESSAGE.
Line S00024 Modification History
M01 (Added by) 1hy6
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02659  M02S00024.271l716 ---|*
Line S00025 Modification History
M01 (Added by) 1hy6
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02660  M02S00025.271l716 ---|*         CALLS  C2D.
Line S00026 Modification History
M01 (Added by) 1hy6
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02661  M02S00026.271l716 ---|*
Line S00027 Modification History
M01 (Added by) 1hy6
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02662  M02S00027.271l716 ---|*         USES   T1.
02663  M01S00056.271l716 +++|*         ENTRY  (A) = ADDRESS OF MESSAGE.
02664  M01S00057.271l716 +++|*                    = 0 TO CLEAR MESSAGE.
02665  M01S00058.271l716 +++|*                (EO) = EST ORDINAL.
02666  M01S00059.271l716 +++|*
02667  M01S00060.271l716 +++|*         USES   T1.
02668  M01S00061.271l716 +++|*
02669  M01S00062.271l716 +++|*         CALLS  C2D.
02670  M01S00028.1hy6    +++|
02671  M01S00029.1hy6    +++|
02672  M01S00030.1hy6    +++| IOM1     LDD    CP          CLEAR THE MESSAGE
02673  M01S00031.1hy6    +++|          ADN    MS2W
02674  M01S00032.1hy6    +++|          CWD    T1
02675  M01S00033.1hy6    +++|
02676  M01S00034.1hy6    +++| IOM      SUBR               ENTRY/EXIT
Line S00035 Modification History
M01 (Added by) 1hy6
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02677  M02S00035.271l716 ---|          STM    IOMA        SAVE THE MESSAGE ADDRESS
02678  M01S00036.1hy6    +++|          STD    T1
02679  M01S00037.1hy6    +++|          ZJN    IOM1        IF CLEAR MESSAGE CALL
Line S00038 Modification History
M01 (Added by) 1hy6
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02680  M02S00038.271l716 ---|          LDD    EO
Line S00039 Modification History
M01 (Added by) 1hy6
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02681  M02S00039.271l716 ---|          RJM    C2D
Line S00040 Modification History
M01 (Added by) 1hy6
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02682  M02S00040.271l716 ---|          STM    2,T1
02683  M01S00063.271l716 +++|          STM    IOMA
02684  M01S00064.271l716 +++|          LDD    EO          CONVERT EST ORDINAL
02685  M01S00065.271l716 +++|          RJM    C2D
02686  M01S00066.271l716 +++|          STM    2,T1        SET IN MESSAGE
02687  M01S00041.1hy6    +++|          LDD    EO
02688  M01S00042.1hy6    +++|          SHN    -6
02689  M01S00043.1hy6    +++|          LMC    2RQ0
02690  M01S00044.1hy6    +++|          STM    1,T1
Line S00045 Modification History
M01 (Added by) 1hy6
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02691  M02S00045.271l716 ---|          LDD    CP
02692  M01S00067.271l716 +++|          LDD    CP          STORE OPERATOR MESSAGE
02693  M01S00046.1hy6    +++|          ADN    MS2W
02694  M01S00047.1hy6    +++|          CWM    **,TR
02695  M01S00048.1hy6    +++| IOMA     EQU    *-1
02696  M01S00049.1hy6    +++|          UJN    IOMX        RETURN
02697  M01S02412.1hy     +++| ISF      SPACE  4,15
02698  M01S02413.1hy     +++|**        ISF - ISSUE *SEQM* FUNCTION.
02699  M01S02414.1hy     +++|*
02700  M01S02415.1hy     +++|*         ENTRY  (A) = *SEQM* SUBFUNCTION.
02701  M01S02416.1hy     +++|*                (EO) = EST ORDINAL.
02702  M01S02417.1hy     +++|*                (IR+4) = CHANNEL NUMBER.
02703  M01S02418.1hy     +++|*
02704  M01S02419.1hy     +++|*         EXIT   (A) = 0.
02705  M01S02420.1hy     +++|*
02706  M01S02421.1hy     +++|*         USES   T2, CM - CM+4.
02707  M01S02422.1hy     +++|*
02708  M01S02423.1hy     +++|*         CALLS  CMC.
02709  M01S02424.1hy     +++|*
02710  M01S02425.1hy     +++|*         MACROS MONITOR.
02711  M01S02426.1hy     +++|
02712  M01S02427.1hy     +++|
02713  M01S02428.1hy     +++| ISF      SUBR               ENTRY/EXIT
02714  M01S02429.1hy     +++|          STD    T2
02715  M01S02430.1hy     +++|          RJM    CMC         CHECK MONITOR COMPLETE
02716  M01S02431.1hy     +++|          LDD    EO
02717  M01S02432.1hy     +++|          STD    CM+1        SET EST ORDINAL
02718  M01S02433.1hy     +++|          LDD    T2
02719  M01S02434.1hy     +++|          STD    CM+2        SET *SEQM* SUBFUNCTION
02720  M01S02435.1hy     +++|          LDD    IR+4
02721  M01S02436.1hy     +++|          STD    CM+3        SET CHANNEL NUMBER
02722  M01S02437.1hy     +++|          MONITOR  SEQM
02723  M01S02438.1hy     +++|*         LDN    0
02724  M01S02439.1hy     +++|          UJN    ISFX        RETURN
02725  M01S02440.1hy     +++| ISR      SPACE  4,10
02726  M01S02441.1hy     +++|**        ISR - IDENTIFY SPECIAL REQUEST.
02727  M01S02442.1hy     +++|*
02728  M01S02443.1hy     +++|*         ENTRY  (A) = SPECIAL REQUEST FLAGS.
02729  M01S02444.1hy     +++|*
02730  M01S02445.1hy     +++|*         EXIT   (A) = 0 IF UNIDENTIFIED FLAG.
02731  M01S02446.1hy     +++|*                (PA) = PROCESSOR ADDRESS.
Line S02447 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02732  M02S02447.271l716 ---|*                (RW) = INDEX FOR DIAGNOSTICS.
02733  M01S00068.271l716 +++|*                (RW) = SPECIAL REQUEST INDEX.
02734  M01S02448.1hy     +++|
02735  M01S02449.1hy     +++|
02736  M01S02450.1hy     +++| ISR2     LDM    ISRA,RW     SET SPECIAL REQUEST PROCESSOR
02737  M01S02451.1hy     +++|          STD    PA
Line S02452 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02738  M02S02452.271l716 ---|          ERRNZ  L1DF+1-L2DF CODE DEPENDS ON VALUE
02739  M01S02453.1hy     +++|
02740  M01S02454.1hy     +++| ISR      SUBR               ENTRY/EXIT
02741  M01S02455.1hy     +++|          SHN    -1
02742  M01S02456.1hy     +++|          STD    T0          SAVE FLAGS
02743  M01S02457.1hy     +++|          LCN    0
Line S02458 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02744  M02S02458.271l716 ---|          ERRNZ  SPDF+2-L1DF CODE DEPENDS ON VALUE
02745  M01S00069.271l716 +++|          ERRNZ  DUNF+1-SPDF CODE DEPENDS ON VALUE
02746  M01S02459.1hy     +++|          STD    RW
02747  M01S02460.1hy     +++| ISR1     AOD    RW          ADVANCE INDEX
02748  M01S02461.1hy     +++|          LDD    T0
02749  M01S02462.1hy     +++|          SHN    21-0        CHECK NEXT FLAG
02750  M01S02463.1hy     +++|          STD    T0
02751  M01S02464.1hy     +++|          PJN    ISR1        IF NOT SET
02752  M01S02465.1hy     +++|          LDD    RW
Line S02466 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02753  M02S02466.ns2769  ---|          STM    RWST        SET INDEX FOR DIAGNOSTICS
02754  M01S00119.ns2769  +++|          STM    RWST,DI     SET INDEX FOR DIAGNOSTICS
02755  M01S02467.1hy     +++|          ADN    SPDF
Line S02468 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02756  M02S02468.ns2769  ---|          STM    SREQ        SET SPECIAL REQUEST FLAG
02757  M01S00120.ns2769  +++|          STM    SREQ,DI     SET SPECIAL REQUEST FLAG
02758  M01S02469.1hy     +++|          SBN    DUCF+1
02759  M01S02470.1hy     +++|          MJN    ISR2        IF VALID REQUEST
02760  M01S02471.1hy     +++|          LDN    0
02761  M01S02472.1hy     +++|          UJN    ISRX        RETURN
02762  M01S02473.1hy     +++|
02763  M01S02474.1hy     +++|
02764  M01S02475.1hy     +++| ISRA     BSS    0           SPECIAL REQUEST PROCESSORS
02765  M01S02476.1hy     +++|          CON    SPD         SPIN-DOWN DRIVE
02766  M01S02477.1hy     +++|          CON    SPU         SPIN-UP DRIVE
Line S02478 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02767  M02S02478.271l716 ---|          CON    RND         EXECUTE LEVEL 1 DIAGNOSTICS
Line S02479 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02768  M02S02479.271l716 ---|          CON    RND         EXECUTE LEVEL 2 DIAGNOSTICS
02769  M01S02480.1hy     +++|          CON    DUC         DAYFILE UNIT CHARACTERISTICS
02770  M01S02481.1hy     +++| PEF      SPACE  4,15
02771  M01S02482.1hy     +++|**        PEF - PROCESS ERROR FLAGS.
02772  M01S02483.1hy     +++|*
02773  M01S02484.1hy     +++|*         ENTRY  (RW) = ERROR INDEX.
02774  M01S02485.1hy     +++|*                (CB) = *CBT* ORDINAL.
Line S02486 Modification History
M01 (Added by) 1hy
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
02775  M02S02486.253l688 ---|*                (T2) = BYTE 0 OF *HSLK* WORD IN *CBT*.
02776  M01S00011.253l688 +++|*                (T1) = BYTE 0 OF *PAD4* WORD OF CBT ENTRY.
02777  M01S00033.ns2512  +++|*                (RF) = SPECIAL REQUEST FLAGS.
02778  M01S02487.1hy     +++|*                (NR - NR+4) = *PAD1* WORD OF *CBT* ENTRY.
02779  M01S02488.1hy     +++|*
02780  M01S02489.1hy     +++|*         EXIT   (A) = 0 IF OK TO INITIATE I/O.
02781  M01S02490.1hy     +++|*                    = I/O PREPROCESSOR ADDRESS.
02782  M01S02491.1hy     +++|*
02783  M01S02492.1hy     +++|*         USES   RW, PA.
02784  M01S02493.1hy     +++|*
Line S02494 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
02785  M02S02494.ns2512  ---|*         CALLS  IIO, WFC.
02786  M01S00034.ns2512  +++|*         CALLS  CPF, IIO, WFC.
02787  M01S02495.1hy     +++|
02788  M01S02496.1hy     +++|
Line S02497 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
02789  M02S02497.ns2512  ---| PEF5     LDN    0           INDICATE I/O IN ORDER
02790  M01S00035.ns2512  +++| PEF6     LDN    0           INDICATE I/O IN ORDER
02791  M01S02498.1hy     +++|
02792  M01S02499.1hy     +++| PEF      SUBR               ENTRY/EXIT
Line S02500 Modification History
M01 (Added by) 1hy
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
02793  M02S02500.253l688 ---|          LDD    T2
02794  M01S00012.253l688 +++|          LDD    T1
02795  M01S00013.253l688 +++|          SHN    -6
02796  M01S02501.1hy     +++|          LMD    IR+4        CHECK CHANNEL NUMBER
Line S02502 Modification History
M01 (Added by) 1hy
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
02797  M02S02502.253l688 ---|          LPN    37
02798  M01S02503.1hy     +++|          NJN    PEFX        IF I/O DISABLED ON THIS ACCESS
Line S02504 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02799  M02S02504.ns2769  ---|          LDM    ERCT
02800  M01S00121.ns2769  +++|          LDM    ERCT,DI
02801  M01S02505.1hy     +++|          NJN    PEF1        IF PATH VERIFICATION INITIATED
02802  M01S02506.1hy     +++|          LDM    PEFA,RW
Line S02507 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02803  M02S02507.ns2769  ---|          STM    ERCT        SET INITIAL ERROR COUNT
Line S02508 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02804  M02S02508.ns2769  ---| PEF1     LDM    IPPS
02805  M01S00122.ns2769  +++|          STM    ERCT,DI     SET INITIAL ERROR COUNT
02806  M01S00123.ns2769  +++| PEF1     LDM    IPPS,DI
Line S02509 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
02807  M02S02509.ns2512  ---|          NJN    PEF5        IF I/O PREPROCESSING COMPLETE
Line S02510 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
02808  M02S02510.ns2512  ---|          LDD    RW
02809  M01S00036.ns2512  +++|          NJN    PEF6        IF I/O PREPROCESSING COMPLETE
02810  M01S00037.ns2512  +++|          LDD    RW
02811  M01S00038.ns2512  +++|          SHN    14-0
02812  M01S02511.1hy     +++|          NJN    PEF2        IF NOT *1MV* DEVICE VERIFICATION
02813  M01S02512.1hy     +++|
02814  M01S02513.1hy     +++|*         CHECK DISK ADDRESS AT BEGINNING OF MAINTENANCE CYLINDER.
02815  M01S02514.1hy     +++|
02816  M01S02515.1hy     +++|          LDD    NR+1        CHECK CURRENT CYLINDER
02817  M01S02516.1hy     +++| .CY      SET    MCLTDF-4000
02818  M01S02517.1hy     +++|          ERRNZ  MCLTDH-MCLTDF  CODE DEPENDS ON VALUE
02819  M01S02518.1hy     +++|          LMC    .CY/2
Line S02519 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
02820  M02S02519.ns2512  ---|          NJN    PEF5        IF NOT MAINTENANCE CYLINDER
Line S02520 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
02821  M02S02520.ns2512  ---|          LDD    NR+2
Line S02521 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
02822  M02S02521.ns2512  ---|          NJN    PEF5        IF INITIATING DEVICE VERIFICATION
Line S02522 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
02823  M02S02522.ns2512  ---| PEF2     LDC    PEF3
02824  M01S00039.ns2512  +++|          NJN    PEF6        IF NOT MAINTENANCE CYLINDER
02825  M01S00040.ns2512  +++|          LDD    NR+2
02826  M01S00041.ns2512  +++|          NJN    PEF6        IF DEVICE VERIFICATION IN PROGRESS
02827  M01S00042.ns2512  +++|          LDD    RF
Line S00043 Modification History
M01 (Added by) ns2512
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02828  M02S00043.271l716 ---|          SHN    0-13
02829  M01S00070.271l716 +++|          LPN    DVRF
02830  M01S00044.ns2512  +++|          ZJN    PEFX        IF NO VERIFICATION DIAGNOSTICS
02831  M01S00045.ns2512  +++|          LCN    PEF4-PEF3
02832  M01S00046.ns2512  +++| PEF2     ADC    PEF4
02833  M01S02523.1hy     +++|          UJP    PEFX        RETURN
02834  M01S02524.1hy     +++|
Line S02525 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
02835  M02S02525.ns2512  ---| PEF3     LDM    PEFB,RW     SET I/O PREPROCESSOR ADDRESS
02836  M01S00047.ns2512  +++| PEF3     LDN    DVDF        CLEAR DIAGNOSTICS REQUESTED FLAG
02837  M01S00048.ns2512  +++|          RJM    CPF
02838  M01S00049.ns2512  +++| PEF4     LDM    PEFB,RW     SET I/O PREPROCESSOR ADDRESS
02839  M01S02526.1hy     +++|          STD    PA
Line S02527 Modification History
M01 (Added by) 1hy
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
02840  M02S02527.271l716 ---|          LDN    3           SELECT LEVEL 2 DIAGNOSTICS
02841  M01S00071.271l716 +++|          LDN    2           SELECT VERIFICATION DIAGNOSTICS
02842  M01S02528.1hy     +++|          STD    RW
Line S02529 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02843  M02S02529.ns2769  ---|          STM    RWST        SAVE AS READ / WRITE STATUS
02844  M01S00124.ns2769  +++|          STM    RWST,DI     SAVE AS READ / WRITE STATUS
Line S02530 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
02845  M02S02530.ns2512  ---|          LDC    PEF4
02846  M01S00050.ns2512  +++|          LDC    PEF5
02847  M01S02531.1hy     +++|          LJM    0,PA        EXIT TO PREPROCESSOR
02848  M01S02532.1hy     +++|
Line S02533 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2512
Seq #  *Modification Id* Act 
----------------------------+
02849  M02S02533.ns2512  ---| PEF4     LDC    FWCA        CLEAR ATTENTION
02850  M01S00051.ns2512  +++| PEF5     LDC    FWCA        CLEAR ATTENTION
02851  M01S02534.1hy     +++|          RJM    WFC
02852  M01S02535.1hy     +++|          LDD    CB          INITIATE I/O
Line S02536 Modification History
M01 (Added by) 1hy
M02 (Updated by) ns2769
Seq #  *Modification Id* Act 
----------------------------+
02853  M02S02536.ns2769  ---|          STM    IPPS
02854  M01S00125.ns2769  +++|          STM    IPPS,DI
02855  M01S02537.1hy     +++|          RJM    IIO
02856  M01S02538.1hy     +++|          LJM    0,PA        EXIT TO PROCESSOR
02857  M01S02539.1hy     +++|
02858  M01S02540.1hy     +++|
Proceed to Part 2