User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:set.014

Deck SET Part 014

79 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
24445  M01S16761.271l716 ---|          NJN    IPS6        IF ALL PP-S NOT CHECKED
24446  M01S16762.271l716 ---|          LDM    .CCHN
24447  M01S16763.271l716 ---|          ZJN    IPS9        IF NO CPP-S
24448  M01S16764.271l716 ---|          STD    T3
24449  M01S16765.271l716 ---| IPS7     LDM    .CPPL
24450  M01S16766.271l716 ---|          SHN    21-0
24451  M01S16767.271l716 ---|          STM    .CPPL
24452  M01S16768.271l716 ---|          PJN    IPS8        IF PP NOT DISABLED
24453  M01S16769.271l716 ---|          LDD    T7
24454  M01S16770.271l716 ---|          CWM    IPSA,ON
24455  M01S16771.271l716 ---| IPS8     LDN    10          ADVANCE INPUT REGISTER ADDRESS
24456  M01S16772.271l716 ---|          RAD    T7
24457  M01S16773.271l716 ---|          SOD    T3
24458  M01S16774.271l716 ---|          NJN    IPS7        IF NOT COMPLETE LOOP
24459  M01S16775.271l716 ---|
24460  M01S16776.271l716 ---| IPS9     LDD    CA+1        STORE PSEUDO PP INDICATOR
24461  M01S16777.271l716 ---|          SBN    10
24462  M01S16778.271l716 ---|          CWM    IPSA+2,ON
24463  M01S16779.271l716 ---|
24464  M01S16780.271l716 ---| IPS      SUBR               ENTRY/EXIT
24465  M01S16781.271l716 ---|          LDN    PPCP
24466  M01S16782.271l716 ---|          CRD    CN
24467  M01S16783.271l716 ---|          LDD    CN+4        SET FWA OF PP COMMUNICATION AREA
24468  M01S16784.271l716 ---|          STD    CA+1
24469  M01S16785.271l716 ---|          STD    T7
24470  M01S16786.271l716 ---|          CRD    CM
24471  M01S16787.271l716 ---|          STD    T3
24472  M01S16788.271l716 ---|          ADN    10
24473  M01S16789.271l716 ---|          STD    T4
24474  M01S16790.271l716 ---|          SHN    -14
24475  M01S16791.271l716 ---|          STD    CA
24476  M01S16792.271l716 ---|          LDM    .PPU        SET PP COUNT
24477  M01S16793.271l716 ---|          STD    T6
24478  M01S16794.271l716 ---|          ADM    .CCHN
24479  M01S16795.271l716 ---|          SHN    3           SET END OF COMMUNICATIONS AREA SCAN
24480  M01S16796.271l716 ---|          RAD    T4
24481  M01S16797.271l716 ---| IPS1     LDN    10          CLEAR COMMUNICATION AREA
24482  M01S16798.271l716 ---|          RJM    CLS
24483  M01S16799.271l716 ---|          LDD    CM
24484  M01S16800.271l716 ---|          LMC    2R**
24485  M01S16801.271l716 ---|          NJN    IPS2        IF PP NOT DISABLED ON PREVIOUS DEADSTART
24486  M01S16802.271l716 ---|          LDD    T3
24487  M01S16803.271l716 ---|          CWD    CM
24488  M01S16804.271l716 ---| IPS2     LDN    10          ADVANCE INPUT REGISTER ADDRESS
24489  M01S16805.271l716 ---|          RAD    T3
24490  M01S16806.271l716 ---|          CRD    CM          READ INPUT REGISTER
24491  M01S16807.271l716 ---|          LMD    T4
24492  M01S16808.271l716 ---|          NJN    IPS1        IF ALL PP-S NOT CHECKED
24493  M01S16809.271l716 ---|          STD    T3
24494  M01S16810.271l716 ---|          STD    T4
24495  M01S16811.271l716 ---|          RJM    APP         ASSIGN *CTI* INITIATED PP-S
24496  M01S16812.271l716 ---|          LDD    NC          INSERT SYSTEM CP INTO DISABLED PP IR
24497  M01S16813.271l716 ---|          RAM    IPSA+1
24498  M01S16814.271l716 ---|          LJM    IPS3        PROCESS PP COMMUNICATIONS AREA
24499  M01S16815.271l716 ---|
24500  M01S16816.271l716 ---| IPSA     VFD    18/3R***,6/**,36/
24501  M01S16817.271l716 ---|          VFD    24/3RCIO
24502  M01S16818.271l716 ---| PTR      SPACE  4,10
24503  M01S16819.271l716 ---|**        PTR - PROCESS POINTER AREA.
24504  M01S16820.271l716 ---|*
24505  M01S16821.271l716 ---|*         EXIT   (ID) = MACHINE ID.
24506  M01S16822.271l716 ---|*                (LD) = LINK DEVICE STATUS.
24507  M01S16823.271l716 ---|*
24508  M01S16824.271l716 ---|*         USES   AB - AB+4, CM - CM+4, CN - CN+4, T3 - T7.
24509  M01S16825.271l716 ---|*
24510  M01S16826.271l716 ---|*         CALLS  SCS.
24511  M01S16827.271l716 ---|*
24512  M01S16828.271l716 ---|*         MACROS SFA.
24513  M01S16829.271l716 ---|
24514  M01S16830.271l716 ---|
24515  M01S16831.271l716 ---| PTR      SUBR               ENTRY/EXIT
24516  M01S16832.271l716 ---|          LDN    DSSL
24517  M01S16833.271l716 ---|          CRD    CM
Line S00001 Modification History
M01 (Added by) ns2500
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
24518  M02S00001.271l716 ---|          ADN    PLDP-DSSL   GET PLD POINTER
24519  M02S00002.271l716 ---|          CRD    CN
24520  M02S00003.271l716 ---|          LDN    0           DISABLE *SPLM*
24521  M02S00004.271l716 ---|          STD    CN
24522  M02S00005.271l716 ---|          STD    CN+1
Line S16834 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
24523  M01S16834.271l716 ---|          LDD    CM+4        SET RECOVERY MODE IN CMR
24524  M01S16835.271l716 ---|          SCN    7
24525  M01S16836.271l716 ---|          LMD    RM
24526  M01S16837.271l716 ---|          LMN    4           ADD DEADSTART IN PROGRESS FLAG
24527  M01S16838.271l716 ---|          STD    CM+4
24528  M01S16839.271l716 ---|          LDN    DSSL
24529  M01S16840.271l716 ---|          CWD    CM
Line S00006 Modification History
M01 (Added by) ns2500
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
24530  M02S00006.271l716 ---|          ADN    PLDP-DSSL   STORE LIBRARY LOCKED STATUS
24531  M02S00007.271l716 ---|          CWD    CN
Line S16841 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
24532  M01S16841.271l716 ---|          RJM    SCS         SET CPU STATUS
24533  M01S16842.271l716 ---|          LDN    JSCL
24534  M01S16843.271l716 ---|          CRD    CN
24535  M01S16844.271l716 ---|          ADN    PRBP-JSCL
24536  M01S16845.271l716 ---|          CRD    CM
24537  M01S16846.271l716 ---|          LDD    CM          INTERLOCK PROBE TABLES
24538  M01S16847.271l716 ---|          LPC    3777
24539  M01S16848.271l716 ---|          STD    CM
24540  M01S16849.271l716 ---|          LDC    4000        SET SCHEDULER ACTIVE
24541  M01S16850.271l716 ---|          STD    CN
24542  M01S16851.271l716 ---|          LDN    JSCL        STORE SCHEDULER INTERLOCK
24543  M01S16852.271l716 ---|          CWD    CN
24544  M01S16853.271l716 ---|          ADN    RDSL-JSCL   CLEAR LABEL CHECK CONTROL
24545  M01S16854.271l716 ---|          CWD    ZR
24546  M01S16855.271l716 ---|          ADN    PRBP-RDSL
24547  M01S16856.271l716 ---|          CWD    CM
24548  M01S16857.271l716 ---|          SBN    PRBP-SCRL
24549  M01S16858.271l716 ---|          CRD    CM
24550  M01S16859.271l716 ---|          LDD    CM          CLEAR EMERGENCY STEP STATUS
24551  M01S16860.271l716 ---|          LPC    -5600
24552  M01S16861.271l716 ---|          LMC    4000        SET *1MB* (ERROR LOGGING) ACTIVE
24553  M01S16862.271l716 ---|          STD    CM
24554  M01S16863.271l716 ---|          LDN    0           CLEAR *1CK* CALLED STATUS
24555  M01S16864.271l716 ---|          STD    CM+2
24556  M01S16865.271l716 ---|          LDN    ZERL
24557  M01S16866.271l716 ---|          CRD    AB
24558  M01S16867.271l716 ---|          ADN    DSDL-ZERL   STORE *DSD* BUFFER INTERLOCK
24559  M01S16868.271l716 ---|          CWD    CN
24560  M01S16869.271l716 ---|          SBN    DSDL-MMFL   PRESERVE MACHINE ID
24561  M01S16870.271l716 ---|          CRD    ID+LD*
24562  M01S16871.271l716 ---|          ADN    INWL-MMFL   STORE SCHEDULER INTERLOCK
24563  M01S16872.271l716 ---|          CWM    .INWL,ON
24564  M01S16873.271l716 ---|          SBN    INWL+1-SCRL
24565  M01S16874.271l716 ---|          CWD    CM
24566  M01S16875.271l716 ---|          LCN    0           INITIALIZE FLAG REGISTER STATUS
24567  M01S16876.271l716 ---|          STD    AB+3
24568  M01S16877.271l716 ---|          LDD    LD
24569  M01S16878.271l716 ---|          LPC    777
24570  M01S16879.271l716 ---|          ZJN    PTR1        IF NOT MMF ENVIRONMENT
24571  M01S16880.271l716 ---|          SFA    EST
24572  M01S16881.271l716 ---|          CRD    CM          READ EST ENTRY FOR LINK DEVICE
24573  M01S16882.271l716 ---|          ADN    EQAE-EQDE
24574  M01S16883.271l716 ---|          CRD    T3
24575  M01S16884.271l716 ---|          LDD    T3+2
24576  M01S16885.271l716 ---|          SHN    -6
24577  M01S16886.271l716 ---|          LPN    3
Line S16887 Modification History
M01 (Removed by) set57
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
24578  M02S16887.271l716 ---|          STM    LDSC        SET EMSC FOR LINK DEVICE
Line S00001 Modification History
M01 (Added by) set57
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
24579  M02S00001.271l716 ---|          STM    LDSH        SET SHIFT COUNT FOR LINK DEVICE
Line S16888 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
24580  M01S16888.271l716 ---|          LDD    CM+4
24581  M01S16889.271l716 ---|          SHN    3
24582  M01S16890.271l716 ---|          ADN    ALGL        FETCH LABEL TRACK FROM MST
24583  M01S16891.271l716 ---|          CRD    CM
24584  M01S16892.271l716 ---|          LDD    CM+1        SET LABEL TRACK
24585  M01S16893.271l716 ---|          STD    AB+4
24586  M01S16894.271l716 ---| PTR1     LDK    EXML        GET EXTENDED MEMORY PARAMETER
24587  M01S16895.271l716 ---|          CRD    CM
24588  M01S16896.271l716 ---|          ADK    MMFL-EXML
24589  M01S16897.271l716 ---|          CWD    ID+LD*
24590  M01S16898.271l716 ---|          ADK    MEFL-MMFL
24591  M01S16899.271l716 ---|          CRD    CN
24592  M01S16900.271l716 ---|          ADK    EFRL-MEFL
24593  M01S16901.271l716 ---|          CWD    AB
24594  M01S16902.271l716 ---|          LDD    CN+3        SET EXTENDED MEMORY PARAMETERS
24595  M01S16903.271l716 ---|          STM    EMFL
24596  M01S16904.271l716 ---|          LDD    CN+2
24597  M01S16905.271l716 ---|          SCN    37
24598  M01S16906.271l716 ---|          SHN    11
24599  M01S16907.271l716 ---|          STM    UESC
24600  M01S16908.271l716 ---|          SHN    2
24601  M01S16909.271l716 ---|          SCN    36
24602  M01S16910.271l716 ---|          STM    EMAF
24603  M01S16911.271l716 ---|          SHN    -20
24604  M01S16912.271l716 ---|          STM    EMSC
24605  M01S16913.271l716 ---|          LDD    CM+4
24606  M01S16914.271l716 ---|          LPC    777
24607  M01S16915.271l716 ---|          STD    EN
24608  M01S16916.271l716 ---|          ZJN    PTR2        IF NO EXTENDED MEMORY EQUIPMENT
24609  M01S16917.271l716 ---|          SFA    EST
24610  M01S16918.271l716 ---|          ADK    EQDE
24611  M01S16919.271l716 ---|          CRD    CM
24612  M01S16920.271l716 ---|          LDD    CM+4
24613  M01S16921.271l716 ---|          SHN    3
24614  M01S16922.271l716 ---|          ADK    DILL
24615  M01S16923.271l716 ---|          CRD    AB
24616  M01S16924.271l716 ---|          LDD    AB+3        SET EXTENDED MEMORY TYPE
24617  M01S16925.271l716 ---|          SHN    -6
24618  M01S16926.271l716 ---|          LPN    7
24619  M01S16927.271l716 ---|          STM    EMTY
24620  M01S16928.271l716 ---| PTR2     LJM    PTRX        RETURN
24621  M00S16929.set     ---| RMC      SPACE  4,15
24622  M00S16930.set     ---|**        RMC - RECOVER MSTS FROM CMR.
24623  M00S16931.set     ---|*
24624  M00S16932.set     ---|*         ENTRY  (EQ) = EST ORDINAL.
24625  M00S16933.set     ---|*                (AB - AB+4) = EST ENTRY.
24626  M00S16934.set     ---|*                (CA - CA+1) = CURRENT CM ADDRESS.
24627  M00S16935.set     ---|*
24628  M00S16936.set     ---|*         EXIT   (CA - CA+1) = CM ADDRESS ADVANCED.
Line S00152 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
24629  M01S00152.ns2783  +++|*                TO *DSE* IF MST POINTER ERROR.
24630  M00S16937.set     +++|*
Line S16938 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
24631  M01S16938.ns2783  ---|*         USES   T1, T4, AB - AB+4, CM - CM+4, CN - CN+4.
Line S00153 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
24632  M01S00153.ns2783  +++|*         USES   T1, AB - AB+4, CA - CA+1, CM - CM+4, CN - CN+4.
24633  M00S16939.set     +++|*
24634  M00S16940.set     +++|*         CALLS  RCA.
24635  M00S16941.set     +++|*
24636  M00S16942.set     +++|*         MACROS SFA.
24637  M00S16943.set     +++|
24638  M00S16944.set     +++|
24639  M00S16945.set     +++| RMC      SUBR               ENTRY/EXIT
24640  M00S16946.set     +++|          LDD    AB+4        SAVE MST POINTER
24641  M00S16947.set     +++|          STD    T1
24642  M00S16948.set     +++|          SHN    3
24643  M00S16949.set     +++|          ADN    ACGL        GET DEVICE ACTIVITY WORD
24644  M00S16950.set     +++|          CRD    CN
24645  M00S16951.set     +++|          ADN    SDGL-ACGL
24646  M00S16952.set     +++|          CRD    AB
24647  M00S16953.set     +++|          ADN    STLL-SDGL   READ DEVICE STATUS WORD
24648  M00S16954.set     +++|          CRD    CM
24649  M00S16955.set     +++|          RJM    RCA         CHECK VALID MST POINTER
24650  M00S16956.set     +++|          LMD    T1
24651  M00S16957.set     +++|          ZJN    RMC1        IF VALID ADDRESS
24652  M00S16958.set     +++|          LDC    =C*MST POINTER ERROR.*
24653  M00S16959.set     +++|          JMP    DSE         DISPLAY MESSAGE AND HANG
24654  M00S16960.set     +++|
Line S16961 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
24655  M01S16961.ns2783  ---| RMC1     LDD    CN+4        CLEAR INTERLOCKS
Line S00154 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
24656  M01S00154.ns2783  +++| RMC1     LDD    CN+4        CLEAR *ACGL* INTERLOCKS
24657  M00S16962.set     +++|          LPC    140
24658  M00S16963.set     +++|          STD    CN+4
Line S16964 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
24659  M01S16964.ns2783  ---|          LDD    AB+4
Line S00155 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
24660  M01S00155.ns2783  +++|          LDD    CN          CLEAR PARITY DEVICE ACCESS BIT FOR THIS MF
24661  M01S00156.ns2783  +++|          SCN    **          (MACHINE MASK)
24662  M01S00157.ns2783  +++| RMCA     EQU    *-1
24663  M01S00158.ns2783  +++|          STD    CN
24664  M01S00159.ns2783  +++|          LDD    AB+3        CHECK DEVICE MNEMONIC
24665  M01S00160.ns2783  +++|          LMC    2RDE
24666  M01S00161.ns2783  +++|          ZJN    RMC1.1      IF *DE* DEVICE
24667  M01S00162.ns2783  +++|          LMN    2RDP&2RDE
24668  M01S00163.ns2783  +++|          ZJN    RMC1.1      IF *DP* DEVICE
24669  M01S00164.ns2783  +++|          LDN    0           CLEAR *DAS* OFFLINE UNIT / CYLINDER COUNT
24670  M01S00165.ns2783  +++|          STD    CN+1
24671  M01S00166.ns2783  +++| RMC1.1   LDD    AB+4        CLEAR MST/TRT INTERLOCK IN *SDGL*
24672  M00S16965.set     +++|          SCN    77
24673  M00S16966.set     +++|          STD    AB+4
24674  M00S16967.set     +++|          LDD    CM+1        CLEAR *1MV* ACTIVE FLAG
24675  M00S16968.set     +++|          LPC    -200
24676  M00S16969.set     +++|          STD    CM+1
24677  M00S16970.set     +++|          LDD    CM+4        SET DEVICE NOT BUSY
24678  M00S16971.set     +++|          SCN    3
24679  M00S16972.set     +++|          LMN    1
24680  M00S16973.set     +++|          STD    CM+4
24681  M00S16974.set     +++|          LDD    T1
24682  M00S16975.set     +++|          SHN    3
24683  M00S16976.set     +++|          ADN    ACGL
24684  M00S16977.set     +++|          CWD    CN
24685  M00S16978.set     +++|          ADN    SDGL-ACGL
24686  M00S16979.set     +++|          CWD    AB
24687  M00S16980.set     +++|          ADN    STLL-SDGL
24688  M00S16981.set     +++|          CWD    CM
Line S16982 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
24689  M01S16982.ns2783  ---|          SBN    STLL-TDGL   SET LENGTH OF TRT FROM MST
Line S00167 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
24690  M01S00167.ns2783  +++|          ADN    BDLL-STLL
24691  M00S16983.set     +++|          CRD    CM
Line S16984 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
24692  M01S16984.ns2783  ---|          ADN    DDLL-TDGL
Line S00168 Modification History
M01 (Added by) ns2783
M02 (Removed by) ns2783a
Seq #  *Modification Id* Act 
----------------------------+
24693  M02S00168.ns2783a ---|          ADK    DULL-BDLL
24694  M02S00169.ns2783a ---|          CRD    CN
24695  M02S00170.ns2783a ---|          LDN    0           CLEAR UNIT RESERVE COUNTS IN *DULL*
24696  M02S00171.ns2783a ---|          STD    CN
Line S00172 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
24697  M01S00172.ns2783  +++|          LDD    CM          CLEAR 9853/*DAS* FLAGS
24698  M01S00173.ns2783  +++|          SCN    16
24699  M01S00174.ns2783  +++|          STD    CM
24700  M01S00175.ns2783  +++|          LDD    CM+3        CLEAR DAS MMF PARITY DEVICE ACCESS FLAGS
24701  M01S00176.ns2783  +++|          LPC    7177
24702  M01S00177.ns2783  +++|          STD    CM+3
24703  M01S00178.ns2783  +++|          LDD    T1
24704  M01S00179.ns2783  +++|          SHN    3
24705  M01S00180.ns2783  +++|          ADN    BDLL
24706  M01S00181.ns2783  +++|          CWD    CM
Line S00182 Modification History
M01 (Added by) ns2783
M02 (Removed by) ns2783a
Seq #  *Modification Id* Act 
----------------------------+
24707  M02S00182.ns2783a ---|          ADK    DULL-BDLL
24708  M02S00183.ns2783a ---|          CWD    CN
24709  M02S00184.ns2783a ---|          ADK    DALL-DULL
Line S00001 Modification History
M01 (Added by) ns2783a
Seq #  *Modification Id* Act 
----------------------------+
24710  M01S00001.ns2783a +++|          ADK    DALL-BDLL
Line S00185 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
24711  M01S00185.ns2783  +++|          CRD    CN
24712  M01S00186.ns2783  +++|          ADN    CTLL-DALL
24713  M00S16985.set     +++|          CRD    AB
Line S16986 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
24714  M01S16986.ns2783  ---|          SBN    DDLL-DULL
24715  M01S16987.ns2783  ---|          CRD    CN
24716  M01S16988.ns2783  ---|          LDN    0           CLEAR UNIT RESERVE COUNTS
24717  M01S16989.ns2783  ---|          STD    CN
24718  M01S16990.ns2783  ---|          LDD    AB
Line S16991 Modification History
M01 (Removed by) 272l774
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
24719  M02S16991.ns2783  ---|          LPC    2077
Line S00073 Modification History
M01 (Added by) 272l774
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
24720  M02S00073.ns2783  ---|          LPC    2777
Line S16992 Modification History
M01 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
24721  M01S16992.ns2783  ---|          STD    AB
24722  M01S16993.ns2783  ---|          LDD    T1
24723  M01S16994.ns2783  ---|          SHN    3
24724  M01S16995.ns2783  ---|          ADN    DDLL
24725  M01S16996.ns2783  ---|          CWD    AB
24726  M01S16997.ns2783  ---|          SBN    DDLL-DULL
24727  M01S16998.ns2783  ---|          CWD    CN
24728  M01S16999.ns2783  ---|          SBN    DULL-DALL
24729  M01S17000.ns2783  ---|          CRD    CN
24730  M01S17001.ns2783  ---|          ADK    MCLL-DALL
Line S00187 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
24731  M01S00187.ns2783  +++|          ADK    MCLL-CTLL
Line S17002 Modification History
M01 (Removed by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
24732  M01S17002.ns2552  ---|          CRD    AB
24733  M01S17003.ns2552  ---|          LDN    0
Line S00084 Modification History
M01 (Added by) 253l688
M02 (Removed by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
24734  M02S00084.ns2552  ---|          STD    AB
24735  M02S00085.ns2552  ---|          STD    AB+1
Line S17004 Modification History
M01 (Removed by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
24736  M01S17004.ns2552  ---|          STD    CN+1
24737  M01S17005.ns2552  ---|          STD    AB+3
24738  M01S17006.ns2552  ---|          STD    AB+4
Line S00001 Modification History
M01 (Added by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
24739  M01S00001.ns2552  +++|          CWD    ZR
24740  M01S00002.ns2552  +++|          LDN    0
Line S00003 Modification History
M01 (Added by) ns2552
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
24741  M02S00003.ns2783  ---|          STD    CN+1
Line S00188 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
24742  M01S00188.ns2783  +++|          STD    AB+2        CLEAR ACTIVE BUFFER COUNT
24743  M01S00189.ns2783  +++|          STD    CN+1        CLEAR UNIT INTERLOCKS
24744  M00S17007.set     +++|          LDD    CN          CLEAR DEVICE ACTIVITY
24745  M00S17008.set     +++|          SCN    77
24746  M00S17009.set     +++|          STD    CN
24747  M00S17010.set     +++|          LDD    T1
24748  M00S17011.set     +++|          SHN    3
24749  M00S17012.set     +++|          ADN    DALL
24750  M00S17013.set     +++|          CWD    CN
24751  M01S00190.ns2783  +++|          ADN    CTLL-DALL
24752  M01S00191.ns2783  +++|          CWD    AB
Line S17014 Modification History
M01 (Removed by) ns2552
Seq #  *Modification Id* Act 
----------------------------+
24753  M01S17014.ns2552  ---|          ADK    MCLL-DALL
24754  M01S17015.ns2552  ---|          CWD    AB
24755  M00S17016.set     ---|          LDD    EQ
24756  M00S17017.set     ---|          NJN    RMC2        IF NOT *RD* DEVICE
24757  M00S17018.set     ---|          SFA    EST,,EQ
24758  M00S17019.set     ---|          CRD    CM
24759  M00S17020.set     ---|          LDC    2RRD        RESTORE *RD* DEVICE TYPE
24760  M00S17021.set     ---|          STD    CM+3
24761  M00S17022.set     ---|          LDN    0
24762  M00S17023.set     ---|          STD    CM+2
24763  M00S17024.set     ---|          SFA    EST,EQ
24764  M00S17025.set     ---|          CWD    CM
24765  M00S17026.set     ---| RMC2     LDN    MSTXL       ADVANCE CM ADDRESS
24766  M00S17027.set     ---|          RAD    CA+1
24767  M00S17028.set     ---|          SHN    -14
24768  M00S17029.set     ---|          RAD    CA
24769  M00S17030.set     ---|          LJM    RMCX        RETURN
24770  M00S17031.set     ---| SBD      SPACE  4,10
24771  M00S17032.set     ---|**        SBD - SEARCH FOR BUFFERED DEVICES.
24772  M00S17033.set     ---|*
24773  M00S17034.set     ---|*         EXIT   (KI) = BUFFERED DEVICE COUNT.
24774  M00S17035.set     ---|*
24775  M00S17036.set     ---|*         USES   EQ, CM - CM+4.
24776  M00S17037.set     ---|*
24777  M00S17038.set     ---|*         CALLS  CKB, PBD, SME.
24778  M00S17039.set     ---|
24779  M00S17040.set     ---|
24780  M00S17041.set     ---| SBD1     LDD    AB+4        READ MST
24781  M00S17042.set     ---|          SHN    3
24782  M00S17043.set     ---|          ADN    DILL
24783  M00S17044.set     ---|          CRD    CM
24784  M00S17045.set     ---|          LDD    CM+2
24785  M00S17046.set     ---|          ZJN    SBD2        IF NOT BUFFERED DEVICE
24786  M00S17047.set     ---|          RJM    PBD
24787  M00S17048.set     ---| SBD2     RJM    SME
24788  M00S17049.set     ---|          NJN    SBD1        IF NOT END OF EST
24789  M00S17050.set     ---|
24790  M00S17051.set     ---| SBD      SUBR               ENTRY/EXIT
24791  M00S17052.set     ---|          LDN    0
24792  M00S17053.set     ---|          STD    EQ
24793  M00S17054.set     ---|          RJM    CKB         CLEAR CHANNEL ACCUMULATOR
24794  M00S17055.set     ---|          UJN    SBD2        ENTER LOOP
24795  M00S17056.set     ---|          TITLE  LEVEL 3 OPTION PROCESSING.
24796  M00S17057.set     ---|          SPACE  4,10
24797  M00S17058.set     ---|*         LEVEL 3 DEADSTART SYNTAX TABLE.
24798  M00S17059.set     ---|
24799  M00S17060.set     ---|
24800  M00S17061.set     ---| TSYN     BSS    0
24801  M00S17062.set     ---|          CON    ABT
24802  M00S17063.set     ---|          CON    AUT
24803  M00S17064.set     ---|          CON    DAU
24804  M00S17065.set     ---|          CON    GRN
24805  M00S17066.set     ---|          CON    RGO
24806  M00S17067.set     ---|          CON    UPC
24807  M00S17068.set     ---|          CON    0           END OF TABLE
24808  M00S17069.set     ---| ABT      SPACE  4,10
24809  M00S17070.set     ---|***       ABORT.
24810  M00S17071.set     ---|*         ABORT,B.
24811  M00S17072.set     ---|*         ABORTS LEVEL 3 RECOVERY.  CHECKPOINTS ALL DEVICES UNLESS
24812  M00S17073.set     ---|*         *B* IS SPECIFIED IN WHICH CASE ONLY NON-BUFFERED DEVICES
24813  M00S17074.set     ---|*         ARE CHECKPOINTED.
24814  M00S17075.set     ---|
24815  M00S17076.set     ---|
24816  M00S17077.set     ---| ABT      DATA   C*ABORT*
24817  M00S17078.set     ---|          LDM    DSTO        SAVE CURRENT ABORT OPTION
24818  M00S17079.set     ---|          LPN    14
24819  M00S17080.set     ---|          STD    T1
24820  M00S17081.set     ---|          LDI    KA
24821  M00S17082.set     ---|          LMN    1R.
24822  M00S17083.set     ---|          ZJN    ABT3        IF *.*
24823  M00S17084.set     ---|          LMN    1R,&1R.
24824  M00S17085.set     ---|          NJN    ABT1        IF NOT *,*
24825  M00S17086.set     ---|          AOD    KA
24826  M00S17087.set     ---|          LDI    KA
24827  M00S17088.set     ---|          LMN    1RB
24828  M00S17089.set     ---|          ZJN    ABT2        IF *B*
24829  M00S17090.set     ---| ABT1     JMP    ILL         PROCESS INCORRECT ENTRY
24830  M00S17091.set     ---|
24831  M00S17092.set     ---| ABT2     LDN    14
24832  M00S17093.set     ---| ABT3     LMN    4
24833  M00S17094.set     ---|          STD    T0
24834  M00S17095.set     ---|          SBD    T1
24835  M00S17096.set     ---|          NJN    ABT4        IF NOT SAME ABORT OPTION
24836  M00S17097.set     ---|          STD    T0
24837  M00S17098.set     ---| ABT4     LDM    DSTO        SET ABORT OPTION
24838  M00S17099.set     ---|          SCN    14
24839  M00S17100.set     ---|          LMD    T0
24840  M00S17101.set     ---|          STM    DSTO
24841  M00S17102.set     ---|          LPN    4           UPDATE *ABORT.* OPTION LINE
24842  M00S17103.set     ---|          SHN    21-2
24843  M00S17104.set     ---|          ADC    OBUFA
24844  M00S17105.set     ---|          RJM    UDS
24845  M00S17106.set     ---|          LDD    T0          UPDATE *ABORT,B.* OPTION LINE
24846  M00S17107.set     ---|          LPN    10
24847  M00S17108.set     ---|          SHN    21-3
24848  M00S17109.set     ---|          ADC    OBUFB
24849  M00S17110.set     ---| ABT5     RJM    UDS         UPDATE DISPLAY STATUS
24850  M00S17111.set     ---|          JMP    KBR         RETURN
24851  M00S17112.set     ---| AUT      SPACE  4,10
24852  M00S17113.set     ---|***       AUTOLOAD.
24853  M00S17114.set     ---|*         TOGGLE SELECTION OF AUTOLOADING OF MASS STORAGE CONTROLLERS.
24854  M00S17115.set     ---|*         INITIALLY AUTOLOADING IS SELECTED.
24855  M00S17116.set     ---|
24856  M00S17117.set     ---|
24857  M00S17118.set     ---| AUT      DATA   C*AUTOLOAD.*
24858  M00S17119.set     ---|          LDN    2           TOGGLE AUTOLOAD OPTION BIT
24859  M00S17120.set     ---|          LMM    DSTO
24860  M00S17121.set     ---|          STM    DSTO
24861  M00S17122.set     ---|          LPN    2
24862  M00S17123.set     ---|          LMN    2
24863  M00S17124.set     ---|          SHN    21-1
24864  M00S17125.set     ---|          ADC    OBUFC
24865  M00S17126.set     ---|          JMP    ABT5        UPDATE DISPLAY STATUS
24866  M00S17127.set     ---| DAU      SPACE  4,10
24867  M00S17128.set     ---|***       AUTO.
24868  M00S17129.set     ---|*         TOGGLE THE *DSD* *AUTO* COMMAND SELECTION.
24869  M00S17130.set     ---|*         INITIALLY *AUTO* IS SELECTED.
24870  M00S17131.set     ---|
24871  M00S17132.set     ---|
24872  M00S17133.set     ---| DAU      DATA   C*AUTO.*
24873  M00S17134.set     ---|          AOM    DAUA        TOGGLE THE SELECT
24874  M00S17135.set     ---|          LPN    1
24875  M00S17136.set     ---|          SHN    21-0
24876  M00S17137.set     ---|          ADC    OBUFE
24877  M00S17138.set     ---|          JMP    ABT5        UPDATE DISPLAY STATUS
24878  M00S17139.set     ---|
24879  M00S17140.set     ---| DAUA     CON    1           DEFAULT STATUS IS *YES*
24880  M00S17141.set     ---| GRN      SPACE  4,10
24881  M00S17142.set     ---|***       GRENADE.
24882  M00S17143.set     ---|*         TOGGLE SELECTION OF THE GRENADE OPERATION FOR MASS STORAGE
24883  M00S17144.set     ---|*         CONTROLLERS THAT ARE AUTOLOADED.  INITIALLY THE GRENADE
24884  M00S17145.set     ---|*         OPERATION IS NOT SELECTED.
24885  M00S17146.set     ---|*
24886  M00S17147.set     ---|*         THE GRENADE OPERATION CAN INTERRUPT ACTIVITY ON A DRIVE
24887  M00S17148.set     ---|*         WHICH IS BEING ACCESSED FROM ANOTHER CONTROLLER.
24888  M00S17149.set     ---|
24889  M00S17150.set     ---|
24890  M00S17151.set     ---| GRN      DATA   C*GRENADE.*
24891  M00S17152.set     ---|          LDN    1           TOGGLE GRENADE OPTION BIT
24892  M00S17153.set     ---|          LMM    DSTO
24893  M00S17154.set     ---|          STM    DSTO
24894  M00S17155.set     ---|          LPN    1
24895  M00S17156.set     ---|          SHN    21-0
24896  M00S17157.set     ---|          ADC    OBUFD
24897  M00S17158.set     ---|          JMP    ABT5        UPDATE DISPLAY STATUS
24898  M00S17159.set     ---| RGO      SPACE  4,10
24899  M00S17160.set     ---|***       GO.
24900  M00S17161.set     ---|*         CONTINUE WITH RECOVERY.
24901  M00S17162.set     ---|
24902  M00S17163.set     ---|
24903  M00S17164.set     ---| RGO      DATA   C*GO.*
24904  M00S17165.set     ---| RGO1     LDN    0           GET CHANNEL WORD
24905  M00S17166.set     ---|          RJM    GCW
24906  M00S17167.set     ---|          LDI    T1
24907  M00S17168.set     ---|          LPN    40
24908  M00S17169.set     ---|          ZJN    RGO2        IF CHANNEL UP
24909  M00S17170.set     ---|          LDN    0           SET DISPLAY REQUESTED
24910  M00S17171.set     ---|          STD    DS
24911  M00S17172.set     ---|          LDC    OBUFLA      DISPLAY THE CHANNEL DOWN STATUS
24912  M00S17173.set     ---|          STM    DRBA
24913  M00S17174.set     ---|          LJM    DRO1        UPDATE DISPLAY
24914  M00S17175.set     ---|
24915  M00S17176.set     ---| RGO2     LDM    DAUA        CHECK *AUTO* SELECT
24916  M00S17177.set     ---|          LPN    1
24917  M00S17178.set     ---|          ZJN    RGO3        IF *AUTO* NOT SELECTED
24918  M00S17179.set     ---|          LDK    PPCP        LOCATE *DSD* PP COMMUNICATION AREA
24919  M00S17180.set     ---|          CRD    CM
24920  M00S17181.set     ---|          LDD    CM+4
24921  M00S17182.set     ---|          ADN    10+2
24922  M00S17183.set     ---|          CWM    DAU,ON
24923  M00S17184.set     ---| RGO3     LJM    DROX        RETURN
24924  M00S17185.set     ---| UPC      SPACE  4,10
24925  M00S17186.set     ---|***       UPCHAN.
24926  M00S17187.set     ---|*         CLEAR THE DOWN STATUS OF THE DEADSTART CHANNEL.
24927  M00S17188.set     ---|
24928  M00S17189.set     ---|
24929  M00S17190.set     ---| UPC      DATA   C*UPCHAN.*
24930  M00S17191.set     ---|          LDC    OBUFL       RESET THE DISPLAY
24931  M00S17192.set     ---|          STM    DRBA
24932  M00S17193.set     ---|          LDN    0           GET CHANNEL WORD
24933  M00S17194.set     ---|          RJM    GCW
24934  M00S17195.set     ---|          LDI    T1          CLEAR THE DOWN STATUS
24935  M00S17196.set     ---|          SCN    40
24936  M00S17197.set     ---|          STI    T1
24937  M00S17198.set     ---|          LDD    T2          STORE THE CHANNEL WORD
24938  M00S17199.set     ---|          SHN    14
24939  M00S17200.set     ---|          LMD    T3
24940  M00S17201.set     ---|          CWD    CM
24941  M00S17202.set     ---|          LDN    CTALL       ACCESS THE EJT ASSIGNMENT TABLE
24942  M00S17203.set     ---|          RJM    GCW
24943  M00S17204.set     ---|          LDN    0           CLEAR POSSIBLE EJT ASSIGNMENT
24944  M00S17205.set     ---|          STI    T1
24945  M00S17206.set     ---|          LDD    T2          RESTORE THE WORD
24946  M00S17207.set     ---|          SHN    14
24947  M00S17208.set     ---|          LMD    T3
24948  M00S17209.set     ---|          CWD    CM
24949  M00S17210.set     ---|          LDK    ESTP
24950  M00S17211.set     ---|          CRD    AB
24951  M00S17212.set     ---| UPC1     SOD    AB+2
24952  M00S17213.set     ---|          ZJP    RGO2        IF END OF EST
24953  M00S17214.set     ---|          SFA    EST
24954  M00S17215.set     ---|          ADK    EQDE
24955  M00S17216.set     ---|          CRD    CM
24956  M00S17217.set     ---|          LDN    CM          INITIALIZE CHANNEL INDEX
24957  M00S17218.set     ---|          STD    T1
24958  M00S17219.set     ---| UPC2     AOD    T1          ADVANCE CHANNEL BYTE INDEX
24959  M00S17220.set     ---|          LMN    CM+3
24960  M00S17221.set     ---|          ZJN    UPC1        IF NO MORE CHANNELS
24961  M00S17222.set     ---|          LDI    T1
24962  M00S17223.set     ---|          ZJN    UPC1        IF NULL CHANNEL
24963  M00S17224.set     ---|          LMD    DH
24964  M00S17225.set     ---|          LPN    77
24965  M00S17226.set     ---|          NJN    UPC2        IF NOT DEADSTART CHANNEL
24966  M00S17227.set     ---|          LDI    T1          CLEAR DOWN STATUS
24967  M00S17228.set     ---|          LPC    4777
24968  M00S17229.set     ---|          STI    T1
24969  M00S17230.set     ---|          SFA    EST,AB+2    UPDATE EST ENTRY
24970  M00S17231.set     ---|          ADK    EQDE
24971  M00S17232.set     ---|          CWD    CM
24972  M00S17233.set     ---|          UJN    UPC1        LOOP ON SEARCH
24973  M00S17234.set     ---| DRO      SPACE  4,10
24974  M00S17235.set     ---|**        DRO - DISPLAY RECOVERY OPTIONS.
24975  M00S17236.set     ---|*
24976  M00S17237.set     ---|*         USES   DP.
24977  M00S17238.set     ---|*
24978  M00S17239.set     ---|*         CALLS  AKL, CKB.
24979  M00S17240.set     ---|*
24980  M00S17241.set     ---|*         MACROS CFNC, DFIM.
24981  M00S17242.set     ---|*
24982  M00S17243.set     ---|*         NOTES  EXIT FROM *DRO* IS THRU KEYBOARD ASSEMBLY ON
24983  M00S17244.set     ---|*                A *GO.* COMMAND.
24984  M00S17245.set     ---|
24985  M00S17246.set     ---|
24986  M00S17247.set     ---|          DFIM   (CON SDCF),*+1
24987  M00S17248.set     ---| DROX     LDC    DDCF        DESELECT DISPLAY CONTROLLER
24988  M00S17249.set     ---|          CFNC
24989  M00S17250.set     ---|          LDD    TH          DELAY
24990  M00S17251.set     ---|          SBN    1
24991  M00S17252.set     ---|          NJN    *-1
24992  M00S17253.set     ---|          DCN.   CH
24993  M00S17254.set     ---|
24994  M00S17255.set     ---|          LJM    *           ENTRY/EXIT
24995  M00S17256.set     ---| DRO      EQU    *-1
24996  M00S17257.set     ---|          LDC    DRB
24997  M00S17258.set     ---|          STM    AKLB
24998  M00S17259.set     ---|          LDC    **          SET *IBF* IMMEDIATE RETURN
24999  M00S17260.set     ---|          ORG    *-1
25000  M00S17261.set     ---|          LOC    IBFA
25001  M00S17262.set     ---|          UJN    IBFX        RETURN
25002  M00S17263.set     ---|          LOC    *O
25003  M00S17264.set     ---|          STM    IBFA
25004  M00S17265.set     ---|          LDN    DP
25005  M00S17266.set     ---|          STD    LA
25006  M00S17267.set     ---|          LDC    TSYN-1      SET SYNTAX TABLE ADDRESS
25007  M00S17268.set     ---|          STI    LA
25008  M00S17269.set     ---|          LDN    1           SET KEYBOARD ASSEMBLY
25009  M00S17270.set     ---|          STD    AM
25010  M00S17271.set     ---|          LDD    DS
25011  M00S17272.set     ---|          NJP    RGO1        IF NO DISPLAY REQUESTED
25012  M00S17273.set     ---| DRO1     AOM    AKLA
25013  M00S17274.set     ---| DRO2     RJM    AKL         ASSEMBLE KEYBOARD LINE
25014  M00S17275.set     ---|          LDD    KI
25015  M00S17276.set     ---|          ZJN    DRO2        IF NO INPUT
25016  M00S17277.set     ---|          RJM    CKB
25017  M00S17278.set     ---|          UJN    DRO1        GET NEXT LINE
25018  M00S17279.set     ---| DRB      SPACE  4,10
25019  M00S17280.set     ---|**        DRB - DISPLAY LEVEL 3 RECOVERY BUFFERS.
25020  M00S17281.set     ---|*
25021  M00S17282.set     ---|*         MACROS CFNC.
25022  M00S17283.set     ---|
25023  M00S17284.set     ---|
25024  M00S17285.set     ---| DRB      SUBR               ENTRY/EXIT
25025  M00S17286.set     ---|          CFNC   SLMF        SELECT LEFT SCREEN - MEDIUM CHARACTERS
25026  M00S17287.set     ---|          LDC    OBUFL       DISPLAY OPTIONS
25027  M00S17288.set     ---|*         LDC    OBUFLA      (DEADSTART CHANNEL DOWN)
25028  M00S17289.set     ---| DRBA     EQU    *-1
25029  M00S17290.set     ---|          OAM    OBUF,CH
25030  M00S17291.set     ---|          FJM.   *,CH        WAIT TRANSMISSION COMPLETE
25031  M00S17292.set     ---|          DCN.   CH
25032  M00S17293.set     ---|          CFNC   SRSF        SELECT RIGHT SCREEN - SMALL CHARACTERS
25033  M00S17294.set     ---|          LDC    IBUFL       DISPLAY INSTRUCTIONS
25034  M00S17295.set     ---|          OAM    IBUF,CH
25035  M00S17296.set     ---|          STM    AKLA
25036  M00S17297.set     ---|          CFNC   THCF        TRANSFER HIDDEN AND CLEAR
25037  M00S17298.set     ---|          DCN.   CH
25038  M00S17299.set     ---|          UJP    DRBX        RETURN
25039  M00S17300.set     ---| GCW      SPACE  4,10
25040  M00S17301.set     ---|**        GCW - GET CHANNEL CONTROL WORD.
25041  M00S17302.set     ---|*
25042  M00S17303.set     ---|*         ENTRY  (A) = CHANNEL TABLE OFFSET.
25043  M00S17304.set     ---|*
25044  M00S17305.set     ---|*         EXIT   (T1) = BYTE ADDRESS.
25045  M00S17306.set     ---|*                (T2 - T3) = CM WORD ADDRESS.
25046  M00S17307.set     ---|*                (CM - CM+4) = CHANNEL TABLE WORD.
25047  M00S17308.set     ---|*
25048  M00S17309.set     ---|*         USES   CM - CM+4, T1 - T3.
25049  M00S17310.set     ---|
25050  M00S17311.set     ---|
25051  M00S17312.set     ---| GCW      SUBR               ENTRY/EXIT
25052  M00S17313.set     ---|          STD    T3          SAVE TABLE OFFSET
25053  M00S17314.set     ---|          LDD    DH          DEADSTART CHANNEL
25054  M00S17315.set     ---|          STD    T1
25055  M00S17316.set     ---| GCW1     AOD    T3          INCREMENT WORD INDEX
25056  M00S17317.set     ---|          LCN    5           DIVIDE BY 5 LOOP
25057  M00S17318.set     ---|          RAD    T1
25058  M00S17319.set     ---|          PJN    GCW1        IF NOT END OF DIVIDE
25059  M00S17320.set     ---|          ADN    5+CM
25060  M00S17321.set     ---|          STD    T1
25061  M00S17322.set     ---|          LDK    CHTP        FORM ADDRESS
25062  M00S17323.set     ---|          CRD    CM
25063  M00S17324.set     ---|          LDD    CM+2
25064  M00S17325.set     ---|          SHN    14
25065  M00S17326.set     ---|          LMD    CM+3
25066  M00S17327.set     ---|          SBN    1
25067  M00S17328.set     ---|          ADD    T3          ADD WORD INDEX
25068  M00S17329.set     ---|          CRD    CM
25069  M00S17330.set     ---|          STD    T3
25070  M00S17331.set     ---|          SHN    -14
25071  M00S17332.set     ---|          STD    T2
25072  M00S17333.set     ---|          UJN    GCWX        RETURN
25073  M00S17334.set     ---| UDS      SPACE  4,10
25074  M00S17335.set     ---|**        UDS - UPDATE DISPLAY STATUS.
25075  M00S17336.set     ---|*
25076  M00S17337.set     ---|*         *UDS* UPDATES THE SELECTION STATUS (YES OR NO) OF A
25077  M00S17338.set     ---|*         COMMAND IN THE OPTION DISPLAY BUFFER.
25078  M00S17339.set     ---|*
25079  M00S17340.set     ---|*         ENTRY  (A) = 1/ST, 5/0, 12/BUF.
25080  M00S17341.set     ---|*                      ST = SELECTION STATUS (0=NO, 1=YES).
25081  M00S17342.set     ---|*                      BUF = DISPLAY BUFFER ADDRESS.
25082  M00S17343.set     ---|*
25083  M00S17344.set     ---|*         USES   T1, T2.
25084  M00S17345.set     ---|
25085  M00S17346.set     ---|
25086  M00S17347.set     ---| UDS      SUBR               ENTRY/EXIT
25087  M00S17348.set     ---|          STD    T1          SAVE DISPLAY BUFFER ADDRESS
25088  M00S17349.set     ---|          SHN    1-21        SELECTION STATUS * 2
25089  M00S17350.set     ---|          ADC    UDSA
25090  M00S17351.set     ---|          STD    T2
25091  M00S17352.set     ---|          LDI    T2          UPDATE DISPLAY
25092  M00S17353.set     ---|          STI    T1
25093  M00S17354.set     ---|          LDM    1,T2
25094  M00S17355.set     ---|          STM    1,T1
25095  M00S17356.set     ---|          UJN    UDSX        RETURN
25096  M00S17357.set     ---|
25097  M00S17358.set     ---| UDSA     DATA   H*  NO*
25098  M00S17359.set     ---|          DATA   H* YES*
25099  M00S17360.set     ---|          SPACE  4,10
25100  M00S17361.set     ---|*         LEVEL 3 OPTION BUFFER (LEFT SCREEN).
25101  M00S17362.set     ---|
25102  M00S17363.set     ---| OBUF     BSS    0
25103  M00S17364.set     ---|          DFIM   (CON YCPH)
25104  M00S17365.set     ---|          CON    LN03,CH17
25105  M00S17366.set     ---|          DATA   H*LEVEL 3 OPTIONS*
25106  M00S17367.set     ---|          DFIM   (CON LN07)
25107  M00S17368.set     ---|          CON    LN13,CH09
25108  M00S17369.set     ---|          DATA   H*ABORT.*
25109  M00S17370.set     ---|          CON    CH49
25110  M00S17371.set     ---| OBUFA    DATA   H*  NO*
25111  M00S17372.set     ---|          DFIM   (CON LN11)
25112  M00S17373.set     ---|          CON    LN19,CH09
25113  M00S17374.set     ---|          DATA   H*ABORT,B.*
25114  M00S17375.set     ---|          CON    CH49
25115  M00S17376.set     ---| OBUFB    DATA   H*  NO*
25116  M00S17377.set     ---|          DFIM   (CON LN15)
25117  M00S17378.set     ---|          CON    LN25,CH09
25118  M00S17379.set     ---|          DATA   H*AUTOLOAD.*
25119  M00S17380.set     ---|          CON    CH49
25120  M00S17381.set     ---| OBUFC    DATA   H* YES*
25121  M00S17382.set     ---|          DFIM   (CON LN19)
25122  M00S17383.set     ---|          CON    LN31,CH09
25123  M00S17384.set     ---|          DATA   H*GRENADE.*
25124  M00S17385.set     ---|          CON    CH49
25125  M00S17386.set     ---| OBUFD    DATA   H*  NO*
25126  M00S17387.set     ---|          DFIM   (CON LN23)
25127  M00S17388.set     ---|          CON    LN37,CH09
25128  M00S17389.set     ---|          DATA   H*AUTO.*
25129  M00S17390.set     ---|          CON    CH49
25130  M00S17391.set     ---| OBUFE    DATA   H* YES*
25131  M00S17392.set     ---| OBUFL    EQU    *-OBUF
Line S17393 Modification History
M01 (Removed by) set71
Seq #  *Modification Id* Act 
----------------------------+
25132  M01S17393.set71   ---|          DFIM   (CON LN27)
Line S00001 Modification History
M01 (Added by) set71
Seq #  *Modification Id* Act 
----------------------------+
25133  M01S00001.set71   +++|          DFIM   (CON LN26)
25134  M00S17394.set     +++|          CON    LN43,CH09
25135  M00S17395.set     +++|          DATA   H*DEADSTART CHANNEL IS DOWN,*
Line S17396 Modification History
M01 (Removed by) set71
Seq #  *Modification Id* Act 
----------------------------+
25136  M01S17396.set71   ---|          DFIM   (CON LN28)
Line S00002 Modification History
M01 (Added by) set71
Seq #  *Modification Id* Act 
----------------------------+
25137  M01S00002.set71   +++|          DFIM   (CON LN27)
25138  M00S17397.set     +++|          CON    LN45,CH09
25139  M00S17398.set     +++|          DATA   H$ENTER *UPCHAN.* TO CONTINUE.$
25140  M00S17399.set     +++| OBUFLA   EQU    *-OBUF
25141  M00S17400.set     +++|
25142  M00S17401.set     +++|*         LEVEL 3 INSTRUCTION BUFFER (RIGHT SCREEN).
25143  M00S17402.set     +++|
25144  M00S17403.set     +++| IBUF     BSS    0
25145  M00S17404.set     +++|          CON    YCPH,CH03
25146  M00S17405.set     +++|          DATA   H*INSTRUCTIONS FOR SELECTING LEVEL 3 RECOVERY OPTIONS.*
25147  M00S17406.set     +++|          CON    HL03,CH07
25148  M00S17407.set     +++|          DATA   H*ENTER COMMAND TO TOGGLE SELECTION.*
25149  M00S17408.set     +++|          CON    HL04,CH07
25150  M00S17409.set     +++|          DATA   H*ENTER GO. TO CONTINUE RECOVERY.*
25151  M00S17410.set     +++|
25152  M00S17411.set     +++|          CON    LN07,CH03
25153  M00S17412.set     +++|          DATA   H*ABORT.*
25154  M00S17413.set     +++|          CON    LN08,CH07
25155  M00S17414.set     +++|          DATA   H*CHECKPOINT ALL DEVICES AND ABORT LEVEL 3 RECOVERY.*
25156  M00S17415.set     +++|          CON    LN09,CH07
25157  M00S17416.set     +++|          DATA   H+SELECTING *ABORT.* DESELECTS *ABORT,B.*.+
25158  M00S17417.set     +++|
25159  M00S17418.set     +++|          CON    LN11,CH03
25160  M00S17419.set     +++|          DATA   H*ABORT,B.*
25161  M00S17420.set     +++|          CON    LN12,CH07
25162  M00S17421.set     +++|          DATA   H*CHECKPOINT ALL NON-BUFFERED DEVICES AND ABORT LEVEL*
25163  M00S17422.set     +++|          CON    LN13,CH07
25164  M00S17423.set     +++|          DATA   H+3 RECOVERY.  SELECTING *ABORT,B.* DESELECTS *ABORT.*+
25165  M00S17424.set     +++|
25166  M00S17425.set     +++|          CON    LN15,CH03
25167  M00S17426.set     +++|          DATA   H*AUTOLOAD.*
25168  M00S17427.set     +++|          CON    LN16,CH07
25169  M00S17428.set     +++|          DATA   H*TOGGLE THE SELECTION OF BUFFER CONTROLLER AUTOLOADING
25170  M00S17429.set     +++|,.*
25171  M00S17430.set     +++|
25172  M00S17431.set     +++|          CON    LN18,CH03
25173  M00S17432.set     +++|          DATA   H*GRENADE.*
25174  M00S17433.set     +++|          CON    LN19,CH07
25175  M00S17434.set     +++|          DATA   H*TOGGLE THE SELECTION OF THE GRENADE FUNCTION.  THE*
25176  M00S17435.set     +++|          CON    LN20,CH07
25177  M00S17436.set     +++|          DATA   H*GRENADE FUNCTION IS ISSUED ONCE THE CONTROLWARE IS*
25178  M00S17437.set     +++|          CON    LN21,CH07
25179  M00S17438.set     +++|          DATA   H*LOADED, CAUSING UNIT RESERVATIONS TO BE CLEARED ON*
25180  M00S17439.set     +++|          CON    LN22,CH07
25181  M00S17440.set     +++|          DATA   H*ALL 844 UNITS PHYSICALLY CONNECTED TO EACH CONTROLLER
25182  M00S17441.set     +++|,.*
25183  M00S17442.set     +++|
25184  M00S17443.set     +++|          CON    LN24,CH03
25185  M00S17444.set     +++|          DATA   H*AUTO.*
25186  M00S17445.set     +++|          CON    LN25,CH07
25187  M00S17446.set     +++|          DATA   H*TOGGLE THE SELECTION OF THE DSD AUTO COMMAND.*
25188  M00S17447.set     +++| IBUFL    EQU    *-IBUF
25189  M00S17448.set     +++|          SPACE  4,10
25190  M00S17449.set     +++|          USE    LITERALS    DUMP LITERALS BLOCK
Line S17450 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25191  M01S17450.271l716 ---|          TITLE  PRESET SUBROUTINES.
25192  M01S17451.271l716 ---| CFC      SPACE  4,10
25193  M01S17452.271l716 ---|**        CFC - CHECK FL CONTROL WORDS.
25194  M01S17453.271l716 ---|*
25195  M01S17454.271l716 ---|*         ENTRY  (T6) = CONTROL POINT AREA ADDRESS OF *FLSW* WORDS.
25196  M01S17455.271l716 ---|*                (AB - AB+4) = FL CONTROL WORD.
25197  M01S17456.271l716 ---|*                (CN - CN+4) = FL CONTROL WORD.
25198  M01S17457.271l716 ---|
25199  M01S17458.271l716 ---|
25200  M01S17459.271l716 ---| CFC      SUBR               ENTRY/EXIT
25201  M01S17460.271l716 ---|          LDD    AB
25202  M01S17461.271l716 ---|          NJN    CFCX        IF NFL ASSIGNED
25203  M01S17462.271l716 ---|          LDD    AB+4
25204  M01S17463.271l716 ---|          ZJN    CFCX        IF NO FL
25205  M01S17464.271l716 ---|          SBD    AB+1
25206  M01S17465.271l716 ---|          STD    AB+4        ADJUST FL
25207  M01S17466.271l716 ---|          STD    CN+4
25208  M01S17467.271l716 ---|          LDD    AB+1        RESET NFL
25209  M01S17468.271l716 ---|          STD    AB
25210  M01S17469.271l716 ---|          RAD    AB+3        ADJUST RA
25211  M01S17470.271l716 ---|          SHN    -14
25212  M01S17471.271l716 ---|          RAD    AB+2
25213  M01S17472.271l716 ---|          LDD    AB
25214  M01S17473.271l716 ---|          RAD    CN+3
25215  M01S17474.271l716 ---|          LDN    0           CLEAR ROLLOUT VALUE OF NFL
25216  M01S17475.271l716 ---|          STD    AB+1
25217  M01S17476.271l716 ---|          LDD    T6          STORE FL CONTROL WORDS
25218  M01S17477.271l716 ---|          CWD    CN
25219  M01S17478.271l716 ---|          SBN    1
25220  M01S17479.271l716 ---|          CWD    AB
25221  M01S17480.271l716 ---|          UJN    CFCX        RETURN
25222  M01S17481.271l716 ---| DCB      SPACE  4,15
25223  M01S17482.271l716 ---|**        DCB - DEFINE CM BUFFER SPACE.
25224  M01S17483.271l716 ---|*
25225  M01S17484.271l716 ---|*         EXIT   (EB) = RA/100 FOR *CPUMLD*.
25226  M01S17485.271l716 ---|*
Line S17486 Modification History
M01 (Removed by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25227  M02S17486.271l716 ---|*         USES   AB - AB+4.
Line S00004 Modification History
M01 (Added by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25228  M02S00004.271l716 ---|*         USES   AB - AB+4, CN - CN+4.
Line S17487 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25229  M01S17487.271l716 ---|*
25230  M01S17488.271l716 ---|*         CALLS  CMA, RFL.
25231  M01S17489.271l716 ---|
25232  M01S17490.271l716 ---|
25233  M01S17491.271l716 ---| DCB      SUBR               ENTRY/EXIT
25234  M01S17492.271l716 ---|          RJM    RFL         RELEASE FIELD LENGTH
25235  M01S17493.271l716 ---|          LDN    ZERL
25236  M01S17494.271l716 ---|          CRD    AB
Line S00005 Modification History
M01 (Added by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25237  M02S00005.271l716 ---|          ADN    RPLP-ZERL   FETCH FWA OF RPL
25238  M02S00006.271l716 ---|          CRD    CN
Line S17495 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25239  M01S17495.271l716 ---|          LDC    2S12+AB     CHECK AVAILABLE MEMORY
25240  M01S17496.271l716 ---|          RJM    CMA
25241  M01S17497.271l716 ---|          LDD    AB+1
Line S17498 Modification History
M01 (Removed by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25242  M02S17498.271l716 ---|          ZJN    DCB1        IF NO FREE MEMORY
Line S00007 Modification History
M01 (Added by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25243  M02S00007.271l716 ---|          ZJN    DCB2        IF NO FREE MEMORY
Line S17499 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25244  M01S17499.271l716 ---|          STD    EB
25245  M01S17500.271l716 ---|          ADC    CPML+PRSL-4001
Line S17501 Modification History
M01 (Removed by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25246  M02S17501.271l716 ---|          PJN    DCB1        IF REQUIRED FL CROSSES 131K
Line S00008 Modification History
M01 (Added by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25247  M02S00008.271l716 ---|          PJN    DCB2        IF REQUIRED FL CROSSES 131K
Line S17502 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25248  M01S17502.271l716 ---|          LDD    AB+3
25249  M01S17503.271l716 ---|          SBK    CPML+PRSL
Line S17504 Modification History
M01 (Removed by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25250  M02S17504.271l716 ---|          PJN    DCBX        IF ENOUGH FL
25251  M02S17505.271l716 ---| DCB1     LDC    DCBA
Line S00009 Modification History
M01 (Added by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25252  M02S00009.271l716 ---| DCB1     PJN    DCBX        IF ENOUGH FL
25253  M02S00010.271l716 ---| DCB2     LDN    CMRL
25254  M02S00011.271l716 ---|          CRD    AB          GET CMR LENGTH
25255  M02S00012.271l716 ---|          LDD    CN
25256  M02S00013.271l716 ---|          SHN    14          FWA OF RPL
25257  M02S00014.271l716 ---|          LMD    CN+1
25258  M02S00015.271l716 ---|          ADN    77          ROUND RPL ADDRESS
25259  M02S00016.271l716 ---|          SHN    -6
25260  M02S00017.271l716 ---|          STD    EB          SET NEW LOAD ADDRESS FOR *CPUMLD*
25261  M02S00018.271l716 ---|          LDD    AB+4
25262  M02S00019.271l716 ---|          SBK    CPML+PRSL   CHECK FL NEEDED
25263  M02S00020.271l716 ---|          SBD    EB
25264  M02S00021.271l716 ---|          PJN    DCB1        IF REQUIRED FL IN CMR
25265  M02S00022.271l716 ---|          LDC    DCBA
Line S17506 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25266  M01S17506.271l716 ---|          LJM    DSE         DISPLAY MESSAGE AND HANG
25267  M01S17507.271l716 ---|
25268  M01S17508.271l716 ---| DCBA     DATA   C*LACKING MEMORY FOR CM RECOVERY.*
25269  M01S17509.271l716 ---| MVE      SPACE  4,10
25270  M01S17510.271l716 ---|**        MVE - MOVE NFL.
25271  M01S17511.271l716 ---|*
25272  M01S17512.271l716 ---|*         ENTRY  (CA - CA+1) = RA - NFL OF PREVIOUS CP.
25273  M01S17513.271l716 ---|*                (AB - AB+4) = FL CONTROL WORD.
25274  M01S17514.271l716 ---|*                (CN - CN+4) = FL CONTROL WORD.
25275  M01S17515.271l716 ---|*
25276  M01S17516.271l716 ---|*         USES   CM - CM+4.
25277  M01S17517.271l716 ---|
25278  M01S17518.271l716 ---|
Line S17519 Modification History
M01 (Removed by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25279  M02S17519.271l716 ---| MVE      SUBR               ENTRY/EXIT
25280  M02S17520.271l716 ---|          LDD    AB+2
Line S00023 Modification History
M01 (Added by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25281  M02S00023.271l716 ---| MVE3     ADD    AB+3        COMPUTE RA + FL
25282  M02S00024.271l716 ---|          STD    T0
25283  M02S00025.271l716 ---|          SHN    -14
25284  M02S00026.271l716 ---|          ADD    AB+2        COMPARE WITH NEXT RA - NFL
25285  M02S00027.271l716 ---|          SBD    CA
25286  M02S00028.271l716 ---|          NJN    MVE1        IF MOVE REQUIRED
25287  M02S00029.271l716 ---|          LDD    T0
25288  M02S00030.271l716 ---|          LMD    CA+1
25289  M02S00031.271l716 ---|          NJN    MVE1        IF NOT CP-S WITH ADJOINING FL
25290  M02S00032.271l716 ---|
25291  M02S00033.271l716 ---| MVE      SUBR               ENTRY/EXIT
25292  M02S00034.271l716 ---|          LDD    CN+4
25293  M02S00035.271l716 ---|          NJN    MVE3        IF RECOVERED SUBSYSTEM (PRESERVE FL)
25294  M02S00036.271l716 ---| MVE1     LDD    AB+2
Line S17521 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25295  M01S17521.271l716 ---|          SHN    14
25296  M01S17522.271l716 ---|          LMD    AB+3
25297  M01S17523.271l716 ---|          SBD    AB          SET RA - NFL FOR MOVE
25298  M01S17524.271l716 ---|          STD    CM+3
25299  M01S17525.271l716 ---|          STD    CM+2
25300  M01S17526.271l716 ---|          SHN    -14
25301  M01S17527.271l716 ---|          STD    CM+1
25302  M01S17528.271l716 ---|          LDD    CA          SET RA FOR CP
Line S17529 Modification History
M01 (Removed by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25303  M02S17529.271l716 ---|          STD    AB+2
Line S17530 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25304  M01S17530.271l716 ---|          SHN    14
25305  M01S17531.271l716 ---|          LMD    CA+1
Line S17532 Modification History
M01 (Removed by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25306  M02S17532.271l716 ---|          STD    AB+3
Line S00037 Modification History
M01 (Added by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25307  M02S00037.271l716 ---|          SBD    CN+4
25308  M02S00038.271l716 ---|          STD    AB+3
25309  M02S00039.271l716 ---|          SHN    -14
25310  M02S00040.271l716 ---|          STD    AB+2
25311  M02S00041.271l716 ---|          SHN    14
25312  M02S00042.271l716 ---|          LMD    AB+3
Line S17533 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25313  M01S17533.271l716 ---|          SBD    AB          SET NEW RA - NFL
25314  M01S17534.271l716 ---|          STD    CM+4
25315  M01S17535.271l716 ---|          STD    CN+2
25316  M01S17536.271l716 ---|          SHN    -14
25317  M01S17537.271l716 ---|          STD    CN+1
25318  M01S17538.271l716 ---|          LDD    AB
25319  M01S17539.271l716 ---|          ZJN    MVEX        IF NO NFL
Line S00043 Modification History
M01 (Added by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25320  M02S00043.271l716 ---|          ADD    CN+4
Line S17540 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25321  M01S17540.271l716 ---|          SBN    1
25322  M01S17541.271l716 ---|          STD    CM
25323  M01S17542.271l716 ---|          LDD    HO
25324  M01S17543.271l716 ---|          SHN    0-13
Line S17544 Modification History
M01 (Removed by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25325  M02S17544.271l716 ---|          NJN    MVE1        IF NOT CME MAINFRAME
Line S00044 Modification History
M01 (Added by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25326  M02S00044.271l716 ---|          NJN    MVE2        IF NOT CME MAINFRAME
Line S17545 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25327  M01S17545.271l716 ---|          LDC    4000
25328  M01S17546.271l716 ---|          STD    CM+3
25329  M01S17547.271l716 ---|          STD    CM+4
Line S17548 Modification History
M01 (Removed by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25330  M02S17548.271l716 ---| MVE1     LRD    CM+1
Line S00045 Modification History
M01 (Added by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25331  M02S00045.271l716 ---| MVE2     LRD    CM+1
Line S17549 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25332  M01S17549.271l716 ---|          LDD    CM+3        READ BLOCK OF NFL
25333  M01S17550.271l716 ---|          ADD    CM
25334  M01S17551.271l716 ---|          SHN    6
25335  M01S17552.271l716 ---|          CRM    MBUF,HN
25336  M01S17553.271l716 ---|          LRD    CN+1
25337  M01S17554.271l716 ---|          LDD    CM+4        MOVE NFL
25338  M01S17555.271l716 ---|          ADD    CM
25339  M01S17556.271l716 ---|          SHN    6
25340  M01S17557.271l716 ---|          CWM    MBUF,HN
25341  M01S17558.271l716 ---|          SOD    CM
Line S17559 Modification History
M01 (Removed by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25342  M02S17559.271l716 ---|          PJN    MVE1        IF NOT END OF NFL
Line S00046 Modification History
M01 (Added by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25343  M02S00046.271l716 ---|          PJN    MVE2        IF NOT END OF MOVE
Line S17560 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25344  M01S17560.271l716 ---|          LJM    MVEX        RETURN
25345  M01S17561.271l716 ---| RFL      SPACE  4,15
25346  M01S17562.271l716 ---|**        RFL - RELEASE FIELD LENGTH.
25347  M01S17563.271l716 ---|*
25348  M01S17564.271l716 ---|*         EXIT   (NC) = NUMBER OF CONTROL POINTS.
25349  M01S17565.271l716 ---|*                (FL - FL+1) = MACHINE FIELD LENGTH.
25350  M01S17566.271l716 ---|*                FL OF JOBS AND NON-RECOVERED SUBSYSTEMS RELEASED.
25351  M01S17567.271l716 ---|*
25352  M01S17568.271l716 ---|*         USES   T5, T6, T7, AB - AB+4, CA - CA+1, CM - CM+4, CN - CN+4.
25353  M01S17569.271l716 ---|*
25354  M01S17570.271l716 ---|*         CALLS  CFC, MVE.
25355  M01S17571.271l716 ---|
25356  M01S17572.271l716 ---|
25357  M01S17573.271l716 ---| RFL      SUBR               ENTRY/EXIT
25358  M01S17574.271l716 ---|          LDN    NCPL
25359  M01S17575.271l716 ---|          CRD    CM
25360  M01S17576.271l716 ---|          ADN    MABL-NCPL
25361  M01S17577.271l716 ---|          CRD    AB
25362  M01S17578.271l716 ---|          AOD    CM+1        SET NUMBER OF CONTROL POINTS
25363  M01S17579.271l716 ---|          STD    NC
25364  M01S17580.271l716 ---|          STD    T7
25365  M01S17581.271l716 ---|          LDD    AB+2        SET EXECUTION MEMORY SIZE
25366  M01S17582.271l716 ---|          STD    CN+1
25367  M01S17583.271l716 ---|          STD    FL
25368  M01S17584.271l716 ---|          LDD    AB+3
25369  M01S17585.271l716 ---|          STD    CN+2
25370  M01S17586.271l716 ---|          STD    FL+1
25371  M01S17587.271l716 ---| RFL1     LDD    CN+1        SAVE RA - NFL
25372  M01S17588.271l716 ---|          STD    CA
25373  M01S17589.271l716 ---|          LDD    CN+2
25374  M01S17590.271l716 ---|          STD    CA+1
25375  M01S17591.271l716 ---|          SOD    T7
25376  M01S17592.271l716 ---|          ZJN    RFLX        IF CP ZERO
25377  M01S17593.271l716 ---|          SHN    7
25378  M01S17594.271l716 ---|          ADN    JCIW        READ JOB CONTROL
25379  M01S17595.271l716 ---|          CRD    CM
25380  M01S17596.271l716 ---|          ADN    FLSW-JCIW   READ FL CONTROL WORDS
25381  M01S17597.271l716 ---|          CRD    AB
25382  M01S17598.271l716 ---|          ADN    1
25383  M01S17599.271l716 ---|          CRD    CN
25384  M01S17600.271l716 ---|          STD    T6
25385  M01S17601.271l716 ---|          RJM    CFC         CHECK FL CONTROL WORDS
25386  M01S17602.271l716 ---|          LDC    TRSS        SET TABLE ADDRESS
25387  M01S17603.271l716 ---|          STD    T5
25388  M01S17604.271l716 ---|          LDI    T5          CHECK SUBSYSTEM ID
25389  M01S17605.271l716 ---| RFL2     LMD    CM+2
Line S17606 Modification History
M01 (Removed by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25390  M02S17606.271l716 ---|          ZJN    RFL1        IF RECOVERED SUBSYSTEM
Line S00047 Modification History
M01 (Added by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25391  M02S00047.271l716 ---|          ZJN    RFL3        IF RECOVERED SUBSYSTEM
Line S17607 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25392  M01S17607.271l716 ---|          AOD    T5
25393  M01S17608.271l716 ---|          LDI    T5
25394  M01S17609.271l716 ---|          NJN    RFL2        IF NOT END OF TABLE
Line S17610 Modification History
M01 (Removed by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25395  M02S17610.271l716 ---|          LDD    T7
25396  M02S17611.271l716 ---|          LMN    1
25397  M02S17612.271l716 ---|          ZJN    RFL3        IF FIRST CP
25398  M02S17613.271l716 ---|          RJM    MVE
25399  M02S17614.271l716 ---| RFL3     LDN    0           CLEAR FL ASSIGNMENT
25400  M02S17615.271l716 ---|          STD    CN+4
Line S00048 Modification History
M01 (Added by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25401  M02S00048.271l716 ---|          STD    CN+4
25402  M02S00049.271l716 ---| RFL3     LDD    T7
25403  M02S00050.271l716 ---|          LMN    1
25404  M02S00051.271l716 ---|          ZJN    RFL4        IF FIRST CP
25405  M02S00052.271l716 ---|          RJM    MVE
25406  M02S00053.271l716 ---| RFL4     LDD    CN+4        CLEAR FL ASSIGNMENT
Line S17616 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25407  M01S17616.271l716 ---|          STD    AB+4
25408  M01S17617.271l716 ---|          LDD    T6          RESET FL CONTROL WORDS
25409  M01S17618.271l716 ---|          CWD    CN
25410  M01S17619.271l716 ---|          SBN    1
25411  M01S17620.271l716 ---|          CWD    AB
25412  M01S17621.271l716 ---|          ADN    ECSW-FLSW   FETCH EXTENDED MEMORY CONTROL WORD
25413  M01S17622.271l716 ---|          CRD    CM
25414  M01S17623.271l716 ---|          ADC    CPAS
25415  M01S17624.271l716 ---|          CRD    AB
25416  M01S17625.271l716 ---|          SHN    -7
25417  M01S17626.271l716 ---|          LMD    NC
Line S17627 Modification History
M01 (Removed by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25418  M02S17627.271l716 ---|          NJN    RFL4        IF NOT LAST CP
25419  M02S17628.271l716 ---|          LDD    AB+3        SET RAE TO END OF UEC BLOCK
25420  M02S17629.271l716 ---|          ADD    AB+4
25421  M02S17630.271l716 ---|          STD    CM+3
Line S00054 Modification History
M01 (Added by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25422  M02S00054.271l716 ---|          NJN    RFL5        IF NOT LAST CP
25423  M02S00055.271l716 ---|          LDD    AB+3
25424  M02S00056.271l716 ---|          ADD    AB+4
25425  M02S00057.271l716 ---|          STD    CM+3        SET RAE TO END OF USER XM BLOCK
Line S17631 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25426  M01S17631.271l716 ---|          SHN    -14
25427  M01S17632.271l716 ---|          ADD    AB+2
25428  M01S17633.271l716 ---|          STD    CM+2
Line S17634 Modification History
M01 (Removed by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25429  M02S17634.271l716 ---| RFL4     LDN    0           CLEAR FLE
25430  M02S17635.271l716 ---|          STD    CM+4
Line S00058 Modification History
M01 (Added by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25431  M02S00058.271l716 ---| RFL5     LDD    CN+4
25432  M02S00059.271l716 ---|          NJN    RFL6        IF RECOVERED SUBSYSTEM
25433  M02S00060.271l716 ---|*         LDN    0
25434  M02S00061.271l716 ---|          STD    CM+4        CLEAR FLE
Line S17636 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25435  M01S17636.271l716 ---|          LDD    T6
25436  M01S17637.271l716 ---|          ADN    ECSW-FLSW-1
25437  M01S17638.271l716 ---|          CWD    CM
Line S17639 Modification History
M01 (Removed by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25438  M02S17639.271l716 ---|          LJM    RFL1        LOOP FOR NEXT CP
Line S00062 Modification History
M01 (Added by) ns2535
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25439  M02S00062.271l716 ---| RFL6     LJM    RFL1        LOOP FOR NEXT CP
Line S17640 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25440  M01S17640.271l716 ---|
25441  M01S17641.271l716 ---|
25442  M01S17642.271l716 ---| TRSS     BSS    0           TABLE OF RECOVERED SUBSYSTEMS
25443  M01S17643.271l716 ---|          CON    IFSI        IAF
25444  M01S17644.271l716 ---|          CON    TRSI        TAF
25445  M01S17645.271l716 ---|          CON    BISI        BATCHIO
25446  M01S17646.271l716 ---|          CON    MTSI        MAGNET
25447  M01S17647.271l716 ---|          CON    SMSI        SMF
25448  M01S17648.271l716 ---|          CON    NVSI        NVE
25449  M01S17649.271l716 ---|          CON    FZSI        FROZEN JOB
25450  M01S17650.271l716 ---|          CON    0           END OF TABLE
25451  M01S17651.271l716 ---|          SPACE  4,10
25452  M01S17652.271l716 ---|**        COMMON DECKS.
25453  M01S17653.271l716 ---|
25454  M01S17654.271l716 ---|
25455  M01S17655.271l716 ---|          LIST   X
25456  M01S17656.271l716 ---|*CALL     COMPCMA
25457  M01S17657.271l716 ---|          LIST   *
25458  M01S17658.271l716 ---|          SPACE  4,10
25459  M01S17659.271l716 ---|          ERRNG  MBUF-*      OVERFLOW INTO BUFFER
25460  M01S17660.271l716 ---|          SPACE  4,10
25461  M01S17661.271l716 ---|**        COMMON SUBROUTINES.
25462  M01S17662.271l716 ---|
25463  M01S17663.271l716 ---|
25464  M01S17664.271l716 ---|          NVECPU
25465  M01S17665.271l716 ---|
25466  M01S17666.271l716 ---| INO      SPACE  4,10
25467  M01S17667.271l716 ---|**        INO - INITIALIZE OVERLAY.
25468  M01S17668.271l716 ---|*
25469  M01S17669.271l716 ---|*         EXIT   TO *DSE* IF CONSOLE TYPE CHANGED BY DEADSTART.
25470  M01S17670.271l716 ---|*
25471  M01S17671.271l716 ---|*         USES   T3, CA - CA+1, CM - CM+4.
25472  M01S17672.271l716 ---|*
25473  M01S17673.271l716 ---|*         CALLS  CLS, RPN.
25474  M01S17674.271l716 ---|*
25475  M01S17675.271l716 ---|*         MACROS MDIN, SFA.
25476  M01S17676.271l716 ---|
25477  M01S17677.271l716 ---|
25478  M01S17678.271l716 ---| INO      SUBR               ENTRY/EXIT
25479  M01S17679.271l716 ---|          LDC    TCMB
25480  M01S17680.271l716 ---|          STD    T3
25481  M01S17681.271l716 ---|          LDN    0           CLEAR CMR BLOCKS
25482  M01S17682.271l716 ---|          STD    CA
25483  M01S17683.271l716 ---|          LDI    T3          SET CM ADDRESS
25484  M01S17684.271l716 ---| INO1     STD    CA+1
25485  M01S17685.271l716 ---|          AOD    T3
25486  M01S17686.271l716 ---|          LDI    T3          CALCULATE WORD COUNT
25487  M01S17687.271l716 ---|          SBD    CA+1
25488  M01S17688.271l716 ---|          RJM    CLS         CLEAR CMR
25489  M01S17689.271l716 ---|          AOD    T3
25490  M01S17690.271l716 ---|          LDI    T3
25491  M01S17691.271l716 ---|          NJN    INO1        IF ALL BLOCKS NOT CLEARED
25492  M01S17692.271l716 ---|          LDN    DSEQ
25493  M01S17693.271l716 ---|          SFA    EST         FETCH EST ENTRY FOR DISPLAY CONSOLE
Line S17694 Modification History
M01 (Removed by) set56
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25494  M02S17694.271l716 ---|          ADK    EQDE
Line S00001 Modification History
M01 (Added by) set56
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25495  M02S00001.271l716 ---|          ADK    EQAE
Line S17695 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25496  M01S17695.271l716 ---|          CRD    CM
25497  M01S17696.271l716 ---|          LDM    .DCS
25498  M01S17697.271l716 ---|          ZJN    INO2        IF DEADSTART INITIATED FROM CC545
25499  M01S17698.271l716 ---|          MDIN               MODIFY DISPLAY GENERATORS
25500  M01S17699.271l716 ---|          LDN    1
25501  M01S17700.271l716 ---| INO2     LMD    CM+2
25502  M01S17701.271l716 ---|          NJN    INO3        IF CONSOLE TYPE CHANGED
25503  M01S17702.271l716 ---|          RJM    RPN
25504  M01S17703.271l716 ---|          LJM    INOX        RETURN
25505  M01S17704.271l716 ---|
25506  M01S17705.271l716 ---| INO3     LDC    INOA
25507  M01S17706.271l716 ---|          LJM    DSE         DISPLAY ERROR AND HANG
25508  M01S17707.271l716 ---|
25509  M01S17708.271l716 ---|
25510  M01S17709.271l716 ---| INOA     DATA   C*CONSOLE TYPE CHANGED.*
25511  M01S17710.271l716 ---| TCMB     SPACE  4,10
25512  M01S17711.271l716 ---|**        TCMB - TABLE OF CMR BLOCKS CLEARED FOR RECOVERY.
25513  M01S17712.271l716 ---|
25514  M01S17713.271l716 ---|
25515  M01S17714.271l716 ---| TCMB     CON    0,JSNL
25516  M01S17715.271l716 ---|          CON    CMCL,ZERL
Line S17716 Modification History
M01 (Removed by) set52
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25517  M02S17716.271l716 ---|          CON    CPAL,TSCL
Line S00001 Modification History
M01 (Added by) set52
M02 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25518  M02S00001.271l716 ---|          CON    CPAL,DSDL
Line S17717 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25519  M01S17717.271l716 ---|          CON    DSCP*CPAS+MS1W,DSCP*CPAS+MS1W+10
25520  M01S17718.271l716 ---|          CON    0           END OF TABLE
25521  M01S17719.271l716 ---|          SPACE  4,10
25522  M01S17720.271l716 ---|*         INSTRUCTION MODIFICATION BLOCK.
25523  M01S17721.271l716 ---|
25524  M01S17722.271l716 ---|
25525  M01S17723.271l716 ---|          DIMB
25526  M01S17724.271l716 ---|          SPACE  4,10
25527  M01S17725.271l716 ---|          QUAL
25528  M01S17726.271l716 ---| RCM      EQU    /RCM/RCM
Line S01591 Modification History
M01 (Added by) 271l716
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
25529  M02S01591.ns2783  ---| MDG      SPACE  4,10
25530  M02S01592.ns2783  ---|**        MDG - MODIFY DISPLAY GENERATORS.
Line S00192 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
25531  M01S00192.ns2783  +++| PRT      SPACE  4,10
25532  M01S00193.ns2783  +++|**        PRT - PRESET *RCT*.
25533  M01S00194.ns2783  +++|*
25534  M01S00195.ns2783  +++|*         USES   CM - CM+4.
Line S01593 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25535  M01S01593.271l716 +++|*
25536  M01S01594.271l716 +++|*         MACROS MDIN.
25537  M01S01595.271l716 +++|
25538  M01S01596.271l716 +++|
Line S01597 Modification History
M01 (Added by) 271l716
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
25539  M02S01597.ns2783  ---| MDG      SUBR               ENTRY/EXIT
Line S00196 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
25540  M01S00196.ns2783  +++| PRT      SUBR               ENTRY/EXIT
25541  M01S00197.ns2783  +++|          LDK    MMFL
25542  M01S00198.ns2783  +++|          CRD    CM
25543  M01S00199.ns2783  +++|          LDD    CM+3        SET MACHINE MASK
25544  M01S00200.ns2783  +++|          RAM    RMCA
Line S01598 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25545  M01S01598.271l716 +++|          LDM    .DCS
Line S01599 Modification History
M01 (Added by) 271l716
M02 (Removed by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
25546  M02S01599.ns2783  ---|          ZJN    MDGX        IF DEADSTART INITIATED FROM CC545
25547  M02S01600.ns2783  ---|          MDIN
25548  M02S01601.ns2783  ---|          UJN    MDGX        RETURN
Line S00201 Modification History
M01 (Added by) ns2783
Seq #  *Modification Id* Act 
----------------------------+
25549  M01S00201.ns2783  +++|          ZJN    PRTX        IF DEADSTART INITIATED FROM CC545
25550  M01S00202.ns2783  +++|          MDIN               MODIFY DISPLAY GENERATORS
25551  M01S00203.ns2783  +++|          UJN    PRTX        RETURN
Line S01602 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25552  M01S01602.271l716 +++|          SPACE  4,10
25553  M01S01603.271l716 +++|*         INSTRUCTION MODIFICATION BLOCK.
25554  M01S01604.271l716 +++|
25555  M01S01605.271l716 +++|
25556  M01S01606.271l716 +++|          DIMB
25557  M00S17727.set     +++|
25558  M00S17728.set     +++|
25559  M00S17729.set     +++|          ERRNG  7777-*-4    IF OVERFLOW OF PP
25560  M00S17730.set     +++|          TTL    SET/SCP - SETUP CONTROL POINT AREAS.
25561  M00S17731.set     +++|          TITLE
25562  M00S17732.set     +++|          IDENT  SCP,OVL
25563  M00S17733.set     +++|          QUAL   SCP
25564  M00S17734.set     +++|          ORG    OVL
25565  M00S17735.set     +++|*COMMENT  SET - SETUP CONTROL POINT AREAS.
Line S17736 Modification History
M01 (Removed by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
25566  M01S17736.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORP. 1986.
Line S00012 Modification History
M01 (Added by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
25567  M01S00012.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
25568  M00S17737.set     +++| SCP      SPACE  4,10
25569  M00S17738.set     +++|**        SCP - SETUP CONTROL POINTS.
25570  M00S17739.set     +++|*
Line S00034 Modification History
M01 (Added by) ns2709
Seq #  *Modification Id* Act 
----------------------------+
25571  M01S00034.ns2709  +++|*
Line S17740 Modification History
M01 (Removed by) 271l739
Seq #  *Modification Id* Act 
----------------------------+
25572  M01S17740.271l739 ---|*
Line S17741 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
25573  M01S17741.273l780 ---|*         USES   AB - AB+4, CM - CM+4, CN - CN+4, T1 - T7.
Line S00043 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
25574  M01S00043.273l780 +++|*         USES   AB - AB+4, CM - CM+4, CN - CN+4, T1 - T6.
25575  M00S17742.set     +++|*
Line S17743 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25576  M01S17743.271l716 ---|*         CALLS  INO, IRS, SFL, SSF, SXP.
Line S01607 Modification History
M01 (Added by) 271l716
M02 (Removed by) 271l739
Seq #  *Modification Id* Act 
----------------------------+
25577  M02S01607.271l739 ---|*         CALLS  INO, IRS, SCA, SFL, SMT, SSF, SXP.
Line S00061 Modification History
M01 (Added by) 271l739
M02 (Removed by) ns2709
Seq #  *Modification Id* Act 
----------------------------+
25578  M02S00061.ns2709  ---|*         CALLS  INO, IRS, SBR, SCA, SFL, SMT, SSF, SXP.
Line S00035 Modification History
M01 (Added by) ns2709
Seq #  *Modification Id* Act 
----------------------------+
25579  M01S00035.ns2709  +++|*         CALLS  INO, IRS, SCA, SFL, SMT, SSF, SXP.
25580  M00S17744.set     +++|
25581  M00S17745.set     +++|
25582  M00S17746.set     +++| SCP      SUBR               ENTRY/EXIT
25583  M00S17747.set     +++|          RJM    INO         INITIALIZE OVERLAY
25584  M00S17748.set     +++|          LDN    0
25585  M00S17749.set     +++|          RJM    SSF         SETUP *CMRL*+1
25586  M00S17750.set     +++|          LDC    UEML
25587  M00S17751.set     +++|          CRD    AB
25588  M00S17752.set     +++|          ADN    CPAS-UEML   SET FIRST CONTROL POINT ADDRESS
25589  M00S17753.set     +++|          STD    T1
25590  M00S17754.set     +++|          LDD    HO
25591  M00S17755.set     +++|          SHN    21-13
25592  M00S17756.set     +++|          LMD    AB+4        GET CM COPY FLAG
25593  M00S17757.set     +++|          SCN    1
25594  M00S17758.set     +++|          LMM    EMAF        GET EXPANDED MODE ADDRESSING FLAG
25595  M00S17759.set     +++|          SHN    10-1
25596  M00S17760.set     +++|          LPC    700
25597  M00S17761.set     +++|          LMD    HN          SET/CLEAR UEM ENABLE FLAG
Line S17762 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25598  M01S17762.271l716 ---|          STM    SCPC
Line S01608 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25599  M01S01608.271l716 +++|          STM    SCPG
25600  M00S17763.set     +++| SCP1     RJM    SFL         SETUP CP FIELD LENGTH WORDS
25601  M00S17764.set     +++|          LDN    ZERL
25602  M00S17765.set     +++|          CRD    AB
25603  M00S17766.set     +++|          CRD    CM
25604  M00S17767.set     +++|          CRD    CN
25605  M00S17768.set     +++|          LDD    T1          SET MA
25606  M00S17769.set     +++|          STD    CM+1
25607  M00S17770.set     +++|          ADN    FLSW        FETCH CM FL CONTROL WORD
25608  M00S17771.set     +++|          CRD    T2
25609  M00S17772.set     +++|          LDD    T5          SET RA
25610  M00S17773.set     +++|          SHN    6
25611  M00S17774.set     +++|          STD    AB+1
25612  M00S17775.set     +++|          LMD    AB+1
25613  M00S17776.set     +++|          LMD    T4
25614  M00S17777.set     +++|          SHN    6
25615  M00S17778.set     +++|          STD    AB
25616  M00S17779.set     +++|          LDD    T6          SET FL
25617  M00S17780.set     +++|          SHN    6
25618  M00S17781.set     +++|          STD    CN+1
25619  M00S17782.set     +++|          SHN    -14
25620  M00S17783.set     +++|          STD    CN
25621  M00S17784.set     +++|          LDD    T1
25622  M00S17785.set     +++|          ADN    1           STORE (RA)
25623  M00S17786.set     +++|          CWD    AB
25624  M00S17787.set     +++|          ADN    2-1         STORE (FL)
25625  M00S17788.set     +++|          CWD    CN
25626  M00S17789.set     +++|          ADN    3-2         STORE (EM)
Line S17790 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25627  M01S17790.271l716 ---|          CWM    SCPC,ON
Line S01609 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25628  M01S01609.271l716 +++|          CWM    SCPG,ON
25629  M00S17791.set     +++|          ADN    ECSW-4      FETCH EXTENDED MEMORY FL CONTROL WORD
25630  M00S17792.set     +++|          CRD    T2
25631  M00S17793.set     +++|          LDD    T4          SET RAE
25632  M00S17794.set     +++|          SHN    14
25633  M00S17795.set     +++|          ADD    T5
25634  M00S17796.set     +++| SCPA     SHN    21-2
25635  M00S17797.set     +++|*         SHN    21-2+UESC
25636  M00S17798.set     +++|          STD    AB
25637  M00S17799.set     +++|          SHN    -6
25638  M00S17800.set     +++|          SCN    77
25639  M00S17801.set     +++|          STD    AB+1
25640  M00S17802.set     +++|          LDD    T6          SET FLE
25641  M00S17803.set     +++| SCPB     SHN    21-2
25642  M00S17804.set     +++|*         SHN    21-2+UESC
25643  M00S17805.set     +++|          STD    CN
25644  M00S17806.set     +++|          SHN    -6
25645  M00S17807.set     +++|          SCN    77
25646  M00S17808.set     +++|          STD    CN+1
25647  M00S17809.set     +++|          LDM    EMAF
25648  M00S17810.set     +++|          ZJN    SCP2        IF NOT EXPANDED MODE
25649  M00S17811.set     +++|          LDD    AB          CONVERT RAE TO EXPANDED FORMAT
25650  M00S17812.set     +++|          SHN    14
25651  M00S17813.set     +++|          STD    AB
25652  M00S17814.set     +++|          LMD    AB+1
25653  M00S17815.set     +++|          SHN    -6
25654  M00S17816.set     +++|          STD    AB+1
25655  M00S17817.set     +++|          LDD    CN          CONVERT FLE TO EXPANDED FORMAT
25656  M00S17818.set     +++|          SHN    14
25657  M00S17819.set     +++|          STD    CN
25658  M00S17820.set     +++|          LMD    CN+1
25659  M00S17821.set     +++|          SHN    -6
25660  M00S17822.set     +++|          STD    CN+1
25661  M00S17823.set     +++| SCP2     LDD    T1
25662  M00S17824.set     +++|          ADN    4           STORE (RAE)
25663  M00S17825.set     +++|          CWD    AB
25664  M00S17826.set     +++|          ADN    5-4         STORE (FLE)
25665  M00S17827.set     +++|          CWD    CN
25666  M00S17828.set     +++|          ADN    6-5         STORE (MA)
25667  M00S17829.set     +++|          CWD    CM
25668  M00S17830.set     +++|          ADN    7-6         STORE (EA)
25669  M00S17831.set     +++|          CWD    CM
25670  M00S17832.set     +++|          ADN    TFSW-7      FETCH EST ORDINAL
25671  M00S17833.set     +++|          CRD    T2
25672  M00S17834.set     +++|          LDD    T2
25673  M00S17835.set     +++|          ZJN    SCP4        IF NO JOB ASSIGNED
25674  M00S17836.set     +++|          LDD    T1
25675  M00S17837.set     +++|          ADN    STSW        FETCH CP STATUS
25676  M00S17838.set     +++|          CRD    CM
Line S17839 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
25677  M01S17839.273l780 ---|          ADN    JCIW-STSW   READ JOB CONTROL INFORMATION
25678  M01S17840.273l780 ---|          CRD    T2
25679  M01S17841.273l780 ---|          LDD    T4          CHECK SUBSYSTEM ID
25680  M01S17842.273l780 ---|          LMN    QCSI
25681  M01S17843.273l780 ---|          NJN    SCP3        IF NOT *QCSI*
25682  M01S17844.273l780 ---|          STD    T4
25683  M01S17845.273l780 ---|          LDD    T1          CLEAR SUBSYSTEM ID
25684  M01S17846.273l780 ---|          ADN    JCIW
25685  M01S17847.273l780 ---|          CWD    T2
25686  M01S17848.273l780 ---| SCP3     LDN    1           INITIALIZE PP RECALL STACK
Line S00044 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
25687  M01S00044.273l780 +++|          LDN    0           CLEAR PP ACTIVITY
25688  M01S00045.273l780 +++|          STD    CM
25689  M00S17849.set     +++| SCP4     RJM    IRS
Line S17850 Modification History
M01 (Removed by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
25690  M01S17850.271l750 ---|          ADN    CRCW-STSW   CLEAR CPU RECALL CRITERION
Line S00237 Modification History
M01 (Added by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
25691  M01S00237.271l750 +++|          ADN    SPCW-STSW   CLEAR SPECIAL PROCESSOR CALL WORD
25692  M00S17851.set     +++|          CWD    ZR
Line S17852 Modification History
M01 (Removed by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
25693  M01S17852.271l750 ---|          ADN    SPCW-CRCW   CLEAR SPECIAL PROCESSOR CALL WORD
Line S00238 Modification History
M01 (Added by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
25694  M01S00238.271l750 +++|          ADC    CRCW-SPCW   CLEAR *X* STATUS CPU RECALL CRITERION
25695  M00S17853.set     +++|          CWD    ZR
Line S17854 Modification History
M01 (Removed by) set64
Seq #  *Modification Id* Act 
----------------------------+
25696  M01S17854.set64   ---|          ADN    JCRW-SPCW   CLEAR JOB CONTROL REGISTERS
25697  M01S17855.set64   ---|          CWD    ZR
25698  M00S17856.set     ---|          LDD    T1          SET UP FLSW+1
25699  M00S17857.set     ---|          RJM    SSF
25700  M00S17858.set     ---|          LDC    200         ADVANCE CP ADDRESS
25701  M00S17859.set     ---|          RAD    T1
25702  M00S17860.set     ---|          SHN    -7
25703  M00S17861.set     ---|          SBD    NC
25704  M00S17862.set     ---|          MJP    SCP1        IF NOT END OF CP-S
25705  M00S17863.set     ---|
25706  M00S17864.set     ---|*         SET UP SYSTEM CONTROL POINT.
25707  M00S17865.set     ---|
25708  M00S17866.set     ---|          RJM    SFL         SETUP FIELD LENGTH WORDS
25709  M00S17867.set     ---|          RJM    SXP         SETUP *CPUMTR* PRESET EXCHANGE PACKAGE
Line S17868 Modification History
M01 (Removed by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
25710  M01S17868.271l750 ---|          ADN    JCIW-15     STORE JOB CONTROL
Line S00239 Modification History
M01 (Added by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
25711  M01S00239.271l750 +++|          ADN    CWQW-15     STORE CPU SCHEDULING PARAMETERS
25712  M00S17869.set     +++|          CWM    SCPD,ON
Line S17870 Modification History
M01 (Removed by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
25713  M01S17870.271l750 ---|          ADN    FLSW-JCIW-1
Line S00240 Modification History
M01 (Added by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
25714  M01S00240.271l750 +++|          ADN    FLSW-CWQW-1
25715  M00S17871.set     +++|          CWD    ZR
Line S17872 Modification History
M01 (Removed by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
25716  M01S17872.271l750 ---|          ADN    CPTW-FLSW
Line S00241 Modification History
M01 (Added by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
25717  M01S00241.271l750 +++|          ADN    JCIW-FLSW   STORE JOB CONTROL
25718  M01S00242.271l750 +++|          CWM    SCPH,ON
25719  M01S00243.271l750 +++|          ADN    CPTW-JCIW-1
25720  M00S17873.set     +++|          CWD    ZR
25721  M00S17874.set     +++|          CRD    CM
Line S17875 Modification History
M01 (Removed by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
25722  M01S17875.271l750 ---|          ADN    STLW-CPTW
Line S00244 Modification History
M01 (Added by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
25723  M01S00244.271l750 +++|          ADN    MP3W-CPTW
25724  M01S00245.271l750 +++|          CWM    SCPI,ON     DISABLE SRU ACCUMULATION
25725  M01S00246.271l750 +++|          ADN    STLW-MP3W
25726  M00S17876.set     +++|          CWM    SCPE,ON     SET MAXIMUM LIMITS FOR SRU AND TIME
25727  M00S17877.set     +++|          ADN    ALMW-STLW-1
25728  M00S17878.set     +++|          CWM    SCPE,ON
25729  M00S17879.set     +++|          ADK    ACLW-ALMW-1
25730  M00S17880.set     +++|          CWM    SCPE,ON
25731  M00S17881.set     +++|          ADK    AACW-ACLW-1
25732  M00S17882.set     +++|          CWM    SCPE,ON
25733  M00S17883.set     +++|          ADN    CPLW-AACW-1
25734  M00S17884.set     +++|          CWM    SCPF,ON
25735  M00S17885.set     +++|          LDD    T1          SETUP *FLSW*+1
25736  M00S17886.set     +++|          RJM    SSF
25737  M00S17887.set     +++|          LDM    SPPC        INITIALIZE PP RECALL STACK
25738  M00S17888.set     +++|          RJM    IRS
Line S17889 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25739  M01S17889.271l716 ---|          LJM    SCPX        RETURN
25740  M01S17890.271l716 ---|
25741  M01S17891.271l716 ---| SCPC     VFD    60/0        EXCHANGE PACKAGE WORD WITH CM COPY FLAG
Line S01610 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25742  M01S01610.271l716 +++|          LDM    .NPCP       SET NUMBER OF PSEUDO CONTROL POINTS
25743  M01S01611.271l716 +++|          STD    T2
25744  M01S01612.271l716 +++|          ZJN    SCP6        IF NONE OR CM RECOVERY
25745  M01S01613.271l716 +++|
25746  M01S01614.271l716 +++|*         SET UP PSEUDO CONTROL POINT AREAS.
25747  M01S01615.271l716 +++|
25748  M01S01616.271l716 +++|          LDD    NC          INITIALIZE PCP NUMBER
25749  M01S01617.271l716 +++|          STD    T1
25750  M01S01618.271l716 +++|          SBN    CPLK        CP LINK TO PCP-S
25751  M01S01619.271l716 +++|          SHN    7
25752  M01S01620.271l716 +++|          ADN    FLSW        GET MEMORY CONTROL WORDS
25753  M01S01621.271l716 +++|          CRM    MCWB,TR
25754  M01S01622.271l716 +++| SCP5     AOD    T1          ADVANCE AND SET PCPA ADDRESS
25755  M01S01623.271l716 +++|          RJM    SCA
25756  M01S01624.271l716 +++|          ADN    FLSW        STORE MEMORY CONTROL WORDS
25757  M01S01625.271l716 +++|          CWM    MCWB,TR
25758  M01S01626.271l716 +++|          SOD    T2
25759  M01S01627.271l716 +++|          NJN    SCP5        IF MORE PCP-S
25760  M01S01628.271l716 +++|
25761  M01S01629.271l716 +++|*         BUILD MEMORY CONTROL TABLE.
25762  M01S01630.271l716 +++|
25763  M01S01631.271l716 +++| SCP6     UJN    SCP7        SKIP TABLE ON CM RECOVERY
25764  M01S01632.271l716 +++| SCPC     EQU    SCP6
25765  M01S01633.271l716 +++|*         PSN                (NON CM RECOVERY)
Line S01634 Modification History
M01 (Added by) 271l716
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
25766  M02S01634.284l847 ---|          RJM    SMT
Line S00739 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
25767  M01S00739.284l847 +++|          RJM    SMC         SET UP MEMORY CONTROL TABLE
Line S01635 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25768  M01S01635.271l716 +++|          LDN    ACML        STORE UNASSIGNED MEMORY
25769  M01S01636.271l716 +++|          CWM    .ACML,ON
Line S01637 Modification History
M01 (Added by) 271l716
M02 (Removed by) 271l739
Seq #  *Modification Id* Act 
----------------------------+
25770  M02S01637.271l739 ---| SCP7     LJM    SCPX        RETURN
Line S00062 Modification History
M01 (Added by) 271l739
M02 (Removed by) ns2709
Seq #  *Modification Id* Act 
----------------------------+
25771  M02S00062.ns2709  ---| SCP7     RJM    SBR         SET OS BOUND REGISTER
25772  M02S00063.ns2709  ---|          LJM    SCPX        RETURN
Line S00036 Modification History
M01 (Added by) ns2709
Seq #  *Modification Id* Act 
----------------------------+
25773  M01S00036.ns2709  +++| SCP7     LJM    SCPX        RETURN
Line S01638 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25774  M01S01638.271l716 +++|
25775  M01S01639.271l716 +++|
Line S17892 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25776  M01S17892.271l716 ---| SCPD     VFD    11/MPRS,1/0,12/0,12/7777,24/0
Line S01640 Modification History
M01 (Added by) 271l716
M02 (Removed by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
25777  M02S01640.271l750 ---| SCPD     VFD    2/0,3/7,7/MPRS,12/0,12/7777,24/0
Line S00247 Modification History
M01 (Added by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
25778  M01S00247.271l750 +++| SCPD     VFD    2/1,7/MPRS,3/2,12/0,9//SCD/SSSC*JCBE,3/0,24/0
25779  M00S17893.set     +++| SCPE     VFD    60/-0
25780  M00S17894.set     +++| SCPF     VFD    60/37777777777777777777B
Line S17895 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25781  M01S17895.271l716 ---|          TITLE  SUBROUTINES.
Line S01641 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25782  M01S01641.271l716 +++| SCPG     VFD    60/0        EXCHANGE PACKAGE WORD WITH CM COPY FLAG
Line S00248 Modification History
M01 (Added by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
25783  M01S00248.271l750 +++| SCPH     VFD    24/0,12/7777,24/0
25784  M01S00249.271l750 +++|
25785  M01S00250.271l750 +++| SCPI     VFD    1/1,59/0
Line S01642 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25786  M01S01642.271l716 +++|          TITLE  SUBROUTINES.
25787  M01S01643.271l716 +++|          SPACE  4,10
25788  M01S01644.271l716 +++|**        COMMON SUBROUTINES.
25789  M01S01645.271l716 +++|
25790  M01S01646.271l716 +++|
25791  M01S01647.271l716 +++|          MCTSUB
Line S00064 Modification History
M01 (Added by) 271l739
M02 (Removed by) ns2709
Seq #  *Modification Id* Act 
----------------------------+
25792  M02S00064.ns2709  ---|          RWRSUB
25793  M00S17896.set     ---| IRS      SPACE  4,10
25794  M00S17897.set     ---|**        IRS - INITIALIZE PP RECALL STACK.
25795  M00S17898.set     ---|*
Line S17899 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
25796  M01S17899.273l780 ---|*         ENTRY  (A) = NUMBER OF PSEUDO PP-S TO ASSIGN.
25797  M01S17900.273l780 ---|*                (T1) = CONTROL POINT ADDRESS.
Line S00046 Modification History
M01 (Added by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
25798  M01S00046.273l780 +++|*         ENTRY  (T1) = CONTROL POINT ADDRESS.
25799  M00S17901.set     +++|*                (CM - CM+4) = *STSW* WORD.
25800  M00S17902.set     +++|*
25801  M00S17903.set     +++|*         EXIT   (A) = ADDRESS OF *STSW* WORD.
25802  M00S17904.set     +++|*                *STSW* WORD UPDATED IN CONTROL POINT AREA.
25803  M00S17905.set     +++|*
25804  M00S17906.set     +++|*         USES   T2 - T2+4.
25805  M00S17907.set     +++|
25806  M00S17908.set     +++|
25807  M00S17909.set     +++| IRS      SUBR               ENTRY/EXIT
Line S17910 Modification History
M01 (Removed by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
25808  M01S17910.273l780 ---|          STD    CM          SET PSEUDO PP ASSIGNMENT
25809  M00S17911.set     ---|          LDN    ZERL
25810  M00S17912.set     ---|          CRD    T2
25811  M00S17913.set     ---|          LDN    2
25812  M00S17914.set     ---|          STD    T2+4
25813  M00S17915.set     ---| IRS1     LDD    T1          INITIALIZE RECALL LINKAGE BLOCK
25814  M00S17916.set     ---|          ADC    RCCW-2
25815  M00S17917.set     ---|          ADD    T2+4
25816  M00S17918.set     ---|          CWD    T2
25817  M00S17919.set     ---|          ADN    RECW-RCCW   CLEAR REQUEST BLOCK
25818  M00S17920.set     ---|          CWD    ZR
25819  M00S17921.set     ---|          AOD    T2+4        ADVANCE LINKAGE
25820  M00S17922.set     ---|          LMN    LREC+1
25821  M00S17923.set     ---|          NJN    IRS1        IF NOT END OF RECALL AREA
25822  M00S17924.set     ---|          LDD    CM+1
25823  M00S17925.set     ---|          LMK    PEET
25824  M00S17926.set     ---|          ZJN    IRS2        IF CPU PARITY ERROR
25825  M00S17927.set     ---|          LDN    0           CLEAR ERROR FLAG
25826  M00S17928.set     ---|          STD    CM+1
25827  M00S17929.set     ---| IRS2     LDN    1           SET NEXT AVAILABLE RECALL SLOT
25828  M00S17930.set     ---|          STD    CM+4
25829  M00S17931.set     ---|          LDD    T1          STORE CONTROL POINT STATUS WORD
25830  M00S17932.set     ---|          ADN    STSW
25831  M00S17933.set     ---|          CWD    CM
25832  M00S17934.set     ---|          UJN    IRSX        RETURN
Line S00065 Modification History
M01 (Added by) 271l739
M02 (Removed by) ns2709
Seq #  *Modification Id* Act 
----------------------------+
25833  M02S00065.ns2709  ---| SBR      SPACE  4,10
25834  M02S00066.ns2709  ---|**        SBR - SET IOU BOUNDS REGISTER.
25835  M02S00067.ns2709  ---|*
25836  M02S00068.ns2709  ---|*         ENTRY  (FL - FL+1) = CM FIELD LENGTH.
25837  M02S00069.ns2709  ---|*                (UEMZ - UEMZ+1) = UEM SIZE.
25838  M02S00070.ns2709  ---|*
25839  M02S00071.ns2709  ---|*         USES   T4.
25840  M02S00072.ns2709  ---|*
25841  M02S00073.ns2709  ---|*         CALLS  RWR.
25842  M02S00074.ns2709  ---|
25843  M02S00075.ns2709  ---|
25844  M02S00076.ns2709  ---| SBR2     CCF.   *+2,MR      CLEAR CHANNEL FLAG
25845  M02S00077.ns2709  ---|
25846  M02S00078.ns2709  ---| SBR      SUBR               ENTRY/EXIT
25847  M02S00079.ns2709  ---|          LDM    C8XX
25848  M02S00080.ns2709  ---|          NJN    SBRX        IF NOT C180 MAINFRAME
25849  M02S00081.ns2709  ---| SBR1     LDK    /IOU/IOSB
25850  M02S00082.ns2709  ---|          STD    T4          SET REGISTER NUMBER
25851  M02S00083.ns2709  ---|          SCF.   SBR1,MR     ACQUIRE MAINTENANCE CHANNEL ACCESS
25852  M02S00084.ns2709  ---|          LDK    RMRF        READ IOU REGISTER
25853  M02S00085.ns2709  ---|          LMM    IUCC
25854  M02S00086.ns2709  ---|          RJM    RWR
25855  M02S00087.ns2709  ---|          DCN.   MR          ENSURE CHANNEL INACTIVE
25856  M02S00088.ns2709  ---|          LDD    FL
25857  M02S00089.ns2709  ---|          ADM    UEMZ
25858  M02S00090.ns2709  ---|          SHN    14          FORM HIGHEST ADDRESS / 100B
25859  M02S00091.ns2709  ---|          LMD    FL+1
25860  M02S00092.ns2709  ---|          ADM    UEMZ+1
25861  M02S00093.ns2709  ---|          ADN    17          ROUND UP TO 2000B
25862  M02S00094.ns2709  ---|          SHN    -4
25863  M02S00095.ns2709  ---|          STM    RBUF+7      SET UPPER LIMIT IN BOUNDS REGISTER
25864  M02S00096.ns2709  ---|          SHN    -10
25865  M02S00097.ns2709  ---|          STM    RBUF+6
25866  M02S00098.ns2709  ---|          LDM    RBUF+5      CLEAR MOST SIGNIFICANT BITS
25867  M02S00099.ns2709  ---|          SCN    3
25868  M02S00100.ns2709  ---|          STM    RBUF+5
25869  M02S00101.ns2709  ---|          LDK    WMRF        REWRITE OS BOUNDS REGISTER
25870  M02S00102.ns2709  ---|          LMM    IUCC
25871  M02S00103.ns2709  ---|          RJM    RWR
25872  M02S00104.ns2709  ---|          FJM.   *,MR        IF CHANNEL EMPTY
25873  M02S00105.ns2709  ---|          DCN.   MR
25874  M02S00106.ns2709  ---|          UJP    SBR2        RETURN
25875  M00S17935.set     ---| SFL      SPACE  4,10
25876  M00S17936.set     ---|**        SFL - SET CONTROL POINT FIELD LENGTH WORDS.
25877  M00S17937.set     ---|*
25878  M00S17938.set     ---|*         ENTRY  (T1) = CP ADDRESS.
25879  M00S17939.set     ---|*                (NC) = SYSTEM CONTROL POINT NUMBER.
25880  M00S17940.set     ---|*
Line S17941 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25881  M01S17941.271l716 ---|*         EXIT   *FLSW*, *ECSW* WRITTEN INTO CP AREA.
25882  M01S17942.271l716 ---|*
25883  M01S17943.271l716 ---|*         USES   NONE.
Line S01648 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25884  M01S01648.271l716 +++|*         EXIT   *FLSW* WRITTEN TO CP AREA.
25885  M01S01649.271l716 +++|*                *ECSW* WRITTEN TO CP AREA.
25886  M00S17944.set     +++|
25887  M00S17945.set     +++|
25888  M01S01650.271l716 +++| SFL1     LDN    SFLE-SFLD   SET *FLSW* FOR REMAINING CP-S
25889  M01S01651.271l716 +++|          RAM    SFLB
25890  M01S01652.271l716 +++|          LDN    SFLG-SFLF   SET *ECSW* FOR REMAINING CP-S
25891  M01S01653.271l716 +++| SFL2     RAM    SFLC
25892  M01S01654.271l716 +++|
25893  M00S17946.set     +++| SFL      SUBR               ENTRY/EXIT
25894  M00S17947.set     +++| SFLA     UJN    SFLX        RETURN IF CM RECOVERY
25895  M00S17948.set     +++|*         PSN                (IF INITIALIZING CM)
25896  M00S17949.set     +++|          LDD    T1
25897  M00S17950.set     +++|          ADN    FLSW
Line S17951 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25898  M01S17951.271l716 ---|          CWM    SFLD,ON     WRITE *FLSW*
25899  M01S17952.271l716 ---|*         CWM    SFLE,ON     (*FLSW* FOR LAST CP)
Line S01655 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25900  M01S01655.271l716 +++|          CWM    SFLD,ON     STORE *FLSW* FOR FIRST CP
25901  M01S01656.271l716 +++|*         CWM    SFLE,ON     (*FLSW* FOR REMAINING CP-S)
25902  M00S17953.set     +++| SFLB     EQU    *-1
25903  M00S17954.set     +++|          ADK    ECSW-FLSW-1
Line S17955 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25904  M01S17955.271l716 ---|          CWM    SFLF,ON     WRITE*ECSW*
25905  M01S17956.271l716 ---|*         CWM    SFLG,ON     (*ECSW* FOR LAST CP)
Line S01657 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25906  M01S01657.271l716 +++|          CWM    SFLF,ON     STORE *ECSW* FOR FIRST CP
25907  M01S01658.271l716 +++|*         CWM    SFLG,ON     (*ECSW* FOR REMAINING CP-S)
25908  M00S17957.set     +++|*         CWM    SFLH,ON     (*ECSW* FOR SYSTEM CP)
25909  M00S17958.set     +++| SFLC     EQU    *-1
25910  M00S17959.set     +++|          SHN    -7
Line S17960 Modification History
M01 (Removed by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25911  M01S17960.271l716 ---|          SBD    NC
25912  M01S17961.271l716 ---|          ADN    1
25913  M01S17962.271l716 ---|          ZJN    SFL1        IF LAST CONTROL POINT
25914  M01S17963.271l716 ---|          ADN    1
25915  M01S17964.271l716 ---|          NJN    SFLX        IF NOT NEXT-TO-LAST CP
25916  M01S17965.271l716 ---|          LDN    SFLE-SFLD   SET *FLSW* FOR LAST CP
25917  M01S17966.271l716 ---|          RAM    SFLB
25918  M01S17967.271l716 ---|          LDN    SFLG-SFLF   SET *ECSW* FOR LAST CP
25919  M01S17968.271l716 ---|          RAM    SFLC
25920  M01S17969.271l716 ---|          UJN    SFLX        RETURN
25921  M01S17970.271l716 ---|
25922  M01S17971.271l716 ---| SFL1     LDN    ZERL        SET *FLSW* FOR SYSTEM CP
25923  M01S17972.271l716 ---|          CRM    SFLE,ON
25924  M01S17973.271l716 ---|          LDN    SFLH-SFLG   SET *ECSW* FOR SYSTEM CP
25925  M01S17974.271l716 ---|          RAM    SFLC
25926  M01S17975.271l716 ---|          UJN    SFLX
25927  M01S17976.271l716 ---|
25928  M01S17977.271l716 ---| SFLD     VFD    60/0        *FLSW* FOR CONTROL POINTS
25929  M01S17978.271l716 ---| SFLE     VFD    60/0        *FLSW* FOR LAST CONTROL POINT
25930  M01S17979.271l716 ---| SFLF     VFD    60/0        *ECSW* FOR CONTROL POINTS
25931  M01S17980.271l716 ---| SFLG     VFD    60/0        *ECSW* FOR LAST CONTROL POINT
25932  M01S17981.271l716 ---| SFLH     VFD    60/0        *ECSW* FOR SYSTEM CONTROL POINT
Line S01659 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25933  M01S01659.271l716 +++|          SBN    1
25934  M01S01660.271l716 +++|          ZJN    SFL1        IF FIRST CP
25935  M01S01661.271l716 +++|          SBD    NC
25936  M01S01662.271l716 +++|          ADN    2
25937  M01S01663.271l716 +++|          NJN    SFLX        IF NOT LAST CP
25938  M01S01664.271l716 +++|          LDN    ZERL
25939  M01S01665.271l716 +++|          CRM    SFLE,ON     SET *FLSW* FOR SYSTEM CP
25940  M01S01666.271l716 +++|          LDN    SFLH-SFLG
25941  M01S01667.271l716 +++|          UJN    SFL2        SET *ECSW* FOR SYSTEM CP
25942  M01S01668.271l716 +++|
25943  M01S01669.271l716 +++|
25944  M01S01670.271l716 +++| SFLD     VFD    60/0        *FLSW* FOR FIRST CONTROL POINT
25945  M01S01671.271l716 +++| SFLE     VFD    60/0        *FLSW* FOR CONTROL POINTS
25946  M01S01672.271l716 +++| SFLF     VFD    60/0        *ECSW* FOR FIRST CONTROL POINT
25947  M01S01673.271l716 +++| SFLG     VFD    60/0        *ECSW* FOR CONTROL POINTS
25948  M01S01674.271l716 +++| SFLH     VFD    60/0        *ECSW* FOR SYSTEM CONTROL POINT
Line S01675 Modification History
M01 (Added by) 271l716
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
25949  M02S01675.284l847 ---| SMT      SPACE  4,10
25950  M02S01676.284l847 ---|**        SMT - SETUP MEMORY CONTROL TABLE.
Line S00740 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
25951  M01S00740.284l847 +++| SMC      SPACE  4,10
25952  M01S00741.284l847 +++|**        SMC - SETUP MEMORY CONTROL TABLE.
Line S01677 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25953  M01S01677.271l716 +++|*
25954  M01S01678.271l716 +++|*         ENTRY  (NC) = SYSTEM CP NUMBER.
25955  M01S01679.271l716 +++|*                (NS) = MCT ENTRY COUNT.
25956  M01S01680.271l716 +++|*
25957  M01S01681.271l716 +++|*         USES   KA, KB, CN - CN+4.
25958  M01S01682.271l716 +++|*
25959  M01S01683.271l716 +++|*         CALLS  CTE.
25960  M01S01684.271l716 +++|
25961  M01S01685.271l716 +++|
Line S01686 Modification History
M01 (Added by) 271l716
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
25962  M02S01686.284l847 ---| SMT      SUBR               ENTRY/EXIT
Line S00742 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
25963  M01S00742.284l847 +++| SMC      SUBR               ENTRY/EXIT
Line S01687 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25964  M01S01687.271l716 +++|          LDN    0
25965  M01S01688.271l716 +++|          STD    KA          INITIALIZE CP NUMBER
25966  M01S01689.271l716 +++|          CRD    CN
25967  M01S01690.271l716 +++|          LDD    NS          SET MCT ENTRY COUNT
25968  M01S01691.271l716 +++|          STD    KB
Line S01692 Modification History
M01 (Added by) 271l716
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
25969  M02S01692.284l847 ---| SMT1     LDD    KA
Line S00743 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
25970  M01S00743.284l847 +++| SMC1     LDD    KA
Line S01693 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25971  M01S01693.271l716 +++|          STD    CN          SET BACKWARD LINK
25972  M01S01694.271l716 +++|          LDD    CN+1
25973  M01S01695.271l716 +++|          STD    KA          CURRENT = PREVIOUS FORWARD LINK
25974  M01S01696.271l716 +++|          LMD    NC
Line S01697 Modification History
M01 (Added by) 271l716
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
25975  M02S01697.284l847 ---|          ZJN    SMT3        IF CREATING ENTRY FOR SYSTEM CP
Line S00744 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
25976  M01S00744.284l847 +++|          ZJN    SMC3        IF CREATING ENTRY FOR SYSTEM CP
Line S01698 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25977  M01S01698.271l716 +++|          AOD    CN+1
25978  M01S01699.271l716 +++|          ADN    CPLK        CHECK NEW FORWARD LINK
25979  M01S01700.271l716 +++|          SBD    NC
Line S01701 Modification History
M01 (Added by) 271l716
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
25980  M02S01701.284l847 ---|          NJN    SMT2        IF NOT CP TO LINK TO PCP-S
Line S00745 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
25981  M01S00745.284l847 +++|          NJN    SMC2        IF NOT CP TO LINK TO PCP-S
Line S01702 Modification History
M01 (Added by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
25982  M01S01702.271l716 +++|          LDD    NC
25983  M01S01703.271l716 +++|          ADN    1           SET FIRST PCP NUMBER
25984  M01S01704.271l716 +++|          STD    CN+1
Line S01705 Modification History
M01 (Added by) 271l716
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
25985  M02S01705.284l847 ---| SMT2     LDD    CN+1        CHECK NEW FORWARD LINK
Proceed to Part 15
cdc/nos2.source/opl.opl871/deck/set.014.txt ยท Last modified: (external edit)