User Tools

Site Tools


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

Deck MSM Part 009

30 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
Line S08377 Modification History
M01 (Added by) msm
M02 (Updated by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
10788  M02S08377.ns2552  ---|          LMC    1002
Line S08378 Modification History
M01 (Added by) msm
M02 (Updated by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
10789  M02S08378.ns2552  ---|          ZJN    CTT2        IF DEVICE ACCESSED PREVIOUSLY
Line S00095 Modification History
M01 (Added by) ns2552
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
10790  M02S00095.283l840 ---| CTT      SUBR   POV         ENTRY/EXIT
Line S00096 Modification History
M01 (Added by) ns2552
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
10791  M02S00096.283l840 ---|          ERRNZ  RDG+1-CTTX  CODE DEPENDS ON VALUE
10792  M01S01398.283l840 +++| CTT      SUBR               ENTRY/EXIT
10793  M01S00097.ns2552  +++|          RJM    PTA
10794  M01S08379.msm     +++|          LDN    0           SET TRT WORD INDEX
10795  M01S08380.msm     +++|          STD    T6
10796  M01S08381.msm     +++|          LDD    FN+4        READ *TDGL*
10797  M01S08382.msm     +++|          SHN    3
10798  M01S08383.msm     +++|          ADK    TDGL
10799  M01S08384.msm     +++|          CRD    CN
10800  M01S08385.msm     +++| CTT1     LDD    RA          READ BUFFER WORD
10801  M01S08386.msm     +++|          SHN    6
10802  M01S08387.msm     +++|          ADD    CA
10803  M01S08388.msm     +++|          ADD    T6
10804  M01S08389.msm     +++|          CRD    CM
10805  M01S08390.msm     +++|          RJM    STA         SET FWA OF TRT
10806  M01S08391.msm     +++|          ADD    T6
10807  M01S08392.msm     +++|          CWD    CM
10808  M01S08393.msm     +++|          AOD    T6          ADVANCE WORD
10809  M01S08394.msm     +++|          LMD    CN+2
10810  M01S08395.msm     +++|          NJN    CTT1        LOOP TO END OF TRT
Line S08396 Modification History
M01 (Added by) msm
M02 (Updated by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
10811  M02S08396.ns2552  ---| CTT2     RJM    RMR         READ MRT AND COPY TO CM
Line S08397 Modification History
M01 (Added by) msm
M02 (Updated by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
10812  M02S08397.ns2552  ---|          UJN    CTTX
10813  M01S00098.ns2552  +++|*         LDN    0
10814  M01S00099.ns2552  +++|          UJN    CTTX        RETURN
10815  M01S08398.msm     +++| EMT      TITLE  ENTER MST PARAMETERS FROM LABEL.
10816  M01S08399.msm     +++|**        EMT - ENTER MST PARAMETERS FROM LABEL.
10817  M01S08400.msm     +++|*
10818  M01S08401.msm     +++|*         ENTRY  (FN - FN+4) = EST ENTRY.
10819  M01S08402.msm     +++|*                (FS - FS+4) = STLL WORD.
10820  M01S08403.msm     +++|*                (T5) = EST ORDINAL.
10821  M01S08404.msm     +++|*                (RS) = RECOVERY STATUS.
10822  M01S08405.msm     +++|*                (MBUF) = LABEL MST.
10823  M01S08406.msm     +++|*
10824  M01S08407.msm     +++|*         EXIT   MST UPDATED TO REFLECT DEVICE LOADED.
10825  M01S08408.msm     +++|*                EST UPDATED TO REFLECT DEVICE LOADED.
10826  M01S08409.msm     +++|*                DEVICE SET AVAILABLE.
10827  M01S08410.msm     +++|*
10828  M01S08411.msm     +++|*         USES   T1, T2, CM - CM+4, CN - CN+4.
10829  M01S08412.msm     +++|*
10830  M01S08413.msm     +++|*         MACROS MONITOR, SFA.
10831  M01S08414.msm     +++|
10832  M01S08415.msm     +++|
10833  M01S08416.msm     +++| EMT      SUBR               ENTRY/EXIT
10834  M01S08417.msm     +++|          LDD    FN
10835  M01S08418.msm     +++|          LPC    7667
10836  M01S08419.msm     +++| EMTB     EQU    *-1
10837  M01S08420.msm     +++|*         LPC    7767        (*CMS* CALL)
10838  M01S08421.msm     +++|          STD    FN
10839  M01S08422.msm     +++|          LDD    FN+4        FETCH MST DRIVER WORD
10840  M01S08423.msm     +++|          SHN    3
10841  M01S08424.msm     +++|          ADN    MDGL
10842  M01S08425.msm     +++|          CRD    CM
10843  M01S08426.msm     +++|          LDD    CM          RETAIN *R* STATUS AND DAT INDEX
10844  M01S08427.msm     +++|          LPC    4377
10845  M01S08428.msm     +++|          STD    CM
10846  M01S08429.msm     +++|          LDN    0
10847  M01S08430.msm     +++|          STD    T2
10848  M01S08431.msm     +++|          STM    MBUF+5*NVGL+4  CLEAR UNITS RESERVED TO *NVE*
10849  M01S08432.msm     +++|          LDD    RS
10850  M01S08433.msm     +++|          NJN    EMT1        IF RECOVERY SELECTED
10851  M01S08434.msm     +++|          STM    MBUF+5*STLL+3  CLEAR ACTIVE USER COUNT
10852  M01S08435.msm     +++|          STM    MBUF+5*DULL+1  CLEAR PF INTERLOCK AND COUNT
10853  M01S08436.msm     +++|          STM    MBUF+5*DULL+3  CLEAR SYSTEM TABLE TRACK
10854  M01S08437.msm     +++|          STM    MBUF+5*DULL+4  CLEAR ACTIVE USER COUNT
10855  M01S08438.msm     +++| EMT1     LDD    RE          CLEAR UNAVAILABLE STATUS
10856  M01S08439.msm     +++|          LPC    7677
10857  M01S08440.msm     +++|          STD    RE
10858  M01S08441.msm     +++|          LPN    2
10859  M01S08442.msm     +++|          NJN    EMT3        IF DEVICE ACCESSED PREVIOUSLY
10860  M01S08443.msm     +++|          LDD    RS
10861  M01S08444.msm     +++|          NJN    EMT2        IF RECOVERY DEADSTART
10862  M01S08445.msm     +++|          LDM    MBUF+5*ACGL+3  SAVE *IQFT* TRACK
10863  M01S08446.msm     +++|          STD    T2
10864  M01S08447.msm     +++|          LDN    0           CLEAR *IQFT* POINTER
10865  M01S08448.msm     +++|          STM    MBUF+5*ACGL+3
10866  M01S00001.ns2783  +++|          LDM    MBUF+5*ACGL+0  CLEAR *DAS* PARITY DEVICE ACCESS FLAGS
10867  M01S00002.ns2783  +++|          SCN    17
10868  M01S00003.ns2783  +++|          STM    MBUF+5*ACGL+0
10869  M01S00004.ns2783  +++|          LDD    FN+3        CHECK DEVICE TYPE
10870  M01S00005.ns2783  +++|          LMC    2RDE
10871  M01S00006.ns2783  +++|          ZJN    EMT2        IF *DE* DEVICE
10872  M01S00007.ns2783  +++|          LMN    2RDP&2RDE
10873  M01S00008.ns2783  +++|          ZJN    EMT2        IF *DP* DEVICE
10874  M01S00009.ns2783  +++|          LDN    0           CLEAR *DAS* PARITY DEVICE FIELDS
10875  M01S00010.ns2783  +++|          STM    MBUF+5*ACGL+1
10876  M01S08449.msm     +++| EMT2     LDD    FN+4        STORE DEVICE ACTIVITY WORD
10877  M01S08450.msm     +++|          SHN    3
10878  M01S08451.msm     +++|          ADN    ACGL
10879  M01S08452.msm     +++|          CWM    MBUF+5*ACGL,ON
10880  M01S08453.msm     +++| EMT3     LDM    MBUF+5*STLL+3  RETAIN ACTIVE USER COUNT
10881  M01S08454.msm     +++|          STD    FS+3
10882  M01S08455.msm     +++|          LDM    MBUF+5*MDGL SET *X* AND 16-WORD PFC STATUS FROM LABEL
10883  M01S08456.msm     +++|          LPC    3000
10884  M01S08457.msm     +++|          RAD    CM
10885  M01S08458.msm     +++|          LDD    FN          SET MACHINE INDEX FOR DEVICE
10886  M01S08459.msm     +++|          SHN    21-4
10887  M01S08460.msm     +++|          MJN    EMT4        IF ISD
10888  M01S08461.msm     +++| EMTA     LDN    0           (MACHINE INDEX - 1)
10889  M01S08462.msm     +++|          STM    MBUF+5*DULL+2
10890  M01S08463.msm     +++| EMT4     LDD    FN+4        STORE ALLOCATION AND DEVICE DESCRIPTION
10891  M01S08464.msm     +++|          SHN    3
10892  M01S08465.msm     +++|          ADN    ALGL
10893  M01S08466.msm     +++|          ERRNZ  PFGL-ALGL-1 ADJUST IF *PFGL* POSITION CHANGES
10894  M01S08467.msm     +++|          ERRNZ  PUGL-ALGL-2 ADJUST IF *PUGL* POSITION CHANGES
10895  M01S08468.msm     +++|          CWM    MBUF+5*ALGL,TR
10896  M01S08469.msm     +++|          ADK    MDGL-ALGL-3 STORE DRIVER WORD
10897  M01S08470.msm     +++|          CWD    CM
Line S08471 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
10898  M02S08471.283l840 ---|          ADN    NVGL-MDGL
10899  M01S01399.283l840 +++|          LDD    FN+4        PRESERVE BAT ADDRESS
10900  M01S01400.283l840 +++|          SHN    3
10901  M01S01401.283l840 +++|          ADN    NVGL
10902  M01S01402.283l840 +++|          CRD    CM
10903  M01S01403.283l840 +++|          LDD    CM+1
10904  M01S01404.283l840 +++|          STM    MBUF+5*NVGL+1
10905  M01S01405.283l840 +++|          LDD    CM+2
10906  M01S01406.283l840 +++|          STM    MBUF+5*NVGL+2
10907  M01S01407.283l840 +++|          LDD    FN+4        STORE BAT PARAMETERS
10908  M01S01408.283l840 +++|          SHN    3
10909  M01S01409.283l840 +++|          ADN    NVGL
10910  M01S08472.msm     +++|          ERRNZ  NVGL+1-ISGL CODE DEPENDS ON VALUE
10911  M01S08473.msm     +++|          ERRNZ  ISGL+1-I2GL CODE DEPENDS ON VALUE
10912  M01S08474.msm     +++|          CWM    MBUF+5*NVGL,TR
10913  M01S08475.msm     +++|          ADN    DULL-NVGL-3 STORE DEVICE USAGE INFORMATION
10914  M01S08476.msm     +++|          CWM    MBUF+5*DULL,ON
10915  M01S08477.msm     +++|          CWD    FS          STORE DEVICE STATUS
10916  M01S08478.msm     +++|          SFA    EST,T5      SET EQUIPMENT AVAILABLE IN EST
10917  M01S08479.msm     +++|          ADK    EQDE
10918  M01S08480.msm     +++|          CWD    FN
10919  M01S08481.msm     +++|          LDD    T2
10920  M01S08482.msm     +++|          ZJN    EMT5        IF NO *IQFT*
10921  M01S08483.msm     +++|          STD    CM+2
10922  M01S08484.msm     +++|          LDD    T5          RELEASE *IQFT* TRACK CHAIN
10923  M01S08485.msm     +++|          STD    CM+1
10924  M01S08486.msm     +++|          MONITOR  DTKM
10925  M01S08487.msm     +++| EMT5     LJM    EMTX        RETURN
10926  M01S08488.msm     +++| ETT      TITLE  EDIT TRT.
10927  M01S08489.msm     +++|**        ETT - EDIT TRACK TABLE.
10928  M01S08490.msm     +++|*
10929  M01S08491.msm     +++|*         ENTRY  (CA) = ADDRESS OF CM BUFFER CONTAINING TRT.
10930  M01S08492.msm     +++|*                (FN - FN+4) = EST ENTRY.
10931  M01S08493.msm     +++|*                (MBUF) = LABEL MST.
10932  M01S08494.msm     +++|*
10933  M01S08495.msm     +++|*         EXIT   (A) = 0 IF COPY SUCCESSFUL.
10934  M01S08496.msm     +++|*                (A) .LT. 0 IF ERROR IN EDITING.
10935  M01S08497.msm     +++|*                ALL NON-PRESERVED FILE CHAINS RELEASED.
10936  M01S08498.msm     +++|*
10937  M01S08499.msm     +++|*         USES   T1, T2, T6, T7, P1, CM - CM+4.
10938  M01S08500.msm     +++|*
10939  M01S08501.msm     +++|*         CALLS  PTA, RTC, STF.
10940  M01S08502.msm     +++|
10941  M01S08503.msm     +++|
10942  M01S08504.msm     +++| ETT      SUBR               ENTRY/EXIT
Line S08505 Modification History
M01 (Added by) msm
M02 (Updated by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
10943  M02S08505.ns2552  ---|          LDD    RE          CHECK SHARED DEVICE STATUS
Line S08506 Modification History
M01 (Added by) msm
M02 (Updated by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
10944  M02S08506.ns2552  ---|          LPC    1002
Line S08507 Modification History
M01 (Added by) msm
M02 (Updated by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
10945  M02S08507.ns2552  ---|          LMC    1002
Line S08508 Modification History
M01 (Added by) msm
M02 (Updated by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
10946  M02S08508.ns2552  ---|          ZJN    ETTX        IF SHARED DEVICE ACCESSED PREVIOUSLY
10947  M01S08509.msm     +++|          LDD    FN+4        GET TRT LENGTH
10948  M01S08510.msm     +++|          SHN    3
10949  M01S08511.msm     +++|          ADK    TDGL
10950  M01S08512.msm     +++|          CRD    CM
10951  M01S08513.msm     +++|          LDD    CM+2        SET TRT LENGTH
10952  M01S08514.msm     +++|          STD    P1
10953  M01S08515.msm     +++|          RJM    PTA         PRESET FWA OF TRT
10954  M01S08516.msm     +++|          LDN    0           CLEAR WORD AND BYTE INDEX
10955  M01S08517.msm     +++|          STD    T6
10956  M01S08518.msm     +++|          STD    T7
10957  M01S08519.msm     +++|          STM    MBUF+5*ACGL+2  CLEAR PRESERVED FILE COUNT
10958  M01S08520.msm     +++| ETT1     LDD    RA          READ BUFFER WORD
10959  M01S08521.msm     +++|          SHN    6
10960  M01S08522.msm     +++|          ADD    CA
10961  M01S08523.msm     +++|          ADD    T6
10962  M01S08524.msm     +++|          CRD    CM
10963  M01S08525.msm     +++|          LDD    CM+4        SET PRESERVED FILE IDENTIFIERS
10964  M01S08526.msm     +++|          LPC    7400
10965  M01S08527.msm     +++|          STM    ETTB        SET BIT MASK
10966  M01S08528.msm     +++|          LDM    CM,T7       CHECK FOR RESERVED TRACK
10967  M01S08529.msm     +++|          LMC    3777
10968  M01S08530.msm     +++|          NJN    ETT2        IF NOT FLAWED TRACK
10969  M01S08531.msm     +++|          RJM    STF         SET TRACK FLAW
10970  M01S08532.msm     +++|          UJN    ETT3        ADVANCE BYTE INDEX
10971  M01S08533.msm     +++|
10972  M01S08534.msm     +++| ETT2     LDM    ETTC,T7     CHECK PRESERVED FILE BIT
10973  M01S08535.msm     +++|          LPC    *
10974  M01S08536.msm     +++| ETTB     EQU    *-1
10975  M01S08537.msm     +++|          ZJN    ETT3        IF NOT PRESERVED FILE
10976  M01S08538.msm     +++|          RJM    RTC         RESERVE TRACK CHAIN
10977  M01S08539.msm     +++|          AOM    MBUF+5*ACGL+2  ADVANCE PRESERVED FILE COUNT
10978  M01S08540.msm     +++| ETT3     AOD    T7          ADVANCE BYTE INDEX
10979  M01S08541.msm     +++|          LMN    4
10980  M01S08542.msm     +++|          NJN    ETT4        IF NOT END OF TRT WORD
10981  M01S08543.msm     +++|          STD    T7
10982  M01S08544.msm     +++|          AOD    T6          ADVANCE WORD INDEX
10983  M01S08545.msm     +++|          LMD    P1
10984  M01S08546.msm     +++|          ZJN    ETT5        IF END OF BUFFER
10985  M01S08547.msm     +++| ETT4     LJM    ETT1        LOOP
10986  M01S08548.msm     +++|
10987  M01S08549.msm     +++| ETT5     LDM    MBUF+5*NVGL
10988  M01S08550.msm     +++|          ZJN    ETT7        IF NO MEDIA ERRORS RECORDED
10989  M01S08551.msm     +++|          SHN    21-1
10990  M01S08552.msm     +++|          LMD    TH          EXTRACT TRT WORD INDEX
10991  M01S08553.msm     +++|          STD    T6
10992  M01S08554.msm     +++|          SHN    1-21        FORM BYTE INDEX FROM TRACK NUMBER
10993  M01S08555.msm     +++|          STD    T7
10994  M01S08556.msm     +++|          RJM    STF         SET TRACK FLAW
10995  M01S08557.msm     +++|          NJN    ETT6        IF TRACK RESERVED
10996  M01S08558.msm     +++|          STM    MBUF+5*NVGL
10997  M01S08559.msm     +++| ETT6     LDN    0
10998  M01S08560.msm     +++| ETT7     LJM    ETTX        RETURN
10999  M01S08561.msm     +++|
11000  M01S08562.msm     +++|
11001  M01S08563.msm     +++|*         TRACK RESERVATION BITS.
11002  M01S08564.msm     +++|
11003  M01S08565.msm     +++| ETTC     BSS    0
11004  M01S08566.msm     +++|          CON    4010
11005  M01S08567.msm     +++|          CON    2004
11006  M01S08568.msm     +++|          CON    1002
11007  M01S08569.msm     +++|          CON    0401
11008  M01S08570.msm     +++| RTC      TITLE  RESERVE TRACK CHAIN.
11009  M01S08571.msm     +++|**        RTC - RESERVE TRACK CHAIN.
11010  M01S08572.msm     +++|*
11011  M01S08573.msm     +++|*         ENTRY  (CA) = BUFFER ADDRESS.
11012  M01S08574.msm     +++|*                (P1) = TRT LENGTH.
11013  M01S08575.msm     +++|*                (FN - FN+4) = EST ENTRY.
11014  M01S08576.msm     +++|*                (T6) = WORD INDEX.
11015  M01S08577.msm     +++|*                (T7) = BYTE INDEX.
11016  M01S08578.msm     +++|*
Line S08579 Modification History
M01 (Added by) msm
M02 (Updated by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11017  M02S08579.ns2552  ---|*         EXIT   (A) .LT. 0 IF ERROR.
11018  M01S00100.ns2552  +++|*         EXIT   (A) = *STLK* IF LINKAGE ERROR.
11019  M01S08580.msm     +++|*                TO *ETTX* IF LINKAGE ERROR.
11020  M01S08581.msm     +++|*
11021  M01S08582.msm     +++|*         USES   T1, T2, CM - CM+4, CN - CN+4.
11022  M01S08583.msm     +++|*
11023  M01S08584.msm     +++|*         CALLS  STA.
11024  M01S08585.msm     +++|
11025  M01S08586.msm     +++|
11026  M01S08587.msm     +++| RTC      SUBR               ENTRY/EXIT
11027  M01S08588.msm     +++|          LDD    T6          SET WORD INDEX
11028  M01S08589.msm     +++|          STD    T1
11029  M01S08590.msm     +++|          LDD    T7          SET BYTE INDEX
11030  M01S08591.msm     +++|          STD    T2
11031  M01S08592.msm     +++| RTC1     LDD    T1          CHECK WORD INDEX
11032  M01S08593.msm     +++|          SBD    P1
11033  M01S08594.msm     +++|          PJN    RTC2        IF OUT OF TRT
11034  M01S08595.msm     +++|          RJM    STA         SET FWA OF TRT
11035  M01S08596.msm     +++|          ADD    T1
11036  M01S08597.msm     +++|          CRD    CN
11037  M01S08598.msm     +++|          LDM    CN,T2       CHECK TRACK LINK
11038  M01S08599.msm     +++|          ZJN    RTC3        IF CLEAR
Line S08600 Modification History
M01 (Added by) msm
M02 (Updated by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11039  M02S08600.ns2552  ---| RTC2     LCN    0           SET ERROR RETURN
11040  M01S00101.ns2552  +++| RTC2     LDN    STLK
11041  M01S08601.msm     +++|          LJM    ETTX        EXIT
11042  M01S08602.msm     +++|
11043  M01S08603.msm     +++| RTC3     LDM    CM,T2       SET NEXT LINK
11044  M01S08604.msm     +++|          STM    CN,T2
11045  M01S08605.msm     +++|          LDM    ETTC,T2     SET PROPAGATION MASK
11046  M01S08606.msm     +++|          STM    RTCB
11047  M01S08607.msm     +++|          LMC    -0          SET RESERVATION MASK
11048  M01S08608.msm     +++|          STM    RTCA
11049  M01S08609.msm     +++|          LDD    CN+4        SAVE PREVIOUS BITS
11050  M01S08610.msm     +++|          LPC    *
11051  M01S08611.msm     +++| RTCA     EQU    *-1
11052  M01S08612.msm     +++|          STD    CN+4
11053  M01S08613.msm     +++|          LDD    CM+4
11054  M01S08614.msm     +++|          LPC    *
11055  M01S08615.msm     +++| RTCB     EQU    *-1
11056  M01S08616.msm     +++|          RAD    CN+4
11057  M01S08617.msm     +++|          RJM    STA         SET FWA OF TRT
11058  M01S08618.msm     +++|          ADD    T1
11059  M01S08619.msm     +++|          CWD    CN
11060  M01S08620.msm     +++|          LDM    CN,T2       CHECK NEXT LINK
11061  M01S08621.msm     +++|          SHN    6
11062  M01S08622.msm     +++|          MJN    RTC4        IF NOT END OF TRACK CHAIN
11063  M01S08623.msm     +++|          LJM    RTCX        RETURN
11064  M01S08624.msm     +++|
11065  M01S08625.msm     +++| RTC4     SHN    12          SET WORD INDEX
11066  M01S08626.msm     +++|          LMD    TH
11067  M01S08627.msm     +++|          STD    T1
11068  M01S08628.msm     +++|          SHN    -20         SET BYTE INDEX
11069  M01S08629.msm     +++|          STD    T2
11070  M01S08630.msm     +++|          LDD    RA          READ BUFFER WORD
11071  M01S08631.msm     +++|          SHN    6
11072  M01S08632.msm     +++|          ADD    CA
11073  M01S08633.msm     +++|          ADD    T1
11074  M01S08634.msm     +++|          CRD    CM
11075  M01S08635.msm     +++|          LJM    RTC1        LOOP TO END OF CHAIN
11076  M01S08636.msm     +++| RTT      TITLE  READ TRT.
Line S08637 Modification History
M01 (Added by) msm
M02 (Updated by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11077  M02S08637.ns2552  ---|**        RTT - READ TRT INTO CM BUFFER.
11078  M01S00102.ns2552  +++|**        RTT - RECOVER TRACK RESERVATION TABLE.
11079  M01S08638.msm     +++|*
11080  M01S08639.msm     +++|*         ENTRY  (T5) = EST ORDINAL.
11081  M01S08640.msm     +++|*                (CA+1) = CM BUFFER ADDRESS FOR TRT.
11082  M01S08641.msm     +++|*                (FN - FN+4) = EST ENTRY.
11083  M01S08642.msm     +++|*
Line S08643 Modification History
M01 (Added by) msm
M02 (Updated by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11084  M02S08643.ns2552  ---|*         EXIT   (A) = 0 IF TRT LENGTH CORRECT.
11085  M01S00103.ns2552  +++|*         EXIT   (A) = 0 IF SUCCESSFUL RECOVERY.
11086  M01S00104.ns2552  +++|*                    = *STTL* IF TRT LENGTH ERROR.
11087  M01S00105.ns2552  +++|*                    = *STLK* IF TRT LINKAGE ERROR.
11088  M01S08644.msm     +++|*                (CA) = FWA OF TRT IN CM.
11089  M01S08645.msm     +++|*                (MBUF) = LABEL MST.
11090  M01S08646.msm     +++|*
11091  M01S08647.msm     +++|*         USES   P1, T1, T3, T6, T7, CN - CN+4.
11092  M01S08648.msm     +++|*
Line S08649 Modification History
M01 (Added by) msm
M02 (Updated by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11093  M02S08649.ns2552  ---|*         CALLS  RDS.
11094  M01S00106.ns2552  +++|*         CALLS  ATC, CTD, CTT, EMT, ETT, RMR, RDS.
11095  M01S08650.msm     +++|*
11096  M01S08651.msm     +++|*         MACROS ENDMS, MONITOR, SETMS.
11097  M01S08652.msm     +++|
11098  M01S08653.msm     +++|
11099  M01S00107.ns2552  +++| RTT4     NJN    RTTX        IF LENGTH ERROR
11100  M01S00108.ns2552  +++|          RJM    ETT         EDIT TRACK TABLE
11101  M01S00109.ns2552  +++| RTTA     EQU    *-1
11102  M01S00110.ns2552  +++|*         RJM    CTT         (RECOVERY DEADSTART)
11103  M01S00111.ns2552  +++|          NJN    RTTX        IF LINKAGE ERROR
11104  M01S00112.ns2552  +++| RTT5     RJM    EMT         ENTER MST PARAMETERS
11105  M01S00113.ns2552  +++|          RJM    ATC         ADJUST TRACK COUNT
11106  M01S00114.ns2552  +++| RTTB     UJN    *+2         SKIP MRT UPDATE
11107  M01S00115.ns2552  +++|          CON    RMR
11108  M01S00116.ns2552  +++|*         RJM    RMR         (RECOVERY DEADSTART)
11109  M01S00117.ns2552  +++|          RJM    CTD         COPY SHARED TABLES
11110  M01S00118.ns2552  +++|          LDN    0
11111  M01S00119.ns2552  +++|
11112  M01S08654.msm     +++| RTT      SUBR               ENTRY/EXIT
11113  M01S08655.msm     +++|          LDN    MSTL
11114  M01S08656.msm     +++|          STD    T1
11115  M01S08657.msm     +++|          LDD    RA          READ LABEL INTO MST BUFFER
11116  M01S08658.msm     +++|          SHN    6
11117  M01S08659.msm     +++|          ADD    AL
11118  M01S08660.msm     +++|          CRM    MBUF,T1
11119  M01S08661.msm     +++|          LDD    RE          CHECK ESM RESIDENT TRT
11120  M01S08662.msm     +++|          LPC    1002
11121  M01S08663.msm     +++|          LMC    1002
Line S08664 Modification History
M01 (Added by) msm
M02 (Updated by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11122  M02S08664.ns2552  ---|          ZJN    RTTX        IF DEVICE ACCESSED PREVIOUSLY
11123  M01S00120.ns2552  +++|          ZJN    RTT5        IF DEVICE ACCESSED PREVIOUSLY
11124  M01S08665.msm     +++|          SETMS  IO,DF
11125  M01S08666.msm     +++|          LDD    CA+1        SET FWA FOR TRT IN CM
11126  M01S08667.msm     +++|          STD    CA
11127  M01S08668.msm     +++|          LDM    MBUF+5*ALGL+1  SET LABEL TRACK
11128  M01S08669.msm     +++|          STD    T6
11129  M01S08670.msm     +++|          LDM    MBUF+5*DILL SET SECTOR NUMBER
11130  M01S08671.msm     +++|          ADN    FSMS
11131  M01S08672.msm     +++|          STD    T7
11132  M01S08673.msm     +++|          LDD    FN+4        SET LENGTH OF TRT
11133  M01S08674.msm     +++|          SHN    3
11134  M01S08675.msm     +++|          ADK    TDGL
11135  M01S08676.msm     +++|          CRD    CN
11136  M01S08677.msm     +++|          LDD    CN+2
11137  M01S08678.msm     +++|          STD    P1
11138  M01S08679.msm     +++| RTT1     LDC    BFMS        READ SECTOR
11139  M01S08680.msm     +++|          RJM    RDS
11140  M01S08681.msm     +++|          MJN    RTT2        IF MS ERROR
11141  M01S08682.msm     +++|          LDM    BFMS
11142  M01S08683.msm     +++|          ZJN    RTT2        IF EOF/EOI
11143  M01S08684.msm     +++|          STD    T7
11144  M01S08685.msm     +++|          LDM    BFMS+1
11145  M01S08686.msm     +++|          ZJN    RTT2        IF END OF TRT
11146  M01S08687.msm     +++|          STD    T1
11147  M01S08688.msm     +++|          LDD    P1
11148  M01S08689.msm     +++|          SBD    T1
11149  M01S08690.msm     +++|          MJN    RTT2        IF WORD COUNT > TRT SIZE
11150  M01S08691.msm     +++|          STD    P1
11151  M01S08692.msm     +++|          LDD    RA          WRITE SECTOR TO CM
11152  M01S08693.msm     +++|          SHN    6
11153  M01S08694.msm     +++|          ADD    CA
11154  M01S08695.msm     +++|          CWM    BFMS+2,T1
11155  M01S08696.msm     +++|          LDD    T1
11156  M01S08697.msm     +++|          RAD    CA
11157  M01S08698.msm     +++|          LDD    T1
11158  M01S08699.msm     +++|          SHN    -6
11159  M01S08700.msm     +++|          NJN    RTT1        IF NOT EOR
11160  M01S08701.msm     +++| RTT2     ENDMS              RELEASE CHANNEL
11161  M01S08702.msm     +++|          LDD    CA+1
11162  M01S08703.msm     +++|          STD    CA          SET FWA OF TRT IN CM
11163  M01S08704.msm     +++|          LDD    P1
Line S08705 Modification History
M01 (Added by) msm
M02 (Updated by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11164  M02S08705.ns2552  ---|          LJM    RTTX        RETURN
11165  M01S00121.ns2552  +++|          ZJN    RTT3        IF CORRECT TRT LENGTH
11166  M01S00122.ns2552  +++|          LDN    STTL
11167  M01S00123.ns2552  +++| RTT3     LJM    RTT4        COMPLETE RECOVERY
11168  M01S08706.msm     +++| STF      TITLE  SET TRACK FLAW.
11169  M01S08707.msm     +++|**        STF - SET TRACK FLAW IN TRT.
11170  M01S08708.msm     +++|*
11171  M01S08709.msm     +++|*         ENTRY  (T6) = TRT WORD INDEX.
11172  M01S08710.msm     +++|*                (T7) = BYTE INDEX.
11173  M01S08711.msm     +++|*                (P1) = TRT LENGTH.
11174  M01S08712.msm     +++|*
11175  M01S08713.msm     +++|*         EXIT   (A) = 0 IF INVALID TRACK.
11176  M01S08714.msm     +++|*
11177  M01S08715.msm     +++|*         USES   CM - CM+4.
11178  M01S08716.msm     +++|*
11179  M01S08717.msm     +++|*         CALLS  STA.
11180  M01S08718.msm     +++|
11181  M01S08719.msm     +++|
11182  M01S08720.msm     +++| STF1     LDN    0           INDICATE INVALID TRACK
11183  M01S08721.msm     +++|
11184  M01S08722.msm     +++| STF      SUBR               ENTRY/EXIT
11185  M01S08723.msm     +++|          LDD    T6
11186  M01S08724.msm     +++|          SBD    P1
11187  M01S08725.msm     +++|          PJN    STF1        IF TRACK OUT OF TRT
11188  M01S08726.msm     +++|          RJM    STA
11189  M01S08727.msm     +++|          ADD    T6          READ TRT WORD
11190  M01S08728.msm     +++|          CRD    CM
11191  M01S08729.msm     +++|          LDM    ETTC,T7     SET TRACK RESERVATION MASK
11192  M01S08730.msm     +++|          LPN    17
11193  M01S08731.msm     +++|          STD    T0
11194  M01S08732.msm     +++|          LMD    CM+4        CHECK TRACK ASSIGNMENT
11195  M01S08733.msm     +++|          SBD    T0
11196  M01S08734.msm     +++|          LMD    CM+4
11197  M01S08735.msm     +++|          NJN    STFX        IF RESERVED
11198  M01S08736.msm     +++|          LDD    T0
11199  M01S08737.msm     +++|          RAD    CM+4        SET TRACK RESERVED
11200  M01S08738.msm     +++|          LDC    3777
11201  M01S08739.msm     +++|          STM    CM,T7       SET TRACK FLAWED
11202  M01S08740.msm     +++|          RJM    STA
11203  M01S08741.msm     +++|          ADD    T6          STORE TRT WORD
11204  M01S08742.msm     +++|          CWD    CM
11205  M01S08743.msm     +++|          UJN    STFX        RETURN
11206  M01S08744.msm     +++|          TITLE  SET EQUIPMENT CONFIGURATION.
11207  M01S08745.msm     +++| AUL      SPACE  4,15
11208  M01S08746.msm     +++|**        AUL - ASSEMBLE UNIT LIST.
11209  M01S08747.msm     +++|*
11210  M01S08748.msm     +++|*         ENTRY  (UC) = REQUIRED UNIT COUNT.
11211  M01S08749.msm     +++|*                (FN - FN+4) = EST ENTRY.
11212  M01S08750.msm     +++|*                (CN - CN+4) = UNIT DESCRIPTOR WORD (DDLL).
11213  M01S08751.msm     +++|*
11214  M01S08752.msm     +++|*         EXIT   (A) = 0 IF REQUIRED UNIT COUNT SATISFIED.
11215  M01S08753.msm     +++|*                (CN - CN+4) = NEW UNIT LIST.
11216  M01S08754.msm     +++|*                (FS - FS+4) = DEVICE STATUS WORD (STLL).
11217  M01S08755.msm     +++|*
11218  M01S08756.msm     +++|*         USES   T0 - T3, CM - CM+4, FS - FS+4.
11219  M01S08757.msm     +++|
11220  M01S08758.msm     +++|
11221  M01S08759.msm     +++| AUL2     AOD    T1          ADVANCE UNITS TRANSFERED COUNT
11222  M01S08760.msm     +++|          SHN    21-0
11223  M01S08761.msm     +++|          MJN    AUL3        IF NOT CROSSING BYTE BOUNDARY
11224  M01S08762.msm     +++|          SOD    T2          DECREMENT SOURCE ADDRESS
11225  M01S08763.msm     +++| AUL3     AOD    CN          ADVANCE TOTAL UNIT COUNT
11226  M01S08764.msm     +++|          LPN    7
11227  M01S08765.msm     +++|          SHN    -1
11228  M01S08766.msm     +++|          STD    T0
11229  M01S08767.msm     +++|          LDN    CN+4        FORM DESTINATION BYTE ADDRESS
11230  M01S08768.msm     +++|          SBD    T0
11231  M01S08769.msm     +++|          STD    T3
11232  M01S08770.msm     +++|          LDI    T2          EXTRACT NEXT UNIT
11233  M01S08771.msm     +++|          SHN    14
11234  M01S08772.msm     +++|          STI    T2
11235  M01S08773.msm     +++|          SHN    -14
11236  M01S08774.msm     +++| AULA     PJN    AUL4        IF PACKING UNIT LOW
11237  M01S08775.msm     +++|*         MJN    AUL4        FALL THRU IF PACKING UNIT HIGH
11238  M01S08776.msm     +++|          SHN    6
11239  M01S08777.msm     +++|          LMI    T3          ASSEMBLE UNIT DESCRIPTOR WORD
11240  M01S08778.msm     +++|          SCN    77
11241  M01S08779.msm     +++|          LMI    T3
11242  M01S08780.msm     +++| AUL4     STI    T3
11243  M01S08781.msm     +++|          LDD    UC
11244  M01S08782.msm     +++|          LMD    CN
11245  M01S08783.msm     +++|          LPN    7
11246  M01S08784.msm     +++|          ZJN    AULX        IF REQUIRED UNIT COUNT SATISFIED
11247  M01S08785.msm     +++|          LDM    AULA        TOGGLE UNIT PACKING TRANSFER
11248  M01S08786.msm     +++|          LMD    HN
11249  M01S08787.msm     +++|          STM    AULA
11250  M01S08788.msm     +++|          SOD    CM
11251  M01S08789.msm     +++|          PJN    AUL2        IF MORE UNITS THIS EQUIPMENT
11252  M01S08790.msm     +++|
11253  M01S08791.msm     +++| AUL      SUBR               ENTRY/EXIT
11254  M01S08792.msm     +++|          LDD    FN+4
11255  M01S08793.msm     +++|          SHN    3
11256  M01S08794.msm     +++|          ADN    STLL
11257  M01S08795.msm     +++|          CRD    FS
11258  M01S08796.msm     +++|          ADN    DDLL-STLL   GET UNIT DESCRIPTOR WORD
11259  M01S08797.msm     +++|          CRD    CM
11260  M01S08798.msm     +++|          LDD    CM
11261  M01S08799.msm     +++|          LPN    7
11262  M01S08800.msm     +++|          STD    CM
11263  M01S08801.msm     +++|          LDD    CN          CHECK CURRENT UNIT COUNT
11264  M01S08802.msm     +++|          LPN    1
11265  M01S08803.msm     +++|          ZJN    AUL1        IF NEXT UNIT PACKS LOW
11266  M01S08804.msm     +++|          LDD    HN          PJNI .NOT. MJNI
11267  M01S08805.msm     +++| AUL1     LMC    MJNI+AUL4-AULA
11268  M01S08806.msm     +++|          STM    AULA        SET INITIAL PACKING TRANSFER
11269  M01S08807.msm     +++|          LDN    0           CLEAR UNITS UNPACKED
11270  M01S08808.msm     +++|          STD    T1
11271  M01S08809.msm     +++|          LDN    CM+4        SET INITIAL SOURCE ADDRESS
11272  M01S08810.msm     +++|          STD    T2
11273  M01S08811.msm     +++|          LJM    AUL3        ENTER LOOP
11274  M01S08812.msm     +++| SEC      SPACE  4,15
11275  M01S08813.msm     +++|**        SEC - SET EQUIPMENT CONFIGURATION.
11276  M01S08814.msm     +++|*
11277  M01S08815.msm     +++|*         ENTRY  (T5) = EST ORDINAL.
11278  M01S08816.msm     +++|*                (EQ) = EST ORDINAL.
11279  M01S08817.msm     +++|*                (FN - FN+4) = EST ENTRY.
11280  M01S08818.msm     +++|*
11281  M01S08819.msm     +++|*         EXIT   EST/MST SET TO ACCOMMODATE NEW CONFIGURATION.
11282  M01S08820.msm     +++|*                ALL EXCEPT FIRST EQUIPMENT IN CHAIN SET IN USE.
11283  M01S08821.msm     +++|*                (FS - FS+4) = STLL WORD FOR EQUIPMENT.
11284  M01S08822.msm     +++|*                (FN - FN+4) = EST ENTRY.
11285  M01S08823.msm     +++|*
11286  M01S08824.msm     +++|*         USES   EC, UC, CM - CM+7, CN - CN+4.
11287  M01S08825.msm     +++|*
11288  M01S08826.msm     +++|*         CALLS  AUL, SES, SSL.
11289  M01S08827.msm     +++|*
11290  M01S08828.msm     +++|*         MACROS SFA, SMSTF.
11291  M01S08829.msm     +++|
11292  M01S08830.msm     +++|
11293  M01S08831.msm     +++| SEC5     RJM    SSL         SET SECTOR LIMITS
11294  M01S08832.msm     +++|
11295  M01S08833.msm     +++| SEC      SUBR               ENTRY/EXIT
11296  M01S08834.msm     +++|          LDN    0           CLEAR MST ERROR STATUS
11297  M01S08835.msm     +++|          STD    EC
11298  M01S08836.msm     +++|          RJM    SES
11299  M01S08837.msm     +++|          LDD    FN+4        READ CONFIGURATION PARAMETERS
11300  M01S08838.msm     +++|          SHN    3
11301  M01S08839.msm     +++|          ADN    MDGL
11302  M01S08840.msm     +++|          CRD    CM+3
11303  M01S08841.msm     +++|          SBN    MDGL-PFGL
11304  M01S08842.msm     +++|          CRD    CM
11305  M01S08843.msm     +++|          ADN    STLL-PFGL
11306  M01S08844.msm     +++|          CRD    FS
11307  M01S08845.msm     +++|          ADN    DDLL-STLL
11308  M01S08846.msm     +++|          CRD    CN
11309  M01S08847.msm     +++|          LDD    CN          SAVE CURRENT UNIT COUNT
11310  M01S08848.msm     +++|          LPN    7
11311  M01S08849.msm     +++|          STD    T0
11312  M01S08850.msm     +++|          LDD    FN          CHECK EQUIPMENT STATUS
11313  M01S08851.msm     +++|          SHN    21-10
11314  M01S08852.msm     +++|          PJN    SEC5        IF NOT REMOVABLE DEVICE
11315  M01S08853.msm     +++|          LDD    CM+5
11316  M01S08854.msm     +++|          LMC    2RDI
11317  M01S08855.msm     +++|          ZJN    SEC1        IF *6DI* DRIVER
11318  M01S08856.msm     +++|          LMN    2RDJ&2RDI
11319  M01S08857.msm     +++|          ZJN    SEC1        IF *6DJ* DRIVER
11320  M01S08858.msm     +++|          LDD    CM+4        SET REQUIRED = CURRENT UNIT COUNT
11321  M01S08859.msm     +++|          LPN    7
11322  M01S08860.msm     +++|          STD    CM+4
11323  M01S08861.msm     +++|          LDD    CN
11324  M01S08862.msm     +++|          SCN    7
11325  M01S08863.msm     +++|          LMD    CM+4
11326  M01S08864.msm     +++|          STD    CN
11327  M01S08865.msm     +++| SEC1     LDD    CM+4        SET REQUIRED UNIT COUNT
11328  M01S08866.msm     +++|          LPN    7
11329  M01S08867.msm     +++|          STD    UC
11330  M01S08868.msm     +++|          SBD    T0
11331  M01S08869.msm     +++|          ZJN    SEC4        IF REQUIRED = CURRENT UNIT COUNT
11332  M01S08870.msm     +++|          MJN    SEC3        IF REQUIRED COUNT .LT. CURRENT
11333  M01S08871.msm     +++| SEC2     LDD    FS+4        SET NEXT EQUIPMENT IN CHAIN
11334  M01S08872.msm     +++|          SHN    -3
11335  M01S08873.msm     +++|          STD    T5
11336  M01S08874.msm     +++|          SFA    EST         READ NEXT EQUIPMENT EST
11337  M01S08875.msm     +++|          ADK    EQDE
11338  M01S08876.msm     +++|          CRD    FN
11339  M01S08877.msm     +++|          SMSTF  LDIU        SET DEVICE IN USE
11340  M01S08878.msm     +++|          RJM    AUL         ASSEMBLE UNIT LIST
11341  M01S08879.msm     +++|          NJN    SEC2        IF REQUIRED UNITS NOT ASSEMBLED
11342  M01S08880.msm     +++| SEC3     RAD    CN
11343  M01S08881.msm     +++|          LDD    EQ          RESTORE FIRST EQUIPMENT PARAMETERS
11344  M01S08882.msm     +++|          STD    T5
11345  M01S08883.msm     +++|          SFA    EST
11346  M01S08884.msm     +++|          ADK    EQDE
11347  M01S08885.msm     +++|          CRD    FN
11348  M01S08886.msm     +++| SEC4     LDD    FN+4
11349  M01S08887.msm     +++|          SHN    3
11350  M01S08888.msm     +++|          ADN    STLL
11351  M01S08889.msm     +++|          CRD    FS
11352  M01S08890.msm     +++|          ADN    DDLL-STLL   UPDATE UNIT DESCRIPTOR WORD
11353  M01S08891.msm     +++|          CWD    CN
11354  M01S08892.msm     +++|          LJM    SEC5        COMPLETE PROCESSING AND EXIT
11355  M01S01410.283l840 +++|          SPACE  4
11356  M01S01411.283l840 +++|          ERRNG  BFMS-*      OVERFLOW INTO BUFFER
11357  M01S01412.283l840 +++|          TITLE  PRESET.
11358  M01S01413.283l840 +++| PRS      SPACE  4,10
11359  M01S01414.283l840 +++|**        PRS - PRESET OVERLAY.
11360  M01S08893.msm     +++|
Line S08894 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11361  M02S08894.283l840 ---| MBUF     EQU    *           MST BUFFER
Line S08895 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11362  M02S08895.283l840 ---| OVL      EQU    MBUF+5*MSTL  OVERLAY ORIGIN
Line S08896 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11363  M02S08896.283l840 ---| POV      SPACE  4,10
Line S08897 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11364  M02S08897.283l840 ---|**        POV - MODIFY INSTRUCTIONS AS REQUIRED FOR CM/MMF RECOVERY.
11365  M01S08898.msm     +++|
11366  M01S01415.283l840 +++| PRS      SUBR               ENTRY/EXIT
11367  M01S08899.msm     +++|
Line S08900 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11368  M02S08900.283l840 ---| POV      LDM    MMFP
Line S08901 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11369  M02S08901.283l840 ---|          ZJN    POV1        IF DO NOT PRESET FOR MMF
11370  M01S01416.283l840 +++|*         PRESET FOR MMF PROCESSING.
11371  M01S01417.283l840 +++|
11372  M01S01418.283l840 +++|          LDM    MMFP
11373  M01S01419.283l840 +++|          ZJN    PRS1        IF DO NOT PRESET FOR MMF
11374  M01S08902.msm     +++|          LDC    MMFL        GET MMF STATUS
11375  M01S08903.msm     +++|          CRD    CM
11376  M01S08904.msm     +++|          SOD    CM+4
11377  M01S08905.msm     +++|          RAM    EMTA
Line S08906 Modification History
M01 (Added by) msm
M02 (Updated by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11378  M02S08906.ns2552  ---| POV1     LJM    RDGX        RETURN
Line S00124 Modification History
M01 (Added by) ns2552
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11379  M02S00124.283l840 ---| POV1     LDD    RS
Line S00125 Modification History
M01 (Added by) ns2552
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11380  M02S00125.283l840 ---|          ZJN    POV2        IF NOT RECOVERY DEADSTART
11381  M01S01420.283l840 +++|
11382  M01S01421.283l840 +++|*         PRESET FOR RECOVERY PROCESSING.
11383  M01S01422.283l840 +++|
11384  M01S01423.283l840 +++| PRS1     LDD    RS
11385  M01S01424.283l840 +++|          ZJN    PRSX        IF NOT RECOVERY DEADSTART
11386  M01S00126.ns2552  +++|          LDC    CTT
11387  M01S00127.ns2552  +++|          STM    RTTA        ENABLE RECOVERY PROCESSING
11388  M01S00128.ns2552  +++|          LDC    RJMI
11389  M01S00129.ns2552  +++|          STM    RTTB
Line S00130 Modification History
M01 (Added by) ns2552
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11390  M02S00130.283l840 ---| POV2     LJM    RDGX        EXIT
11391  M01S01425.283l840 +++|          UJP    PRSX        EXIT
11392  M01S01426.283l840 +++|          SPACE  4,10
11393  M01S01427.283l840 +++|          QUAL
11394  M01S00131.ns2552  +++|
Line S08907 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11395  M02S08907.283l840 ---|
Line S08908 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11396  M02S08908.283l840 ---|          QUAL
Line S08909 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11397  M02S08909.283l840 ---|
11398  M01S01428.283l840 +++| CTD      EQU    /RDG/CTD
11399  M01S01429.283l840 +++| RMR      EQU    /RDG/RMR
Line S08910 Modification History
M01 (Added by) msm
M02 (Updated by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11400  M02S08910.ns2552  ---| CTT      EQU    /RDG/CTT
Line S08911 Modification History
M01 (Added by) msm
M02 (Updated by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11401  M02S08911.ns2552  ---| EMT      EQU    /RDG/EMT
Line S08912 Modification History
M01 (Added by) msm
M02 (Updated by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11402  M02S08912.ns2552  ---| ETT      EQU    /RDG/ETT
11403  M01S08913.msm     +++| RTT      EQU    /RDG/RTT
11404  M01S08914.msm     +++| SEC      EQU    /RDG/SEC
Line S08915 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11405  M02S08915.283l840 ---| MBUF     EQU    /RDG/MBUF
11406  M01S08916.msm     +++|          SPACE  4,10
Line S08917 Modification History
M01 (Added by) msm
M02 (Updated by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
11407  M02S08917.272l774 ---|          OVERFLOW  ORDG     CHECK FOR OVERFLOW
11408  M01S00075.272l774 +++|          OVERFLOW  ORDG,EPFW  CHECK FOR OVERFLOW
Line S08918 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11409  M02S08918.283l840 ---|          TTL    MSM/4DI - DEVICE INITIALIZATION ROUTINES.
11410  M01S01430.283l840 +++|          TTL    MSM/4DH - DEVICE INITIALIZATION ROUTINES.
11411  M01S08919.msm     +++|          TITLE
Line S08920 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11412  M02S08920.283l840 ---|          QUAL   RDI
Line S08921 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11413  M02S08921.283l840 ---|          IDENT  4DI,/RDI/RDIX
11414  M01S01431.283l840 +++|          QUAL   RDH
11415  M01S01432.283l840 +++|          IDENT  4DH,/RDH/RDHX
11416  M01S08922.msm     +++|*COMMENT  MSM - DEVICE INITIALIZATION ROUTINES.
Line S08923 Modification History
M01 (Added by) msm
M02 (Updated by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
11417  M02S08923.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1978.
11418  M01S00010.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
11419  M01S08924.msm     +++| RDH      SPACE  4,10
Line S08925 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11420  M02S08925.283l840 ---|***              *4DI* CONTAINS ROUTINES UTILIZED BY *RMS*
11421  M01S01433.283l840 +++|***              *4DH* CONTAINS ROUTINES UTILIZED BY *RMS*
11422  M01S08926.msm     +++|*         IN INITIALIZING MASS STORAGE EQUIPMENTS.
11423  M01S08927.msm     +++| RDH      SPACE  4,10
11424  M01S08928.msm     +++|**        ROUTINES CALLED.
11425  M01S08929.msm     +++|*
11426  M01S08930.msm     +++|*         0PI - PRESET DRIVER TO READ/WRITE DEADSTART SECTOR.
11427  M01S08931.msm     +++|*         0TI - SET TRACK FLAWS IN TRT.
Line S08932 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11428  M02S08932.283l840 ---|          SPACE  4,10
Line S08933 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11429  M02S08933.283l840 ---|*CALL     COMPCHM
11430  M01S08934.msm     +++|          SPACE  4,10
11431  M01S08935.msm     +++|****      DIRECT LOCATION ASSIGNMENTS.
11432  M01S08936.msm     +++|
11433  M01S08937.msm     +++|
11434  M01S08938.msm     +++| PB       EQU    RG - RI+1   FORMAT PARAMETER BLOCK (3 LOCATIONS)
11435  M01S08939.msm     +++| CS       EQU    ET          CHANNEL STATUS
11436  M01S08940.msm     +++| FR       EQU    P1          FORMAT REQUIRED FLAG
11437  M01S08941.msm     +++| LC       EQU    P2          LAST CYLINDER + 1
11438  M01S08942.msm     +++|
11439  M01S08943.msm     +++|****
11440  M01S08944.msm     +++|          SPACE  4,10
11441  M01S08945.msm     +++|**        ASSEMBLY CONSTANTS.
11442  M01S08946.msm     +++|
11443  M01S08947.msm     +++|
11444  M01S08948.msm     +++| DC       EQU    11          DISK CHANNEL
11445  M01S08949.msm     +++|
11446  M01S08950.msm     +++| FCGS     EQU    12          GENERAL STATUS FUNCTION CODE
11447  M01S08951.msm     +++| FCFP     EQU    16          FORMAT PACK FUNCTION CODE
11448  M01S08952.msm     +++|
11449  M01S08953.msm     +++| FPBL     EQU    22          FORMAT PACK PARAMETER BLOCK LENGTH
11450  M01S08954.msm     +++| RDH      SPACE  4,10
Line S08955 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11451  M02S08955.283l840 ---|          ORG    OSOV
11452  M01S01434.283l840 +++|          ORG    ORDH
11453  M01S08956.msm     +++|
Line S08957 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11454  M02S08957.283l840 ---| RDI      SUBR               ENTRY/EXIT
11455  M01S01435.283l840 +++| RDH      SUBR               ENTRY/EXIT
11456  M01S08958.msm     +++|          LJM    POV         PRESET OVERLAY
11457  M01S08959.msm     +++|          TITLE  MAIN INITIALIZATION ROUTINE.
11458  M01S08960.msm     +++| IMS      SPACE  4,15
11459  M01S08961.msm     +++|**        IMS - INITIALIZE MASS STORAGE.
11460  M01S08962.msm     +++|*
11461  M01S08963.msm     +++|*         ENTRY  (EQ) = EST ORDINAL.
11462  M01S08964.msm     +++|*                (FN - FN+4) = EST ENTRY.
11463  M01S08965.msm     +++|*
11464  M01S08966.msm     +++|*         EXIT   (A) .LT. 0 IF RECOVERY INFORMATION NOT TO
11465  M01S08967.msm     +++|*                BE REWRITTEN TO CM UPON RETURN TO *MRL*.
11466  M01S08968.msm     +++|*
11467  M01S08969.msm     +++|*         ERROR  TO *HNG* IF SHARED DEVICE CONFLICT.
11468  M01S08970.msm     +++|*
11469  M01S08971.msm     +++|*         USES   CM+3 - CM+7, CN - CN+4, FS - FS+4.
11470  M01S08972.msm     +++|*
11471  M01S08973.msm     +++|*         CALLS  CSD, /RMS/CSE, IDS, UDT.
11472  M01S08974.msm     +++|*
11473  M01S08975.msm     +++|*         MACROS UJMF.
11474  M01S08976.msm     +++|
11475  M01S08977.msm     +++|
11476  M01S08978.msm     +++| IMS5     RJM    IDS         INITIALIZE DEVICE STATUS
11477  M01S08979.msm     +++|          NJN    IMSX        IF DEVICE NOT READY
11478  M01S08980.msm     +++|          UJMF   IMSX        NON MMF TRANSFER
11479  M01S08981.msm     +++|          RJM    UDT         UPDATE DAT
11480  M01S08982.msm     +++|          NJN    IMS1        IF EXTENDED MEMORY TRACK UNAVAILABLE
11481  M01S08983.msm     +++|
11482  M01S08984.msm     +++| IMS      SUBR               ENTRY/EXIT
11483  M01S08985.msm     +++|          SHN    21-4
11484  M01S08986.msm     +++|          PJN    IMSX        IF INITIALIZE NOT SELECTED
11485  M01S08987.msm     +++|          LDD    FN+4        GET FAMILY NAME/DEVICE NUMBER
11486  M01S08988.msm     +++|          SHN    3
11487  M01S08989.msm     +++|          ADN    PFGL
11488  M01S08990.msm     +++|          CRD    CN
11489  M01S08991.msm     +++|          ADN    MDGL-PFGL   GET SECTOR LIMITS
11490  M01S08992.msm     +++|          CRD    CM+3
11491  M01S08993.msm     +++|          ADN    STLL-MDGL   FETCH DEVICE STATUS
11492  M01S08994.msm     +++|          CRD    FS
11493  M01S08995.msm     +++|          RJM    /RMS/CSE    CHECK SYSTEM EQUIPMENT
11494  M01S08996.msm     +++|          UJMF   IMS5        NON MMF TRANSFER
11495  M01S08997.msm     +++|          RJM    CSD         CHECK SHARED DEVICE STATUS
11496  M01S08998.msm     +++| IMS1     NJN    IMS4        IF DAT CONFLICT
11497  M01S08999.msm     +++|          LDD    T2
11498  M01S09000.msm     +++| IMS2     ZJN    IMS5        IF DEVICE NOT DESCRIBED IN DAT
11499  M01S09001.msm     +++|          LDI    T2
11500  M01S09002.msm     +++|          LPC    -0
11501  M01S09003.msm     +++| IMSA     EQU    *-1
11502  M01S09004.msm     +++|          STI    T2
11503  M01S09005.msm     +++|          ZJN    IMS5        IF DEVICE NOT ACTIVE IN DAT
11504  M01S09006.msm     +++|          LDM    DATB+4
11505  M01S09007.msm     +++|          ZJN    IMS3        IF NON-SHARED DEVICE
11506  M01S09008.msm     +++|          LDN    CSDC-CSDB
11507  M01S09009.msm     +++| IMS3     ADC    CSDB
11508  M01S09010.msm     +++| IMS4     LJM    /RMS/HNG    DISPLAY ERROR AND HANG PP
11509  M01S09011.msm     +++|          TITLE  SUBROUTINES.
11510  M01S01436.283l840 +++| CFR      SPACE  4,20
11511  M01S01437.283l840 +++|**        CFR - CHECK FOR FORMAT REQUEST.
11512  M01S01438.283l840 +++|*
11513  M01S01439.283l840 +++|*         ENTRY  (A) = 0 IF DEADSTART SECTOR READ BY *RCS*.
11514  M01S01440.283l840 +++|*                (AM) = ALGORITHM INDEX.
11515  M01S01441.283l840 +++|*                (CS) = CHANNEL STATUS.
11516  M01S01442.283l840 +++|*                (FR) = FORMAT REQUIRED FLAG.
11517  M01S01443.283l840 +++|*                (LC) = FIRST CYLINDER OF *CTI* SPACE.
11518  M01S01444.283l840 +++|*                (T5) = EST ORDINAL.
11519  M01S01445.283l840 +++|*                (T6) = TRACK CONTAINING DEADSTART SECTOR.
11520  M01S01446.283l840 +++|*                (T7) = DEADSTART SECTOR.
11521  M01S01447.283l840 +++|*                (FN - FN+4) = EST ENTRY.
11522  M01S01448.283l840 +++|*                (FS - FS+4) = *STLL* WORD OF MST.
11523  M01S01449.283l840 +++|*
11524  M01S01450.283l840 +++|*         USES   T3.
11525  M01S01451.283l840 +++|*
11526  M01S01452.283l840 +++|*         CALLS  *4DI*.
11527  M01S01453.283l840 +++|*
11528  M01S01454.283l840 +++|*         MACROS EXECUTE.
11529  M01S01455.283l840 +++|
11530  M01S01456.283l840 +++|
11531  M01S01457.283l840 +++| CFR      SUBR               ENTRY/EXIT
11532  M01S01458.283l840 +++|          STD    T3
11533  M01S01459.283l840 +++|          LDD    FR
11534  M01S01460.283l840 +++|          NJN    CFR1        IF FORMAT REQUIRED
11535  M01S01461.283l840 +++|          LDD    FS
11536  M01S01462.283l840 +++|          SHN    21-LFPR+LFPR/12D*12D
11537  M01S01463.283l840 +++|          PJN    CFRX        IF DEVICE NOT BEING FORMATTED
11538  M01S01464.283l840 +++| CFR1     LDD    AM
11539  M01S01465.283l840 +++|          LMN    AIDC
11540  M01S01466.283l840 +++|          NJN    CFRX        IF NOT 895 DEVICE
11541  M01S01467.283l840 +++|          LDD    CS
11542  M01S01468.283l840 +++|          ZJN    CFRX        IF ALL CONCURRENT CHANNELS
11543  M01S01469.283l840 +++|          EXECUTE  4DI       FORMAT 895 DEVICE
11544  M01S01470.283l840 +++|          UJN    CFRX        RETURN
11545  M01S09012.msm     +++| CTF      SPACE  4,10
11546  M01S09013.msm     +++|**        CTF - CHECK TRACK FLAWED IN TRT.
11547  M01S09014.msm     +++|*
11548  M01S09015.msm     +++|*         ENTRY  (A) = TRACK NUMBER.
Line S09016 Modification History
M01 (Added by) msm
M02 (Updated by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
11549  M02S09016.ns2776  ---|*                (FN+4) = MST POINTER.
11550  M01S09017.msm     +++|*
11551  M01S09018.msm     +++|*         EXIT   (A) = 0 IF TRACK FLAWED.
11552  M01S09019.msm     +++|*
11553  M01S09020.msm     +++|*         USES   T0, T1, CM - CM+4.
11554  M01S09021.msm     +++|*
11555  M01S09022.msm     +++|*         CALLS  STA.
11556  M01S09023.msm     +++|
11557  M01S09024.msm     +++|
11558  M01S09025.msm     +++| CTF      SUBR               ENTRY/EXIT
11559  M01S09026.msm     +++|          LPC    3777        UNPACK TRACK
11560  M01S09027.msm     +++|          SHN    21-1        SET TRT WORD INDEX
11561  M01S09028.msm     +++|          STD    T0
11562  M01S09029.msm     +++|          SHN    1-21        SET BYTE INDEX
11563  M01S09030.msm     +++|          STD    T1
11564  M01S09031.msm     +++|          RJM    STA         SET FWA OF TRT
11565  M01S09032.msm     +++|          ADD    T0
11566  M01S09033.msm     +++|          CRD    CM
11567  M01S09034.msm     +++|          LDM    CM,T1       CHECK TRACK
11568  M01S09035.msm     +++|          LMC    3777
11569  M01S09036.msm     +++|          UJN    CTFX        RETURN
11570  M01S00007.ns2776  +++| FBT      SPACE  4,10
11571  M01S00008.ns2776  +++|**        FBT - FLAW BLOCK OF TRACKS IN TRT.
11572  M01S00009.ns2776  +++|*
11573  M01S00010.ns2776  +++|*         ENTRY  (T3) = FIRST TRACK NUMBER.
11574  M01S00011.ns2776  +++|*                (CN) = LAST TRACK NUMBER + 1.
11575  M01S00012.ns2776  +++|*                (T5) = EST ORDINAL.
11576  M01S00013.ns2776  +++|*
11577  M01S00014.ns2776  +++|*         EXIT   ALL TRACKS FLAWED IN SPECIFIED BLOCK.
11578  M01S00015.ns2776  +++|*
11579  M01S00016.ns2776  +++|*         USES   T3, CM - CM+4.
11580  M01S00017.ns2776  +++|*
11581  M01S00018.ns2776  +++|*         CALLS  CTF.
11582  M01S00019.ns2776  +++|*
11583  M01S00020.ns2776  +++|*         MACROS MONITOR.
11584  M01S00021.ns2776  +++|
11585  M01S00022.ns2776  +++|
11586  M01S00023.ns2776  +++| FBT      SUBR               ENTRY/EXIT
11587  M01S00024.ns2776  +++| FBT1     LDD    T3          CHECK TRACK FLAWED
11588  M01S00025.ns2776  +++|          RJM    CTF
11589  M01S00026.ns2776  +++|          ZJN    FBT2        IF TRACK ALREADY FLAWED
11590  M01S00027.ns2776  +++|          LDD    T5
11591  M01S00028.ns2776  +++|          STD    CM+1
11592  M01S00029.ns2776  +++|          LDD    T3
11593  M01S00030.ns2776  +++|          STD    CM+2
11594  M01S00031.ns2776  +++|          LDN    STFS        FLAW TRACK IN TRT
11595  M01S00032.ns2776  +++|          STD    CM+3
11596  M01S00033.ns2776  +++|          MONITOR  STBM
11597  M01S00034.ns2776  +++| FBT2     AOD    T3          ADVANCE TRACK NUMBER
11598  M01S00035.ns2776  +++|          LMD    CN
11599  M01S00036.ns2776  +++|          NJN    FBT1        IF NOT END OF TRACKS TO FLAW
11600  M01S00037.ns2776  +++|          UJN    FBTX        RETURN
Line S09037 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11601  M02S09037.283l840 ---| F8D      SPACE  4,10
Line S09038 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11602  M02S09038.283l840 ---|**        F8D - FORMAT 895 DEVICE.
Line S09039 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11603  M02S09039.283l840 ---|*
Line S09040 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11604  M02S09040.283l840 ---|*         ENTRY  (LC) = LAST CYLINDER + 1 TO FORMAT.
Line S09041 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11605  M02S09041.283l840 ---|*                (PB - PB+2) = FORMAT PARAMETER BLOCK.
Line S09042 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11606  M02S09042.283l840 ---|*
Line S09043 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11607  M02S09043.283l840 ---|*         USES   PB, CM - CM+4.
Line S09044 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11608  M02S09044.283l840 ---|*
Line S09045 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11609  M02S09045.283l840 ---|*         CALLS  C2D, /RMS/SEM, WNB.
Line S09046 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11610  M02S09046.283l840 ---|
Line S09047 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11611  M02S09047.283l840 ---|
Line S09048 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11612  M02S09048.283l840 ---| F8D2     LDC    DSCP*200+MS1W+2  UPDATE CYLINDER NUMBER IN MESSAGE
Line S09049 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11613  M02S09049.283l840 ---|          CWD    CM
Line S09050 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11614  M02S09050.283l840 ---|          FNC    FCFP,DC     ISSUE FORMAT FUNCTION
Line S09051 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11615  M02S09051.283l840 ---|          ACN    DC
Line S09052 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11616  M02S09052.283l840 ---|          LDN    FPBL        OUTPUT PARAMETER BLOCK
Line S09053 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11617  M02S09053.283l840 ---|          OAM    PB,DC
Line S09054 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11618  M02S09054.283l840 ---|          FJM    *,DC        WAIT TRANSMISSION COMPLETE
Line S09055 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11619  M02S09055.283l840 ---|          DCN    DC
Line S09056 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11620  M02S09056.283l840 ---|          AOD    PB          ADVANCE CYLINDER NUMBER
Line S09057 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11621  M02S09057.283l840 ---| F8D3     RJM    C2D
Line S09058 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11622  M02S09058.283l840 ---|          STD    CM+3
Line S09059 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11623  M02S09059.283l840 ---|          LDD    PB          CONVERT VALUE FOR MESSAGE
Line S09060 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11624  M02S09060.283l840 ---|          SHN    -6
Line S09061 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11625  M02S09061.283l840 ---|          RJM    C2D
Line S09062 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11626  M02S09062.283l840 ---|          STD    CM+2
Line S09063 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11627  M02S09063.283l840 ---|          RJM    WNB         WAIT NOT BUSY
Line S09064 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11628  M02S09064.283l840 ---|          LDD    PB
Line S09065 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11629  M02S09065.283l840 ---|          LMD    LC
Line S09066 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11630  M02S09066.283l840 ---|          NJN    F8D2        IF MORE CYLINDERS TO FORMAT
Line S09067 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11631  M02S09067.283l840 ---|
Line S09068 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11632  M02S09068.283l840 ---| F8D      SUBR               ENTRY/EXIT
Line S09069 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11633  M02S09069.283l840 ---|          LDD    PB+1
Line S09070 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11634  M02S09070.283l840 ---|          RJM    C2D         CONVERT UNIT NUMBER
Line S09071 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11635  M02S09071.283l840 ---|          STM    F8DA
Line S09072 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11636  M02S09072.283l840 ---|          RJM    /RMS/SEM    SET EQUIPMENT MESSAGE
Line S09073 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11637  M02S09073.283l840 ---|          LDN    1RU
Line S09074 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11638  M02S09074.283l840 ---|          STD    CM+4        INSERT UNIT DESIGNATOR
Line S09075 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11639  M02S09075.283l840 ---|          LDC    DSCP*200+MS1W+1
Line S09076 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11640  M02S09076.283l840 ---|          CWD    CM
Line S09077 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11641  M02S09077.283l840 ---|          ADN    1
Line S09078 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11642  M02S09078.283l840 ---|          CWM    F8DA,TW     CHANGE MESSAGE
Line S09079 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11643  M02S09079.283l840 ---|          SBN    2
Line S09080 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11644  M02S09080.283l840 ---|          CRD    CM
Line S09081 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11645  M02S09081.283l840 ---|          LDD    LC
Line S09082 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11646  M02S09082.283l840 ---|          NJN    F8D1        IF *CTI* COMPONENT FOUND
Line S09083 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11647  M02S09083.283l840 ---|          LDC    NTDC/2
Line S09084 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11648  M02S09084.283l840 ---|          ERRNZ  TTDC        CODE DEPENDS ON VALUE
Line S09085 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11649  M02S09085.283l840 ---|          STD    LC
Line S09086 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11650  M02S09086.283l840 ---| F8D1     LDD    PB
Line S09087 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11651  M02S09087.283l840 ---|          LJM    F8D3        FORMAT DEVICE
Line S09088 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11652  M02S09088.283l840 ---|
Line S09089 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11653  M02S09089.283l840 ---|
Line S09090 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11654  M02S09090.283l840 ---| F8DA     DATA   C*XX C0000.*
11655  M01S09091.msm     +++| IDS      SPACE  4,15
11656  M01S09092.msm     +++|**        IDS - INITIALIZE DEVICE.
11657  M01S09093.msm     +++|*
11658  M01S09094.msm     +++|*         ENTRY  (EQ) = (T5) = EST ORDINAL.
11659  M01S09095.msm     +++|*                (FN - FN+4) = EST ENTRY.
11660  M01S09096.msm     +++|*                (FS - FS+4) = STLL WORD.
11661  M01S09097.msm     +++|*
11662  M01S09098.msm     +++|*         EXIT   (A) = 0 IF DEVICE SET TO INITIALIZE.
11663  M01S09099.msm     +++|*                LABEL TRACK ASSIGNED.
11664  M01S09100.msm     +++|*
11665  M01S09101.msm     +++|*         USES   CS, T1, T3, T6, CM - CM+4, CN - CN+4.
11666  M01S09102.msm     +++|*
Line S09103 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11667  M02S09103.283l840 ---|*         CALLS  CTF, IFM, PFR, PTA, PTF, RCS, SNC.
11668  M01S01471.283l840 +++|*         CALLS  CFR, CTF, IFM, PTA, PTF, RCS, SNC.
11669  M01S09104.msm     +++|*
11670  M01S09105.msm     +++|*         MACROS ENDMS, MONITOR, SETMS, SFA, SMSTF.
11671  M01S09106.msm     +++|
11672  M01S09107.msm     +++|
11673  M01S09108.msm     +++| IDS7     LDN    0           INHIBIT FURTHER PROCESSING OF DEVICE
11674  M01S09109.msm     +++|          STD    RE
11675  M01S09110.msm     +++|          LDN    1           INDICATE DEVICE NOT INITIALIZED
11676  M01S09111.msm     +++|
11677  M01S09112.msm     +++| IDS      SUBR               ENTRY/EXIT
11678  M01S09113.msm     +++|          LDD    FN
11679  M01S09114.msm     +++|          LPN    2
11680  M01S09115.msm     +++|          NJN    IDS7        IF DEVICE OFF OR DOWN
11681  M01S09116.msm     +++|          SMSTF  LPTU        PROHIBIT TRT UPDATE BY *1RU*
11682  M01S09117.msm     +++|          RJM    PTA         PRESET FWA OF TRT
11683  M01S09118.msm     +++|          LDD    FN          CHECK EQUIPMENT TYPE
11684  M01S09119.msm     +++|          LPC    200
11685  M01S09120.msm     +++|          STM    PFTA        SET LDAM FLAG FOR *PFT* ROUTINE
11686  M01S09121.msm     +++|          ZJN    IDS1        IF NOT *LDAM* DEVICE
11687  M01S09122.msm     +++|          RJM    SNC         SELECT NIO CHANNEL
11688  M01S09123.msm     +++|          STD    CS
11689  M01S09124.msm     +++|          RJM    IFM         INTERPRET FLAW MAP
11690  M01S09125.msm     +++|          RJM    RCS         RESERVE *CTI* SPACE
Line S09126 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11691  M02S09126.283l840 ---|          RJM    PFR         PROCESS FORMAT REQUEST
11692  M01S01472.283l840 +++|          RJM    CFR         CHECK FOR FORMAT REQUEST
11693  M01S09127.msm     +++| IDS1     LDN    ZERL        REQUEST LABEL TRACK
11694  M01S09128.msm     +++|          CRD    CM
11695  M01S09129.msm     +++|          LDD    T5
11696  M01S09130.msm     +++|          STD    CM+1
11697  M01S09131.msm     +++|          MONITOR  RTCM
11698  M01S09132.msm     +++|*         LDN    0           SET SECTOR
11699  M01S09133.msm     +++|          STD    T7
11700  M01S09134.msm     +++|          LDD    CM+4        SET LABEL TRACK
11701  M01S09135.msm     +++|          STD    T6
11702  M01S09136.msm     +++|          ZJP    IDS2        IF NO TRACK ASSIGNED
11703  M01S09137.msm     +++|          STD    CM+2
11704  M01S09138.msm     +++|          LDN    SPFS        SET PRESERVED FILE STATUS
11705  M01S09139.msm     +++|          STD    CM+3
11706  M01S09140.msm     +++|          MONITOR  STBM
11707  M01S09141.msm     +++|          LDD    FN+4        READ *ALGL*
11708  M01S09142.msm     +++|          SHN    3
11709  M01S09143.msm     +++|          ADK    TDGL
11710  M01S09144.msm     +++|          CRD    CM
11711  M01S09145.msm     +++|          ADN    ALGL-TDGL
11712  M01S09146.msm     +++|          CRD    CN
11713  M01S09147.msm     +++|          LDD    CM          SET TRACK COUNT
11714  M01S09148.msm     +++|          STD    T3
11715  M01S09149.msm     +++|          LDD    T6          SET LABEL TRACK
11716  M01S09150.msm     +++|          STD    CN+1
11717  M01S09151.msm     +++|          LDD    FN+4        STORE *ALGL*
11718  M01S09152.msm     +++|          SHN    3
11719  M01S09153.msm     +++|          ADN    ALGL
11720  M01S09154.msm     +++|          CWD    CN
11721  M01S09155.msm     +++|          LDD    FN          SET DEVICE AS AVAILABLE
11722  M01S09156.msm     +++|          LPC    7667
11723  M01S09157.msm     +++|          LMN    10          SET DEVICE ACTIVE
11724  M01S09158.msm     +++|          STD    FN
11725  M01S09159.msm     +++|          LDD    RE
11726  M01S09160.msm     +++|          LPC    7677
11727  M01S09161.msm     +++|          STD    RE
11728  M01S09162.msm     +++|          SFA    EST,T5      WRITE EST ENTRY
11729  M01S09163.msm     +++|          ADK    EQDE
11730  M01S09164.msm     +++|          CWD    FN
11731  M01S09165.msm     +++|          LDC    501         BUFFER INDEX
11732  M01S09166.msm     +++|          STD    T1
11733  M01S09167.msm     +++|          LDC    LTKL-1
11734  M01S09168.msm     +++|          SBD    T6
11735  M01S09169.msm     +++|          PJN    IDS3        IF LABEL TRACK WITHIN RANGE
11736  M01S09170.msm     +++| IDS2     LDC    IDSA
11737  M01S09171.msm     +++|          LJM    /RMS/HNG    ISSUE ERROR MESSAGE AND HANG
11738  M01S09172.msm     +++|
11739  M01S09173.msm     +++|*         PREWRITE ALL POTENTIAL LABEL TRACKS THAT ARE FLAWED.
11740  M01S09174.msm     +++|
11741  M01S09175.msm     +++| IDS3     LDN    0           CLEAR SECTOR BUFFER
11742  M01S09176.msm     +++|          STM    BFMS,T1
11743  M01S09177.msm     +++|          SOD    T1
11744  M01S09178.msm     +++|          PJN    IDS3        IF MORE TO CLEAR
11745  M01S09179.msm     +++|          SHN    -7
11746  M01S09180.msm     +++|          STM    FNSS        SET FLAW INDICATOR
11747  M01S09181.msm     +++|          SETMS  IO,(SM,AR,DF)
11748  M01S09182.msm     +++|          RJM    PFT         PREWRITE LABEL TRACK
11749  M01S09183.msm     +++|          LDC    FLTK
11750  M01S09184.msm     +++|          STD    T6
11751  M01S09185.msm     +++| IDS4     LDD    T6          CHECK TRACK FLAWED
11752  M01S09186.msm     +++|          RJM    CTF
11753  M01S09187.msm     +++|          NJN    IDS5        IF NOT FLAWED
11754  M01S09188.msm     +++|          STD    T7
11755  M01S09189.msm     +++|          RJM    PFT         PREWRITE FLAWED TRACK
11756  M01S09190.msm     +++| IDS5     SOD    T3
11757  M01S09191.msm     +++|          ZJN    IDS6        IF END OF TRACKS ON DEVICE
11758  M01S09192.msm     +++|          AOD    T6
11759  M01S09193.msm     +++|          LMC    LTKL
11760  M01S09194.msm     +++|          NJN    IDS4        IF NOT ALL POSSIBLE LABEL TRACKS
11761  M01S09195.msm     +++| IDS6     ENDMS
11762  M01S09196.msm     +++|*         LDN    0
11763  M01S09197.msm     +++|          LJM    IDSX        RETURN
11764  M01S09198.msm     +++|
11765  M01S09199.msm     +++|
11766  M01S09200.msm     +++| IDSA     DATA   C*LABEL TRACK CONFLICT.*
11767  M01S09201.msm     +++| IFM      SPACE  4,15
11768  M01S09202.msm     +++|**        IFM - INTERPRET FLAW MAP.
11769  M01S09203.msm     +++|*
11770  M01S09204.msm     +++|*         ENTRY  (EQ) = (T5) = EST ORDINAL.
11771  M01S09205.msm     +++|*                (FS - FS+4) = MST STATUS WORD (STLL).
11772  M01S09206.msm     +++|*                (FN - FN+4) = EST ENTRY FOR EQUIPMENT.
11773  M01S09207.msm     +++|*                (CS) = CHANNEL STATUS.
11774  M01S09208.msm     +++|*
11775  M01S09209.msm     +++|*         EXIT   (T5) = EQUIPMENT.
11776  M01S09210.msm     +++|*                (AM) = ALGORITHM INDEX.
11777  M01S09211.msm     +++|*                FLAWS SET IN TRT FOR *LDAM* TYPE EQUIPMENT.
11778  M01S09212.msm     +++|*
11779  M01S09213.msm     +++|*         EREXIT (A) .NE. 0 IF REMOVABLE *LDAM* DEVICE NOT READY.
11780  M01S09214.msm     +++|*                TO *IDSX* IF REMOVABLE *LDAM* DEVICE NOT READY.
11781  M01S09215.msm     +++|*
11782  M01S09216.msm     +++|*         USES   T3, CM - CM+4, FS - FS+1.
11783  M01S09217.msm     +++|*
11784  M01S09218.msm     +++|*         CALLS  EXR, SDR, *0TI*, *0TJ*.
11785  M01S09219.msm     +++|*
11786  M01S09220.msm     +++|*         MACROS EXECUTE.
11787  M01S09221.msm     +++|
11788  M01S09222.msm     +++|
11789  M01S09223.msm     +++| IFM2     LDD    FN+3        GET UNIT COUNT
11790  M01S09224.msm     +++|          SHN    3
11791  M01S09225.msm     +++|          ADN    DDLL
11792  M01S09226.msm     +++|          CRD    CM
11793  M01S09227.msm     +++|          LDD    CM          SET UNIT COUNT
11794  M01S09228.msm     +++|          LPN    7
11795  M01S09229.msm     +++|          STD    T2
11796  M01S09230.msm     +++|          LDN    PRFM        REQUEST FLAW MAP PROCESSING
11797  M01S09231.msm     +++|          RJM    SDR         SET BUFFERED DEVICE REQUEST
11798  M01S09232.msm     +++|
11799  M01S09233.msm     +++| IFM      SUBR               ENTRY/EXIT
11800  M01S09234.msm     +++|          LDD    CS
11801  M01S09235.msm     +++|          ZJN    IFM2        IF ALL CONCURRENT CHANNELS
11802  M01S09236.msm     +++|          LDD    T5          SET EQUIPMENT PARAMETER
11803  M01S09237.msm     +++|          STM    MIPA
11804  M01S09238.msm     +++| IFM1     LDD    FN+4
11805  M01S09239.msm     +++|          SHN    3
11806  M01S09240.msm     +++|          ADN    DILL        READ ALGORITHM INDEX FROM LIST
11807  M01S09241.msm     +++|          CRD    CM
11808  M01S09242.msm     +++|          LDD    CM+4        LOAD ALGORITHM INDEX
11809  M01S09243.msm     +++|          LPN    77
11810  M01S09244.msm     +++|          STD    AM
11811  M01S09245.msm     +++|          EXECUTE 0TI,MILA   EXECUTE FLAW PROCESSOR
11812  M01S09246.msm     +++|          ZJN    IFMX        IF NO FLAWING ERRORS
11813  M01S09247.msm     +++|          LDM    RDCT
11814  M01S09248.msm     +++|          LPN    77
11815  M01S09249.msm     +++|          LMN    NRDE
11816  M01S09250.msm     +++|          NJN    IFMX        IF DEVICE READY
11817  M01S09251.msm     +++|          LDD    FN
11818  M01S09252.msm     +++|          SHN    21-10
11819  M01S09253.msm     +++|          PJN    IFM1        IF NON-REMOVABLE DEVICE
11820  M01S09254.msm     +++|          LDN    ZERL
11821  M01S09255.msm     +++|          CRD    CM
11822  M01S09256.msm     +++|          LDN    0           CLEAR INITIALIZATION REQUEST
11823  M01S09257.msm     +++|          STD    RE
11824  M01S09258.msm     +++|          STD    FS
11825  M01S09259.msm     +++|          LMN    STNR        SET NOT READY STATUS
11826  M01S09260.msm     +++|          STD    FS+1
11827  M01S09261.msm     +++|          LDD    FN+4
11828  M01S09262.msm     +++|          SHN    3
11829  M01S09263.msm     +++|          ADN    PFGL        CLEAR DEVICE DESCRIPTION
11830  M01S09264.msm     +++|          CWD    CM
11831  M01S09265.msm     +++|          ADN    PUGL-PFGL
11832  M01S09266.msm     +++|          CWD    CM
11833  M01S09267.msm     +++|          ADN    STLL-PUGL   STORE MST STATUS WORD
11834  M01S09268.msm     +++|          CWD    FS
11835  M01S09269.msm     +++|          LJM    IDSX        EXIT
Line S09270 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11836  M02S09270.283l840 ---| PFR      SPACE  4,20
Line S09271 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11837  M02S09271.283l840 ---|**        PFR - PROCESS FORMAT REQUEST.
Line S09272 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11838  M02S09272.283l840 ---|*
Line S09273 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11839  M02S09273.283l840 ---|*         ENTRY  (A) = 0 IF DEADSTART SECTOR READ BY *RCS*.
Line S09274 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11840  M02S09274.283l840 ---|*                (AM) = ALGORITHM INDEX.
Line S09275 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11841  M02S09275.283l840 ---|*                (CS) = CHANNEL STATUS.
Line S09276 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11842  M02S09276.283l840 ---|*                (FR) = FORMAT REQUIRED FLAG.
Line S09277 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11843  M02S09277.283l840 ---|*                (LC) = FIRST CYLINDER OF *CTI* SPACE.
Line S09278 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11844  M02S09278.283l840 ---|*                (T5) = EST ORDINAL.
Line S09279 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11845  M02S09279.283l840 ---|*                (T6) = TRACK CONTAINING DEADSTART SECTOR.
Line S09280 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11846  M02S09280.283l840 ---|*                (T7) = DEADSTART SECTOR.
Line S09281 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11847  M02S09281.283l840 ---|*                (FN - FN+4) = EST ENTRY.
Line S09282 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11848  M02S09282.283l840 ---|*                (FS - FS+4) = *STLL* WORD OF MST.
Line S09283 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11849  M02S09283.283l840 ---|*
Line S09284 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11850  M02S09284.283l840 ---|*         USES   T1, T2, T3, T4, CM - CM+4, CN - CN+4.
Line S09285 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11851  M02S09285.283l840 ---|*
Line S09286 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11852  M02S09286.283l840 ---|*         CALLS  F8D.
Line S09287 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11853  M02S09287.283l840 ---|*
Line S09288 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11854  M02S09288.283l840 ---|*         MACROS CMSTF, ENDMS, RCHAN.
Line S09289 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11855  M02S09289.283l840 ---|
Line S09290 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11856  M02S09290.283l840 ---|
Line S09291 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11857  M02S09291.283l840 ---| PFR2     STD    T2          SET INSTRUCTION ADDRESS
Line S09292 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11858  M02S09292.283l840 ---|          LDI    T2
Line S09293 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11859  M02S09293.283l840 ---|          SCN    37
Line S09294 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11860  M02S09294.283l840 ---|          LMD    T4          MODIFY INSTRUCTION
Line S09295 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11861  M02S09295.283l840 ---|          STI    T2
Line S09296 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11862  M02S09296.283l840 ---|          AOD    T1          ADVANCE LIST ADDRESS
Line S09297 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11863  M02S09297.283l840 ---| PFR3     LDI    T1
Line S09298 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11864  M02S09298.283l840 ---|          NJN    PFR2        IF NOT END OF LIST
Line S09299 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11865  M02S09299.283l840 ---|          LDD    FN+4
Line S09300 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11866  M02S09300.283l840 ---|          SHN    3
Line S09301 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11867  M02S09301.283l840 ---|          ADN    DDLL        FETCH UNIT LIST FROM MST
Line S09302 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11868  M02S09302.283l840 ---|          CRD    CN
Line S09303 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11869  M02S09303.283l840 ---|          LDC    DSCP*200+MS1W  STORE FORMATTING MESSAGE
Line S09304 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11870  M02S09304.283l840 ---|          CWM    PFRA,ON
Line S09305 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11871  M02S09305.283l840 ---|
Line S09306 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11872  M02S09306.283l840 ---|*         GENERATE PARAMETER BLOCK TO FORMAT DEVICE.
Line S09307 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11873  M02S09307.283l840 ---|
Line S09308 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11874  M02S09308.283l840 ---| PFR4     LDN    0           SET FIRST CYLINDER
Line S09309 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11875  M02S09309.283l840 ---|          STD    PB
Line S09310 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11876  M02S09310.283l840 ---|          LDD    TH          SET LARGE RECORD SIZE
Line S09311 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11877  M02S09311.283l840 ---|          STD    PB+2
Line S09312 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11878  M02S09312.283l840 ---|          LDD    CN+4        EXTRACT NEXT UNIT
Line S09313 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11879  M02S09313.283l840 ---|          SHN    14
Line S09314 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11880  M02S09314.283l840 ---|          STD    CN+4
Line S09315 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11881  M02S09315.283l840 ---|          ERRPL  4000-3*SLDC CODE DEPENDS ON VALUE
Line S09316 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11882  M02S09316.283l840 ---|          SHN    -14
Line S09317 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11883  M02S09317.283l840 ---|          LMC    1S10+3S6    APPEND MODE / OPERATION DECODE
Line S09318 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11884  M02S09318.283l840 ---|          STD    PB+1
Line S09319 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11885  M02S09319.283l840 ---|          RJM    F8D         FORMAT DEVICE
Line S09320 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11886  M02S09320.283l840 ---|          LDD    T3
Line S09321 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11887  M02S09321.283l840 ---|          ZJN    PFR7        IF DEADSTART SECTOR READ WITHOUT ERROR
Line S09322 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11888  M02S09322.283l840 ---|          LDC    885D
Line S09323 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11889  M02S09323.283l840 ---|          STD    PB          SET CYLINDER FOR DEADSTART SECTOR
Line S09324 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11890  M02S09324.283l840 ---|          ADN    1
Line S09325 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11891  M02S09325.283l840 ---|          STD    LC
Line S09326 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11892  M02S09326.283l840 ---|          LDC    502         SECTOR BUFFER INDEX
Line S09327 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11893  M02S09327.283l840 ---|          STD    PB+2
Line S09328 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11894  M02S09328.283l840 ---| PFR5     LDN    0           CLEAR SECTOR BUFFER
Line S09329 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11895  M02S09329.283l840 ---|          STM    BFMS-1,PB+2
Line S09330 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11896  M02S09330.283l840 ---|          SOD    PB+2
Line S09331 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11897  M02S09331.283l840 ---|          NJN    PFR5        IF BUFFER NOT CLEARED
Line S09332 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11898  M02S09332.283l840 ---|*         LDN    0
Line S09333 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11899  M02S09333.283l840 ---|*         STD    PB+2
Line S09334 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11900  M02S09334.283l840 ---|          RJM    F8D         FORMAT DEADSTART CYLINDER
Line S09335 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11901  M02S09335.283l840 ---|          LDC    -1S10
Line S09336 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11902  M02S09336.283l840 ---|          RAD    PB+1
Line S09337 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11903  M02S09337.283l840 ---| PFR6     SOD    PB          FORMAT PROTECTED AREA
Line S09338 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11904  M02S09338.283l840 ---|          RJM    F8D
Line S09339 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11905  M02S09339.283l840 ---|          AOD    PB+2        ADVANCE TRACK NUMBER
Line S09340 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11906  M02S09340.283l840 ---|          LMN    2
Line S09341 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11907  M02S09341.283l840 ---|          NJN    PFR6        IF MORE TRACKS TO FORMAT
Line S09342 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11908  M02S09342.283l840 ---|          LDC    BFMS+WLSF
Line S09343 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11909  M02S09343.283l840 ---|          RJM    WDS         CLEAR DEADSTART SECTOR
Line S09344 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11910  M02S09344.283l840 ---| PFR7     LDD    CN
Line S09345 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11911  M02S09345.283l840 ---|          LPN    7
Line S09346 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11912  M02S09346.283l840 ---|          SBN    1           DECREMENT UNIT COUNT
Line S09347 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11913  M02S09347.283l840 ---|          STD    CN
Line S09348 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11914  M02S09348.283l840 ---|          PJP    PFR4        IF MULTI-UNIT DEVICE
Line S09349 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11915  M02S09349.283l840 ---|          ENDMS
Line S09350 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11916  M02S09350.283l840 ---|          LDC    DSCP*200+MS1W  RESTORE RECOVERY MESSAGE
Line S09351 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11917  M02S09351.283l840 ---|          CWM    PFRB,ON
Line S09352 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11918  M02S09352.283l840 ---|          CMSTF  LFPR        CLEAR FORMAT REQUEST
Line S09353 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11919  M02S09353.283l840 ---|
Line S09354 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11920  M02S09354.283l840 ---| PFR      SUBR               ENTRY/EXIT
Line S09355 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11921  M02S09355.283l840 ---|          STD    T3
Line S09356 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11922  M02S09356.283l840 ---|          LDD    FR
Line S09357 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11923  M02S09357.283l840 ---|          NJN    PFR1        IF FORMAT REQUIRED
Line S09358 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11924  M02S09358.283l840 ---|          LDD    FS
Line S09359 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11925  M02S09359.283l840 ---|          SHN    21-LFPR+LFPR/12D*12D
Line S09360 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11926  M02S09360.283l840 ---|          PJN    PFRX        IF DEVICE NOT BEING FORMATTED
Line S09361 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11927  M02S09361.283l840 ---| PFR1     LDD    AM
Line S09362 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11928  M02S09362.283l840 ---|          LMN    AIDC
Line S09363 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11929  M02S09363.283l840 ---|          NJN    PFRX        IF NOT 895 DEVICE
Line S09364 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11930  M02S09364.283l840 ---|          STD    CM+2
Line S09365 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11931  M02S09365.283l840 ---|          LDD    CS
Line S09366 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11932  M02S09366.283l840 ---|          ZJN    PFRX        IF ALL CONCURRENT CHANNELS
Line S09367 Modification History
M01 (Added by) msm
M02 (Updated by) msm44
M03 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11933  M03S09367.283l840 ---|          LDD    FN+1        RESERVE CHANNEL
Line S00001 Modification History
M01 (Added by) msm44
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11934  M02S00001.283l840 ---|          LPN    77          CLEAR IMMEDIATE RETURN AND RESERVE CHANNEL
Line S09368 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11935  M02S09368.283l840 ---|          RCHAN
Line S09369 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11936  M02S09369.283l840 ---|          LDD    CM+1        SAVE CHANNEL FOR *ENDMS*
Line S09370 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11937  M02S09370.283l840 ---|          STD    T4
Line S09371 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11938  M02S09371.283l840 ---|          AOM    CHRV
Line S09372 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11939  M02S09372.283l840 ---|          LDC    CTDC        SET ADDRESS OF INSTRUCTION LIST
Line S09373 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11940  M02S09373.283l840 ---|          STD    T1
Line S09374 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11941  M02S09374.283l840 ---|          LJM    PFR3        MODIFY CHANNEL INSTRUCTIONS
Line S09375 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11942  M02S09375.283l840 ---|
Line S09376 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11943  M02S09376.283l840 ---|
Line S09377 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11944  M02S09377.283l840 ---| PFRA     DATA   10HFORMATTING
Line S09378 Modification History
M01 (Added by) msm
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11945  M02S09378.283l840 ---| PFRB     DATA   10HRECOVERING
11946  M01S09379.msm     +++| PFT      SPACE  4,15
11947  M01S09380.msm     +++|**        PFT - PREWRITE FLAWED TRACK.
11948  M01S09381.msm     +++|*
11949  M01S09382.msm     +++|*         ENTRY  (T4 - T7) = MASS STORAGE PARAMETERS.
11950  M01S09383.msm     +++|*                (PFTA) .NE. 0 IF *LDAM* DEVICE.
11951  M01S09384.msm     +++|*                DRIVER PRESET.
11952  M01S09385.msm     +++|*
11953  M01S09386.msm     +++|*         CALLS  WDS.
11954  M01S09387.msm     +++|
11955  M01S09388.msm     +++|
11956  M01S09389.msm     +++| PFT      SUBR               ENTRY/EXIT
11957  M01S09390.msm     +++| PFT2     LDC    BFMS+WCSF   WRITE SECTOR
11958  M01S09391.msm     +++|          RJM    WDS
11959  M01S09392.msm     +++|          LDC    0
11960  M01S09393.msm     +++| PFTA     EQU    *-1
11961  M01S09394.msm     +++|          ZJN    PFTX        IF NOT *LDAM* DEVICE
11962  M01S09395.msm     +++|          AOD    T7
11963  M01S09396.msm     +++|          LMM    SLM
11964  M01S09397.msm     +++|          NJN    PFT2        IF NOT END OF TRACK
11965  M01S09398.msm     +++|          UJN    PFTX        RETURN
11966  M01S09399.msm     +++| RCS      SPACE  4,15
11967  M01S09400.msm     +++|**        RCS - RESERVE *CTI* SPACE.
11968  M01S09401.msm     +++|*
11969  M01S09402.msm     +++|*         ENTRY  (EQ) = EST ORDINAL.
11970  M01S09403.msm     +++|*                (AM) = ALGORITHM INDEX.
11971  M01S09404.msm     +++|*                (FN+4) = MST POINTER.
11972  M01S09405.msm     +++|*                (CS) = CHANNELS STATUS.
11973  M01S09406.msm     +++|*
11974  M01S09407.msm     +++|*         EXIT   (A) = 0 IF DEADSTART SECTOR READ WITHOUT ERROR.
11975  M01S09408.msm     +++|*                (FR) = 0 IF FORMAT UNREQUIRED (*CIP* SPACE INTACT).
11976  M01S09409.msm     +++|*                (LC) = FIRST CYLINDER OF *CTI* SPACE.
11977  M01S09410.msm     +++|*                (T5) = EST ORDINAL.
11978  M01S09411.msm     +++|*                (T6) = TRACK CONTAINING DEADSTART SECTOR.
11979  M01S09412.msm     +++|*                (T7) = DEADSTART SECTOR.
11980  M01S09413.msm     +++|*                *CTI* SPACE FLAWED IN TRT.
11981  M01S09414.msm     +++|*
Line S09415 Modification History
M01 (Added by) msm
M02 (Updated by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
11982  M02S09415.ns2776  ---|*         USES   T3, CM - CM+4, CN - CN+4.
11983  M01S00038.ns2776  +++|*         USES   T3, T9, CM - CM+4, CN - CN+4.
11984  M01S09416.msm     +++|*
Line S09417 Modification History
M01 (Added by) msm
M02 (Updated by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
11985  M02S09417.ns2776  ---|*         CALLS  CTF, RDS, WDS, *0PI*.
11986  M01S00039.ns2776  +++|*         CALLS  FBT, RDS, WDS, *0PI*.
11987  M01S09418.msm     +++|*
Line S09419 Modification History
M01 (Added by) msm
M02 (Updated by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
11988  M02S09419.ns2776  ---|*         MACROS ENDMS, EXECUTE, MONITOR, SMSTF.
Proceed to Part 10
cdc/nos2.source/opl.opl871/deck/msm.009.txt ยท Last modified: by 127.0.0.1