User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:msm.004

Deck MSM Part 004

30 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
Line S04671 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05294  M02S04671.283l840 ---|*
Line S04672 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05295  M02S04672.283l840 ---|*         MACROS MONITOR.
Line S04673 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05296  M02S04673.283l840 ---|
Line S04674 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05297  M02S04674.283l840 ---|
Line S04675 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05298  M02S04675.283l840 ---| LDT1     LDD    HN          ADVANCE EXTENDED MEMORY ADDRESS
Line S04676 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05299  M02S04676.283l840 ---|          RAD    CN+4
Line S04677 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05300  M02S04677.283l840 ---|          SHN    -14
Line S04678 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05301  M02S04678.283l840 ---|          RAD    CN+3
Line S04679 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05302  M02S04679.283l840 ---|          LDD    HN          ADVANCE CM ADDRESS
Line S04680 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05303  M02S04680.283l840 ---|          RAD    CN+2
Line S04681 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05304  M02S04681.283l840 ---|          SHN    -14
Line S04682 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05305  M02S04682.283l840 ---|          RAD    CN+1
Line S04683 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05306  M02S04683.283l840 ---| LDT2     LDD    MA          MOVE REQUEST
Line S04684 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05307  M02S04684.283l840 ---|          CWD    CN
Line S04685 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05308  M02S04685.283l840 ---|          CRD    CM
Line S04686 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05309  M02S04686.283l840 ---|          MONITOR  ECSM      ISSUE REQUEST
Line S04687 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05310  M02S04687.283l840 ---|          SOD    T5          DECREMENT BLOCK COUNT
Line S04688 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05311  M02S04688.283l840 ---|          PJN    LDT1        IF NOT END OF DAT
Line S04689 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05312  M02S04689.283l840 ---|
Line S04690 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05313  M02S04690.283l840 ---| LDT      SUBR               ENTRY/EXIT
Line S04691 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05314  M02S04691.283l840 ---|
Line S04692 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05315  M02S04692.283l840 ---|*         RETRIEVE DAT POINTER WORD *DAET*.
Line S04693 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05316  M02S04693.283l840 ---|
Line S04694 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05317  M02S04694.283l840 ---|          LDM    ECLT        SET LABEL TRACK
Line S04695 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05318  M02S04695.283l840 ---|          STD    T6
Line S04696 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05319  M02S04696.283l840 ---|          LDN    ETLT        SET ENVIRONMENT TABLE SECTOR
Line S04697 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05320  M02S04697.283l840 ---|          STD    T7
Line S04698 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05321  M02S04698.283l840 ---|          RJM    CEA
Line S04699 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05322  M02S04699.283l840 ---|          LDN    DAET        ADJUST ADDRESS TO DAT POINTER
Line S04700 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05323  M02S04700.283l840 ---|          RAD    CM+4
Line S04701 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05324  M02S04701.283l840 ---|          SHN    -14
Line S04702 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05325  M02S04702.283l840 ---|          LMC    RECS*1000   SET SUBFUNCTION
Line S04703 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05326  M02S04703.283l840 ---|          RAD    CM+3
Line S04704 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05327  M02S04704.283l840 ---|          LDD    MA          SET CM ADDRESS
Line S04705 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05328  M02S04705.283l840 ---|          STD    CM+2
Line S04706 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05329  M02S04706.283l840 ---|          LDN    0
Line S04707 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05330  M02S04707.283l840 ---|          STD    CM+1
Line S04708 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05331  M02S04708.283l840 ---|          MONITOR  ECSM      ISSUE REQUEST
Line S04709 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05332  M02S04709.283l840 ---|*         LDN    0
Line S04710 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05333  M02S04710.283l840 ---|          STD    T7
Line S04711 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05334  M02S04711.283l840 ---|          LDD    MA          READ *DAET*
Line S04712 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05335  M02S04712.283l840 ---|          CRD    CM
Line S04713 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05336  M02S04713.283l840 ---|          LDD    CM          SET CURRENT DAT TRACK
Line S04714 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05337  M02S04714.283l840 ---|          STD    QT
Line S04715 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05338  M02S04715.283l840 ---|          LDM    LDMP        GET DEVICE ALLOCATION WORD FROM MST
Line S04716 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05339  M02S04716.283l840 ---|          SHN    3
Line S04717 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05340  M02S04717.283l840 ---|          ADN    ALGL        DAT TRACK TO (T6)
Line S04718 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05341  M02S04718.283l840 ---|          CRD    T6-4
Line S04719 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05342  M02S04719.283l840 ---|          LDD    CM+4        SET DAT INDEX
Line S04720 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05343  M02S04720.283l840 ---|          STD    QI
Line S04721 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05344  M02S04721.283l840 ---|          SHN    -6          SET BLOCK COUNT
Line S04722 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05345  M02S04722.283l840 ---|          STD    T5
Line S04723 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05346  M02S04723.283l840 ---|          RJM    CEA
Line S04724 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05347  M02S04724.283l840 ---|          LDD    CM+4        MOVE ADDRESS TO REQUEST IMAGE
Line S04725 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05348  M02S04725.283l840 ---|          STD    CN+4
Line S04726 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05349  M02S04726.283l840 ---|          LDD    CM+3
Line S04727 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05350  M02S04727.283l840 ---|          LMC    RECS*1000
Line S04728 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05351  M02S04728.283l840 ---|          STD    CN+3
Line S04729 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05352  M02S04729.283l840 ---|          LDD    CA+1        SET CM ADDRESS
Line S04730 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05353  M02S04730.283l840 ---|          STD    CN+2
Line S04731 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05354  M02S04731.283l840 ---|          ADD    TH
Line S04732 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05355  M02S04732.283l840 ---|          STD    CA+1        ADVANCE ADDRESS FOR TRT RECOVERY
Line S04733 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05356  M02S04733.283l840 ---|          LDC    77S6+40     SET WORD COUNT FOR TRANSFER
Line S04734 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05357  M02S04734.283l840 ---|          STD    CN+1
Line S04735 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05358  M02S04735.283l840 ---|          LJM    LDT2        ENTER LOOP
Line S04736 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05359  M02S04736.283l840 ---| RDE      SPACE  4,15
Line S04737 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05360  M02S04737.283l840 ---|**        RDE - READ DAT ENTRY.
Line S04738 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05361  M02S04738.283l840 ---|*
Line S04739 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05362  M02S04739.283l840 ---|*         ENTRY  (EQ) = EST ORDINAL.
Line S04740 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05363  M02S04740.283l840 ---|*                (FN - FN+4) = EST ENTRY FOR DEVICE.
Line S04741 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05364  M02S04741.283l840 ---|*
Line S04742 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05365  M02S04742.283l840 ---|*         EXIT   (QS) = DAT INDEX.
Line S04743 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05366  M02S04743.283l840 ---|*                (T6) = DAT TRACK.
Line S04744 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05367  M02S04744.283l840 ---|*                (DATB) = DAT ENTRY.
Line S04745 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05368  M02S04745.283l840 ---|*
Line S04746 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05369  M02S04746.283l840 ---|*         USES   RE, TS, T7, CM - CM+4.
Line S04747 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05370  M02S04747.283l840 ---|*
Line S04748 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05371  M02S04748.283l840 ---|*         CALLS  CEA.
Line S04749 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05372  M02S04749.283l840 ---|*
Line S04750 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05373  M02S04750.283l840 ---|*         MACROS MONITOR.
Line S04751 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05374  M02S04751.283l840 ---|
Line S04752 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05375  M02S04752.283l840 ---|
Line S04753 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05376  M02S04753.283l840 ---| RDE      SUBR               ENTRY/EXIT
Line S04754 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05377  M02S04754.283l840 ---|          LDD    FN+4        READ DRIVER WORD
Line S04755 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05378  M02S04755.283l840 ---|          SHN    3
Line S04756 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05379  M02S04756.283l840 ---|          ADN    MDGL        DAT INDEX TO (CM)
Line S04757 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05380  M02S04757.283l840 ---|          CRD    CM
Line S04758 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05381  M02S04758.283l840 ---|          LDC    0           SET DAT TRACK
Line S04759 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05382  M02S04759.283l840 ---| RDEA     EQU    *-1
Line S04760 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05383  M02S04760.283l840 ---|          STD    T6
Line S04761 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05384  M02S04761.283l840 ---|          LDN    0
Line S04762 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05385  M02S04762.283l840 ---|          STD    T7
Line S04763 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05386  M02S04763.283l840 ---|          RJM    CEA
Line S04764 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05387  M02S04764.283l840 ---|          LDD    CM          SET DAT ORDINAL FROM INDEX
Line S04765 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05388  M02S04765.283l840 ---|          LPC    377
Line S04766 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05389  M02S04766.283l840 ---|          SHN    1
Line S04767 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05390  M02S04767.283l840 ---|          STD    QS
Line S04768 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05391  M02S04768.283l840 ---|          RAD    CM+4
Line S04769 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05392  M02S04769.283l840 ---|          SHN    -14
Line S04770 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05393  M02S04770.283l840 ---|          LMC    RECS*1000   SET SUBFUNCTION
Line S04771 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05394  M02S04771.283l840 ---|          RAD    CM+3
Line S04772 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05395  M02S04772.283l840 ---|          LDD    HN          SET WORD COUNT
Line S04773 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05396  M02S04773.283l840 ---|          STD    CM+1
Line S04774 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05397  M02S04774.283l840 ---|          LDD    MA          CM ADDRESS = PP MESSAGE BUFFER
Line S04775 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05398  M02S04775.283l840 ---|          STD    CM+2
Line S04776 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05399  M02S04776.283l840 ---|          MONITOR  ECSM
Line S04777 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05400  M02S04777.283l840 ---|          LDD    MA          READ DAT ENTRY TO PP BUFFER
Line S04778 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05401  M02S04778.283l840 ---|          CRM    DATB,TW
Line S04779 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05402  M02S04779.283l840 ---|          LDM    DATB+4      SET MST/TRT TRACK IN TABLE
Line S04780 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05403  M02S04780.283l840 ---|          STD    TS
Line S04781 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05404  M02S04781.283l840 ---|          SHN    1-13        ADD DAP STATUS IF SHARED DEVICE
Line S04782 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05405  M02S04782.283l840 ---|          LPN    2
Line S04783 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05406  M02S04783.283l840 ---|          RAD    RE
Line S04784 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05407  M02S04784.283l840 ---|          LJM    RDEX        RETURN
Line S04785 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05408  M02S04785.283l840 ---| SDT      SPACE  4,10
Line S04786 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05409  M02S04786.283l840 ---|**        SDT - SEARCH DEVICE ACCESS TABLE.
Line S04787 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05410  M02S04787.283l840 ---|*
Line S04788 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05411  M02S04788.283l840 ---|*         ENTRY  (FN - FN+4) = EST ENTRY.
Line S04789 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05412  M02S04789.283l840 ---|*                (CA+1) = CM ADDRESS (+1000) OF DAT.
Line S04790 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05413  M02S04790.283l840 ---|*                (CN - CN+3) = DEVICE DESCRIPTION.
Line S04791 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05414  M02S04791.283l840 ---|*                (QI) = CURRENT DAT INDEX.
Line S04792 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05415  M02S04792.283l840 ---|*
Line S04793 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05416  M02S04793.283l840 ---|*         EXIT   (A) = 0 IF ENTRY NOT FOUND.
Line S04794 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05417  M02S04794.283l840 ---|*                (A) = ADDRESS OF DATB+11 IF ENTRY FOUND.
Line S04795 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05418  M02S04795.283l840 ---|*                (QS) = INDEX INTO DEVICE ACCESS TABLE.
Line S04796 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05419  M02S04796.283l840 ---|*                (DI) = DAT INDEX.
Line S04797 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05420  M02S04797.283l840 ---|*
Line S04798 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05421  M02S04798.283l840 ---|*         USES   T1, T2, DI, QS, CM - CM+4, CN+4.
Line S04799 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05422  M02S04799.283l840 ---|
Line S04800 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05423  M02S04800.283l840 ---|
Line S04801 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05424  M02S04801.283l840 ---| SDT1     LDM    DATB+4
Line S04802 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05425  M02S04802.283l840 ---|          NJN    SDT2        IF SHARED DEVICE SLOT
Line S04803 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05426  M02S04803.283l840 ---|          LDD    T2          SAVE INDEX OF HOLE
Line S04804 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05427  M02S04804.283l840 ---|          STD    QS
Line S04805 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05428  M02S04805.283l840 ---| SDT2     LDD    DI
Line S04806 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05429  M02S04806.283l840 ---|          ZJN    SDT3        IF DNAP BY THIS MACHINE
Line S04807 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05430  M02S04807.283l840 ---|          LMD    T2
Line S04808 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05431  M02S04808.283l840 ---|          NJN    SDT3        IF NOT AT DAT SLOT FOR DEVICE
Line S04809 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05432  M02S04809.283l840 ---|          LDM    DATB+4      SET MST POINTER
Line S04810 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05433  M02S04810.283l840 ---|          STD    CN+4
Line S04811 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05434  M02S04811.283l840 ---| SDT3     LDN    2           ADVANCE INDEX
Line S04812 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05435  M02S04812.283l840 ---|          RAD    T2
Line S04813 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05436  M02S04813.283l840 ---|          LMD    QI
Line S04814 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05437  M02S04814.283l840 ---|          ZJN    SDTX        IF END OF DAT ENTRIES
Line S04815 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05438  M02S04815.283l840 ---| SDT4     LDD    RA          READ NEXT ENTRY
Line S04816 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05439  M02S04816.283l840 ---|          SBN    10
Line S04817 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05440  M02S04817.283l840 ---|          SHN    6
Line S04818 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05441  M02S04818.283l840 ---|          ADD    CA+1
Line S04819 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05442  M02S04819.283l840 ---|          ADD    T2
Line S04820 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05443  M02S04820.283l840 ---|          CRM    DATB,TW
Line S04821 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05444  M02S04821.283l840 ---|          LDM    DATB
Line S04822 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05445  M02S04822.283l840 ---|          ZJN    SDT1        IF POSSIBLE HOLE
Line S04823 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05446  M02S04823.283l840 ---|          LDN    CN
Line S04824 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05447  M02S04824.283l840 ---|          STD    T1
Line S04825 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05448  M02S04825.283l840 ---|
Line S04826 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05449  M02S04826.283l840 ---|*         COMPARE ENTRY FOR MATCHING FAMILY/PACK NAME + DEVICE NUMBER.
Line S04827 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05450  M02S04827.283l840 ---|
Line S04828 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05451  M02S04828.283l840 ---| SDT5     LDM    DATB-CN,T1
Line S04829 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05452  M02S04829.283l840 ---|          LMI    T1
Line S04830 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05453  M02S04830.283l840 ---|          NJN    SDT2        IF NO MATCH
Line S04831 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05454  M02S04831.283l840 ---|          AOD    T1
Line S04832 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05455  M02S04832.283l840 ---|          LMN    CN+4
Line S04833 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05456  M02S04833.283l840 ---|          NJN    SDT5        IF NOT 4 BYTES
Line S04834 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05457  M02S04834.283l840 ---|          LDD    T2          SET INDEX TO MATCHING ENTRY
Line S04835 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05458  M02S04835.283l840 ---|          STD    QS
Line S04836 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05459  M02S04836.283l840 ---|          LDC    DATB+11
Line S04837 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05460  M02S04837.283l840 ---|
Line S04838 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05461  M02S04838.283l840 ---| SDT      SUBR               ENTRY/EXIT
Line S04839 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05462  M02S04839.283l840 ---|          LDD    FN+4        READ MST FOR DAT INDEX
Line S04840 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05463  M02S04840.283l840 ---|          SHN    3
Line S04841 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05464  M02S04841.283l840 ---|          ADN    MDGL
Line S04842 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05465  M02S04842.283l840 ---|          CRD    CM
Line S04843 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05466  M02S04843.283l840 ---|          LDD    CM
Line S04844 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05467  M02S04844.283l840 ---|          LPC    377         EXPAND DAT INDEX
Line S04845 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05468  M02S04845.283l840 ---|          SHN    1
Line S04846 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05469  M02S04846.283l840 ---|          STD    DI
Line S04847 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05470  M02S04847.283l840 ---|          LDN    0           CLEAR SEARCH INDEX
Line S04848 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05471  M02S04848.283l840 ---|          STD    T2
Line S04849 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05472  M02S04849.283l840 ---|          STD    CN+4
Line S04850 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05473  M02S04850.283l840 ---|          STD    QS
Line S04851 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05474  M02S04851.283l840 ---|          LJM    SDT4        ENTER LOOP
Line S04852 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05475  M02S04852.283l840 ---| SNT      SPACE  4,10
Line S04853 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05476  M02S04853.283l840 ---|**        SNT - SET NEXT TRACK IN DAT CHAIN.
Line S04854 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05477  M02S04854.283l840 ---|*
Line S04855 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05478  M02S04855.283l840 ---|*         ENTRY  (A) = CURRENT TRACK.
Line S04856 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05479  M02S04856.283l840 ---|*                (LDMP) = EXTENDED MEMORY MST POINTER.
Line S04857 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05480  M02S04857.283l840 ---|*
Line S04858 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05481  M02S04858.283l840 ---|*         EXIT   (A) = NEXT TRACK.
Line S04859 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05482  M02S04859.283l840 ---|*
Line S04860 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05483  M02S04860.283l840 ---|*         USES   T0, T1, CM - CM+4.
Line S04861 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05484  M02S04861.283l840 ---|
Line S04862 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05485  M02S04862.283l840 ---|
Line S04863 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05486  M02S04863.283l840 ---| SNT      SUBR               ENTRY/EXIT
Line S04864 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05487  M02S04864.283l840 ---|          SHN    21-1        REMOVE TRACK BIT
Line S04865 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05488  M02S04865.283l840 ---|          LMD    TH
Line S04866 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05489  M02S04866.283l840 ---|          STD    T0          SET WORD INDEX
Line S04867 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05490  M02S04867.283l840 ---|          SHN    1-21
Line S04868 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05491  M02S04868.283l840 ---|          STD    T1          SET BYTE INDEX
Line S04869 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05492  M02S04869.283l840 ---|          LDM    LDMP        GET FWA OF TRT
Line S04870 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05493  M02S04870.283l840 ---|          SHN    3
Line S04871 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05494  M02S04871.283l840 ---|          ADN    TRLL
Line S04872 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05495  M02S04872.283l840 ---|          CRD    CM
Line S04873 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05496  M02S04873.283l840 ---|          LDD    CM+3        READ TRT WORD
Line S04874 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05497  M02S04874.283l840 ---|          LPN    77
Line S04875 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05498  M02S04875.283l840 ---|          SHN    14
Line S04876 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05499  M02S04876.283l840 ---|          LMD    CM+4
Line S04877 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05500  M02S04877.283l840 ---|          ADD    T0
Line S04878 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05501  M02S04878.283l840 ---|          CRD    CM
Line S04879 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05502  M02S04879.283l840 ---|          LDM    CM,T1       EXTRACT NEXT TRACK
Line S04880 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05503  M02S04880.283l840 ---|          UJN    SNTX        RETURN
Line S04881 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05504  M02S04881.283l840 ---| UDT      SPACE  4,10
Line S04882 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05505  M02S04882.283l840 ---|**        UDT - UPDATE DEVICE ACCESS TABLE.
Line S04883 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05506  M02S04883.283l840 ---|*
Line S04884 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05507  M02S04884.283l840 ---|*         ENTRY  (RS) = RECOVERY STATUS.
Line S04885 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05508  M02S04885.283l840 ---|*                (EQ) = EST ORDINAL.
Line S04886 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05509  M02S04886.283l840 ---|*                (FN - FN+4) = EST ENTRY.
Line S04887 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05510  M02S04887.283l840 ---|*                DAT ENTRY IN (DATB).
Line S04888 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05511  M02S04888.283l840 ---|*
Line S04889 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05512  M02S04889.283l840 ---|*         EXIT   (A) = 0 IF MST/TRT TRACK AVAILABLE.
Line S04890 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05513  M02S04890.283l840 ---|*
Line S04891 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05514  M02S04891.283l840 ---|*         USES   QI, QS, QT, TS, T6, T7, CM+3 - CM+7, CN - CN+4.
Line S04892 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05515  M02S04892.283l840 ---|*
Line S04893 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05516  M02S04893.283l840 ---|*         CALLS  SNT, WDE, CEA.
Line S04894 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05517  M02S04894.283l840 ---|
Line S04895 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05518  M02S04895.283l840 ---|
Line S04896 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05519  M02S04896.283l840 ---| UDT5     LDC    UDTA        EXIT WITH (A) = MESSAGE ADDRESS
Line S04897 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05520  M02S04897.283l840 ---|
Line S04898 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05521  M02S04898.283l840 ---| UDT      SUBR               ENTRY/EXIT
Line S04899 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05522  M02S04899.283l840 ---|          LDD    RS
Line S04900 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05523  M02S04900.283l840 ---|          ZJN    UDT1        IF LEVEL 0 DS/ON LINE RECOVERY
Line S04901 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05524  M02S04901.283l840 ---|          LDM    DATB+11     SET MACHINE ACCESS
Line S04902 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05525  M02S04902.283l840 ---|          LPC    -0
Line S04903 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05526  M02S04903.283l840 ---|          MMTE   *-1
Line S04904 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05527  M02S04904.283l840 ---|          LMC    0
Line S04905 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05528  M02S04905.283l840 ---|          MMTE   *-1
Line S04906 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05529  M02S04906.283l840 ---|          STM    DATB+11
Line S04907 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05530  M02S04907.283l840 ---| UDT1     LDD    RE
Line S04908 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05531  M02S04908.283l840 ---|          LPN    2
Line S04909 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05532  M02S04909.283l840 ---|          NJN    UDT3        IF DEVICE ACCESSED PREVIOUSLY
Line S04910 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05533  M02S04910.283l840 ---|          LDD    QS
Line S04911 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05534  M02S04911.283l840 ---|          NJN    UDT2        IF EMPTY SLOT IN *DAT*
Line S04912 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05535  M02S04912.283l840 ---|          LDD    QI          SET INDEX OF ENTRY
Line S04913 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05536  M02S04913.283l840 ---|          STD    QS
Line S04914 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05537  M02S04914.283l840 ---|          ADN    2           ADVANCE INDEX
Line S04915 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05538  M02S04915.283l840 ---|          STD    QI
Line S04916 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05539  M02S04916.283l840 ---| UDT2     LDD    RE          CHECK MST/TRT TRACK REQUIRED
Line S04917 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05540  M02S04917.283l840 ---|          LPN    4
Line S04918 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05541  M02S04918.283l840 ---|          ZJN    UDT3        IF NOT REQUIRED
Line S04919 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05542  M02S04919.283l840 ---|          LDD    QT          ASSIGN MST/TRT TRACK
Line S04920 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05543  M02S04920.283l840 ---|          RJM    SNT         ADVANCE CURRENT TRACK
Line S04921 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05544  M02S04921.283l840 ---|          ZJN    UDT5        IF END OF TRACK CHAIN
Line S04922 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05545  M02S04922.283l840 ---|          STM    DATB+4      SET TRACK IN *DAT* ENTRY
Line S04923 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05546  M02S04923.283l840 ---|          STD    QT
Line S04924 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05547  M02S04924.283l840 ---| UDT3     RJM    WDE         WRITE DAT ENTRY TO ECS
Line S04925 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05548  M02S04925.283l840 ---|          LDC    4000        FLAG RECOVERY IN PROGRESS
Line S04926 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05549  M02S04926.283l840 ---|          RAM    DATB+11
Line S04927 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05550  M02S04927.283l840 ---|          LDD    RA          UPDATE CM COPY OF DAT
Line S04928 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05551  M02S04928.283l840 ---|          SBN    10
Line S04929 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05552  M02S04929.283l840 ---|          SHN    6
Line S04930 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05553  M02S04930.283l840 ---|          ADD    CA+1
Line S04931 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05554  M02S04931.283l840 ---|          ADD    QS
Line S04932 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05555  M02S04932.283l840 ---|          CWM    DATB,TW
Line S04933 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05556  M02S04933.283l840 ---|
Line S04934 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05557  M02S04934.283l840 ---|*         UPDATE MST.
Line S04935 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05558  M02S04935.283l840 ---|
Line S04936 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05559  M02S04936.283l840 ---|          LDD    FN+4        READ DRIVER WORD
Line S04937 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05560  M02S04937.283l840 ---|          SHN    3
Line S04938 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05561  M02S04938.283l840 ---|          ADN    MDGL
Line S04939 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05562  M02S04939.283l840 ---|          CRD    CN
Line S04940 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05563  M02S04940.283l840 ---|          LDN    ZERL
Line S04941 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05564  M02S04941.283l840 ---|          CRD    CM+3
Line S04942 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05565  M02S04942.283l840 ---|          LDM    DATB+4
Line S04943 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05566  M02S04943.283l840 ---|          STD    TS
Line S04944 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05567  M02S04944.283l840 ---|          STD    T6
Line S04945 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05568  M02S04945.283l840 ---|          LDD    RE
Line S04946 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05569  M02S04946.283l840 ---|          LPN    2
Line S04947 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05570  M02S04947.283l840 ---|          ZJN    UDT4        IF DEVICE NOT ACCESSED PREVIOUSLY
Line S04948 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05571  M02S04948.283l840 ---|          LDN    0
Line S04949 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05572  M02S04949.283l840 ---|          STD    T7
Line S04950 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05573  M02S04950.283l840 ---|          RJM    CEA         CONVERT EXTENDED MEMORY ADDRESS
Line S04951 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05574  M02S04951.283l840 ---| UDT4     LDD    CN          SET *DAT* INDEX IN DRIVER WORD
Line S04952 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05575  M02S04952.283l840 ---|          LPC    6000
Line S04953 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05576  M02S04953.283l840 ---|          SHN    1
Line S04954 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05577  M02S04954.283l840 ---|          LMD    QS
Line S04955 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05578  M02S04955.283l840 ---|          SHN    -1
Line S04956 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05579  M02S04956.283l840 ---|          STD    CN
Line S04957 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05580  M02S04957.283l840 ---|          LDD    FN+4        STORE MST INFORMATION
Line S04958 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05581  M02S04958.283l840 ---|          SHN    3
Line S04959 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05582  M02S04959.283l840 ---|          ADN    MDGL
Line S04960 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05583  M02S04960.283l840 ---|          CWD    CN
Line S04961 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05584  M02S04961.283l840 ---|          SBN    MDGL-SDGL
Line S04962 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05585  M02S04962.283l840 ---|          CWD    CM+3
Line S04963 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05586  M02S04963.283l840 ---|          LDN    0
Line S04964 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05587  M02S04964.283l840 ---|          LJM    UDTX        RETURN
Line S04965 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05588  M02S04965.283l840 ---|
Line S04966 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05589  M02S04966.283l840 ---| UDTA     DATA   C* END OF DAT TRACK CHAIN.*
Line S04967 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05590  M02S04967.283l840 ---| WDE      SPACE  4,15
Line S04968 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05591  M02S04968.283l840 ---|**        WDE - WRITE DAT ENTRY TO EXTENDED MEMORY.
Line S04969 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05592  M02S04969.283l840 ---|*
Line S04970 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05593  M02S04970.283l840 ---|*         ENTRY  (QS) = DAT INDEX.
Line S04971 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05594  M02S04971.283l840 ---|*                DAT ENTRY IN (DATB).
Line S04972 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05595  M02S04972.283l840 ---|*
Line S04973 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05596  M02S04973.283l840 ---|*         EXIT   (A) = 0.
Line S04974 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05597  M02S04974.283l840 ---|*                (T6) = DAT TRACK.
Line S04975 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05598  M02S04975.283l840 ---|*
Line S04976 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05599  M02S04976.283l840 ---|*         USES   T6, T7, CM - CM+4.
Line S04977 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05600  M02S04977.283l840 ---|*
Line S04978 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05601  M02S04978.283l840 ---|*         CALLS  CEA.
Line S04979 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05602  M02S04979.283l840 ---|
Line S04980 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05603  M02S04980.283l840 ---|
Line S04981 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05604  M02S04981.283l840 ---| WDE      SUBR               ENTRY/EXIT
Line S04982 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05605  M02S04982.283l840 ---|          LDC    0           SET DAT TRACK
Line S04983 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05606  M02S04983.283l840 ---| WDEA     EQU    *-1
Line S04984 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05607  M02S04984.283l840 ---|          STD    T6
Line S04985 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05608  M02S04985.283l840 ---|          LDN    0
Line S04986 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05609  M02S04986.283l840 ---|          STD    T7
Line S04987 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05610  M02S04987.283l840 ---|          RJM    CEA         CONVERT EXTENDED MEMORY ADDRESS
Line S04988 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05611  M02S04988.283l840 ---|          LDD    QS
Line S04989 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05612  M02S04989.283l840 ---|          RAD    CM+4
Line S04990 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05613  M02S04990.283l840 ---|          SHN    -14
Line S04991 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05614  M02S04991.283l840 ---|          LMC    WECS*1000   SET SUBFUNCTION
Line S04992 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05615  M02S04992.283l840 ---|          RAD    CM+3
Line S04993 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05616  M02S04993.283l840 ---|          LDD    HN          WORD COUNT - 1 FOR TRANSFER
Line S04994 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05617  M02S04994.283l840 ---|          STD    CM+1
Line S04995 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05618  M02S04995.283l840 ---|          LDD    MA          SET CM ADDRESS OF ENTRY
Line S04996 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05619  M02S04996.283l840 ---|          STD    CM+2
Line S04997 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05620  M02S04997.283l840 ---|          CWM    DATB,TW     MOVE DAT ENTRY TO MESSAGE BUFFER
Line S04998 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05621  M02S04998.283l840 ---|          MONITOR ECSM       WRITE DAT ENTRY TO ECS
Line S04999 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05622  M02S04999.283l840 ---|          UJN    WDEX        RETURN
Line S05000 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05623  M02S05000.283l840 ---|          SPACE  4,10
Line S05001 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05624  M02S05001.283l840 ---|          QUAL   *
Line S05002 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05625  M02S05002.283l840 ---|
Line S05003 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05626  M02S05003.283l840 ---| LAEM     DATA   C*LOCAL AREA SECTOR ERROR.*
Line S05004 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05627  M02S05004.283l840 ---|          SPACE  4,10
Line S05005 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05628  M02S05005.283l840 ---| CSD      EQU    /MMF/CSD
Line S05006 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05629  M02S05006.283l840 ---| CSDB     EQU    /MMF/CSDB
Line S05007 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05630  M02S05007.283l840 ---| CSDC     EQU    /MMF/CSDC
Line S05008 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05631  M02S05008.283l840 ---| LDT      EQU    /MMF/LDT
Line S05009 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05632  M02S05009.283l840 ---| RDE      EQU    /MMF/RDE
Line S05010 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05633  M02S05010.283l840 ---| UDT      EQU    /MMF/UDT
Line S05011 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05634  M02S05011.283l840 ---| WDE      EQU    /MMF/WDE
Line S05012 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05635  M02S05012.283l840 ---|
Line S05013 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
05636  M02S05013.283l840 ---| OSOV     EQU    *+5         SECONDARY OVERLAY ORIGIN
05637  M01S00155.283l840 +++| ORDC     EQU    OVLA        LOAD ADDRESS FOR *4DC*
05638  M01S00156.283l840 +++| ORDD     EQU    OVLA        LOAD ADDRESS FOR *4DD*
05639  M01S00157.283l840 +++| ORDF     EQU    OVLA        LOAD ADDRESS FOR *4DF*
05640  M01S05014.msm     +++|          SPACE  4,10
05641  M01S05015.msm     +++|*         THE FOLLOWING CODE IS OVERLAID AFTER READING THE DEVICE
05642  M01S05016.msm     +++|*         LABELS.
05643  M01S05017.msm     +++|          TITLE  LABEL PROCESSING ROUTINES.
05644  M01S05018.msm     +++| CAM      SPACE  4,15
05645  M01S05019.msm     +++|**        CAM - CHANGE ACCESS MODE.
05646  M01S05020.msm     +++|*
05647  M01S05021.msm     +++|*         ENTRY  (A) = BIAS FOR ALGORITHM INDEX.
05648  M01S05022.msm     +++|*                (AM) = 0 IF CHANGING TO HALF TRACK MODE.
05649  M01S05023.msm     +++|*                     = *AIHT* IF CHANGING TO FULL TRACK MODE.
05650  M01S05024.msm     +++|*                (EQ) = EST ORDINAL.
05651  M01S05025.msm     +++|*                (CM+2) = CHANNEL FOR ACCESS PATH CHANGE.
05652  M01S05026.msm     +++|*                (CN - CN+4) = DILL WORD OF MST.
05653  M01S05027.msm     +++|*                (FN - FN+4) = EST ENTRY.
05654  M01S05028.msm     +++|*
05655  M01S05029.msm     +++|*         USES   T0, T2, CM - CM+4.
05656  M01S05030.msm     +++|*
05657  M01S05031.msm     +++|*         CALLS  SSL.
05658  M01S05032.msm     +++|*
05659  M01S05033.msm     +++|*         MACROS MONITOR.
05660  M01S05034.msm     +++|
05661  M01S05035.msm     +++|
05662  M01S05036.msm     +++| CAM      SUBR               ENTRY/EXIT
05663  M01S05037.msm     +++|          RAD    CN+4        ADJUST ALGORITHM INDEX
05664  M01S05038.msm     +++|          LPN    77
05665  M01S05039.msm     +++|          STD    T2          EXTRACT ALGORITHM INDEX
05666  M01S05040.msm     +++|          LDD    CM+2
05667  M01S05041.msm     +++|          ZJN    CAM2        IF NO ACCESS CHANGE
05668  M01S05042.msm     +++|          LDD    AM
05669  M01S05043.msm     +++|          ZJN    CAM1        IF SWITCHING TO HALF TRACK MODE
05670  M01S05044.msm     +++|          LDN    EAPS&DAPS
05671  M01S05045.msm     +++| CAM1     LMN    DAPS        SET *SCSM* SUBFUNCTION
05672  M01S05046.msm     +++|          STD    CM+3
05673  M01S05047.msm     +++|          LDD    EQ          SET EST ORDINAL
05674  M01S05048.msm     +++|          STD    CM+1
05675  M01S05049.msm     +++|          MONITOR  SCSM      ENABLE / DISABLE HALF TRACK ACCESS
05676  M01S05050.msm     +++| CAM2     LDM    TEQM-1,T2
05677  M01S05051.msm     +++|          STD    CM+3        SET NEW MNEMONIC
05678  M01S05052.msm     +++|          STD    FN+3
05679  M01S05053.msm     +++|          LDN    SMNS        SET MNEMONIC SUBFUNCTION
05680  M01S05054.msm     +++|          STD    CM+2
05681  M01S05055.msm     +++|          LDD    EQ          CHANGE EQUIPMENT MNEMONIC
05682  M01S05056.msm     +++|          STD    CM+1
05683  M01S05057.msm     +++|          MONITOR SEQM
05684  M01S05058.msm     +++|          LDD    FN+4        READ MDGL WORD OF MST
05685  M01S05059.msm     +++|          SHN    3
05686  M01S05060.msm     +++|          ADN    MDGL
05687  M01S05061.msm     +++|          CRD    CM
05688  M01S05062.msm     +++|          LDM    TSLM-1,T2   SET SINGLE UNIT SECTOR LIMIT
05689  M01S05063.msm     +++|          STD    CM+1
05690  M01S05064.msm     +++|          LDD    FN+4        UPDATE MST
05691  M01S05065.msm     +++|          SHN    3
05692  M01S05066.msm     +++|          ADN    MDGL
05693  M01S05067.msm     +++|          CWD    CM
05694  M01S05068.msm     +++|          ADN    DILL-MDGL
05695  M01S05069.msm     +++|          CWD    CN
05696  M01S05070.msm     +++|          RJM    SSL         SET SECTOR LIMITS
05697  M01S05071.msm     +++| CAM5     LJM    CAMX        RETURN
05698  M01S05072.msm     +++|
05699  M01S05073.msm     +++|
05700  M01S05074.msm     +++| TEQM     BSS    0           TABLE OF EQUIPMENT MNEMONICS
05701  M01S05075.msm     +++|          CON    2RDI        HALF TRACK SINGLE DENSITY
05702  M01S05076.msm     +++|          CON    2RDJ        HALF TRACK DOUBLE DENSITY
05703  M01S05077.msm     +++|          CON    2RDM        HALF TRACK DOUBLE DENSITY (885)
05704  M01S05078.msm     +++|          CON    2RDK        FULL TRACK SINGLE DENSITY
05705  M01S05079.msm     +++|          CON    2RDL        FULL TRACK DOUBLE DENSITY
05706  M01S05080.msm     +++|          CON    2RDQ        FULL TRACK DOUBLE DENSITY (885)
05707  M01S05081.msm     +++|
05708  M01S05082.msm     +++|
05709  M01S05083.msm     +++| TSLM     BSS    0           TABLE OF SECTOR LIMITS
05710  M01S05084.msm     +++|          CON    SLDI+4000   HALF TRACK SINGLE DENSITY
05711  M01S05085.msm     +++|          CON    SLDJ+4000   HALF TRACK DOUBLE DENSITY
05712  M01S05086.msm     +++|          CON    SLDM+4000   HALF TRACK DOUBLE DENSITY (885)
05713  M01S05087.msm     +++|          CON    SLDK        FULL TRACK SINGLE DENSITY
05714  M01S05088.msm     +++|          CON    SLDL        FULL TRACK DOUBLE DENSITY
05715  M01S05089.msm     +++|          CON    SLDQ        FULL TRACK DOUBLE DENSITY (885)
05716  M01S05090.msm     +++| CCS      SPACE  4,10
05717  M01S05091.msm     +++|**        CCS - CHECK CHANNEL STATUS.
05718  M01S05092.msm     +++|*
05719  M01S05093.msm     +++|*         ENTRY  (A) = REQUESTED STATUS.
05720  M01S05094.msm     +++|*                (FN - FN+4) = EST ENTRY.
05721  M01S05095.msm     +++|*
05722  M01S05096.msm     +++|*         EXIT   (A) = (CM+2).
05723  M01S05097.msm     +++|*                    = 0 IF REQUESTED STATUS NOT PRESENT.
05724  M01S05098.msm     +++|*                    = CHANNEL DESCRIPTOR IF STATUS FOUND.
05725  M01S05099.msm     +++|*
05726  M01S05100.msm     +++|*         USES   T2.
05727  M01S05101.msm     +++|
05728  M01S05102.msm     +++|
05729  M01S05103.msm     +++| CCS2     LDI    CM+3        SET CHANNEL DESCRIPTOR
05730  M01S05104.msm     +++| CCS3     STD    CM+2
05731  M01S05105.msm     +++|
05732  M01S05106.msm     +++| CCS      SUBR               ENTRY/EXIT
05733  M01S05107.msm     +++|          STD    T2
05734  M01S05108.msm     +++|          LDN    FN+1        INITIALIZE FOR SCAN
05735  M01S05109.msm     +++|          STD    CM+3
05736  M01S05110.msm     +++| CCS1     LDI    CM+3        CHECK CHANNEL
05737  M01S05111.msm     +++|          SHN    0-10
05738  M01S05112.msm     +++|          SCN    6           REMOVE STATE FIELD
05739  M01S05113.msm     +++|          LMD    T2
05740  M01S05114.msm     +++|          ZJN    CCS2        IF REQUESTED STATUS PRESENT
05741  M01S05115.msm     +++|          AOD    CM+3
05742  M01S05116.msm     +++|          LMN    FN+3
05743  M01S05117.msm     +++|          NJN    CCS1        IF ANOTHER CHANNEL TO CHECK
05744  M01S05118.msm     +++|*         LDN    0
05745  M01S05119.msm     +++|          UJN    CCS3        RETURN
05746  M01S05120.msm     +++| CLE      SPACE  4,10
05747  M01S05121.msm     +++|**        CLE - CHECK LABEL ERROR.
05748  M01S05122.msm     +++|*
05749  M01S05123.msm     +++|*         ENTRY  (A) .LT. 0 IF MASS STORAGE ERROR.
05750  M01S05124.msm     +++|*                    = 1 IF ERROR IN *DIT*.
Line S05125 Modification History
M01 (Added by) msm
M02 (Updated by) ns2547
Seq #  *Modification Id* Act 
----------------------------+
05751  M02S05125.ns2547  ---|*                (T3) = *STNV* IF NON-STANDARD LABEL READ.
05752  M01S05126.msm     +++|*
05753  M01S05127.msm     +++|*         EXIT   (A) = ERROR CODE FOR MST.
05754  M01S05128.msm     +++|*                    .LT. 0 IF FULL TRACK RETRY IN ORDER.
05755  M01S05129.msm     +++|*
05756  M01S05130.msm     +++|*         CALLS  CME.
05757  M01S05131.msm     +++|
05758  M01S05132.msm     +++|
05759  M01S05133.msm     +++| CLE1     SBN    1
05760  M01S05134.msm     +++|          ZJN    CLE2        IF ERROR IN *DIT*
Line S05135 Modification History
M01 (Added by) msm
M02 (Updated by) ns2547
Seq #  *Modification Id* Act 
----------------------------+
05761  M02S05135.ns2547  ---|          LDD    T3
Line S05136 Modification History
M01 (Added by) msm
M02 (Updated by) ns2547
Seq #  *Modification Id* Act 
----------------------------+
05762  M02S05136.ns2547  ---|          NJN    CLEX        IF NON-STANDARD LABEL
05763  M01S05137.msm     +++|          LCN    0
05764  M01S05138.msm     +++| CLE2     LMN    STCE        RETURN *CONFIGURATION ERROR*
05765  M01S05139.msm     +++|
05766  M01S05140.msm     +++| CLE      SUBR               ENTRY/EXIT
05767  M01S05141.msm     +++|          PJN    CLE1        IF NOT MASS STORAGE ERROR
05768  M01S05142.msm     +++|          RJM    CME
05769  M01S05143.msm     +++|          UJN    CLEX        RETURN
05770  M01S05144.msm     +++| CME      SPACE  4,15
05771  M01S05145.msm     +++|**        CME - CHECK MASS STORAGE ERROR.
05772  M01S05146.msm     +++|*
05773  M01S05147.msm     +++|*         ENTRY  (T3) = (RDCT).
05774  M01S05148.msm     +++|*                (SN) = LABEL SECTOR NUMBER.
05775  M01S05149.msm     +++|*                (FN - FN+4) = EST ENTRY.
05776  M01S05150.msm     +++|*
05777  M01S05151.msm     +++|*         EXIT   (A) = 0 IF RETRY IN ORDER.
05778  M01S05152.msm     +++|*                    = ERROR CODE FOR MST.
05779  M01S00001.msm36   +++|*                     .LT. 0, IF PARITY ERROR ENCOUNTERED.
05780  M01S05153.msm     +++|*                TO *CUD2* IF DRIVER DETECTED *DOWN* CONDITION.
05781  M01S05154.msm     +++|*                TO *RDL1* IF NON-REMOVABLE DEVICE NOT READY.
05782  M01S05155.msm     +++|*
05783  M01S05156.msm     +++|*         USES   CM - CM+4.
05784  M01S05157.msm     +++|*
05785  M01S00010.ns2547  +++|*         CALLS  SDU.
05786  M01S00011.ns2547  +++|*
05787  M01S05158.msm     +++|*         MACROS SMSTF.
05788  M01S05159.msm     +++|
05789  M01S05160.msm     +++|
05790  M01S05161.msm     +++| CME5     LDD    FN          CHECK EQUIPMENT STATUS
05791  M01S00001.msm45   +++| CMEB     EQU    *-1
05792  M01S00002.msm45   +++|*         UJN    CME8        (*CMS* CALL)
05793  M01S05162.msm     +++|          SHN    21-10
05794  M01S05163.msm     +++|          PJP    RDL1        IF NON-REMOVABLE DEVICE
05795  M01S05164.msm     +++|          LDD    SN
05796  M01S05165.msm     +++|          NJN    CME7        IF NOT FIRST UNIT OF EQUIPMENT
05797  M01S05166.msm     +++|          STD    RE
Line S05167 Modification History
M01 (Added by) msm
M02 (Updated by) ns2547
Seq #  *Modification Id* Act 
----------------------------+
05798  M02S05167.ns2547  ---| CME7     SMSTF  LUNL        SET UNLOAD REQUESTED
05799  M01S00012.ns2547  +++| CME7     RJM    SDU         SET DEVICE UNLOADED
05800  M01S05168.msm     +++| CMEA     EQU    CME7
05801  M01S05169.msm     +++|*         UJN    CME8        (*CMS* CALL)
Line S05170 Modification History
M01 (Added by) msm
M02 (Updated by) ns2547
Seq #  *Modification Id* Act 
----------------------------+
05802  M02S05170.ns2547  ---|          SMSTF  LDUL
Line S05171 Modification History
M01 (Added by) msm
M02 (Updated by) ns2547
Seq #  *Modification Id* Act 
----------------------------+
05803  M02S05171.ns2547  ---|          LDD    FN          CHECK EQUIPMENT STATUS
Line S05172 Modification History
M01 (Added by) msm
M02 (Updated by) ns2547
Seq #  *Modification Id* Act 
----------------------------+
05804  M02S05172.ns2547  ---|          LPN    20
Line S05173 Modification History
M01 (Added by) msm
M02 (Updated by) ns2547
Seq #  *Modification Id* Act 
----------------------------+
05805  M02S05173.ns2547  ---|          ZJN    CME8        IF NOT INDEPENDENT SHARED DEVICE
Line S05174 Modification History
M01 (Added by) msm
M02 (Updated by) ns2547
Seq #  *Modification Id* Act 
----------------------------+
05806  M02S05174.ns2547  ---|          SMSTF  LPTU
Line S05175 Modification History
M01 (Added by) msm
M02 (Updated by) ns2547
Seq #  *Modification Id* Act 
----------------------------+
05807  M02S05175.ns2547  ---|          CMSTF  GPRS
05808  M01S05176.msm     +++| CME8     LDN    STNR        RETURN *NOT READY*
05809  M01S05177.msm     +++|
05810  M01S05178.msm     +++| CME      SUBR               ENTRY/EXIT
05811  M01S05179.msm     +++|          LDD    T3
05812  M01S05180.msm     +++|          ZJN    CMEX        IF FLAWED TRACK
05813  M01S05181.msm     +++|          LPN    77
05814  M01S05182.msm     +++|          LMN    NRDE
05815  M01S05183.msm     +++|          ZJN    CME5        IF NOT READY
05816  M01S05184.msm     +++|          LMN    LNRE&NRDE
05817  M01S05185.msm     +++|          ZJP    CUD2        IF DEVICE DOWN
Line S05186 Modification History
M01 (Added by) msm
M02 (Updated by) msm36
Seq #  *Modification Id* Act 
----------------------------+
05818  M02S05186.msm36   ---|          LDN    STDE
05819  M01S00002.msm36   +++|          LMN    PARE&LNRE
05820  M01S00003.msm36   +++|          NJN    CME2        IF NOT A PARITY ERROR
05821  M01S00004.msm36   +++|          LCN    PARE
05822  M01S00005.msm36   +++|          UJN    CMEX        EXIT WITH ERROR STATUS
05823  M01S00006.msm36   +++|
05824  M01S00007.msm36   +++| CME2     LDN    STDE
05825  M01S05187.msm     +++|          UJN    CMEX        RETURN *DEVICE ERROR*
05826  M01S05188.msm     +++| CUC      SPACE  4,10
05827  M01S05189.msm     +++|**        CUC - COMPARE UPDATE COUNTS.
05828  M01S05190.msm     +++|*
Line S05191 Modification History
M01 (Added by) msm
M02 (Updated by) ns2547
Seq #  *Modification Id* Act 
----------------------------+
05829  M02S05191.ns2547  ---|*         ENTRY  (T7) = SECTOR NUMBER OF LABEL READ.
05830  M01S00013.ns2547  +++|*         ENTRY  (T5) = EST ORDINAL.
05831  M01S00014.ns2547  +++|*                (T7) = SECTOR NUMBER OF LABEL READ.
05832  M01S05192.msm     +++|*                (FN - FN+4) = *EQDE* WORD OF EST ENTRY.
05833  M01S05193.msm     +++|*                (BFMS) = LABEL SECTOR.
05834  M01S05194.msm     +++|*                (RUCA) = UPDATE COUNT FROM LAST TRT SECTOR.
05835  M01S05195.msm     +++|*
05836  M01S05196.msm     +++|*         EXIT   (A) = 0 IF COUNTS MATCH.
05837  M01S00015.ns2547  +++|*                (RG) = 0 IF OPERATOR ENTERED *GO*.
05838  M01S05197.msm     +++|*
Line S05198 Modification History
M01 (Added by) msm
M02 (Updated by) ns2547
Seq #  *Modification Id* Act 
----------------------------+
05839  M02S05198.ns2547  ---|*         CALLS  CLC, GAS.
05840  M01S00016.ns2547  +++|*         CALLS  CLC, GAS, SOM, WOC.
05841  M01S05199.msm     +++|
05842  M01S05200.msm     +++|
05843  M01S05201.msm     +++|*         COMPARE UPDATE COUNT FROM MST WITH THAT AT END OF TRT.
05844  M01S05202.msm     +++|
05845  M01S05203.msm     +++| CUC3     LDM    N4SS+5*SDGL+2  COMPARE UPDATE COUNTS
05846  M01S05204.msm     +++|          LMM    RUCA+2
05847  M01S05205.msm     +++|          NJN    CUC2        IF NO MATCH
05848  M01S05206.msm     +++|          LDM    N4SS+5*SDGL+3
05849  M01S05207.msm     +++|          LMM    RUCA+3
05850  M01S05208.msm     +++|          NJN    CUC2        IF NON-MATCHING COUNTS
05851  M01S05209.msm     +++|          LDM    N4SS+5*SDGL+4
05852  M01S05210.msm     +++|          LMM    RUCA+4
05853  M01S05211.msm     +++|          SCN    77
05854  M01S05212.msm     +++|          NJN    CUC2        IF NON-MATCHING COUNTS
05855  M01S05213.msm     +++|          RJM    CLC
05856  M01S05214.msm     +++|          LMM    CKSS
05857  M01S05215.msm     +++|          NJN    CUC2        IF INCORRECT LABEL CHECKSUM
05858  M01S05216.msm     +++|
05859  M01S05217.msm     +++| CUC      SUBR               ENTRY/EXIT
05860  M01S05218.msm     +++|          LDD    FN
05861  M01S05219.msm     +++|          SHN    21-6
05862  M01S05220.msm     +++|          PJN    CUC1        IF DEVICE AVAILABLE
05863  M01S05221.msm     +++|          LDM    LLSS
05864  M01S05222.msm     +++|          SBN    2
05865  M01S05223.msm     +++|          PJN    CUC3        IF NEW LABEL
05866  M01S05224.msm     +++| CUC1     LDN    0
05867  M01S05225.msm     +++|          UJN    CUCX        RETURN
05868  M01S05226.msm     +++|
05869  M01S05227.msm     +++| CUC2     LDD    T7
05870  M01S05228.msm     +++|          NJN    CUCX        IF ALTERNATE LABEL
05871  M01S00017.ns2547  +++|          LDC    CUCA        SET EST ORDINAL IN MESSAGE
05872  M01S00018.ns2547  +++|          RJM    SOM
05873  M01S00019.ns2547  +++|*         LDC    CUCA        WAIT ON OPERATOR INPUT
05874  M01S00020.ns2547  +++|          RJM    WOC
05875  M01S00021.ns2547  +++|          NJN    CUCX        IF OPERATOR ENTERED *PAUSE*
05876  M01S00022.ns2547  +++|          STD    RG
05877  M01S05229.msm     +++|          RJM    GAS         GET ALTERNATE LABEL SECTOR
05878  M01S05230.msm     +++|          STD    T7
05879  M01S05231.msm     +++|          LJM    RLS2        READ ALTERNATE LABEL
05880  M01S00023.ns2547  +++|
05881  M01S00024.ns2547  +++|
05882  M01S00025.ns2547  +++| CUCA     DATA   C*EQXXX, TABLES INCONSISTENT.*
05883  M01S05232.msm     +++| CUD      SPACE  4,15
05884  M01S05233.msm     +++|**        CUD - CHECK UNAVAILABLE DEVICE.
05885  M01S05234.msm     +++|*
05886  M01S05235.msm     +++|*         ENTRY  (T5) = EST ORDINAL.
05887  M01S05236.msm     +++|*                (FN - FN+4) = EST ENTRY.
05888  M01S05237.msm     +++|*                (FS - FS+4) = *STLL* WORD OF MST.
05889  M01S05238.msm     +++|*
05890  M01S05239.msm     +++|*         EXIT   TO *RDLX* IF UNLOAD REQUESTED.
05891  M01S05240.msm     +++|*                          IF DEVICE OFF.
05892  M01S05241.msm     +++|*                          IF DEADSTART INITIALIZE.
05893  M01S05242.msm     +++|*
Proceed to Part 5
cdc/nos2.source/opl.opl871/deck/msm.004.txt ยท Last modified: by 127.0.0.1