User Tools

Site Tools


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

Deck MSM Part 006

30 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
10285  M00S08056.msm     +++|*         EXIT   (A) .LT. 0 IF RECOVERY INFORMATION NOT TO
10286  M00S08057.msm     +++|*                BE REWRITTEN TO CM UPON RETURN TO *MRL*.
10287  M00S08058.msm     +++|*
10288  M00S08059.msm     +++|*         CALLS  ERT, SMT, SRT, CRT.
10289  M00S08060.msm     +++|
10290  M00S08061.msm     +++|
10291  M00S08062.msm     +++| UER1     SHN    21-3+22-21+1
10292  M00S08063.msm     +++|          PJN    UER2        IF DNAP BY THIS MACHINE
10293  M00S08064.msm     +++|          LDN    STBM        CLEAN UP TRACK INTERLOCKS
10294  M00S08065.msm     +++|          RJM    ERT
10295  M00S08066.msm     +++|          LDD    RS
10296  M00S08067.msm     +++|          NJN    UER2        IF RECOVERY SELECTED
10297  M00S08068.msm     +++|          LDD    FN
10298  M00S08069.msm     +++|          SHN    21-10
10299  M00S08070.msm     +++|          MJN    UER2        IF REMOVABLE DEVICE
10300  M00S08071.msm     +++|          LDN    DTKM        CLEAN UP LOCAL FILE SPACE
10301  M00S08072.msm     +++|          RJM    ERT
10302  M00S08073.msm     +++| UER2     LDD    EQ          RESET EST ORDINAL
10303  M00S08074.msm     +++|          STD    T5
10304  M00S08075.msm     +++|          CMSTF  LUNL        FORCE EXTENDED MEMORY UPDATE OF LOCAL MST
10305  M00S08076.msm     +++|
10306  M00S08077.msm     +++| UER      SUBR               ENTRY/EXIT
10307  M00S08078.msm     +++|          SHN    21-11
10308  M00S08079.msm     +++|          PJN    UERX        IF NOT SHARED DEVICE
10309  M00S08080.msm     +++|          SHN    11-6
10310  M00S08081.msm     +++|          MJN    UERX        IF DEVICE UNAVAILABLE
10311  M00S08082.msm     +++|          SHN    6-1
10312  M00S08083.msm     +++|          MJN    UER1        IF DEVICE ACCESSED PREVIOUSLY (DAP)
10313  M00S08084.msm     +++|          RJM    SMT         STORE MST/TRT IN ECS
10314  M00S08085.msm     +++|          RJM    CRT         CLEAR MRTS IN ECS
10315  M00S08086.msm     +++|          UJN    UER2
10316  M00S08087.msm     +++| UIS      SPACE  4,10
10317  M00S08088.msm     +++|**        UIS - UPDATE ISD MRT TABLES.
10318  M00S08089.msm     +++|*
10319  M00S08090.msm     +++|*         ENTRY  (A) = MS FLAG (RE) SHIFTED TO SIGN POSITION.
10320  M00S08091.msm     +++|*                (EQ) = EST ORDINAL.
10321  M00S08092.msm     +++|*                (FN - FN+4) = EST ENTRY.
10322  M00S08093.msm     +++|*                (RS) = RECOVERY STATUS.
10323  M00S08094.msm     +++|*
10324  M00S08095.msm     +++|*         EXIT   (A) .LT. 0 IF RECOVERY INFORMATION NOT TO
10325  M00S08096.msm     +++|*                BE REWRITTEN TO CM UPON RETURN TO *MRL*.
10326  M00S08097.msm     +++|*
10327  M00S08098.msm     +++|*         CALLS  ERT.
10328  M00S08099.msm     +++|
10329  M00S08100.msm     +++|
10330  M00S08101.msm     +++| UIS      SUBR               ENTRY/EXIT
10331  M00S08102.msm     +++|          SHN    21-6
10332  M00S08103.msm     +++|          MJN    UISX        IF DEVICE NOT AVAILABLE
10333  M00S08104.msm     +++|          LDD    RS
10334  M00S08105.msm     +++|          ZJN    UISX        IF LEVEL ZERO DEADSTART
10335  M00S08106.msm     +++|          LDD    FN
10336  M00S08107.msm     +++|          SHN    21-4
10337  M00S08108.msm     +++|          PJN    UISX        IF NOT AN ISD DEVICE
10338  M00S08109.msm     +++|          LDN    STBM        CLEAN UP TRACK INTERLOCKS
10339  M00S08110.msm     +++|          RJM    ERT
10340  M00S08111.msm     +++|          UJN    UISX        RETURN
10341  M00S08112.msm     +++| CRT      TITLE  CLEAR MACHINE RECOVERY TABLES.
10342  M00S08113.msm     +++|**        CRT - CLEAR MRTS.
10343  M00S08114.msm     +++|*
10344  M00S08115.msm     +++|*         CALLS  STA, WDS.
10345  M00S08116.msm     +++|*
10346  M00S08117.msm     +++|*         MACROS ENDMS, SETMS.
10347  M00S08118.msm     +++|
10348  M00S08119.msm     +++|
10349  M00S08120.msm     +++| CRT      SUBR               ENTRY/EXIT
10350  M00S08121.msm     +++|          LDC    MMFL        READ MMF STATUS WORD
10351  M00S08122.msm     +++|          CRD    CM
10352  M00S08123.msm     +++|          LDD    CM+1        SET LINK DEVICE EST ORDINAL
10353  M00S08124.msm     +++|          LPC    777
10354  M00S08125.msm     +++|          STD    T5
10355  M00S08126.msm     +++|          SETMS  IO,DF
10356  M00S08127.msm     +++|          LDD    FN+4        GET TRT LENGTH FROM MST
10357  M00S08128.msm     +++|          SHN    3
10358  M00S08129.msm     +++|          ADK    TDGL
10359  M00S08130.msm     +++|          CRD    CN
10360  M00S08131.msm     +++|          LDD    TS          SET MST/TRT TRACK
10361  M00S08132.msm     +++|          STD    T6
10362  M00S08133.msm     +++|          LDN    MRST-1      INITIALIZE MRT SECTOR
10363  M00S08134.msm     +++|          STD    T7
10364  M00S08135.msm     +++|          LDD    CN+2        SET MRT LENGTH
10365  M00S08136.msm     +++|          ADN    7
10366  M00S08137.msm     +++|          SHN    -3
10367  M00S08138.msm     +++|          STD    CN+1        SAVE MRT LENGTH
10368  M00S08139.msm     +++|          STM    BFMS+1
10369  M00S08140.msm     +++|          STD    T1          SET BUFFER LENGTH
10370  M00S08141.msm     +++|          SHN    2
10371  M00S08142.msm     +++|          RAD    T1
10372  M00S08143.msm     +++| CRT1     LDN    0           CLEAR BUFFER
10373  M00S08144.msm     +++|          STM    BFMS+1,T1
10374  M00S08145.msm     +++|          SOD    T1
10375  M00S08146.msm     +++|          NJN    CRT1
10376  M00S08147.msm     +++|          LDN    MXMF        SET LOOP COUNT
10377  M00S08148.msm     +++|          STD    CN
10378  M00S08149.msm     +++|
10379  M00S08150.msm     +++|*         CLEAR MRT SECTORS FOR *MXMF* MAINFRAMES.
10380  M00S08151.msm     +++|
10381  M00S08152.msm     +++| CRT2     AOD    T7          ADVANCE MRT SECTOR
10382  M00S08153.msm     +++|          ADN    1           SET NEXT SECTOR IN LINKAGE
10383  M00S08154.msm     +++|          STM    BFMS
10384  M00S08155.msm     +++|          LDC    BFMS        CLEAR MRT
10385  M00S08156.msm     +++|          RJM    WDS
10386  M00S08157.msm     +++|          SOD    CN
10387  M00S08158.msm     +++|          NJN    CRT2        IF MORE MRT-S TO CLEAR
10388  M00S08159.msm     +++|          ENDMS              RELEASE CHANNEL
10389  M00S08160.msm     +++|          RJM    STA         SET FWA OF TRT
10390  M00S08161.msm     +++|          ADD    CN+2        SET FWA OF MRT
10391  M00S08162.msm     +++|          CWM    BFMS+2,CN+1
10392  M00S08163.msm     +++|          LJM    CRTX        RETURN
10393  M00S08164.msm     +++| ERT      TITLE  EDIT MACHINE RECOVERY TABLE.
10394  M00S08165.msm     +++|**        ERT - EDIT MRT.
10395  M00S08166.msm     +++|*
10396  M00S08167.msm     +++|*         ENTRY  (A) = *STBM* TO CLEAN UP TRACK INTERLOCKS.
10397  M00S08168.msm     +++|*                    = *DTKM* TO CLEAN UP LOCAL FILE SPACE.
10398  M00S08169.msm     +++|*                (EQ) = EST ORDINAL.
10399  M00S08170.msm     +++|*                (FN - FN+4) = EST ENTRY.
10400  M00S08171.msm     +++|*
10401  M00S08172.msm     +++|*         EXIT   ALL LOCAL TRACK CHAINS DROPPED.
10402  M00S08173.msm     +++|*
10403  M00S08174.msm     +++|*         USES   T0 - T7, CM - CM+4.
10404  M00S08175.msm     +++|*
10405  M00S08176.msm     +++|*         CALLS  PTA, RDS, STA.
10406  M00S08177.msm     +++|*
10407  M00S08178.msm     +++|*         MACROS MONITOR.
10408  M00S08179.msm     +++|
10409  M00S08180.msm     +++|
10410  M00S08181.msm     +++| ERT2     SHN    21-0        CHECK NEXT BIT
10411  M00S08182.msm     +++|          STI    T1
10412  M00S08183.msm     +++|          PJN    ERT3        IF NO RESERVATION
10413  M00S08184.msm     +++|          LDD    T2          SET TRT WORD INDEX
10414  M00S08185.msm     +++|          SHN    21-1
10415  M00S08186.msm     +++|          STD    T0
10416  M00S08187.msm     +++|          SHN    1-21        FORM *SHN* WITH BYTE INDEX
10417  M00S08188.msm     +++|          ADC    SHNI+21-7
10418  M00S08189.msm     +++|          STM    ERTA
10419  M00S08190.msm     +++|          RJM    STA         SET FWA OF TRT
10420  M00S08191.msm     +++|          ADD    T0
10421  M00S08192.msm     +++|          CRD    CM
10422  M00S08193.msm     +++|          LDD    CM+4        CHECK WRITE INTERLOCK
10423  M00S08194.msm     +++| ERTA     SHN    **
10424  M00S08195.msm     +++| ERTB     PJN    ERT3        IF TRACK NOT INTERLOCKED
10425  M00S08196.msm     +++|*         MJN    ERT3        IF NOT LOCAL FILE
10426  M00S08197.msm     +++|          LDD    MA          LOAD MONITOR REQUEST
10427  M00S08198.msm     +++|          CRD    CM
10428  M00S08199.msm     +++|          LDD    T2          SET TRACK IN REQUEST
10429  M00S08200.msm     +++|          RAD    CM+2
10430  M00S08201.msm     +++| ERTC     MONITOR STBM
10431  M00S08202.msm     +++|*         MONITOR DTKM
10432  M00S08203.msm     +++| ERT3     AOD    T2          ADVANCE TRACK NUMBER
10433  M00S08204.msm     +++| ERT4     LDI    T1
10434  M00S08205.msm     +++|          NJN    ERT2        IF NOT END OF RESERVATIONS IN MRT BYTE
10435  M00S08206.msm     +++|          LDN    4*3         ALIGN TRACK NUMBER FOR NEXT MRT BYTE
10436  M00S08207.msm     +++|          RAD    T6
10437  M00S08208.msm     +++|          STD    T2
10438  M00S08209.msm     +++|          SOD    T1          MOVE TO NEXT BYTE IN MRT WORD
10439  M00S08210.msm     +++|          LMD    T5
10440  M00S08211.msm     +++|          NJN    ERT4        IF NOT END OF DATA IN WORD
10441  M00S08212.msm     +++|          LCN    4           ALIGN TRACK FOR NEXT MRT WORD
10442  M00S08213.msm     +++|          RAD    T6
10443  M00S08214.msm     +++|          STD    T2
10444  M00S08215.msm     +++| ERT5     LDN    3+5         ADVANCE TO NEXT MRT WORD
10445  M00S08216.msm     +++|          RAD    T1
10446  M00S08217.msm     +++|          SBN    3           SET END OF DATA CHECK
10447  M00S08218.msm     +++|          STD    T5
10448  M00S08219.msm     +++|          LMD    T7
10449  M00S08220.msm     +++|          NJN    ERT4        IF NOT END OF TRT EDIT
10450  M00S08221.msm     +++|
10451  M00S08222.msm     +++| ERT      SUBR               ENTRY/EXIT
10452  M00S08223.msm     +++|          LMC    LDNI        SET MONITOR FUNCTION
10453  M00S08224.msm     +++|          STM    ERTC
10454  M00S08225.msm     +++|          LPN    77
10455  M00S08226.msm     +++|          LMN    STBM
10456  M00S08227.msm     +++|          ZJN    ERT1        IF CLEARING TRACK INTERLOCKS
10457  M00S08228.msm     +++|          LDD    HN          MJNI - PJNI
10458  M00S08229.msm     +++| ERT1     ADC    PJNI+ERT3-ERTB
10459  M00S08230.msm     +++|          STM    ERTB
10460  M00S08231.msm     +++|          RJM    PTA         PRESET FWA OF TRT
10461  M00S08232.msm     +++|          LDD    FN+4        GET TRT LENGTH
10462  M00S08233.msm     +++|          SHN    3
10463  M00S08234.msm     +++|          ADK    TDGL
10464  M00S08235.msm     +++|          CRD    T3
10465  M00S08236.msm     +++|          LDC    BFMS+1
10466  M00S08237.msm     +++|          STD    T7
10467  M00S08238.msm     +++|          SBN    3           INITIALIZE MRT ADDRESS
10468  M00S08239.msm     +++|          STD    T1
10469  M00S08240.msm     +++|          LDD    T3+2        SET END OF MRT
10470  M00S08241.msm     +++|          STD    T0          SAVE TRT LENGTH
10471  M00S08242.msm     +++|          ADN    7
10472  M00S08243.msm     +++|          SHN    -3
10473  M00S08244.msm     +++|          STD    T5
10474  M00S08245.msm     +++|          SHN    2
10475  M00S08246.msm     +++|          ADD    T5
10476  M00S08247.msm     +++|          ADN    5-3
10477  M00S08248.msm     +++|          RAD    T7
10478  M00S08249.msm     +++|          RJM    STA         SET FWA OF TRT
10479  M00S08250.msm     +++|          ADD    T0
10480  M00S08251.msm     +++|          CRM    BFMS+2,T5   READ MRT
10481  M00S08252.msm     +++|          LDN    ZERL        CLEAR TRACK POINTERS
10482  M00S08253.msm     +++|          CRD    T6-4
10483  M00S08254.msm     +++|          LDD    EQ          SET UP BASIC MONITOR REQUEST
10484  M00S08255.msm     +++|          STD    CM+1
10485  M00S08256.msm     +++|          LDC    4000
10486  M00S08257.msm     +++|          STD    CM+2
10487  M00S08258.msm     +++|          LDN    CTIS
10488  M00S08259.msm     +++|          STD    CM+3
10489  M00S08260.msm     +++|          LDD    MA          STORE REQUEST IMAGE IN MESSAGE BUFFER
10490  M00S08261.msm     +++|          CWD    CM
10491  M00S08262.msm     +++|          LJM    ERT5        ENTER LOOP
10492  M00S08263.msm     +++| SMT      TITLE  STORE MST/TRT IN EXTENDED MEMORY.
10493  M00S08264.msm     +++|**        SMT - STORE MST + TRT IN EXTENDED MEMORY.
10494  M00S08265.msm     +++|*
10495  M00S08266.msm     +++|*         ENTRY  (EQ) = EST ORDINAL.
10496  M00S08267.msm     +++|*                (FN - FN+4) = EST ENTRY.
10497  M00S08268.msm     +++|*
10498  M00S08269.msm     +++|*         USES   P1, T1, CM+3 - CM+7, CN - CN+4, T5 - T7.
10499  M00S08270.msm     +++|*
10500  M00S08271.msm     +++|*         CALLS  CEA, PTA, STA, WDS.
10501  M00S08272.msm     +++|*
10502  M00S08273.msm     +++|*         MACROS ENDMS, SETMS.
10503  M00S08274.msm     +++|
10504  M00S08275.msm     +++|
10505  M00S08276.msm     +++|
10506  M00S08277.msm     +++| SMT      SUBR               ENTRY/EXIT
10507  M00S08278.msm     +++|          RJM    PTA         PRESET FWA OF TRT
10508  M00S08279.msm     +++|          LDC    500-5*GLGL
10509  M00S08280.msm     +++|          STD    T7
10510  M00S08281.msm     +++| SMT1     LDN    0           CLEAR BUFFER
10511  M00S08282.msm     +++|          STM    BFMS+1+5*GLGL,T7
10512  M00S08283.msm     +++|          SOD    T7
10513  M00S08284.msm     +++|          NJN    SMT1
10514  M00S08285.msm     +++|          STD    P1
10515  M00S08286.msm     +++|          LDC    MMFL        READ MMF STATUS WORD
10516  M00S08287.msm     +++|          CRD    CN
10517  M00S08288.msm     +++|          LDD    CN+1        SET LINK DEVICE EST ORDINAL
10518  M00S08289.msm     +++|          LPC    777
10519  M00S08290.msm     +++|          STD    T5
10520  M00S08291.msm     +++|          SETMS  IO,DF
10521  M00S08292.msm     +++|
10522  M00S08293.msm     +++|*         SET UNLOAD STATUS IN EACH LOCAL MST BLOCK.
10523  M00S08294.msm     +++|
10524  M00S08295.msm     +++| SMT2     LDN    MLUNL+MLDUL
10525  M00S08296.msm     +++|          STM    BFMS+2+5*STLL,P1
10526  M00S08297.msm     +++|          LDN    5*LLLL      ADVANCE INDEX
10527  M00S08298.msm     +++|          RAD    P1
10528  M00S08299.msm     +++|          LMC    MXMF*5*LLLL
10529  M00S08300.msm     +++|          NJN    SMT2        LOOP FOR *MXMF* MSTS
10530  M00S08301.msm     +++|          LDD    TS          SET MST/TRT TRACK
10531  M00S08302.msm     +++|          STD    T6
10532  M00S08303.msm     +++|          LDD    HN          SET FULL SECTOR WORD COUNT
10533  M00S08304.msm     +++|          STM    BFMS+1
10534  M00S08305.msm     +++|          LDN    ZERL
10535  M00S08306.msm     +++|          CRD    CM+3
10536  M00S08307.msm     +++|          RJM    CEA
10537  M00S08308.msm     +++|          LDN    GLGL        SET LENGTH OF GLOBAL MST
10538  M00S08309.msm     +++|          STD    T1
10539  M00S08310.msm     +++|          LDN    1           SET INITIAL TRT ACCESS COUNT
10540  M00S08311.msm     +++|          STD    CM+6
10541  M00S08312.msm     +++|          LDD    FN+4
10542  M00S08313.msm     +++|          SHN    3
10543  M00S08314.msm     +++|          ADN    SDGL
10544  M00S08315.msm     +++|          CWD    CM+3
10545  M00S08316.msm     +++|          SBN    SDGL-TDGL
10546  M00S08317.msm     +++|          CRD    CN
10547  M00S08318.msm     +++|          CRM    BFMS+2,T1
10548  M00S08319.msm     +++|          LCN    100-1       INITIALIZE TRT INDEX
10549  M00S08320.msm     +++|          STD    CN+4
10550  M00S08321.msm     +++|          LDN    0
10551  M00S08322.msm     +++|          UJN    SMT5        ENTER LOOP WITH (A) = 0
10552  M00S08323.msm     +++|
10553  M00S08324.msm     +++| SMT3     SBD    HN          DECREMENT BLOCK COUNT
10554  M00S08325.msm     +++|          PJN    SMT4        IF ANOTHER FULL SECTOR
10555  M00S08326.msm     +++|          ADD    HN
10556  M00S08327.msm     +++|          STM    BFMS+1      SET SHORT SECTOR
10557  M00S08328.msm     +++|          LDN    0
10558  M00S08329.msm     +++| SMT4     STD    CN+2
10559  M00S08330.msm     +++|          LDD    HN          ADVANCE TRT ADDRESS
10560  M00S08331.msm     +++|          RAD    CN+4
10561  M00S08332.msm     +++|          RJM    STA         SET FWA OF TRT
10562  M00S08333.msm     +++|          ADD    CN+4
10563  M00S08334.msm     +++|          CRM    BFMS+2,HN
10564  M00S08335.msm     +++|          AOD    T7          ADVANCE SECTOR
10565  M00S08336.msm     +++| SMT5     ADN    1
10566  M00S08337.msm     +++|          STM    BFMS
10567  M00S08338.msm     +++|          LDC    BFMS        WRITE NEXT SECTOR
10568  M00S08339.msm     +++|          RJM    WDS
10569  M00S08340.msm     +++|          LDD    CN+2
10570  M00S08341.msm     +++|          NJN    SMT3        LOOP TO END OF TRT
10571  M00S08342.msm     +++|          ENDMS
10572  M00S08343.msm     +++|          LJM    SMTX        EXIT
Line S08344 Modification History
M01 (Removed by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
10573  M01S08344.272l774 ---|
10574  M01S08345.272l774 ---|          ERRPL  *-BFMS      OVERFLOW INTO BUFFER
Line S00071 Modification History
M01 (Added by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
10575  M01S00071.272l774 +++|          SPACE  4,10
10576  M01S00072.272l774 +++|          ERRNG  BFMS-*      OVERFLOW INTO BUFFER
10577  M01S00073.272l774 +++|          SPACE  4,10
Line S00074 Modification History
M01 (Added by) 272l774
M02 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
10578  M02S00074.283l840 ---|          OVERFLOW  OSOV,EPFW  CHECK FOR OVERFLOW
Line S01224 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
10579  M01S01224.283l840 +++|          OVERFLOW  ORDF,EPFW  CHECK FOR OVERFLOW
10580  M00S08346.msm     +++|          TTL    MSM/4DG - DEVICE RECOVERY ROUTINES.
10581  M00S08347.msm     +++|          TITLE
10582  M00S08348.msm     +++|          IDENT  4DG,/RDG/RDGX
10583  M00S08349.msm     +++|*COMMENT  MSM - DEVICE RECOVERY ROUTINES.
Line S08350 Modification History
M01 (Removed by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
10584  M01S08350.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORP. 1973.
Line S00009 Modification History
M01 (Added by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
10585  M01S00009.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
10586  M00S08351.msm     +++|          SPACE  4
Line S08352 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
10587  M01S08352.283l840 ---|***              *4DG* CONTAINS ROUTINES FOR RECOVERING TRT-S.
Line S01225 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
10588  M01S01225.283l840 +++|***       *4DG* CONTAINS ADDITIONAL DEVICE RECOVERY ROUTINES.
10589  M00S08353.msm     +++|          SPACE  4
10590  M00S08354.msm     +++|          QUAL   RDG
10591  M00S08355.msm     +++|          ORG    ORDG
10592  M00S08356.msm     +++|
10593  M00S08357.msm     +++| RDG      SUBR               ENTRY/EXIT
Line S08358 Modification History
M01 (Removed by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
10594  M01S08358.ns2552  ---|          LJM    POV
Line S08359 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
10595  M01S08359.283l840 ---|          EJECT
Line S01226 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
10596  M01S01226.283l840 +++|          RJM    PRS         PRESET OVERLAY
10597  M01S01227.283l840 +++|          UJN    RDGX        RETURN
10598  M01S01228.283l840 +++|          TITLE  COPY MST/TRT TO DISK.
10599  M01S01229.283l840 +++| CTD      SPACE  4,15
10600  M01S01230.283l840 +++|**        CTD - COPY TABLES TO DISK.
10601  M01S01231.283l840 +++|*
10602  M01S01232.283l840 +++|*         ENTRY  (FN - FN+4) = EST ENTRY.
10603  M01S01233.283l840 +++|*
10604  M01S01234.283l840 +++|*         EXIT   (A) .GE. 0.
10605  M01S01235.283l840 +++|*
10606  M01S01236.283l840 +++|*         USES   P1, T3, T6, T7, CM - CM+4, CN - CN+4.
10607  M01S01237.283l840 +++|*
10608  M01S01238.283l840 +++|*         CALLS  CLC, PTA, RDS, STA, WDS.
10609  M01S01239.283l840 +++|*
10610  M01S01240.283l840 +++|*         MACROS CMSTF, ENDMS, MONITOR, SETMS.
10611  M01S01241.283l840 +++|
10612  M01S01242.283l840 +++|
10613  M01S01243.283l840 +++| CTD5     LDD    RE          CHECK ACCESS STATUS
10614  M01S01244.283l840 +++|          LPC    1002
10615  M01S01245.283l840 +++|          LMC    1002
10616  M01S01246.283l840 +++| CTD6     NJN    CTDX        IF NOT SHARED DEVICE ACCESSED PREVIOUSLY
10617  M01S01247.283l840 +++|          LDD    T5
10618  M01S01248.283l840 +++|          STD    CM+1
10619  M01S01249.283l840 +++|          LDN    UITS        GET CURRENT COPY OF TRT / UPDATE MRT
10620  M01S01250.283l840 +++|          STD    CM+3
10621  M01S01251.283l840 +++|          MONITOR STBM
10622  M01S01252.283l840 +++|
10623  M01S01253.283l840 +++| CTD      SUBR               ENTRY/EXIT
10624  M01S01254.283l840 +++|          RJM    PTA         PRESET FWA OF TRT
10625  M01S01255.283l840 +++|          CMSTF  LPTU        ENABLE TRT UPDATE BY *1RU*
10626  M01S01256.283l840 +++|*         LDN    0
10627  M01S01257.283l840 +++|          STD    T7
10628  M01S01258.283l840 +++|          LDD    FN
10629  M01S01259.283l840 +++|          SHN    21-4
10630  M01S01260.283l840 +++|          PJN    CTD5        IF NOT INDEPENDENT SHARED DEVICE
10631  M01S01261.283l840 +++|          LDD    FN+4
10632  M01S01262.283l840 +++|          SHN    3
10633  M01S01263.283l840 +++|          ADN    ALGL        FETCH ALLOCATION WORD FROM MST
10634  M01S01264.283l840 +++|          CRD    CM
10635  M01S01265.283l840 +++|          LDD    CM+1        SET LABEL TRACK
10636  M01S01266.283l840 +++|          STD    T6
10637  M01S01267.283l840 +++|          SETMS  IO,(DE,DF)
10638  M01S01268.283l840 +++|          LDC    BFMS        REREAD LABEL SECTOR
10639  M01S01269.283l840 +++|          RJM    RDS
10640  M01S01270.283l840 +++|          LDD    RE
10641  M01S01271.283l840 +++|          SHN    21-1
10642  M01S01272.283l840 +++|          MJN    CTD1        IF ACCESSED PREVIOUSLY BY OTHER MF
10643  M01S01273.283l840 +++|          LDM    N4SS+5*SDGL+4
10644  M01S01274.283l840 +++|          LPN    77          SAVE DIT INDEX
10645  M01S01275.283l840 +++|          STD    P1
10646  M01S01276.283l840 +++|          LDN    MSTL        SET CHECKPOINTED MST LENGTH
10647  M01S01277.283l840 +++|          STD    T3
10648  M01S01278.283l840 +++|          LDD    FN+4        SET MST ADDRESS
10649  M01S01279.283l840 +++|          SHN    3
10650  M01S01280.283l840 +++|          ADK    TDGL        GET TRT LENGTH
10651  M01S01281.283l840 +++|          CRD    CN
10652  M01S01282.283l840 +++|          SBK    TDGL        UPDATE MST IN LABEL SECTOR
10653  M01S01283.283l840 +++|          CRM    N4SS,T3
10654  M01S01284.283l840 +++|          LDD    P1          SET SOFTWARE RESERVE IN LABEL
10655  M01S01285.283l840 +++|          LMD    HN
10656  M01S01286.283l840 +++|          STM    N4SS+5*SDGL+4
10657  M01S01287.283l840 +++|          LDD    CN+2        SET MRT LENGTH
10658  M01S01288.283l840 +++|          ADN    7
10659  M01S01289.283l840 +++|          SHN    -3          CALCULATE DIT OFFSET
10660  M01S01290.283l840 +++|          RAD    CN+2
10661  M01S01291.283l840 +++|          UJN    CTD2        GENERATE CHECKSUM
10662  M01S01292.283l840 +++|
10663  M01S01293.283l840 +++| CTD1     LDN    0           CLEAR MACHINE ID TO FORCE TRT UPDATE IN CM
10664  M01S01294.283l840 +++|          STM    N4SS+5*STLL+2
10665  M01S01295.283l840 +++|          LDM    N4SS+5*SDGL+4  CLEAR MST INTERLOCK
10666  M01S01296.283l840 +++|          SCN    77
10667  M01S01297.283l840 +++|          STM    N4SS+5*SDGL+4
10668  M01S01298.283l840 +++| CTD2     RJM    CLC         COMPUTE LABEL CHECKSUM
10669  M01S01299.283l840 +++|          STM    CKSS
10670  M01S01300.283l840 +++|          LDC    BFMS+WLSF
10671  M01S01301.283l840 +++|          RJM    WDS
10672  M01S01302.283l840 +++|          ENDMS              RELEASE HARDWARE RESERVE
10673  M01S01303.283l840 +++|          LDD    RE
10674  M01S01304.283l840 +++|          LPN    2
10675  M01S01305.283l840 +++|          NJN    CTD3        IF DEVICE ACCESSED PREVIOUSLY
10676  M01S01306.283l840 +++|          AOM    N4SS+5*SDGL+4
10677  M01S01307.283l840 +++|          LDD    FN+4        SET MST ADDRESS
10678  M01S01308.283l840 +++|          SHN    3
10679  M01S01309.283l840 +++|          ADN    SDGL        STORE DEVICE INTERLOCK IN CM
10680  M01S01310.283l840 +++|          CWM    N4SS+5*SDGL,ON
10681  M01S01311.283l840 +++|          RJM    STA         STORE DIT IN CM
10682  M01S01312.283l840 +++|          ADD    CN+2
10683  M01S01313.283l840 +++|          ERRNZ  MISD-MSTL   CODE DEPENDS ON VALUE
10684  M01S01314.283l840 +++|          CWM    DISS,T3
10685  M01S01315.283l840 +++|          LDD    T5
10686  M01S01316.283l840 +++|          STD    CM+1        SET EST ORDINAL
10687  M01S01317.283l840 +++|          LDN    CDIS
10688  M01S01318.283l840 +++|          STD    CM+3        UPDATE TABLES ON DISK
10689  M01S01319.283l840 +++|          MONITOR  STBM
10690  M01S01320.283l840 +++|*         LDN    0           SET IMMEDIATE RETURN
10691  M01S01321.283l840 +++| CTD3     LMN    2
10692  M01S01322.283l840 +++|          LJM    CTD6        RETURN
10693  M01S01323.283l840 +++| RMR      SPACE  4,15
10694  M01S01324.283l840 +++|**        RMR - READ MRT.
10695  M01S01325.283l840 +++|*
10696  M01S01326.283l840 +++|*         ENTRY  (T5) = (EQ) = EST ORDINAL.
10697  M01S01327.283l840 +++|*                (FN - FN+4) = EST ENTRY.
10698  M01S01328.283l840 +++|*
10699  M01S01329.283l840 +++|*         USES   T5 - T7, CM - CM+4, CN - CN+4.
10700  M01S01330.283l840 +++|*
10701  M01S01331.283l840 +++|*         CALLS  PTA, RDS, STA.
10702  M01S01332.283l840 +++|*
10703  M01S01333.283l840 +++|*         MACROS ENDMS, SETMS.
10704  M01S01334.283l840 +++|
10705  M01S01335.283l840 +++|
10706  M01S01336.283l840 +++| RMR      SUBR               ENTRY/EXIT
10707  M01S01337.283l840 +++|          LDD    FN
10708  M01S01338.283l840 +++|          SHN    21-11
10709  M01S01339.283l840 +++|          PJN    RMRX        IF DEVICE NOT SHARED
10710  M01S01340.283l840 +++|          SHN    21-4-21+11
10711  M01S01341.283l840 +++|          PJN    RMR1        IF NOT ISD
10712  M01S01342.283l840 +++|          LDD    RS
10713  M01S01343.283l840 +++|          LPN    FLMK
10714  M01S01344.283l840 +++|          LMN    FLTB
10715  M01S01345.283l840 +++|          NJN    RMRX        IF FILES NOT RECOVERED FROM MS TABLES
10716  M01S01346.283l840 +++|          LDD    RA
10717  M01S01347.283l840 +++|          SHN    6
10718  M01S01348.283l840 +++|          ADD    AL          FETCH LABEL SECTOR
10719  M01S01349.283l840 +++|          ADN    DILL
10720  M01S01350.283l840 +++|          CRD    T7
10721  M01S01351.283l840 +++|          LDD    FN+4        GET LABEL TRACK
10722  M01S01352.283l840 +++|          SHN    3
10723  M01S01353.283l840 +++|          ADN    ALGL
10724  M01S01354.283l840 +++|          CRD    CM
10725  M01S01355.283l840 +++|          ADN    DULL-ALGL   GET MACHINE INDEX
10726  M01S01356.283l840 +++|          CRD    CN
10727  M01S01357.283l840 +++|          LDD    CM+1        SET LABEL TRACK
10728  M01S01358.283l840 +++|          STD    T6
10729  M01S01359.283l840 +++|          LDD    CN+2        SET MRT SECTOR
10730  M01S01360.283l840 +++|          LPN    17
10731  M01S01361.283l840 +++|          ADN    MRTL
10732  M01S01362.283l840 +++|          RAD    T7
10733  M01S01363.283l840 +++|          UJN    RMR2        READ MRT
10734  M01S01364.283l840 +++|
10735  M01S01365.283l840 +++| RMR1     LDK    MMFL        GET LINK DEVICE EST ORDINAL
10736  M01S01366.283l840 +++|          CRD    CN
10737  M01S01367.283l840 +++|          LDD    CN+1
10738  M01S01368.283l840 +++|          LPC    777
10739  M01S01369.283l840 +++|          STD    T5
10740  M01S01370.283l840 +++|          LDD    TS          SET MST/TRT TRACK FOR DEVICE
10741  M01S01371.283l840 +++|          STD    T6
10742  M01S01372.283l840 +++|          LDD    CN+4        SET MRT SECTOR FOR THIS MACHINE
10743  M01S01373.283l840 +++|          ADN    MRST-1
10744  M01S01374.283l840 +++|          STD    T7
10745  M01S01375.283l840 +++| RMR2     SETMS  IO,DF
10746  M01S01376.283l840 +++|          LDC    BFMS
10747  M01S01377.283l840 +++|          RJM    RDS
10748  M01S01378.283l840 +++|          ENDMS
10749  M01S01379.283l840 +++|          LDD    EQ          RESTORE (T5)
10750  M01S01380.283l840 +++|          STD    T5
10751  M01S01381.283l840 +++|
10752  M01S01382.283l840 +++|*         COPY MRT TO CM AT THE END OF THE TRT.
10753  M01S01383.283l840 +++|
10754  M01S01384.283l840 +++|          RJM    PTA         PRESET TRT ADDRESS
10755  M01S01385.283l840 +++|          LDD    FN+4        GET TRT LENGTH
10756  M01S01386.283l840 +++|          SHN    3
10757  M01S01387.283l840 +++|          ADK    TDGL
10758  M01S01388.283l840 +++|          CRD    CM
10759  M01S01389.283l840 +++|          LDD    CM+2        SET MRT LENGTH
10760  M01S01390.283l840 +++|          STD    T0          SAVE TRT LENGTH
10761  M01S01391.283l840 +++|          ADN    7
10762  M01S01392.283l840 +++|          SHN    -3
10763  M01S01393.283l840 +++|          STD    CM+2
10764  M01S01394.283l840 +++|          RJM    STA         SET TRT FWA
10765  M01S01395.283l840 +++|          ADD    T0
10766  M01S01396.283l840 +++|          CWM    BFMS+2,CM+2 COPY MRT TO CM
10767  M01S01397.283l840 +++|          LJM    RMRX        RETURN
10768  M00S08360.msm     +++|          TITLE  COPY TRT.
10769  M00S08361.msm     +++| CTT      SPACE  4,10
10770  M00S08362.msm     +++|**        CTT - COPY TRT.
10771  M00S08363.msm     +++|*
10772  M00S08364.msm     +++|*         ENTRY  (CA) = CM ADDRESS OF TRT.
10773  M00S08365.msm     +++|*                (FN - FN+4) = EST ENTRY.
Line S00092 Modification History
M01 (Added by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
10774  M01S00092.ns2552  +++|*
10775  M01S00093.ns2552  +++|*         EXIT   (A) = 0.
10776  M00S08366.msm     +++|*
10777  M00S08367.msm     +++|*         USES   T6, CM - CM+4, CN - CN+4.
10778  M00S08368.msm     +++|*
Line S08369 Modification History
M01 (Removed by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
10779  M01S08369.ns2552  ---|*         CALLS  PTA, RMR, STA.
Line S00094 Modification History
M01 (Added by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
10780  M01S00094.ns2552  +++|*         CALLS  PTA, STA.
10781  M00S08370.msm     +++|
10782  M00S08371.msm     +++|
10783  M00S08372.msm     +++|
Line S08373 Modification History
M01 (Removed by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
10784  M01S08373.ns2552  ---| CTT      SUBR               ENTRY/EXIT
10785  M01S08374.ns2552  ---|          RJM    PTA         PRESET FWA OF TRT
10786  M01S08375.ns2552  ---|          LDD    RE          CHECK SHARED DEVICE STATUS
10787  M01S08376.ns2552  ---|          LPC    1002
10788  M01S08377.ns2552  ---|          LMC    1002
10789  M01S08378.ns2552  ---|          ZJN    CTT2        IF DEVICE ACCESSED PREVIOUSLY
Line S00095 Modification History
M01 (Added by) ns2552
M02 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
10790  M02S00095.283l840 ---| CTT      SUBR   POV         ENTRY/EXIT
10791  M02S00096.283l840 ---|          ERRNZ  RDG+1-CTTX  CODE DEPENDS ON VALUE
Line S01398 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
10792  M01S01398.283l840 +++| CTT      SUBR               ENTRY/EXIT
Line S00097 Modification History
M01 (Added by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
10793  M01S00097.ns2552  +++|          RJM    PTA
10794  M00S08379.msm     +++|          LDN    0           SET TRT WORD INDEX
10795  M00S08380.msm     +++|          STD    T6
10796  M00S08381.msm     +++|          LDD    FN+4        READ *TDGL*
10797  M00S08382.msm     +++|          SHN    3
10798  M00S08383.msm     +++|          ADK    TDGL
10799  M00S08384.msm     +++|          CRD    CN
10800  M00S08385.msm     +++| CTT1     LDD    RA          READ BUFFER WORD
10801  M00S08386.msm     +++|          SHN    6
10802  M00S08387.msm     +++|          ADD    CA
10803  M00S08388.msm     +++|          ADD    T6
10804  M00S08389.msm     +++|          CRD    CM
10805  M00S08390.msm     +++|          RJM    STA         SET FWA OF TRT
10806  M00S08391.msm     +++|          ADD    T6
10807  M00S08392.msm     +++|          CWD    CM
10808  M00S08393.msm     +++|          AOD    T6          ADVANCE WORD
10809  M00S08394.msm     +++|          LMD    CN+2
10810  M00S08395.msm     +++|          NJN    CTT1        LOOP TO END OF TRT
Line S08396 Modification History
M01 (Removed by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
10811  M01S08396.ns2552  ---| CTT2     RJM    RMR         READ MRT AND COPY TO CM
10812  M01S08397.ns2552  ---|          UJN    CTTX
Line S00098 Modification History
M01 (Added by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
10813  M01S00098.ns2552  +++|*         LDN    0
10814  M01S00099.ns2552  +++|          UJN    CTTX        RETURN
10815  M00S08398.msm     +++| EMT      TITLE  ENTER MST PARAMETERS FROM LABEL.
10816  M00S08399.msm     +++|**        EMT - ENTER MST PARAMETERS FROM LABEL.
10817  M00S08400.msm     +++|*
10818  M00S08401.msm     +++|*         ENTRY  (FN - FN+4) = EST ENTRY.
10819  M00S08402.msm     +++|*                (FS - FS+4) = STLL WORD.
10820  M00S08403.msm     +++|*                (T5) = EST ORDINAL.
10821  M00S08404.msm     +++|*                (RS) = RECOVERY STATUS.
10822  M00S08405.msm     +++|*                (MBUF) = LABEL MST.
10823  M00S08406.msm     +++|*
10824  M00S08407.msm     +++|*         EXIT   MST UPDATED TO REFLECT DEVICE LOADED.
10825  M00S08408.msm     +++|*                EST UPDATED TO REFLECT DEVICE LOADED.
10826  M00S08409.msm     +++|*                DEVICE SET AVAILABLE.
10827  M00S08410.msm     +++|*
10828  M00S08411.msm     +++|*         USES   T1, T2, CM - CM+4, CN - CN+4.
10829  M00S08412.msm     +++|*
10830  M00S08413.msm     +++|*         MACROS MONITOR, SFA.
10831  M00S08414.msm     +++|
10832  M00S08415.msm     +++|
10833  M00S08416.msm     +++| EMT      SUBR               ENTRY/EXIT
10834  M00S08417.msm     +++|          LDD    FN
10835  M00S08418.msm     +++|          LPC    7667
10836  M00S08419.msm     +++| EMTB     EQU    *-1
10837  M00S08420.msm     +++|*         LPC    7767        (*CMS* CALL)
10838  M00S08421.msm     +++|          STD    FN
10839  M00S08422.msm     +++|          LDD    FN+4        FETCH MST DRIVER WORD
10840  M00S08423.msm     +++|          SHN    3
10841  M00S08424.msm     +++|          ADN    MDGL
10842  M00S08425.msm     +++|          CRD    CM
10843  M00S08426.msm     +++|          LDD    CM          RETAIN *R* STATUS AND DAT INDEX
10844  M00S08427.msm     +++|          LPC    4377
10845  M00S08428.msm     +++|          STD    CM
10846  M00S08429.msm     +++|          LDN    0
10847  M00S08430.msm     +++|          STD    T2
10848  M00S08431.msm     +++|          STM    MBUF+5*NVGL+4  CLEAR UNITS RESERVED TO *NVE*
10849  M00S08432.msm     +++|          LDD    RS
10850  M00S08433.msm     +++|          NJN    EMT1        IF RECOVERY SELECTED
10851  M00S08434.msm     +++|          STM    MBUF+5*STLL+3  CLEAR ACTIVE USER COUNT
10852  M00S08435.msm     +++|          STM    MBUF+5*DULL+1  CLEAR PF INTERLOCK AND COUNT
10853  M00S08436.msm     +++|          STM    MBUF+5*DULL+3  CLEAR SYSTEM TABLE TRACK
10854  M00S08437.msm     +++|          STM    MBUF+5*DULL+4  CLEAR ACTIVE USER COUNT
10855  M00S08438.msm     +++| EMT1     LDD    RE          CLEAR UNAVAILABLE STATUS
10856  M00S08439.msm     +++|          LPC    7677
10857  M00S08440.msm     +++|          STD    RE
10858  M00S08441.msm     +++|          LPN    2
10859  M00S08442.msm     +++|          NJN    EMT3        IF DEVICE ACCESSED PREVIOUSLY
10860  M00S08443.msm     +++|          LDD    RS
10861  M00S08444.msm     +++|          NJN    EMT2        IF RECOVERY DEADSTART
10862  M00S08445.msm     +++|          LDM    MBUF+5*ACGL+3  SAVE *IQFT* TRACK
10863  M00S08446.msm     +++|          STD    T2
10864  M00S08447.msm     +++|          LDN    0           CLEAR *IQFT* POINTER
10865  M00S08448.msm     +++|          STM    MBUF+5*ACGL+3
Line S00001 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
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  M00S08449.msm     +++| EMT2     LDD    FN+4        STORE DEVICE ACTIVITY WORD
10877  M00S08450.msm     +++|          SHN    3
10878  M00S08451.msm     +++|          ADN    ACGL
10879  M00S08452.msm     +++|          CWM    MBUF+5*ACGL,ON
10880  M00S08453.msm     +++| EMT3     LDM    MBUF+5*STLL+3  RETAIN ACTIVE USER COUNT
10881  M00S08454.msm     +++|          STD    FS+3
10882  M00S08455.msm     +++|          LDM    MBUF+5*MDGL SET *X* AND 16-WORD PFC STATUS FROM LABEL
10883  M00S08456.msm     +++|          LPC    3000
10884  M00S08457.msm     +++|          RAD    CM
10885  M00S08458.msm     +++|          LDD    FN          SET MACHINE INDEX FOR DEVICE
10886  M00S08459.msm     +++|          SHN    21-4
10887  M00S08460.msm     +++|          MJN    EMT4        IF ISD
10888  M00S08461.msm     +++| EMTA     LDN    0           (MACHINE INDEX - 1)
10889  M00S08462.msm     +++|          STM    MBUF+5*DULL+2
10890  M00S08463.msm     +++| EMT4     LDD    FN+4        STORE ALLOCATION AND DEVICE DESCRIPTION
10891  M00S08464.msm     +++|          SHN    3
10892  M00S08465.msm     +++|          ADN    ALGL
10893  M00S08466.msm     +++|          ERRNZ  PFGL-ALGL-1 ADJUST IF *PFGL* POSITION CHANGES
10894  M00S08467.msm     +++|          ERRNZ  PUGL-ALGL-2 ADJUST IF *PUGL* POSITION CHANGES
10895  M00S08468.msm     +++|          CWM    MBUF+5*ALGL,TR
10896  M00S08469.msm     +++|          ADK    MDGL-ALGL-3 STORE DRIVER WORD
10897  M00S08470.msm     +++|          CWD    CM
Line S08471 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
10898  M01S08471.283l840 ---|          ADN    NVGL-MDGL
Line S01399 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
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  M00S08472.msm     +++|          ERRNZ  NVGL+1-ISGL CODE DEPENDS ON VALUE
10911  M00S08473.msm     +++|          ERRNZ  ISGL+1-I2GL CODE DEPENDS ON VALUE
10912  M00S08474.msm     +++|          CWM    MBUF+5*NVGL,TR
10913  M00S08475.msm     +++|          ADN    DULL-NVGL-3 STORE DEVICE USAGE INFORMATION
10914  M00S08476.msm     +++|          CWM    MBUF+5*DULL,ON
10915  M00S08477.msm     +++|          CWD    FS          STORE DEVICE STATUS
10916  M00S08478.msm     +++|          SFA    EST,T5      SET EQUIPMENT AVAILABLE IN EST
10917  M00S08479.msm     +++|          ADK    EQDE
10918  M00S08480.msm     +++|          CWD    FN
10919  M00S08481.msm     +++|          LDD    T2
10920  M00S08482.msm     +++|          ZJN    EMT5        IF NO *IQFT*
10921  M00S08483.msm     +++|          STD    CM+2
10922  M00S08484.msm     +++|          LDD    T5          RELEASE *IQFT* TRACK CHAIN
10923  M00S08485.msm     +++|          STD    CM+1
10924  M00S08486.msm     +++|          MONITOR  DTKM
10925  M00S08487.msm     +++| EMT5     LJM    EMTX        RETURN
10926  M00S08488.msm     +++| ETT      TITLE  EDIT TRT.
10927  M00S08489.msm     +++|**        ETT - EDIT TRACK TABLE.
10928  M00S08490.msm     +++|*
10929  M00S08491.msm     +++|*         ENTRY  (CA) = ADDRESS OF CM BUFFER CONTAINING TRT.
10930  M00S08492.msm     +++|*                (FN - FN+4) = EST ENTRY.
10931  M00S08493.msm     +++|*                (MBUF) = LABEL MST.
10932  M00S08494.msm     +++|*
10933  M00S08495.msm     +++|*         EXIT   (A) = 0 IF COPY SUCCESSFUL.
10934  M00S08496.msm     +++|*                (A) .LT. 0 IF ERROR IN EDITING.
10935  M00S08497.msm     +++|*                ALL NON-PRESERVED FILE CHAINS RELEASED.
10936  M00S08498.msm     +++|*
10937  M00S08499.msm     +++|*         USES   T1, T2, T6, T7, P1, CM - CM+4.
10938  M00S08500.msm     +++|*
10939  M00S08501.msm     +++|*         CALLS  PTA, RTC, STF.
10940  M00S08502.msm     +++|
10941  M00S08503.msm     +++|
10942  M00S08504.msm     +++| ETT      SUBR               ENTRY/EXIT
Line S08505 Modification History
M01 (Removed by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
10943  M01S08505.ns2552  ---|          LDD    RE          CHECK SHARED DEVICE STATUS
10944  M01S08506.ns2552  ---|          LPC    1002
10945  M01S08507.ns2552  ---|          LMC    1002
10946  M01S08508.ns2552  ---|          ZJN    ETTX        IF SHARED DEVICE ACCESSED PREVIOUSLY
10947  M00S08509.msm     +++|          LDD    FN+4        GET TRT LENGTH
10948  M00S08510.msm     +++|          SHN    3
10949  M00S08511.msm     +++|          ADK    TDGL
10950  M00S08512.msm     +++|          CRD    CM
10951  M00S08513.msm     +++|          LDD    CM+2        SET TRT LENGTH
10952  M00S08514.msm     +++|          STD    P1
10953  M00S08515.msm     +++|          RJM    PTA         PRESET FWA OF TRT
10954  M00S08516.msm     +++|          LDN    0           CLEAR WORD AND BYTE INDEX
10955  M00S08517.msm     +++|          STD    T6
10956  M00S08518.msm     +++|          STD    T7
10957  M00S08519.msm     +++|          STM    MBUF+5*ACGL+2  CLEAR PRESERVED FILE COUNT
10958  M00S08520.msm     +++| ETT1     LDD    RA          READ BUFFER WORD
10959  M00S08521.msm     +++|          SHN    6
10960  M00S08522.msm     +++|          ADD    CA
10961  M00S08523.msm     +++|          ADD    T6
10962  M00S08524.msm     +++|          CRD    CM
10963  M00S08525.msm     +++|          LDD    CM+4        SET PRESERVED FILE IDENTIFIERS
10964  M00S08526.msm     +++|          LPC    7400
10965  M00S08527.msm     +++|          STM    ETTB        SET BIT MASK
10966  M00S08528.msm     +++|          LDM    CM,T7       CHECK FOR RESERVED TRACK
10967  M00S08529.msm     +++|          LMC    3777
10968  M00S08530.msm     +++|          NJN    ETT2        IF NOT FLAWED TRACK
10969  M00S08531.msm     +++|          RJM    STF         SET TRACK FLAW
10970  M00S08532.msm     +++|          UJN    ETT3        ADVANCE BYTE INDEX
10971  M00S08533.msm     +++|
10972  M00S08534.msm     +++| ETT2     LDM    ETTC,T7     CHECK PRESERVED FILE BIT
10973  M00S08535.msm     +++|          LPC    *
10974  M00S08536.msm     +++| ETTB     EQU    *-1
10975  M00S08537.msm     +++|          ZJN    ETT3        IF NOT PRESERVED FILE
10976  M00S08538.msm     +++|          RJM    RTC         RESERVE TRACK CHAIN
10977  M00S08539.msm     +++|          AOM    MBUF+5*ACGL+2  ADVANCE PRESERVED FILE COUNT
10978  M00S08540.msm     +++| ETT3     AOD    T7          ADVANCE BYTE INDEX
10979  M00S08541.msm     +++|          LMN    4
10980  M00S08542.msm     +++|          NJN    ETT4        IF NOT END OF TRT WORD
10981  M00S08543.msm     +++|          STD    T7
10982  M00S08544.msm     +++|          AOD    T6          ADVANCE WORD INDEX
10983  M00S08545.msm     +++|          LMD    P1
10984  M00S08546.msm     +++|          ZJN    ETT5        IF END OF BUFFER
10985  M00S08547.msm     +++| ETT4     LJM    ETT1        LOOP
10986  M00S08548.msm     +++|
10987  M00S08549.msm     +++| ETT5     LDM    MBUF+5*NVGL
10988  M00S08550.msm     +++|          ZJN    ETT7        IF NO MEDIA ERRORS RECORDED
10989  M00S08551.msm     +++|          SHN    21-1
10990  M00S08552.msm     +++|          LMD    TH          EXTRACT TRT WORD INDEX
10991  M00S08553.msm     +++|          STD    T6
10992  M00S08554.msm     +++|          SHN    1-21        FORM BYTE INDEX FROM TRACK NUMBER
10993  M00S08555.msm     +++|          STD    T7
10994  M00S08556.msm     +++|          RJM    STF         SET TRACK FLAW
10995  M00S08557.msm     +++|          NJN    ETT6        IF TRACK RESERVED
10996  M00S08558.msm     +++|          STM    MBUF+5*NVGL
10997  M00S08559.msm     +++| ETT6     LDN    0
10998  M00S08560.msm     +++| ETT7     LJM    ETTX        RETURN
10999  M00S08561.msm     +++|
11000  M00S08562.msm     +++|
11001  M00S08563.msm     +++|*         TRACK RESERVATION BITS.
11002  M00S08564.msm     +++|
11003  M00S08565.msm     +++| ETTC     BSS    0
11004  M00S08566.msm     +++|          CON    4010
11005  M00S08567.msm     +++|          CON    2004
11006  M00S08568.msm     +++|          CON    1002
11007  M00S08569.msm     +++|          CON    0401
11008  M00S08570.msm     +++| RTC      TITLE  RESERVE TRACK CHAIN.
11009  M00S08571.msm     +++|**        RTC - RESERVE TRACK CHAIN.
11010  M00S08572.msm     +++|*
11011  M00S08573.msm     +++|*         ENTRY  (CA) = BUFFER ADDRESS.
11012  M00S08574.msm     +++|*                (P1) = TRT LENGTH.
11013  M00S08575.msm     +++|*                (FN - FN+4) = EST ENTRY.
11014  M00S08576.msm     +++|*                (T6) = WORD INDEX.
11015  M00S08577.msm     +++|*                (T7) = BYTE INDEX.
11016  M00S08578.msm     +++|*
Line S08579 Modification History
M01 (Removed by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11017  M01S08579.ns2552  ---|*         EXIT   (A) .LT. 0 IF ERROR.
Line S00100 Modification History
M01 (Added by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11018  M01S00100.ns2552  +++|*         EXIT   (A) = *STLK* IF LINKAGE ERROR.
11019  M00S08580.msm     +++|*                TO *ETTX* IF LINKAGE ERROR.
11020  M00S08581.msm     +++|*
11021  M00S08582.msm     +++|*         USES   T1, T2, CM - CM+4, CN - CN+4.
11022  M00S08583.msm     +++|*
11023  M00S08584.msm     +++|*         CALLS  STA.
11024  M00S08585.msm     +++|
11025  M00S08586.msm     +++|
11026  M00S08587.msm     +++| RTC      SUBR               ENTRY/EXIT
11027  M00S08588.msm     +++|          LDD    T6          SET WORD INDEX
11028  M00S08589.msm     +++|          STD    T1
11029  M00S08590.msm     +++|          LDD    T7          SET BYTE INDEX
11030  M00S08591.msm     +++|          STD    T2
11031  M00S08592.msm     +++| RTC1     LDD    T1          CHECK WORD INDEX
11032  M00S08593.msm     +++|          SBD    P1
11033  M00S08594.msm     +++|          PJN    RTC2        IF OUT OF TRT
11034  M00S08595.msm     +++|          RJM    STA         SET FWA OF TRT
11035  M00S08596.msm     +++|          ADD    T1
11036  M00S08597.msm     +++|          CRD    CN
11037  M00S08598.msm     +++|          LDM    CN,T2       CHECK TRACK LINK
11038  M00S08599.msm     +++|          ZJN    RTC3        IF CLEAR
Line S08600 Modification History
M01 (Removed by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11039  M01S08600.ns2552  ---| RTC2     LCN    0           SET ERROR RETURN
Line S00101 Modification History
M01 (Added by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11040  M01S00101.ns2552  +++| RTC2     LDN    STLK
11041  M00S08601.msm     +++|          LJM    ETTX        EXIT
11042  M00S08602.msm     +++|
11043  M00S08603.msm     +++| RTC3     LDM    CM,T2       SET NEXT LINK
11044  M00S08604.msm     +++|          STM    CN,T2
11045  M00S08605.msm     +++|          LDM    ETTC,T2     SET PROPAGATION MASK
11046  M00S08606.msm     +++|          STM    RTCB
11047  M00S08607.msm     +++|          LMC    -0          SET RESERVATION MASK
11048  M00S08608.msm     +++|          STM    RTCA
11049  M00S08609.msm     +++|          LDD    CN+4        SAVE PREVIOUS BITS
11050  M00S08610.msm     +++|          LPC    *
11051  M00S08611.msm     +++| RTCA     EQU    *-1
11052  M00S08612.msm     +++|          STD    CN+4
11053  M00S08613.msm     +++|          LDD    CM+4
11054  M00S08614.msm     +++|          LPC    *
11055  M00S08615.msm     +++| RTCB     EQU    *-1
11056  M00S08616.msm     +++|          RAD    CN+4
11057  M00S08617.msm     +++|          RJM    STA         SET FWA OF TRT
11058  M00S08618.msm     +++|          ADD    T1
11059  M00S08619.msm     +++|          CWD    CN
11060  M00S08620.msm     +++|          LDM    CN,T2       CHECK NEXT LINK
11061  M00S08621.msm     +++|          SHN    6
11062  M00S08622.msm     +++|          MJN    RTC4        IF NOT END OF TRACK CHAIN
11063  M00S08623.msm     +++|          LJM    RTCX        RETURN
11064  M00S08624.msm     +++|
11065  M00S08625.msm     +++| RTC4     SHN    12          SET WORD INDEX
11066  M00S08626.msm     +++|          LMD    TH
11067  M00S08627.msm     +++|          STD    T1
11068  M00S08628.msm     +++|          SHN    -20         SET BYTE INDEX
11069  M00S08629.msm     +++|          STD    T2
11070  M00S08630.msm     +++|          LDD    RA          READ BUFFER WORD
11071  M00S08631.msm     +++|          SHN    6
11072  M00S08632.msm     +++|          ADD    CA
11073  M00S08633.msm     +++|          ADD    T1
11074  M00S08634.msm     +++|          CRD    CM
11075  M00S08635.msm     +++|          LJM    RTC1        LOOP TO END OF CHAIN
11076  M00S08636.msm     +++| RTT      TITLE  READ TRT.
Line S08637 Modification History
M01 (Removed by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11077  M01S08637.ns2552  ---|**        RTT - READ TRT INTO CM BUFFER.
Line S00102 Modification History
M01 (Added by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11078  M01S00102.ns2552  +++|**        RTT - RECOVER TRACK RESERVATION TABLE.
11079  M00S08638.msm     +++|*
11080  M00S08639.msm     +++|*         ENTRY  (T5) = EST ORDINAL.
11081  M00S08640.msm     +++|*                (CA+1) = CM BUFFER ADDRESS FOR TRT.
11082  M00S08641.msm     +++|*                (FN - FN+4) = EST ENTRY.
11083  M00S08642.msm     +++|*
Line S08643 Modification History
M01 (Removed by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11084  M01S08643.ns2552  ---|*         EXIT   (A) = 0 IF TRT LENGTH CORRECT.
Line S00103 Modification History
M01 (Added by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
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  M00S08644.msm     +++|*                (CA) = FWA OF TRT IN CM.
11089  M00S08645.msm     +++|*                (MBUF) = LABEL MST.
11090  M00S08646.msm     +++|*
11091  M00S08647.msm     +++|*         USES   P1, T1, T3, T6, T7, CN - CN+4.
11092  M00S08648.msm     +++|*
Line S08649 Modification History
M01 (Removed by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11093  M01S08649.ns2552  ---|*         CALLS  RDS.
Line S00106 Modification History
M01 (Added by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11094  M01S00106.ns2552  +++|*         CALLS  ATC, CTD, CTT, EMT, ETT, RMR, RDS.
11095  M00S08650.msm     +++|*
11096  M00S08651.msm     +++|*         MACROS ENDMS, MONITOR, SETMS.
11097  M00S08652.msm     +++|
11098  M00S08653.msm     +++|
Line S00107 Modification History
M01 (Added by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
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  M00S08654.msm     +++| RTT      SUBR               ENTRY/EXIT
11113  M00S08655.msm     +++|          LDN    MSTL
11114  M00S08656.msm     +++|          STD    T1
11115  M00S08657.msm     +++|          LDD    RA          READ LABEL INTO MST BUFFER
11116  M00S08658.msm     +++|          SHN    6
11117  M00S08659.msm     +++|          ADD    AL
11118  M00S08660.msm     +++|          CRM    MBUF,T1
11119  M00S08661.msm     +++|          LDD    RE          CHECK ESM RESIDENT TRT
11120  M00S08662.msm     +++|          LPC    1002
11121  M00S08663.msm     +++|          LMC    1002
Line S08664 Modification History
M01 (Removed by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11122  M01S08664.ns2552  ---|          ZJN    RTTX        IF DEVICE ACCESSED PREVIOUSLY
Line S00120 Modification History
M01 (Added by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11123  M01S00120.ns2552  +++|          ZJN    RTT5        IF DEVICE ACCESSED PREVIOUSLY
11124  M00S08665.msm     +++|          SETMS  IO,DF
11125  M00S08666.msm     +++|          LDD    CA+1        SET FWA FOR TRT IN CM
11126  M00S08667.msm     +++|          STD    CA
11127  M00S08668.msm     +++|          LDM    MBUF+5*ALGL+1  SET LABEL TRACK
11128  M00S08669.msm     +++|          STD    T6
11129  M00S08670.msm     +++|          LDM    MBUF+5*DILL SET SECTOR NUMBER
11130  M00S08671.msm     +++|          ADN    FSMS
11131  M00S08672.msm     +++|          STD    T7
11132  M00S08673.msm     +++|          LDD    FN+4        SET LENGTH OF TRT
11133  M00S08674.msm     +++|          SHN    3
11134  M00S08675.msm     +++|          ADK    TDGL
11135  M00S08676.msm     +++|          CRD    CN
11136  M00S08677.msm     +++|          LDD    CN+2
11137  M00S08678.msm     +++|          STD    P1
11138  M00S08679.msm     +++| RTT1     LDC    BFMS        READ SECTOR
11139  M00S08680.msm     +++|          RJM    RDS
11140  M00S08681.msm     +++|          MJN    RTT2        IF MS ERROR
11141  M00S08682.msm     +++|          LDM    BFMS
11142  M00S08683.msm     +++|          ZJN    RTT2        IF EOF/EOI
11143  M00S08684.msm     +++|          STD    T7
11144  M00S08685.msm     +++|          LDM    BFMS+1
11145  M00S08686.msm     +++|          ZJN    RTT2        IF END OF TRT
11146  M00S08687.msm     +++|          STD    T1
11147  M00S08688.msm     +++|          LDD    P1
11148  M00S08689.msm     +++|          SBD    T1
11149  M00S08690.msm     +++|          MJN    RTT2        IF WORD COUNT > TRT SIZE
11150  M00S08691.msm     +++|          STD    P1
11151  M00S08692.msm     +++|          LDD    RA          WRITE SECTOR TO CM
11152  M00S08693.msm     +++|          SHN    6
11153  M00S08694.msm     +++|          ADD    CA
11154  M00S08695.msm     +++|          CWM    BFMS+2,T1
11155  M00S08696.msm     +++|          LDD    T1
11156  M00S08697.msm     +++|          RAD    CA
11157  M00S08698.msm     +++|          LDD    T1
11158  M00S08699.msm     +++|          SHN    -6
11159  M00S08700.msm     +++|          NJN    RTT1        IF NOT EOR
11160  M00S08701.msm     +++| RTT2     ENDMS              RELEASE CHANNEL
11161  M00S08702.msm     +++|          LDD    CA+1
11162  M00S08703.msm     +++|          STD    CA          SET FWA OF TRT IN CM
11163  M00S08704.msm     +++|          LDD    P1
Line S08705 Modification History
M01 (Removed by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11164  M01S08705.ns2552  ---|          LJM    RTTX        RETURN
Line S00121 Modification History
M01 (Added by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11165  M01S00121.ns2552  +++|          ZJN    RTT3        IF CORRECT TRT LENGTH
11166  M01S00122.ns2552  +++|          LDN    STTL
11167  M01S00123.ns2552  +++| RTT3     LJM    RTT4        COMPLETE RECOVERY
11168  M00S08706.msm     +++| STF      TITLE  SET TRACK FLAW.
11169  M00S08707.msm     +++|**        STF - SET TRACK FLAW IN TRT.
11170  M00S08708.msm     +++|*
11171  M00S08709.msm     +++|*         ENTRY  (T6) = TRT WORD INDEX.
11172  M00S08710.msm     +++|*                (T7) = BYTE INDEX.
11173  M00S08711.msm     +++|*                (P1) = TRT LENGTH.
11174  M00S08712.msm     +++|*
11175  M00S08713.msm     +++|*         EXIT   (A) = 0 IF INVALID TRACK.
11176  M00S08714.msm     +++|*
11177  M00S08715.msm     +++|*         USES   CM - CM+4.
11178  M00S08716.msm     +++|*
11179  M00S08717.msm     +++|*         CALLS  STA.
11180  M00S08718.msm     +++|
11181  M00S08719.msm     +++|
11182  M00S08720.msm     +++| STF1     LDN    0           INDICATE INVALID TRACK
11183  M00S08721.msm     +++|
11184  M00S08722.msm     +++| STF      SUBR               ENTRY/EXIT
11185  M00S08723.msm     +++|          LDD    T6
11186  M00S08724.msm     +++|          SBD    P1
11187  M00S08725.msm     +++|          PJN    STF1        IF TRACK OUT OF TRT
11188  M00S08726.msm     +++|          RJM    STA
11189  M00S08727.msm     +++|          ADD    T6          READ TRT WORD
11190  M00S08728.msm     +++|          CRD    CM
11191  M00S08729.msm     +++|          LDM    ETTC,T7     SET TRACK RESERVATION MASK
11192  M00S08730.msm     +++|          LPN    17
11193  M00S08731.msm     +++|          STD    T0
11194  M00S08732.msm     +++|          LMD    CM+4        CHECK TRACK ASSIGNMENT
11195  M00S08733.msm     +++|          SBD    T0
11196  M00S08734.msm     +++|          LMD    CM+4
11197  M00S08735.msm     +++|          NJN    STFX        IF RESERVED
11198  M00S08736.msm     +++|          LDD    T0
11199  M00S08737.msm     +++|          RAD    CM+4        SET TRACK RESERVED
11200  M00S08738.msm     +++|          LDC    3777
11201  M00S08739.msm     +++|          STM    CM,T7       SET TRACK FLAWED
11202  M00S08740.msm     +++|          RJM    STA
11203  M00S08741.msm     +++|          ADD    T6          STORE TRT WORD
11204  M00S08742.msm     +++|          CWD    CM
11205  M00S08743.msm     +++|          UJN    STFX        RETURN
11206  M00S08744.msm     +++|          TITLE  SET EQUIPMENT CONFIGURATION.
11207  M00S08745.msm     +++| AUL      SPACE  4,15
11208  M00S08746.msm     +++|**        AUL - ASSEMBLE UNIT LIST.
11209  M00S08747.msm     +++|*
11210  M00S08748.msm     +++|*         ENTRY  (UC) = REQUIRED UNIT COUNT.
11211  M00S08749.msm     +++|*                (FN - FN+4) = EST ENTRY.
11212  M00S08750.msm     +++|*                (CN - CN+4) = UNIT DESCRIPTOR WORD (DDLL).
11213  M00S08751.msm     +++|*
11214  M00S08752.msm     +++|*         EXIT   (A) = 0 IF REQUIRED UNIT COUNT SATISFIED.
11215  M00S08753.msm     +++|*                (CN - CN+4) = NEW UNIT LIST.
11216  M00S08754.msm     +++|*                (FS - FS+4) = DEVICE STATUS WORD (STLL).
11217  M00S08755.msm     +++|*
11218  M00S08756.msm     +++|*         USES   T0 - T3, CM - CM+4, FS - FS+4.
11219  M00S08757.msm     +++|
11220  M00S08758.msm     +++|
11221  M00S08759.msm     +++| AUL2     AOD    T1          ADVANCE UNITS TRANSFERED COUNT
11222  M00S08760.msm     +++|          SHN    21-0
11223  M00S08761.msm     +++|          MJN    AUL3        IF NOT CROSSING BYTE BOUNDARY
11224  M00S08762.msm     +++|          SOD    T2          DECREMENT SOURCE ADDRESS
11225  M00S08763.msm     +++| AUL3     AOD    CN          ADVANCE TOTAL UNIT COUNT
11226  M00S08764.msm     +++|          LPN    7
11227  M00S08765.msm     +++|          SHN    -1
11228  M00S08766.msm     +++|          STD    T0
11229  M00S08767.msm     +++|          LDN    CN+4        FORM DESTINATION BYTE ADDRESS
11230  M00S08768.msm     +++|          SBD    T0
11231  M00S08769.msm     +++|          STD    T3
11232  M00S08770.msm     +++|          LDI    T2          EXTRACT NEXT UNIT
11233  M00S08771.msm     +++|          SHN    14
11234  M00S08772.msm     +++|          STI    T2
11235  M00S08773.msm     +++|          SHN    -14
11236  M00S08774.msm     +++| AULA     PJN    AUL4        IF PACKING UNIT LOW
11237  M00S08775.msm     +++|*         MJN    AUL4        FALL THRU IF PACKING UNIT HIGH
11238  M00S08776.msm     +++|          SHN    6
11239  M00S08777.msm     +++|          LMI    T3          ASSEMBLE UNIT DESCRIPTOR WORD
11240  M00S08778.msm     +++|          SCN    77
11241  M00S08779.msm     +++|          LMI    T3
11242  M00S08780.msm     +++| AUL4     STI    T3
11243  M00S08781.msm     +++|          LDD    UC
11244  M00S08782.msm     +++|          LMD    CN
11245  M00S08783.msm     +++|          LPN    7
11246  M00S08784.msm     +++|          ZJN    AULX        IF REQUIRED UNIT COUNT SATISFIED
11247  M00S08785.msm     +++|          LDM    AULA        TOGGLE UNIT PACKING TRANSFER
11248  M00S08786.msm     +++|          LMD    HN
11249  M00S08787.msm     +++|          STM    AULA
11250  M00S08788.msm     +++|          SOD    CM
11251  M00S08789.msm     +++|          PJN    AUL2        IF MORE UNITS THIS EQUIPMENT
11252  M00S08790.msm     +++|
11253  M00S08791.msm     +++| AUL      SUBR               ENTRY/EXIT
11254  M00S08792.msm     +++|          LDD    FN+4
11255  M00S08793.msm     +++|          SHN    3
11256  M00S08794.msm     +++|          ADN    STLL
11257  M00S08795.msm     +++|          CRD    FS
11258  M00S08796.msm     +++|          ADN    DDLL-STLL   GET UNIT DESCRIPTOR WORD
11259  M00S08797.msm     +++|          CRD    CM
11260  M00S08798.msm     +++|          LDD    CM
11261  M00S08799.msm     +++|          LPN    7
11262  M00S08800.msm     +++|          STD    CM
11263  M00S08801.msm     +++|          LDD    CN          CHECK CURRENT UNIT COUNT
11264  M00S08802.msm     +++|          LPN    1
11265  M00S08803.msm     +++|          ZJN    AUL1        IF NEXT UNIT PACKS LOW
11266  M00S08804.msm     +++|          LDD    HN          PJNI .NOT. MJNI
11267  M00S08805.msm     +++| AUL1     LMC    MJNI+AUL4-AULA
11268  M00S08806.msm     +++|          STM    AULA        SET INITIAL PACKING TRANSFER
11269  M00S08807.msm     +++|          LDN    0           CLEAR UNITS UNPACKED
11270  M00S08808.msm     +++|          STD    T1
11271  M00S08809.msm     +++|          LDN    CM+4        SET INITIAL SOURCE ADDRESS
11272  M00S08810.msm     +++|          STD    T2
11273  M00S08811.msm     +++|          LJM    AUL3        ENTER LOOP
11274  M00S08812.msm     +++| SEC      SPACE  4,15
11275  M00S08813.msm     +++|**        SEC - SET EQUIPMENT CONFIGURATION.
11276  M00S08814.msm     +++|*
11277  M00S08815.msm     +++|*         ENTRY  (T5) = EST ORDINAL.
11278  M00S08816.msm     +++|*                (EQ) = EST ORDINAL.
11279  M00S08817.msm     +++|*                (FN - FN+4) = EST ENTRY.
11280  M00S08818.msm     +++|*
11281  M00S08819.msm     +++|*         EXIT   EST/MST SET TO ACCOMMODATE NEW CONFIGURATION.
11282  M00S08820.msm     +++|*                ALL EXCEPT FIRST EQUIPMENT IN CHAIN SET IN USE.
11283  M00S08821.msm     +++|*                (FS - FS+4) = STLL WORD FOR EQUIPMENT.
11284  M00S08822.msm     +++|*                (FN - FN+4) = EST ENTRY.
11285  M00S08823.msm     +++|*
11286  M00S08824.msm     +++|*         USES   EC, UC, CM - CM+7, CN - CN+4.
11287  M00S08825.msm     +++|*
11288  M00S08826.msm     +++|*         CALLS  AUL, SES, SSL.
11289  M00S08827.msm     +++|*
11290  M00S08828.msm     +++|*         MACROS SFA, SMSTF.
11291  M00S08829.msm     +++|
11292  M00S08830.msm     +++|
11293  M00S08831.msm     +++| SEC5     RJM    SSL         SET SECTOR LIMITS
11294  M00S08832.msm     +++|
11295  M00S08833.msm     +++| SEC      SUBR               ENTRY/EXIT
11296  M00S08834.msm     +++|          LDN    0           CLEAR MST ERROR STATUS
11297  M00S08835.msm     +++|          STD    EC
11298  M00S08836.msm     +++|          RJM    SES
11299  M00S08837.msm     +++|          LDD    FN+4        READ CONFIGURATION PARAMETERS
11300  M00S08838.msm     +++|          SHN    3
11301  M00S08839.msm     +++|          ADN    MDGL
11302  M00S08840.msm     +++|          CRD    CM+3
11303  M00S08841.msm     +++|          SBN    MDGL-PFGL
11304  M00S08842.msm     +++|          CRD    CM
11305  M00S08843.msm     +++|          ADN    STLL-PFGL
11306  M00S08844.msm     +++|          CRD    FS
11307  M00S08845.msm     +++|          ADN    DDLL-STLL
11308  M00S08846.msm     +++|          CRD    CN
11309  M00S08847.msm     +++|          LDD    CN          SAVE CURRENT UNIT COUNT
11310  M00S08848.msm     +++|          LPN    7
11311  M00S08849.msm     +++|          STD    T0
11312  M00S08850.msm     +++|          LDD    FN          CHECK EQUIPMENT STATUS
11313  M00S08851.msm     +++|          SHN    21-10
11314  M00S08852.msm     +++|          PJN    SEC5        IF NOT REMOVABLE DEVICE
11315  M00S08853.msm     +++|          LDD    CM+5
11316  M00S08854.msm     +++|          LMC    2RDI
11317  M00S08855.msm     +++|          ZJN    SEC1        IF *6DI* DRIVER
11318  M00S08856.msm     +++|          LMN    2RDJ&2RDI
11319  M00S08857.msm     +++|          ZJN    SEC1        IF *6DJ* DRIVER
11320  M00S08858.msm     +++|          LDD    CM+4        SET REQUIRED = CURRENT UNIT COUNT
11321  M00S08859.msm     +++|          LPN    7
11322  M00S08860.msm     +++|          STD    CM+4
11323  M00S08861.msm     +++|          LDD    CN
11324  M00S08862.msm     +++|          SCN    7
11325  M00S08863.msm     +++|          LMD    CM+4
11326  M00S08864.msm     +++|          STD    CN
11327  M00S08865.msm     +++| SEC1     LDD    CM+4        SET REQUIRED UNIT COUNT
11328  M00S08866.msm     +++|          LPN    7
11329  M00S08867.msm     +++|          STD    UC
11330  M00S08868.msm     +++|          SBD    T0
11331  M00S08869.msm     +++|          ZJN    SEC4        IF REQUIRED = CURRENT UNIT COUNT
11332  M00S08870.msm     +++|          MJN    SEC3        IF REQUIRED COUNT .LT. CURRENT
11333  M00S08871.msm     +++| SEC2     LDD    FS+4        SET NEXT EQUIPMENT IN CHAIN
11334  M00S08872.msm     +++|          SHN    -3
11335  M00S08873.msm     +++|          STD    T5
11336  M00S08874.msm     +++|          SFA    EST         READ NEXT EQUIPMENT EST
11337  M00S08875.msm     +++|          ADK    EQDE
11338  M00S08876.msm     +++|          CRD    FN
11339  M00S08877.msm     +++|          SMSTF  LDIU        SET DEVICE IN USE
11340  M00S08878.msm     +++|          RJM    AUL         ASSEMBLE UNIT LIST
11341  M00S08879.msm     +++|          NJN    SEC2        IF REQUIRED UNITS NOT ASSEMBLED
11342  M00S08880.msm     +++| SEC3     RAD    CN
11343  M00S08881.msm     +++|          LDD    EQ          RESTORE FIRST EQUIPMENT PARAMETERS
11344  M00S08882.msm     +++|          STD    T5
11345  M00S08883.msm     +++|          SFA    EST
11346  M00S08884.msm     +++|          ADK    EQDE
11347  M00S08885.msm     +++|          CRD    FN
11348  M00S08886.msm     +++| SEC4     LDD    FN+4
11349  M00S08887.msm     +++|          SHN    3
11350  M00S08888.msm     +++|          ADN    STLL
11351  M00S08889.msm     +++|          CRD    FS
11352  M00S08890.msm     +++|          ADN    DDLL-STLL   UPDATE UNIT DESCRIPTOR WORD
11353  M00S08891.msm     +++|          CWD    CN
11354  M00S08892.msm     +++|          LJM    SEC5        COMPLETE PROCESSING AND EXIT
Line S01410 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
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  M00S08893.msm     +++|
Line S08894 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11361  M01S08894.283l840 ---| MBUF     EQU    *           MST BUFFER
11362  M01S08895.283l840 ---| OVL      EQU    MBUF+5*MSTL  OVERLAY ORIGIN
11363  M01S08896.283l840 ---| POV      SPACE  4,10
11364  M01S08897.283l840 ---|**        POV - MODIFY INSTRUCTIONS AS REQUIRED FOR CM/MMF RECOVERY.
11365  M00S08898.msm     +++|
Line S01415 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11366  M01S01415.283l840 +++| PRS      SUBR               ENTRY/EXIT
11367  M00S08899.msm     +++|
Line S08900 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11368  M01S08900.283l840 ---| POV      LDM    MMFP
11369  M01S08901.283l840 ---|          ZJN    POV1        IF DO NOT PRESET FOR MMF
Line S01416 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
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  M00S08902.msm     +++|          LDC    MMFL        GET MMF STATUS
11375  M00S08903.msm     +++|          CRD    CM
11376  M00S08904.msm     +++|          SOD    CM+4
11377  M00S08905.msm     +++|          RAM    EMTA
Line S08906 Modification History
M01 (Removed by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11378  M01S08906.ns2552  ---| POV1     LJM    RDGX        RETURN
Line S00124 Modification History
M01 (Added by) ns2552
M02 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11379  M02S00124.283l840 ---| POV1     LDD    RS
11380  M02S00125.283l840 ---|          ZJN    POV2        IF NOT RECOVERY DEADSTART
Line S01420 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
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
Line S00126 Modification History
M01 (Added by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
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 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11390  M02S00130.283l840 ---| POV2     LJM    RDGX        EXIT
Line S01425 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11391  M01S01425.283l840 +++|          UJP    PRSX        EXIT
11392  M01S01426.283l840 +++|          SPACE  4,10
11393  M01S01427.283l840 +++|          QUAL
Line S00131 Modification History
M01 (Added by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11394  M01S00131.ns2552  +++|
Line S08907 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11395  M01S08907.283l840 ---|
11396  M01S08908.283l840 ---|          QUAL
11397  M01S08909.283l840 ---|
Line S01428 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11398  M01S01428.283l840 +++| CTD      EQU    /RDG/CTD
11399  M01S01429.283l840 +++| RMR      EQU    /RDG/RMR
Line S08910 Modification History
M01 (Removed by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
11400  M01S08910.ns2552  ---| CTT      EQU    /RDG/CTT
11401  M01S08911.ns2552  ---| EMT      EQU    /RDG/EMT
11402  M01S08912.ns2552  ---| ETT      EQU    /RDG/ETT
11403  M00S08913.msm     +++| RTT      EQU    /RDG/RTT
11404  M00S08914.msm     +++| SEC      EQU    /RDG/SEC
Line S08915 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11405  M01S08915.283l840 ---| MBUF     EQU    /RDG/MBUF
11406  M00S08916.msm     +++|          SPACE  4,10
Line S08917 Modification History
M01 (Removed by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
11407  M01S08917.272l774 ---|          OVERFLOW  ORDG     CHECK FOR OVERFLOW
Line S00075 Modification History
M01 (Added by) 272l774
Seq #  *Modification Id* Act 
----------------------------+
11408  M01S00075.272l774 +++|          OVERFLOW  ORDG,EPFW  CHECK FOR OVERFLOW
Line S08918 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11409  M01S08918.283l840 ---|          TTL    MSM/4DI - DEVICE INITIALIZATION ROUTINES.
Line S01430 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11410  M01S01430.283l840 +++|          TTL    MSM/4DH - DEVICE INITIALIZATION ROUTINES.
11411  M00S08919.msm     +++|          TITLE
Line S08920 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11412  M01S08920.283l840 ---|          QUAL   RDI
11413  M01S08921.283l840 ---|          IDENT  4DI,/RDI/RDIX
Line S01431 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11414  M01S01431.283l840 +++|          QUAL   RDH
11415  M01S01432.283l840 +++|          IDENT  4DH,/RDH/RDHX
11416  M00S08922.msm     +++|*COMMENT  MSM - DEVICE INITIALIZATION ROUTINES.
Line S08923 Modification History
M01 (Removed by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
11417  M01S08923.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1978.
Line S00010 Modification History
M01 (Added by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
11418  M01S00010.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
11419  M00S08924.msm     +++| RDH      SPACE  4,10
Line S08925 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11420  M01S08925.283l840 ---|***              *4DI* CONTAINS ROUTINES UTILIZED BY *RMS*
Line S01433 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11421  M01S01433.283l840 +++|***              *4DH* CONTAINS ROUTINES UTILIZED BY *RMS*
11422  M00S08926.msm     +++|*         IN INITIALIZING MASS STORAGE EQUIPMENTS.
11423  M00S08927.msm     +++| RDH      SPACE  4,10
11424  M00S08928.msm     +++|**        ROUTINES CALLED.
11425  M00S08929.msm     +++|*
11426  M00S08930.msm     +++|*         0PI - PRESET DRIVER TO READ/WRITE DEADSTART SECTOR.
11427  M00S08931.msm     +++|*         0TI - SET TRACK FLAWS IN TRT.
Line S08932 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11428  M01S08932.283l840 ---|          SPACE  4,10
11429  M01S08933.283l840 ---|*CALL     COMPCHM
11430  M00S08934.msm     +++|          SPACE  4,10
11431  M00S08935.msm     +++|****      DIRECT LOCATION ASSIGNMENTS.
11432  M00S08936.msm     +++|
11433  M00S08937.msm     +++|
11434  M00S08938.msm     +++| PB       EQU    RG - RI+1   FORMAT PARAMETER BLOCK (3 LOCATIONS)
11435  M00S08939.msm     +++| CS       EQU    ET          CHANNEL STATUS
11436  M00S08940.msm     +++| FR       EQU    P1          FORMAT REQUIRED FLAG
11437  M00S08941.msm     +++| LC       EQU    P2          LAST CYLINDER + 1
11438  M00S08942.msm     +++|
11439  M00S08943.msm     +++|****
11440  M00S08944.msm     +++|          SPACE  4,10
11441  M00S08945.msm     +++|**        ASSEMBLY CONSTANTS.
11442  M00S08946.msm     +++|
11443  M00S08947.msm     +++|
11444  M00S08948.msm     +++| DC       EQU    11          DISK CHANNEL
11445  M00S08949.msm     +++|
11446  M00S08950.msm     +++| FCGS     EQU    12          GENERAL STATUS FUNCTION CODE
11447  M00S08951.msm     +++| FCFP     EQU    16          FORMAT PACK FUNCTION CODE
11448  M00S08952.msm     +++|
11449  M00S08953.msm     +++| FPBL     EQU    22          FORMAT PACK PARAMETER BLOCK LENGTH
11450  M00S08954.msm     +++| RDH      SPACE  4,10
Line S08955 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11451  M01S08955.283l840 ---|          ORG    OSOV
Line S01434 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11452  M01S01434.283l840 +++|          ORG    ORDH
11453  M00S08956.msm     +++|
Line S08957 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11454  M01S08957.283l840 ---| RDI      SUBR               ENTRY/EXIT
Line S01435 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11455  M01S01435.283l840 +++| RDH      SUBR               ENTRY/EXIT
11456  M00S08958.msm     +++|          LJM    POV         PRESET OVERLAY
11457  M00S08959.msm     +++|          TITLE  MAIN INITIALIZATION ROUTINE.
11458  M00S08960.msm     +++| IMS      SPACE  4,15
11459  M00S08961.msm     +++|**        IMS - INITIALIZE MASS STORAGE.
11460  M00S08962.msm     +++|*
11461  M00S08963.msm     +++|*         ENTRY  (EQ) = EST ORDINAL.
11462  M00S08964.msm     +++|*                (FN - FN+4) = EST ENTRY.
11463  M00S08965.msm     +++|*
11464  M00S08966.msm     +++|*         EXIT   (A) .LT. 0 IF RECOVERY INFORMATION NOT TO
11465  M00S08967.msm     +++|*                BE REWRITTEN TO CM UPON RETURN TO *MRL*.
11466  M00S08968.msm     +++|*
11467  M00S08969.msm     +++|*         ERROR  TO *HNG* IF SHARED DEVICE CONFLICT.
11468  M00S08970.msm     +++|*
11469  M00S08971.msm     +++|*         USES   CM+3 - CM+7, CN - CN+4, FS - FS+4.
11470  M00S08972.msm     +++|*
11471  M00S08973.msm     +++|*         CALLS  CSD, /RMS/CSE, IDS, UDT.
11472  M00S08974.msm     +++|*
11473  M00S08975.msm     +++|*         MACROS UJMF.
11474  M00S08976.msm     +++|
11475  M00S08977.msm     +++|
11476  M00S08978.msm     +++| IMS5     RJM    IDS         INITIALIZE DEVICE STATUS
11477  M00S08979.msm     +++|          NJN    IMSX        IF DEVICE NOT READY
11478  M00S08980.msm     +++|          UJMF   IMSX        NON MMF TRANSFER
11479  M00S08981.msm     +++|          RJM    UDT         UPDATE DAT
11480  M00S08982.msm     +++|          NJN    IMS1        IF EXTENDED MEMORY TRACK UNAVAILABLE
11481  M00S08983.msm     +++|
11482  M00S08984.msm     +++| IMS      SUBR               ENTRY/EXIT
11483  M00S08985.msm     +++|          SHN    21-4
11484  M00S08986.msm     +++|          PJN    IMSX        IF INITIALIZE NOT SELECTED
11485  M00S08987.msm     +++|          LDD    FN+4        GET FAMILY NAME/DEVICE NUMBER
11486  M00S08988.msm     +++|          SHN    3
11487  M00S08989.msm     +++|          ADN    PFGL
11488  M00S08990.msm     +++|          CRD    CN
11489  M00S08991.msm     +++|          ADN    MDGL-PFGL   GET SECTOR LIMITS
11490  M00S08992.msm     +++|          CRD    CM+3
11491  M00S08993.msm     +++|          ADN    STLL-MDGL   FETCH DEVICE STATUS
11492  M00S08994.msm     +++|          CRD    FS
11493  M00S08995.msm     +++|          RJM    /RMS/CSE    CHECK SYSTEM EQUIPMENT
11494  M00S08996.msm     +++|          UJMF   IMS5        NON MMF TRANSFER
11495  M00S08997.msm     +++|          RJM    CSD         CHECK SHARED DEVICE STATUS
11496  M00S08998.msm     +++| IMS1     NJN    IMS4        IF DAT CONFLICT
11497  M00S08999.msm     +++|          LDD    T2
11498  M00S09000.msm     +++| IMS2     ZJN    IMS5        IF DEVICE NOT DESCRIBED IN DAT
11499  M00S09001.msm     +++|          LDI    T2
11500  M00S09002.msm     +++|          LPC    -0
11501  M00S09003.msm     +++| IMSA     EQU    *-1
11502  M00S09004.msm     +++|          STI    T2
11503  M00S09005.msm     +++|          ZJN    IMS5        IF DEVICE NOT ACTIVE IN DAT
11504  M00S09006.msm     +++|          LDM    DATB+4
11505  M00S09007.msm     +++|          ZJN    IMS3        IF NON-SHARED DEVICE
11506  M00S09008.msm     +++|          LDN    CSDC-CSDB
11507  M00S09009.msm     +++| IMS3     ADC    CSDB
11508  M00S09010.msm     +++| IMS4     LJM    /RMS/HNG    DISPLAY ERROR AND HANG PP
11509  M00S09011.msm     +++|          TITLE  SUBROUTINES.
Line S01436 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
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  M00S09012.msm     +++| CTF      SPACE  4,10
11546  M00S09013.msm     +++|**        CTF - CHECK TRACK FLAWED IN TRT.
11547  M00S09014.msm     +++|*
11548  M00S09015.msm     +++|*         ENTRY  (A) = TRACK NUMBER.
Line S09016 Modification History
M01 (Removed by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
11549  M01S09016.ns2776  ---|*                (FN+4) = MST POINTER.
11550  M00S09017.msm     +++|*
11551  M00S09018.msm     +++|*         EXIT   (A) = 0 IF TRACK FLAWED.
11552  M00S09019.msm     +++|*
11553  M00S09020.msm     +++|*         USES   T0, T1, CM - CM+4.
11554  M00S09021.msm     +++|*
11555  M00S09022.msm     +++|*         CALLS  STA.
11556  M00S09023.msm     +++|
11557  M00S09024.msm     +++|
11558  M00S09025.msm     +++| CTF      SUBR               ENTRY/EXIT
11559  M00S09026.msm     +++|          LPC    3777        UNPACK TRACK
11560  M00S09027.msm     +++|          SHN    21-1        SET TRT WORD INDEX
11561  M00S09028.msm     +++|          STD    T0
11562  M00S09029.msm     +++|          SHN    1-21        SET BYTE INDEX
11563  M00S09030.msm     +++|          STD    T1
11564  M00S09031.msm     +++|          RJM    STA         SET FWA OF TRT
11565  M00S09032.msm     +++|          ADD    T0
11566  M00S09033.msm     +++|          CRD    CM
11567  M00S09034.msm     +++|          LDM    CM,T1       CHECK TRACK
11568  M00S09035.msm     +++|          LMC    3777
11569  M00S09036.msm     +++|          UJN    CTFX        RETURN
Line S00007 Modification History
M01 (Added by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
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 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11601  M01S09037.283l840 ---| F8D      SPACE  4,10
11602  M01S09038.283l840 ---|**        F8D - FORMAT 895 DEVICE.
11603  M01S09039.283l840 ---|*
11604  M01S09040.283l840 ---|*         ENTRY  (LC) = LAST CYLINDER + 1 TO FORMAT.
11605  M01S09041.283l840 ---|*                (PB - PB+2) = FORMAT PARAMETER BLOCK.
11606  M01S09042.283l840 ---|*
11607  M01S09043.283l840 ---|*         USES   PB, CM - CM+4.
11608  M01S09044.283l840 ---|*
11609  M01S09045.283l840 ---|*         CALLS  C2D, /RMS/SEM, WNB.
11610  M01S09046.283l840 ---|
11611  M01S09047.283l840 ---|
11612  M01S09048.283l840 ---| F8D2     LDC    DSCP*200+MS1W+2  UPDATE CYLINDER NUMBER IN MESSAGE
11613  M01S09049.283l840 ---|          CWD    CM
11614  M01S09050.283l840 ---|          FNC    FCFP,DC     ISSUE FORMAT FUNCTION
11615  M01S09051.283l840 ---|          ACN    DC
11616  M01S09052.283l840 ---|          LDN    FPBL        OUTPUT PARAMETER BLOCK
11617  M01S09053.283l840 ---|          OAM    PB,DC
11618  M01S09054.283l840 ---|          FJM    *,DC        WAIT TRANSMISSION COMPLETE
11619  M01S09055.283l840 ---|          DCN    DC
11620  M01S09056.283l840 ---|          AOD    PB          ADVANCE CYLINDER NUMBER
11621  M01S09057.283l840 ---| F8D3     RJM    C2D
11622  M01S09058.283l840 ---|          STD    CM+3
11623  M01S09059.283l840 ---|          LDD    PB          CONVERT VALUE FOR MESSAGE
11624  M01S09060.283l840 ---|          SHN    -6
11625  M01S09061.283l840 ---|          RJM    C2D
11626  M01S09062.283l840 ---|          STD    CM+2
11627  M01S09063.283l840 ---|          RJM    WNB         WAIT NOT BUSY
11628  M01S09064.283l840 ---|          LDD    PB
11629  M01S09065.283l840 ---|          LMD    LC
11630  M01S09066.283l840 ---|          NJN    F8D2        IF MORE CYLINDERS TO FORMAT
11631  M01S09067.283l840 ---|
11632  M01S09068.283l840 ---| F8D      SUBR               ENTRY/EXIT
11633  M01S09069.283l840 ---|          LDD    PB+1
11634  M01S09070.283l840 ---|          RJM    C2D         CONVERT UNIT NUMBER
11635  M01S09071.283l840 ---|          STM    F8DA
11636  M01S09072.283l840 ---|          RJM    /RMS/SEM    SET EQUIPMENT MESSAGE
11637  M01S09073.283l840 ---|          LDN    1RU
11638  M01S09074.283l840 ---|          STD    CM+4        INSERT UNIT DESIGNATOR
11639  M01S09075.283l840 ---|          LDC    DSCP*200+MS1W+1
11640  M01S09076.283l840 ---|          CWD    CM
11641  M01S09077.283l840 ---|          ADN    1
11642  M01S09078.283l840 ---|          CWM    F8DA,TW     CHANGE MESSAGE
11643  M01S09079.283l840 ---|          SBN    2
11644  M01S09080.283l840 ---|          CRD    CM
11645  M01S09081.283l840 ---|          LDD    LC
11646  M01S09082.283l840 ---|          NJN    F8D1        IF *CTI* COMPONENT FOUND
11647  M01S09083.283l840 ---|          LDC    NTDC/2
11648  M01S09084.283l840 ---|          ERRNZ  TTDC        CODE DEPENDS ON VALUE
11649  M01S09085.283l840 ---|          STD    LC
11650  M01S09086.283l840 ---| F8D1     LDD    PB
11651  M01S09087.283l840 ---|          LJM    F8D3        FORMAT DEVICE
11652  M01S09088.283l840 ---|
11653  M01S09089.283l840 ---|
11654  M01S09090.283l840 ---| F8DA     DATA   C*XX C0000.*
11655  M00S09091.msm     +++| IDS      SPACE  4,15
11656  M00S09092.msm     +++|**        IDS - INITIALIZE DEVICE.
11657  M00S09093.msm     +++|*
11658  M00S09094.msm     +++|*         ENTRY  (EQ) = (T5) = EST ORDINAL.
11659  M00S09095.msm     +++|*                (FN - FN+4) = EST ENTRY.
11660  M00S09096.msm     +++|*                (FS - FS+4) = STLL WORD.
11661  M00S09097.msm     +++|*
11662  M00S09098.msm     +++|*         EXIT   (A) = 0 IF DEVICE SET TO INITIALIZE.
11663  M00S09099.msm     +++|*                LABEL TRACK ASSIGNED.
11664  M00S09100.msm     +++|*
11665  M00S09101.msm     +++|*         USES   CS, T1, T3, T6, CM - CM+4, CN - CN+4.
11666  M00S09102.msm     +++|*
Line S09103 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11667  M01S09103.283l840 ---|*         CALLS  CTF, IFM, PFR, PTA, PTF, RCS, SNC.
Line S01471 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11668  M01S01471.283l840 +++|*         CALLS  CFR, CTF, IFM, PTA, PTF, RCS, SNC.
11669  M00S09104.msm     +++|*
11670  M00S09105.msm     +++|*         MACROS ENDMS, MONITOR, SETMS, SFA, SMSTF.
11671  M00S09106.msm     +++|
11672  M00S09107.msm     +++|
11673  M00S09108.msm     +++| IDS7     LDN    0           INHIBIT FURTHER PROCESSING OF DEVICE
11674  M00S09109.msm     +++|          STD    RE
11675  M00S09110.msm     +++|          LDN    1           INDICATE DEVICE NOT INITIALIZED
11676  M00S09111.msm     +++|
11677  M00S09112.msm     +++| IDS      SUBR               ENTRY/EXIT
11678  M00S09113.msm     +++|          LDD    FN
11679  M00S09114.msm     +++|          LPN    2
11680  M00S09115.msm     +++|          NJN    IDS7        IF DEVICE OFF OR DOWN
11681  M00S09116.msm     +++|          SMSTF  LPTU        PROHIBIT TRT UPDATE BY *1RU*
11682  M00S09117.msm     +++|          RJM    PTA         PRESET FWA OF TRT
11683  M00S09118.msm     +++|          LDD    FN          CHECK EQUIPMENT TYPE
11684  M00S09119.msm     +++|          LPC    200
11685  M00S09120.msm     +++|          STM    PFTA        SET LDAM FLAG FOR *PFT* ROUTINE
11686  M00S09121.msm     +++|          ZJN    IDS1        IF NOT *LDAM* DEVICE
11687  M00S09122.msm     +++|          RJM    SNC         SELECT NIO CHANNEL
11688  M00S09123.msm     +++|          STD    CS
11689  M00S09124.msm     +++|          RJM    IFM         INTERPRET FLAW MAP
11690  M00S09125.msm     +++|          RJM    RCS         RESERVE *CTI* SPACE
Line S09126 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11691  M01S09126.283l840 ---|          RJM    PFR         PROCESS FORMAT REQUEST
Line S01472 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11692  M01S01472.283l840 +++|          RJM    CFR         CHECK FOR FORMAT REQUEST
11693  M00S09127.msm     +++| IDS1     LDN    ZERL        REQUEST LABEL TRACK
11694  M00S09128.msm     +++|          CRD    CM
11695  M00S09129.msm     +++|          LDD    T5
11696  M00S09130.msm     +++|          STD    CM+1
11697  M00S09131.msm     +++|          MONITOR  RTCM
11698  M00S09132.msm     +++|*         LDN    0           SET SECTOR
11699  M00S09133.msm     +++|          STD    T7
11700  M00S09134.msm     +++|          LDD    CM+4        SET LABEL TRACK
11701  M00S09135.msm     +++|          STD    T6
11702  M00S09136.msm     +++|          ZJP    IDS2        IF NO TRACK ASSIGNED
11703  M00S09137.msm     +++|          STD    CM+2
11704  M00S09138.msm     +++|          LDN    SPFS        SET PRESERVED FILE STATUS
11705  M00S09139.msm     +++|          STD    CM+3
11706  M00S09140.msm     +++|          MONITOR  STBM
11707  M00S09141.msm     +++|          LDD    FN+4        READ *ALGL*
11708  M00S09142.msm     +++|          SHN    3
11709  M00S09143.msm     +++|          ADK    TDGL
11710  M00S09144.msm     +++|          CRD    CM
11711  M00S09145.msm     +++|          ADN    ALGL-TDGL
11712  M00S09146.msm     +++|          CRD    CN
11713  M00S09147.msm     +++|          LDD    CM          SET TRACK COUNT
11714  M00S09148.msm     +++|          STD    T3
11715  M00S09149.msm     +++|          LDD    T6          SET LABEL TRACK
11716  M00S09150.msm     +++|          STD    CN+1
11717  M00S09151.msm     +++|          LDD    FN+4        STORE *ALGL*
11718  M00S09152.msm     +++|          SHN    3
11719  M00S09153.msm     +++|          ADN    ALGL
11720  M00S09154.msm     +++|          CWD    CN
11721  M00S09155.msm     +++|          LDD    FN          SET DEVICE AS AVAILABLE
11722  M00S09156.msm     +++|          LPC    7667
11723  M00S09157.msm     +++|          LMN    10          SET DEVICE ACTIVE
11724  M00S09158.msm     +++|          STD    FN
11725  M00S09159.msm     +++|          LDD    RE
11726  M00S09160.msm     +++|          LPC    7677
11727  M00S09161.msm     +++|          STD    RE
11728  M00S09162.msm     +++|          SFA    EST,T5      WRITE EST ENTRY
11729  M00S09163.msm     +++|          ADK    EQDE
11730  M00S09164.msm     +++|          CWD    FN
11731  M00S09165.msm     +++|          LDC    501         BUFFER INDEX
11732  M00S09166.msm     +++|          STD    T1
11733  M00S09167.msm     +++|          LDC    LTKL-1
11734  M00S09168.msm     +++|          SBD    T6
11735  M00S09169.msm     +++|          PJN    IDS3        IF LABEL TRACK WITHIN RANGE
11736  M00S09170.msm     +++| IDS2     LDC    IDSA
11737  M00S09171.msm     +++|          LJM    /RMS/HNG    ISSUE ERROR MESSAGE AND HANG
11738  M00S09172.msm     +++|
11739  M00S09173.msm     +++|*         PREWRITE ALL POTENTIAL LABEL TRACKS THAT ARE FLAWED.
11740  M00S09174.msm     +++|
11741  M00S09175.msm     +++| IDS3     LDN    0           CLEAR SECTOR BUFFER
11742  M00S09176.msm     +++|          STM    BFMS,T1
11743  M00S09177.msm     +++|          SOD    T1
11744  M00S09178.msm     +++|          PJN    IDS3        IF MORE TO CLEAR
11745  M00S09179.msm     +++|          SHN    -7
11746  M00S09180.msm     +++|          STM    FNSS        SET FLAW INDICATOR
11747  M00S09181.msm     +++|          SETMS  IO,(SM,AR,DF)
11748  M00S09182.msm     +++|          RJM    PFT         PREWRITE LABEL TRACK
11749  M00S09183.msm     +++|          LDC    FLTK
11750  M00S09184.msm     +++|          STD    T6
11751  M00S09185.msm     +++| IDS4     LDD    T6          CHECK TRACK FLAWED
11752  M00S09186.msm     +++|          RJM    CTF
11753  M00S09187.msm     +++|          NJN    IDS5        IF NOT FLAWED
11754  M00S09188.msm     +++|          STD    T7
11755  M00S09189.msm     +++|          RJM    PFT         PREWRITE FLAWED TRACK
11756  M00S09190.msm     +++| IDS5     SOD    T3
11757  M00S09191.msm     +++|          ZJN    IDS6        IF END OF TRACKS ON DEVICE
11758  M00S09192.msm     +++|          AOD    T6
11759  M00S09193.msm     +++|          LMC    LTKL
11760  M00S09194.msm     +++|          NJN    IDS4        IF NOT ALL POSSIBLE LABEL TRACKS
11761  M00S09195.msm     +++| IDS6     ENDMS
11762  M00S09196.msm     +++|*         LDN    0
11763  M00S09197.msm     +++|          LJM    IDSX        RETURN
11764  M00S09198.msm     +++|
11765  M00S09199.msm     +++|
11766  M00S09200.msm     +++| IDSA     DATA   C*LABEL TRACK CONFLICT.*
11767  M00S09201.msm     +++| IFM      SPACE  4,15
11768  M00S09202.msm     +++|**        IFM - INTERPRET FLAW MAP.
11769  M00S09203.msm     +++|*
11770  M00S09204.msm     +++|*         ENTRY  (EQ) = (T5) = EST ORDINAL.
11771  M00S09205.msm     +++|*                (FS - FS+4) = MST STATUS WORD (STLL).
11772  M00S09206.msm     +++|*                (FN - FN+4) = EST ENTRY FOR EQUIPMENT.
11773  M00S09207.msm     +++|*                (CS) = CHANNEL STATUS.
11774  M00S09208.msm     +++|*
11775  M00S09209.msm     +++|*         EXIT   (T5) = EQUIPMENT.
11776  M00S09210.msm     +++|*                (AM) = ALGORITHM INDEX.
11777  M00S09211.msm     +++|*                FLAWS SET IN TRT FOR *LDAM* TYPE EQUIPMENT.
11778  M00S09212.msm     +++|*
11779  M00S09213.msm     +++|*         EREXIT (A) .NE. 0 IF REMOVABLE *LDAM* DEVICE NOT READY.
11780  M00S09214.msm     +++|*                TO *IDSX* IF REMOVABLE *LDAM* DEVICE NOT READY.
11781  M00S09215.msm     +++|*
11782  M00S09216.msm     +++|*         USES   T3, CM - CM+4, FS - FS+1.
11783  M00S09217.msm     +++|*
11784  M00S09218.msm     +++|*         CALLS  EXR, SDR, *0TI*, *0TJ*.
11785  M00S09219.msm     +++|*
11786  M00S09220.msm     +++|*         MACROS EXECUTE.
11787  M00S09221.msm     +++|
11788  M00S09222.msm     +++|
11789  M00S09223.msm     +++| IFM2     LDD    FN+3        GET UNIT COUNT
11790  M00S09224.msm     +++|          SHN    3
11791  M00S09225.msm     +++|          ADN    DDLL
11792  M00S09226.msm     +++|          CRD    CM
11793  M00S09227.msm     +++|          LDD    CM          SET UNIT COUNT
11794  M00S09228.msm     +++|          LPN    7
11795  M00S09229.msm     +++|          STD    T2
11796  M00S09230.msm     +++|          LDN    PRFM        REQUEST FLAW MAP PROCESSING
11797  M00S09231.msm     +++|          RJM    SDR         SET BUFFERED DEVICE REQUEST
11798  M00S09232.msm     +++|
11799  M00S09233.msm     +++| IFM      SUBR               ENTRY/EXIT
11800  M00S09234.msm     +++|          LDD    CS
11801  M00S09235.msm     +++|          ZJN    IFM2        IF ALL CONCURRENT CHANNELS
11802  M00S09236.msm     +++|          LDD    T5          SET EQUIPMENT PARAMETER
11803  M00S09237.msm     +++|          STM    MIPA
11804  M00S09238.msm     +++| IFM1     LDD    FN+4
11805  M00S09239.msm     +++|          SHN    3
11806  M00S09240.msm     +++|          ADN    DILL        READ ALGORITHM INDEX FROM LIST
11807  M00S09241.msm     +++|          CRD    CM
11808  M00S09242.msm     +++|          LDD    CM+4        LOAD ALGORITHM INDEX
11809  M00S09243.msm     +++|          LPN    77
11810  M00S09244.msm     +++|          STD    AM
11811  M00S09245.msm     +++|          EXECUTE 0TI,MILA   EXECUTE FLAW PROCESSOR
11812  M00S09246.msm     +++|          ZJN    IFMX        IF NO FLAWING ERRORS
11813  M00S09247.msm     +++|          LDM    RDCT
11814  M00S09248.msm     +++|          LPN    77
11815  M00S09249.msm     +++|          LMN    NRDE
11816  M00S09250.msm     +++|          NJN    IFMX        IF DEVICE READY
11817  M00S09251.msm     +++|          LDD    FN
11818  M00S09252.msm     +++|          SHN    21-10
11819  M00S09253.msm     +++|          PJN    IFM1        IF NON-REMOVABLE DEVICE
11820  M00S09254.msm     +++|          LDN    ZERL
11821  M00S09255.msm     +++|          CRD    CM
11822  M00S09256.msm     +++|          LDN    0           CLEAR INITIALIZATION REQUEST
11823  M00S09257.msm     +++|          STD    RE
11824  M00S09258.msm     +++|          STD    FS
11825  M00S09259.msm     +++|          LMN    STNR        SET NOT READY STATUS
11826  M00S09260.msm     +++|          STD    FS+1
11827  M00S09261.msm     +++|          LDD    FN+4
11828  M00S09262.msm     +++|          SHN    3
11829  M00S09263.msm     +++|          ADN    PFGL        CLEAR DEVICE DESCRIPTION
11830  M00S09264.msm     +++|          CWD    CM
11831  M00S09265.msm     +++|          ADN    PUGL-PFGL
11832  M00S09266.msm     +++|          CWD    CM
11833  M00S09267.msm     +++|          ADN    STLL-PUGL   STORE MST STATUS WORD
11834  M00S09268.msm     +++|          CWD    FS
11835  M00S09269.msm     +++|          LJM    IDSX        EXIT
Line S09270 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11836  M01S09270.283l840 ---| PFR      SPACE  4,20
11837  M01S09271.283l840 ---|**        PFR - PROCESS FORMAT REQUEST.
11838  M01S09272.283l840 ---|*
11839  M01S09273.283l840 ---|*         ENTRY  (A) = 0 IF DEADSTART SECTOR READ BY *RCS*.
11840  M01S09274.283l840 ---|*                (AM) = ALGORITHM INDEX.
11841  M01S09275.283l840 ---|*                (CS) = CHANNEL STATUS.
11842  M01S09276.283l840 ---|*                (FR) = FORMAT REQUIRED FLAG.
11843  M01S09277.283l840 ---|*                (LC) = FIRST CYLINDER OF *CTI* SPACE.
11844  M01S09278.283l840 ---|*                (T5) = EST ORDINAL.
11845  M01S09279.283l840 ---|*                (T6) = TRACK CONTAINING DEADSTART SECTOR.
11846  M01S09280.283l840 ---|*                (T7) = DEADSTART SECTOR.
11847  M01S09281.283l840 ---|*                (FN - FN+4) = EST ENTRY.
11848  M01S09282.283l840 ---|*                (FS - FS+4) = *STLL* WORD OF MST.
11849  M01S09283.283l840 ---|*
11850  M01S09284.283l840 ---|*         USES   T1, T2, T3, T4, CM - CM+4, CN - CN+4.
11851  M01S09285.283l840 ---|*
11852  M01S09286.283l840 ---|*         CALLS  F8D.
11853  M01S09287.283l840 ---|*
11854  M01S09288.283l840 ---|*         MACROS CMSTF, ENDMS, RCHAN.
11855  M01S09289.283l840 ---|
11856  M01S09290.283l840 ---|
11857  M01S09291.283l840 ---| PFR2     STD    T2          SET INSTRUCTION ADDRESS
11858  M01S09292.283l840 ---|          LDI    T2
11859  M01S09293.283l840 ---|          SCN    37
11860  M01S09294.283l840 ---|          LMD    T4          MODIFY INSTRUCTION
11861  M01S09295.283l840 ---|          STI    T2
11862  M01S09296.283l840 ---|          AOD    T1          ADVANCE LIST ADDRESS
11863  M01S09297.283l840 ---| PFR3     LDI    T1
11864  M01S09298.283l840 ---|          NJN    PFR2        IF NOT END OF LIST
11865  M01S09299.283l840 ---|          LDD    FN+4
11866  M01S09300.283l840 ---|          SHN    3
11867  M01S09301.283l840 ---|          ADN    DDLL        FETCH UNIT LIST FROM MST
11868  M01S09302.283l840 ---|          CRD    CN
11869  M01S09303.283l840 ---|          LDC    DSCP*200+MS1W  STORE FORMATTING MESSAGE
11870  M01S09304.283l840 ---|          CWM    PFRA,ON
11871  M01S09305.283l840 ---|
11872  M01S09306.283l840 ---|*         GENERATE PARAMETER BLOCK TO FORMAT DEVICE.
11873  M01S09307.283l840 ---|
11874  M01S09308.283l840 ---| PFR4     LDN    0           SET FIRST CYLINDER
11875  M01S09309.283l840 ---|          STD    PB
11876  M01S09310.283l840 ---|          LDD    TH          SET LARGE RECORD SIZE
11877  M01S09311.283l840 ---|          STD    PB+2
11878  M01S09312.283l840 ---|          LDD    CN+4        EXTRACT NEXT UNIT
11879  M01S09313.283l840 ---|          SHN    14
11880  M01S09314.283l840 ---|          STD    CN+4
11881  M01S09315.283l840 ---|          ERRPL  4000-3*SLDC CODE DEPENDS ON VALUE
11882  M01S09316.283l840 ---|          SHN    -14
11883  M01S09317.283l840 ---|          LMC    1S10+3S6    APPEND MODE / OPERATION DECODE
11884  M01S09318.283l840 ---|          STD    PB+1
11885  M01S09319.283l840 ---|          RJM    F8D         FORMAT DEVICE
11886  M01S09320.283l840 ---|          LDD    T3
11887  M01S09321.283l840 ---|          ZJN    PFR7        IF DEADSTART SECTOR READ WITHOUT ERROR
11888  M01S09322.283l840 ---|          LDC    885D
11889  M01S09323.283l840 ---|          STD    PB          SET CYLINDER FOR DEADSTART SECTOR
11890  M01S09324.283l840 ---|          ADN    1
11891  M01S09325.283l840 ---|          STD    LC
11892  M01S09326.283l840 ---|          LDC    502         SECTOR BUFFER INDEX
11893  M01S09327.283l840 ---|          STD    PB+2
11894  M01S09328.283l840 ---| PFR5     LDN    0           CLEAR SECTOR BUFFER
11895  M01S09329.283l840 ---|          STM    BFMS-1,PB+2
11896  M01S09330.283l840 ---|          SOD    PB+2
11897  M01S09331.283l840 ---|          NJN    PFR5        IF BUFFER NOT CLEARED
11898  M01S09332.283l840 ---|*         LDN    0
11899  M01S09333.283l840 ---|*         STD    PB+2
11900  M01S09334.283l840 ---|          RJM    F8D         FORMAT DEADSTART CYLINDER
11901  M01S09335.283l840 ---|          LDC    -1S10
11902  M01S09336.283l840 ---|          RAD    PB+1
11903  M01S09337.283l840 ---| PFR6     SOD    PB          FORMAT PROTECTED AREA
11904  M01S09338.283l840 ---|          RJM    F8D
11905  M01S09339.283l840 ---|          AOD    PB+2        ADVANCE TRACK NUMBER
11906  M01S09340.283l840 ---|          LMN    2
11907  M01S09341.283l840 ---|          NJN    PFR6        IF MORE TRACKS TO FORMAT
11908  M01S09342.283l840 ---|          LDC    BFMS+WLSF
11909  M01S09343.283l840 ---|          RJM    WDS         CLEAR DEADSTART SECTOR
11910  M01S09344.283l840 ---| PFR7     LDD    CN
11911  M01S09345.283l840 ---|          LPN    7
11912  M01S09346.283l840 ---|          SBN    1           DECREMENT UNIT COUNT
11913  M01S09347.283l840 ---|          STD    CN
11914  M01S09348.283l840 ---|          PJP    PFR4        IF MULTI-UNIT DEVICE
11915  M01S09349.283l840 ---|          ENDMS
11916  M01S09350.283l840 ---|          LDC    DSCP*200+MS1W  RESTORE RECOVERY MESSAGE
11917  M01S09351.283l840 ---|          CWM    PFRB,ON
11918  M01S09352.283l840 ---|          CMSTF  LFPR        CLEAR FORMAT REQUEST
11919  M01S09353.283l840 ---|
11920  M01S09354.283l840 ---| PFR      SUBR               ENTRY/EXIT
11921  M01S09355.283l840 ---|          STD    T3
11922  M01S09356.283l840 ---|          LDD    FR
11923  M01S09357.283l840 ---|          NJN    PFR1        IF FORMAT REQUIRED
11924  M01S09358.283l840 ---|          LDD    FS
11925  M01S09359.283l840 ---|          SHN    21-LFPR+LFPR/12D*12D
11926  M01S09360.283l840 ---|          PJN    PFRX        IF DEVICE NOT BEING FORMATTED
11927  M01S09361.283l840 ---| PFR1     LDD    AM
11928  M01S09362.283l840 ---|          LMN    AIDC
11929  M01S09363.283l840 ---|          NJN    PFRX        IF NOT 895 DEVICE
11930  M01S09364.283l840 ---|          STD    CM+2
11931  M01S09365.283l840 ---|          LDD    CS
11932  M01S09366.283l840 ---|          ZJN    PFRX        IF ALL CONCURRENT CHANNELS
Line S09367 Modification History
M01 (Removed by) msm44
M02 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11933  M02S09367.283l840 ---|          LDD    FN+1        RESERVE CHANNEL
Line S00001 Modification History
M01 (Added by) msm44
M02 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11934  M02S00001.283l840 ---|          LPN    77          CLEAR IMMEDIATE RETURN AND RESERVE CHANNEL
Line S09368 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
11935  M01S09368.283l840 ---|          RCHAN
11936  M01S09369.283l840 ---|          LDD    CM+1        SAVE CHANNEL FOR *ENDMS*
11937  M01S09370.283l840 ---|          STD    T4
11938  M01S09371.283l840 ---|          AOM    CHRV
11939  M01S09372.283l840 ---|          LDC    CTDC        SET ADDRESS OF INSTRUCTION LIST
11940  M01S09373.283l840 ---|          STD    T1
11941  M01S09374.283l840 ---|          LJM    PFR3        MODIFY CHANNEL INSTRUCTIONS
11942  M01S09375.283l840 ---|
11943  M01S09376.283l840 ---|
11944  M01S09377.283l840 ---| PFRA     DATA   10HFORMATTING
11945  M01S09378.283l840 ---| PFRB     DATA   10HRECOVERING
11946  M00S09379.msm     +++| PFT      SPACE  4,15
11947  M00S09380.msm     +++|**        PFT - PREWRITE FLAWED TRACK.
11948  M00S09381.msm     +++|*
11949  M00S09382.msm     +++|*         ENTRY  (T4 - T7) = MASS STORAGE PARAMETERS.
11950  M00S09383.msm     +++|*                (PFTA) .NE. 0 IF *LDAM* DEVICE.
11951  M00S09384.msm     +++|*                DRIVER PRESET.
11952  M00S09385.msm     +++|*
11953  M00S09386.msm     +++|*         CALLS  WDS.
11954  M00S09387.msm     +++|
11955  M00S09388.msm     +++|
11956  M00S09389.msm     +++| PFT      SUBR               ENTRY/EXIT
11957  M00S09390.msm     +++| PFT2     LDC    BFMS+WCSF   WRITE SECTOR
11958  M00S09391.msm     +++|          RJM    WDS
11959  M00S09392.msm     +++|          LDC    0
11960  M00S09393.msm     +++| PFTA     EQU    *-1
11961  M00S09394.msm     +++|          ZJN    PFTX        IF NOT *LDAM* DEVICE
11962  M00S09395.msm     +++|          AOD    T7
11963  M00S09396.msm     +++|          LMM    SLM
11964  M00S09397.msm     +++|          NJN    PFT2        IF NOT END OF TRACK
11965  M00S09398.msm     +++|          UJN    PFTX        RETURN
11966  M00S09399.msm     +++| RCS      SPACE  4,15
11967  M00S09400.msm     +++|**        RCS - RESERVE *CTI* SPACE.
11968  M00S09401.msm     +++|*
11969  M00S09402.msm     +++|*         ENTRY  (EQ) = EST ORDINAL.
11970  M00S09403.msm     +++|*                (AM) = ALGORITHM INDEX.
11971  M00S09404.msm     +++|*                (FN+4) = MST POINTER.
11972  M00S09405.msm     +++|*                (CS) = CHANNELS STATUS.
11973  M00S09406.msm     +++|*
11974  M00S09407.msm     +++|*         EXIT   (A) = 0 IF DEADSTART SECTOR READ WITHOUT ERROR.
11975  M00S09408.msm     +++|*                (FR) = 0 IF FORMAT UNREQUIRED (*CIP* SPACE INTACT).
11976  M00S09409.msm     +++|*                (LC) = FIRST CYLINDER OF *CTI* SPACE.
11977  M00S09410.msm     +++|*                (T5) = EST ORDINAL.
11978  M00S09411.msm     +++|*                (T6) = TRACK CONTAINING DEADSTART SECTOR.
11979  M00S09412.msm     +++|*                (T7) = DEADSTART SECTOR.
11980  M00S09413.msm     +++|*                *CTI* SPACE FLAWED IN TRT.
11981  M00S09414.msm     +++|*
Line S09415 Modification History
M01 (Removed by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
11982  M01S09415.ns2776  ---|*         USES   T3, CM - CM+4, CN - CN+4.
Line S00038 Modification History
M01 (Added by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
11983  M01S00038.ns2776  +++|*         USES   T3, T9, CM - CM+4, CN - CN+4.
11984  M00S09416.msm     +++|*
Line S09417 Modification History
M01 (Removed by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
11985  M01S09417.ns2776  ---|*         CALLS  CTF, RDS, WDS, *0PI*.
Line S00039 Modification History
M01 (Added by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
11986  M01S00039.ns2776  +++|*         CALLS  FBT, RDS, WDS, *0PI*.
11987  M00S09418.msm     +++|*
Line S09419 Modification History
M01 (Removed by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
11988  M01S09419.ns2776  ---|*         MACROS ENDMS, EXECUTE, MONITOR, SMSTF.
Line S00040 Modification History
M01 (Added by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
11989  M01S00040.ns2776  +++|*         MACROS ENDMS, EXECUTE, SMSTF.
11990  M00S09420.msm     +++|
11991  M00S09421.msm     +++|
Line S09422 Modification History
M01 (Removed by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
11992  M01S09422.ns2776  ---| RCS8     LDD    FR          FORMAT REQUIRED STATUS
Line S00041 Modification History
M01 (Added by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
11993  M01S00041.ns2776  +++| RCS8     LDC    **          CHECK DEADSTART SECTOR
11994  M01S00042.ns2776  +++| RCSA     EQU    *-1
11995  M01S00043.ns2776  +++|          NJN    RCSX        IF NO VALID DEADSTART SECTOR
11996  M01S00044.ns2776  +++|          LDD    FR          FORMAT REQUIRED STATUS
11997  M00S09423.msm     +++|
11998  M00S09424.msm     +++| RCS      SUBR               ENTRY/EXIT
11999  M00S09425.msm     +++|          LDN    0
12000  M00S09426.msm     +++|          STD    FR          CLEAR FORMAT REQUIRED
12001  M00S09427.msm     +++|          STD    LC
12002  M00S09428.msm     +++|          LDD    CS
12003  M00S09429.msm     +++|          ZJN    RCSX        IF ALL CONCURRENT CHANNELS
12004  M00S09430.msm     +++|          LDD    EQ          SET PARAMETER WORD
12005  M00S09431.msm     +++|          LMC    4000
12006  M00S09432.msm     +++|          STM    MIPA
12007  M00S09433.msm     +++|          EXECUTE  0PI,MILA  READ DEADSTART SECTOR
Line S09434 Modification History
M01 (Removed by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
12008  M01S09434.ns2776  ---|          NJN    RCSX        IF NOT A VALID DEADSTART SECTOR
Line S00045 Modification History
M01 (Added by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
12009  M01S00045.ns2776  +++|          STM    RCSA
12010  M01S00046.ns2776  +++|          NJN    RCS1.1      IF NOT A VALID DEADSTART SECTOR
12011  M00S09435.msm     +++|          ENDMS
12012  M00S09436.msm     +++|          LDM    BFMS+CFBP   EXTRACT FORMAT REQUIRED FLAG
12013  M00S09437.msm     +++|          LPN    40
12014  M00S09438.msm     +++|          STD    FR
12015  M00S09439.msm     +++|          LMM    BFMS+CFBP   CLEAR FORMAT REQUIRED FLAG
12016  M00S09440.msm     +++|          STM    BFMS+CFBP
12017  M00S09441.msm     +++|          LDM    BFMS+MSLP
12018  M00S09442.msm     +++|          NJN    RCS1        IF *MSL* INSTALLED
12019  M00S09443.msm     +++|          LDM    BFMS+CDAP
12020  M00S09444.msm     +++|          NJN    RCS1        IF COMMON DISK AREA INSTALLED
12021  M00S09445.msm     +++|          LDM    BFMS+CTIP
12022  M00S09446.msm     +++| RCS1     STD    LC
Line S09447 Modification History
M01 (Removed by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
12023  M01S09447.ns2776  ---|          ZJP    RCS8        IF *CTI* NOT INSTALLED
12024  M01S09448.ns2776  ---|          SHN    1
Line S00047 Modification History
M01 (Added by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
12025  M01S00047.ns2776  +++|          NJN    RCS1.2      IF *CTI* INSTALLED
12026  M01S00048.ns2776  +++| RCS1.1   LDD    AM
12027  M01S00049.ns2776  +++|          LMN    AIDR
12028  M01S00050.ns2776  +++|          NJP    RCS8        IF NOT CDSS II
12029  M01S00051.ns2776  +++|          LDC    840D        FIRST CYLINDER OF AREA TO BE FLAWED
12030  M01S00052.ns2776  +++| RCS1.2   SHN    1
12031  M00S09449.msm     +++|          STD    T3
12032  M00S09450.msm     +++|          LDD    FN+4        GET DEVICE LENGTH FROM MST
12033  M00S09451.msm     +++|          SHN    3
12034  M00S09452.msm     +++|          ADK    TDGL
12035  M00S09453.msm     +++|          CRD    CN
12036  M00S09454.msm     +++|          LDD    AM
12037  M00S09455.msm     +++|          LMN    AIDA
12038  M00S09456.msm     +++|          NJN    RCS2        IF NOT 33502
12039  M00S09457.msm     +++|          LDD    T3
12040  M00S09458.msm     +++|          SHN    -1
12041  M00S09459.msm     +++|          ADC    NTDA/2      COMPLETE CYLINDER TO TRACK CONVERSION
12042  M00S09460.msm     +++|          STD    T3
12043  M00S09461.msm     +++|          UJN    RCS4        FLAW TRACKS
12044  M00S09462.msm     +++|
12045  M00S09463.msm     +++| RCS2     LMN    AIDI&AIDA
12046  M00S09464.msm     +++|          ZJN    RCS3        IF 7X54/844-21
12047  M00S09465.msm     +++|          LMN    AIDK&AIDI
12048  M00S09466.msm     +++|          ZJN    RCS3        IF 7154/844-21
12049  M00S09467.msm     +++|          LMN    AIDX&AIDK
Line S09468 Modification History
M01 (Removed by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
12050  M01S09468.ns2776  ---|          NJN    RCS4        IF NOT FSC 3330-1
Line S00053 Modification History
M01 (Added by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
12051  M01S00053.ns2776  +++|          ZJN    RCS3        IF FSC 3330-1
12052  M01S00054.ns2776  +++|          LMN    AIDR&AIDX
12053  M01S00055.ns2776  +++|          NJN    RCS4        IF NOT CDSS II
12054  M01S00056.ns2776  +++|          LDD    T3          INITIALIZE TRACK CALCULATION
12055  M01S00057.ns2776  +++|          STD    T9
12056  M01S00058.ns2776  +++|          LDN    0
12057  M01S00059.ns2776  +++|          STD    T3
12058  M01S00060.ns2776  +++|          LDC    1062        SET FLAW LIMIT FOR CDSS II
12059  M01S00061.ns2776  +++|          STD    CN
12060  M01S00062.ns2776  +++| RCS2.1   LCN    3           FOR THIS PURPOSE, TRACK = CYLINDER*2/3
12061  M01S00063.ns2776  +++|          RAD    T9
12062  M01S00064.ns2776  +++|          MJN    RCS5        IF CONVERSION COMPLETE
12063  M01S00065.ns2776  +++|          AOD    T3          INCREMENT TRACK NUMBER
12064  M01S00066.ns2776  +++|          UJN    RCS2.1      CONTINUE DIVISION
12065  M01S00067.ns2776  +++|
12066  M00S09469.msm     +++| RCS3     LDD    T3
12067  M00S09470.msm     +++|          RAD    T3          COMPLETE CYLINDER CONVERSION
12068  M00S09471.msm     +++| RCS4     LDD    T3
12069  M00S09472.msm     +++|          SBD    CN
12070  M00S09473.msm     +++|          PJN    RCS7        IF *CTI* BEYOND LOGICAL END OF DEVICE
Line S09474 Modification History
M01 (Removed by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
12071  M01S09474.ns2776  ---| RCS5     LDD    T3          CHECK TRACK FLAWED
12072  M01S09475.ns2776  ---|          RJM    CTF
12073  M01S09476.ns2776  ---|          ZJN    RCS6        IF TRACK FLAWED
12074  M01S09477.ns2776  ---|          LDD    T5
12075  M01S09478.ns2776  ---|          STD    CM+1
12076  M01S09479.ns2776  ---|          LDD    T3
12077  M01S09480.ns2776  ---|          STD    CM+2
12078  M01S09481.ns2776  ---|          LDN    STFS        FLAW TRACK IN TRT
12079  M01S09482.ns2776  ---|          STD    CM+3
12080  M01S09483.ns2776  ---|          MONITOR  STBM
12081  M01S09484.ns2776  ---| RCS6     AOD    T3          ADVANCE TRACK NUMBER
12082  M01S09485.ns2776  ---|          LMD    CN
12083  M01S09486.ns2776  ---|          NJN    RCS5        IF NOT END OF LOGICAL DEVICE
Line S00068 Modification History
M01 (Added by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
12084  M01S00068.ns2776  +++| RCS5     RJM    FBT         FLAW BLOCK OF TRACKS
12085  M01S00069.ns2776  +++|          LDD    LC
12086  M01S00070.ns2776  +++|          ZJP    RCS8        IF *CTI* NOT PRESENT (CDSS II ONLY)
12087  M00S09487.msm     +++| RCS7     SMSTF  GCTI        SET *CTI* PRESENT FLAG
12088  M00S09488.msm     +++|          LDN    ZERL        CLEAR DEADSTART FILE INDICATOR
12089  M00S09489.msm     +++|          CRM    BFMS+OSBP,ON
12090  M00S09490.msm     +++|          LDC    BFMS+WLSF   REWRITE DEADSTART SECTOR
12091  M00S09491.msm     +++|          RJM    WDS
12092  M00S09492.msm     +++|          ENDMS              RELEASE CHANNEL
12093  M00S09493.msm     +++|*         LDN    0
Proceed to Part 7
cdc/nos2.source/opl.opl871/deck/msm.006.txt ยท Last modified: by 127.0.0.1