308 Modifications

Seq #  *Modification Id* Act 
----------------------------+
56002  M00S34249.cpumtr  +++|          MX2    -2
56003  M00S34250.cpumtr  +++|          LX1    59-47
56004  M00S34251.cpumtr  +++|          NG     X1,SCM7     IF NOT CYBER 170-8X5
56005  M00S34252.cpumtr  +++|          SX7    4000        SET MULTIPLIERS FOR MICRO SECOND COUNTER
56006  M00S34253.cpumtr  +++|          SA7    /MONITOR/CPTA
56007  M00S34254.cpumtr  +++|          SA7    /MONITOR/CPTA+1
56008  M00S34255.cpumtr  +++|          LX1    59-42-59+47
56009  M00S34256.cpumtr  +++|          PL     X1,SCM6     IF CYBER 170-865/875

Seq #  *Modification Id* Act 
----------------------------+
56010  M01S34257.ns2443  ---|          MX3    -8

Seq #  *Modification Id* Act 
----------------------------+
56011  M02S34258.ns2443  ---|          SA1    EABL        GET PROCESSOR POINTER

Seq #  *Modification Id* Act 
----------------------------+
56012  M02S00544.ns2443  ---|          SA1    EABL+CPEI   GET PROCESSOR DESCRIPTOR POINTER

Seq #  *Modification Id* Act 
----------------------------+
56013  M01S34259.ns2443  ---|          LX1    18
56014  M01S34260.ns2443  ---|          SA4    X1          ISOLATE MODEL NUMBER

Seq #  *Modification Id* Act 
----------------------------+
56015  M02S34261.ns2443  ---|          AX4    24+16

Seq #  *Modification Id* Act 
----------------------------+
56016  M02S00545.ns2443  ---|          AX4    28

Seq #  *Modification Id* Act 
----------------------------+
56017  M01S34262.ns2443  ---|          SX2    TMNB
56018  M01S34263.ns2443  ---| SCM5     SA1    X2
56019  M01S34264.ns2443  ---|          ZR     X1,SCM      IF END OF TABLE
56020  M01S34265.ns2443  ---|          SX2    X2+B1
56021  M01S34266.ns2443  ---|          BX6    X1-X4
56022  M01S34267.ns2443  ---|          BX6    -X3*X6
56023  M01S34268.ns2443  ---|          NZ     X6,SCM5     IF NO MATCH ON MODEL NUMBER
56024  M01S34269.ns2443  ---|          AX1    30          SET *TCPM* INDEX

Seq #  *Modification Id* Act 
----------------------------+
56025  M01S00110.ns2443  +++|          SA1    TMNBA       GET *TCPM* INDEX
56026  M01S00111.ns2443  +++|          ZR     X1,SCM      IF INDEX NOT FOUND
56027  M00S34270.cpumtr  +++|          EQ     SCM8        PROCESS CPU MULTIPLIER
56028  M00S34271.cpumtr  +++|
56029  M00S34272.cpumtr  +++| SCM6     LX1    0-38-59+42  GET 865/875 FLAG
56030  M00S34273.cpumtr  +++|          SX6    B1+
56031  M00S34274.cpumtr  +++|          BX1    X6*X1

Seq #  *Modification Id* Act 
----------------------------+
56032  M02S34275.v23l617 ---|          SX1    X1+12

Seq #  *Modification Id* Act 
----------------------------+
56033  M01S00001.cpumt75 +++|          SX1    X1+TCPMH-TCPM
56034  M00S34276.cpumtr  +++|          EQ     SCM8        PROCESS CPU MULTIPLIER
56035  M00S34277.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
56036  M01S34278.cpumt48 ---| SCM7     AX1    12-0+59-20
56037  M01S34279.cpumt48 ---|          BX2    -X2*X1      ISOLATE CPU 0 (1) AND CPU 1 (0) FLAGS
56038  M01S34280.cpumt48 ---|          SX3    4
56039  M01S34281.cpumt48 ---|          AX1    2
56040  M01S34282.cpumt48 ---|          BX3    X3*X1       ISOLATE CYBER 170 (4) FLAG
56041  M01S34283.cpumt48 ---|          IX1    X3+X2       COMBINE INTO 3-BIT INDEX

Seq #  *Modification Id* Act 
----------------------------+
56042  M01S00001.cpumt48 +++| SCM7     LX1    0-37-59+47
56043  M01S00002.cpumt48 +++|          MX2    -1
56044  M01S00003.cpumt48 +++|          BX3    -X2*X1      CPU 1 PRESENT FLAG
56045  M01S00004.cpumt48 +++|          LX1    1-40-0+37
56046  M01S00005.cpumt48 +++|          LX2    1-0
56047  M01S00006.cpumt48 +++|          BX6    -X2*X1      INSTRUCTION STACK PRESENT FLAG
56048  M01S00007.cpumt48 +++|          BX3    X3+X6
56049  M01S00008.cpumt48 +++|          LX1    2-42-1+40
56050  M01S00009.cpumt48 +++|          LX2    2-1
56051  M01S00010.cpumt48 +++|          BX6    -X2*X1      CYBER 170 FLAG
56052  M01S00011.cpumt48 +++|          BX3    X6+X3
56053  M01S00012.cpumt48 +++|          MX2    -3
56054  M01S00013.cpumt48 +++|          BX3    -X3         COMPLEMENT FLAGS
56055  M01S00014.cpumt48 +++|          BX1    -X2*X3
56056  M00S34284.cpumtr  +++|          SX6    X1-TCPML
56057  M00S34285.cpumtr  +++|          PL     X6,SCM      IF INDEX OUT OF RANGE
56058  M00S34286.cpumtr  +++|          TX3    EXPA
56059  M00S34287.cpumtr  +++|          ZR     X3,SCM8     IF NOT A CYBER 176
56060  M00S34288.cpumtr  +++|          SX1    7           SET CYBER 176 INDEX
56061  M00S34289.cpumtr  +++|          SX7    110         SET CONVERSION FACTOR TO CONVERT CLOCK
56062  M00S34290.cpumtr  +++|          SA7    /MONITOR/CPTA  CYCLES TO QUARTER NANOSECONDS
56063  M00S34291.cpumtr  +++|          SA7    /MONITOR/CPTA+1
56064  M00S34292.cpumtr  +++| SCM8     SA1    TCPM+X1     GET TABLE ENTRY
56065  M00S34293.cpumtr  +++|          SX2    X1          (X2) = CPU 1 MULTIPLIER ADDR
56066  M00S34294.cpumtr  +++|          AX1    30          (X1) = CPU 0 MULTIPLIER ADDR
56067  M00S34295.cpumtr  +++|
56068  M00S34296.cpumtr  +++|*         SET CPU 0 MULTIPLIER (S0).
56069  M00S34297.cpumtr  +++|
56070  M00S34298.cpumtr  +++|          ZR     X1,SCM9     IF NO CPU 0 MULTIPLIER
56071  M00S34299.cpumtr  +++|          SA1    X1+         GET MULTIPLIER
56072  M00S34300.cpumtr  +++|          SA3    SCMA
56073  M00S34301.cpumtr  +++|          BX6    X1-X3
56074  M00S34302.cpumtr  +++|          SA3    A3+B1
56075  M00S34303.cpumtr  +++|          ZR     X6,SCM9     IF NULTIPLIER = 0.0
56076  M00S34304.cpumtr  +++|          BX6    X1-X3
56077  M00S34305.cpumtr  +++|          ZR     X6,SCM9     IF MULTIPLIER = 1.0
56078  M00S34306.cpumtr  +++|          SA3    /MONITOR/CPTA  BIAS CONSTANTS WITH CPU 0 MULTIPLIER
56079  M00S34307.cpumtr  +++|          PX3    X3
56080  M00S34308.cpumtr  +++|          NX3    X3
56081  M00S34309.cpumtr  +++|          RX7    X3*X1
56082  M00S34310.cpumtr  +++|          UX7,B3 X7
56083  M00S34311.cpumtr  +++|          LX7    B3
56084  M00S34312.cpumtr  +++|          SA7    A3+
56085  M00S34313.cpumtr  +++|
56086  M00S34314.cpumtr  +++|*         SET CPU 1 MULTIPLIER (S1).
56087  M00S34315.cpumtr  +++|
56088  M00S34316.cpumtr  +++| SCM9     ZR     X2,SCM10    IF NO CPU 1 MULTIPLIER
56089  M00S34317.cpumtr  +++|          SA2    X2+         GET MULTIPLIER
56090  M00S34318.cpumtr  +++|          SA3    SCMA
56091  M00S34319.cpumtr  +++|          BX6    X2-X3
56092  M00S34320.cpumtr  +++|          SA3    A3+B1
56093  M00S34321.cpumtr  +++|          ZR     X6,SCM10    IF MULTIPLIER = 0.0
56094  M00S34322.cpumtr  +++|          BX6    X2-X3
56095  M00S34323.cpumtr  +++|          ZR     X6,SCM10    IF MULTIPLIER = 1.0
56096  M00S34324.cpumtr  +++|          SA3    /MONITOR/CPTA+1  BIAS CONSTANT WITH CPU 1 MULTIPLIER
56097  M00S34325.cpumtr  +++|          PX3    X3
56098  M00S34326.cpumtr  +++|          NX3    X3
56099  M00S34327.cpumtr  +++|          RX7    X3*X2
56100  M00S34328.cpumtr  +++|          UX7,B3 X7
56101  M00S34329.cpumtr  +++|          LX7    B3
56102  M00S34330.cpumtr  +++|          SA7    A3
56103  M00S34331.cpumtr  +++|
56104  M00S34332.cpumtr  +++|*         SET MULTIPLIER FOR APPLICATION USAGE ACCOUNTING.
56105  M00S34333.cpumtr  +++|
56106  M00S34334.cpumtr  +++| SCM10    SA4    ACPL        CHECK FOR CPU 0
56107  M00S34335.cpumtr  +++|          SA3    SCMB
56108  M00S34336.cpumtr  +++|          NG     X4,SCM11    IF CPU 0 OFF
56109  M00S34337.cpumtr  +++|          ZR     X1,SCM      IF CPU 0 MULTIPLIER = 0.0
56110  M00S34338.cpumtr  +++|          BX7    X1-X3
56111  M00S34339.cpumtr  +++|          ZR     X7,SCM      IF CPU 0 MULTIPLIER = 1.0
56112  M00S34340.cpumtr  +++|          BX6    X1
56113  M00S34341.cpumtr  +++|          EQ     SCM12       CALCULATE INVERSE MULTIPLIER
56114  M00S34342.cpumtr  +++|
56115  M00S34343.cpumtr  +++| SCM11    ZR     X2,SCM      IF CPU 1 MULTIPLIER = 0.0
56116  M00S34344.cpumtr  +++|          BX7    X2-X3
56117  M00S34345.cpumtr  +++|          ZR     X7,SCM      IF CPU 1 MULTIPLIER = 1.0
56118  M00S34346.cpumtr  +++|          BX6    X2
56119  M00S34347.cpumtr  +++|
56120  M00S34348.cpumtr  +++| SCM12    RX6    X3/X6       CALCULATE RECIPROCAL OF CPU MULTIPLIER
56121  M00S34349.cpumtr  +++|          SA6    /MONITOR/ACTC  SET APPLICATION ACCOUNTING MULTIPLIER
56122  M00S34350.cpumtr  +++|          EQ     SCM         EXIT
56123  M00S34351.cpumtr  +++|
56124  M00S34352.cpumtr  +++| SCMA     CON    0.0
56125  M00S34353.cpumtr  +++| SCMB     CON    1.0
56126  M00S34354.cpumtr  +++| TCPM     SPACE  4
56127  M00S34355.cpumtr  +++|**        TABLE OF ADDRESSES FOR CPU 0 (S0) AND CPU 1 (S1) MULTIPLIERS.
56128  M00S34356.cpumtr  +++|*
56129  M00S34357.cpumtr  +++|*         ENTRY FORMAT.
56130  M00S34358.cpumtr  +++|*         30/  ADDR OF CPU 0 MULTIPLIER,30/  ADDR OF CPU 1 MULTIPLIER
56131  M00S34359.cpumtr  +++|*
56132  M00S34360.cpumtr  +++|*         INDEX TO ENTRY FOR CYBER 176 IS 7.
56133  M00S34361.cpumtr  +++|*         INDEX TO ENTRY FOR CYBER 170-815/825/835/855 IS

Seq #  *Modification Id* Act 
----------------------------+
56134  M01S34362.241l630 ---|*         BASED ON THE *TMNB* TABLE.
56135  M01S34363.241l630 ---|*         INDEX TO ENTRY FOR CYBER 170-865/875 IS
56136  M00S34364.cpumtr  +++|*         12D + CYBER 865/875 FLAG (0 OR 1).
56137  M00S34365.cpumtr  +++|*         INDEX FOR ALL OTHER CYBER 6000 AND CYBER 170
56138  M00S34366.cpumtr  +++|*         MAINFRAMES IS CALCULATED BY THE FORMULA -
56139  M00S34367.cpumtr  +++|*         1/  X,1/  Y,1/  Z
56140  M00S34368.cpumtr  +++|*         X = CYBER 170.
56141  M00S34369.cpumtr  +++|*         Y = CPU 0 HAS INSTRUCTION STACK
56142  M00S34370.cpumtr  +++|*         Z = CPU 1 EXISTS.
56143  M00S34371.cpumtr  +++|*         X, Y, AND Z ARE EXTRACTED FROM CM WORD *MABL*.
56144  M00S34372.cpumtr  +++|
56145  M00S34373.cpumtr  +++|
56146  M00S34374.cpumtr  +++| TCPM     BSS    0           FWA
56147  M00S34375.cpumtr  +++|
56148  M00S34376.cpumtr  +++|          TVFD   30/,TM64     6200/6400
56149  M00S34377.cpumtr  +++|          VFD    30/0
56150  M00S34378.cpumtr  +++|
56151  M00S34379.cpumtr  +++|          TVFD   30/,TM64     6500
56152  M00S34380.cpumtr  +++|          TVFD   30/,TM64
56153  M00S34381.cpumtr  +++|
56154  M00S34382.cpumtr  +++|          TVFD   30/,TM66     6600
56155  M00S34383.cpumtr  +++|          VFD    30/0
56156  M00S34384.cpumtr  +++|
56157  M00S34385.cpumtr  +++|          TVFD   30/,TM66     6700
56158  M00S34386.cpumtr  +++|          TVFD   30/,TM64
56159  M00S34387.cpumtr  +++|
56160  M00S34388.cpumtr  +++|          TVFD   30/,T173     CYBER 172/173
56161  M00S34389.cpumtr  +++|          VFD    30/0
56162  M00S34390.cpumtr  +++|
56163  M00S34391.cpumtr  +++|          TVFD   30/,T173     CYBER 174
56164  M00S34392.cpumtr  +++|          TVFD   30/,T173
56165  M00S34393.cpumtr  +++|
56166  M00S34394.cpumtr  +++|          TVFD   30/,T175     CYBER 175
56167  M00S34395.cpumtr  +++|          VFD    30/0
56168  M00S34396.cpumtr  +++|
56169  M00S34397.cpumtr  +++|          TVFD   30/,T176     CYBER 176
56170  M00S34398.cpumtr  +++|          VFD    30/0
56171  M00S34399.cpumtr  +++|
56172  M00S34400.cpumtr  +++| TCPMA    TVFD   30/,T815    CYBER 170-815
56173  M00S34401.cpumtr  +++|          VFD    30/0
56174  M00S34402.cpumtr  +++|
56175  M00S34403.cpumtr  +++| TCPMB    TVFD   30/,T825    CYBER 170-825
56176  M00S34404.cpumtr  +++|          VFD    30/0
56177  M00S34405.cpumtr  +++|
56178  M00S34406.cpumtr  +++| TCPMC    TVFD   30/,T835    CYBER 170-835
56179  M00S34407.cpumtr  +++|          VFD    30/0
56180  M00S34408.cpumtr  +++|
56181  M00S34409.cpumtr  +++| TCPMD    TVFD   30/,T845    CYBER 170-845
56182  M00S34410.cpumtr  +++|          VFD    30/0
56183  M00S34411.cpumtr  +++|
56184  M00S34412.cpumtr  +++| TCPME    TVFD   30/,T855    CYBER 170-855
56185  M00S34413.cpumtr  +++|          VFD    30/0
56186  M00S34414.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
56187  M02S34415.v23l617 ---|          TVFD   30/,T865    CYBER 170-865

Seq #  *Modification Id* Act 
----------------------------+
56188  M01S00546.v23l617 +++| TCPMF    TVFD   30/,T810    CYBER 180-810
56189  M01S00547.v23l617 +++|          TVFD   30/,T810
56190  M01S00548.v23l617 +++|
56191  M01S00549.v23l617 +++| TCPMG    TVFD   30/,T830    CYBER 180-830
56192  M01S00550.v23l617 +++|          TVFD   30/,T830
56193  M01S00551.v23l617 +++|

Seq #  *Modification Id* Act 
----------------------------+
56194  M01S00449.241l630 +++| TCPMI    TVFD   30/,T840    CYBER 180-840
56195  M01S00450.241l630 +++|          VFD    30/0
56196  M01S00451.241l630 +++|
56197  M01S00452.241l630 +++| TCPMJ    TVFD   30/,T850    CYBER 180-850
56198  M01S00453.241l630 +++|          VFD    30/0
56199  M01S00454.241l630 +++|
56200  M01S00455.241l630 +++| TCPMK    TVFD   30/,T860    CYBER 180-860

Seq #  *Modification Id* Act 
----------------------------+
56201  M02S00456.cpum232 ---|          VFD    30/0

Seq #  *Modification Id* Act 
----------------------------+
56202  M01S00001.cpum232 +++|          TVFD   30/,T860

Seq #  *Modification Id* Act 
----------------------------+
56203  M01S00457.241l630 +++|

Seq #  *Modification Id* Act 
----------------------------+
56204  M01S00552.v23l617 +++| TCPMH    TVFD   30/,T865    CYBER 170-865

Seq #  *Modification Id* Act 
----------------------------+
56205  M02S00002.v23l617 ---| TCPMH    TVFD   30/,T865    CYBER 170-865
56206  M00S34416.cpumtr  +++|          TVFD   30/,T865
56207  M00S34417.cpumtr  +++|
56208  M00S34418.cpumtr  +++|          TVFD   30/,T875    CYBER 170-875
56209  M00S34419.cpumtr  +++|          TVFD   30/,T875
56210  M00S34420.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
56211  M01S00003.ns2642  +++| TCPMN    TVFD   30/,T961    CYBER 180-960-11
56212  M01S00004.ns2642  +++|          VFD    30/0
56213  M01S00005.ns2642  +++|
56214  M01S00006.ns2642  +++| TCPMO    TVFD   30/,T963    CYBER 180-960-31/32

Seq #  *Modification Id* Act 
----------------------------+
56215  M02S00007.cpum232 ---|          VFD    30/0

Seq #  *Modification Id* Act 
----------------------------+
56216  M01S00002.cpum232 +++|          TVFD   30/,T963

Seq #  *Modification Id* Act 
----------------------------+
56217  M01S00008.ns2642  +++|

Seq #  *Modification Id* Act 
----------------------------+
56218  M01S00458.241l630 +++| TCPMM    TVFD   30/,T990    CYBER 180-990

Seq #  *Modification Id* Act 
----------------------------+
56219  M02S00459.cpum232 ---|          VFD    30/0

Seq #  *Modification Id* Act 
----------------------------+
56220  M01S00003.cpum232 +++|          TVFD   30/,T990

Seq #  *Modification Id* Act 
----------------------------+
56221  M01S00460.241l630 +++|
56222  M00S34421.cpumtr  +++| TCPML    EQU    *-TCPM      NUMBER OF ENTRIES
56223  M00S34422.cpumtr  +++| TMNB     SPACE  4,10

Seq #  *Modification Id* Act 
----------------------------+
56224  M01S34423.ns2443  ---|**        TMNB - TABLE OF CYBER 170-8X5 MODEL NUMBERS.
56225  M01S34424.ns2443  ---|*
56226  M01S34425.ns2443  ---|*         *TMNB* IS USED TO DETERMINE THE INDEX INTO
56227  M01S34426.ns2443  ---|*         THE *TCPM* TABLE BASED ON THE MODEL NUMBER
56228  M01S34427.ns2443  ---|*         ASSOCIATED WITH THE CYBER 170-8X5 PROCESSOR.
56229  M01S34428.ns2443  ---|*         NOTE:  THIS DOES NOT APPLY TO THE 170-865 OR
56230  M01S34429.ns2443  ---|*         THE 170-875 PROCESSORS.
56231  M01S34430.ns2443  ---|
56232  M01S34431.ns2443  ---|
56233  M01S34432.ns2443  ---| TMNB     BSS    0

Seq #  *Modification Id* Act 
----------------------------+
56234  M02S00553.ns2443  ---|          VFD    30/TCPMF-TCPM,30/0#13  CYBER 180-810

Seq #  *Modification Id* Act 
----------------------------+
56235  M01S34433.ns2443  ---|          VFD    30/TCPMA-TCPM,30/0#11  CYBER 170-815

Seq #  *Modification Id* Act 
----------------------------+
56236  M02S34434.ns2443  ---|          VFD    30/TCPMA-TCPM,30/0#14  CYBER 170-815

Seq #  *Modification Id* Act 
----------------------------+
56237  M01S34435.ns2443  ---|          VFD    30/TCPMB-TCPM,30/0#10  CYBER 170-825
56238  M01S34436.ns2443  ---|          VFD    30/TCPMB-TCPM,30/0#12  CYBER 170-825

Seq #  *Modification Id* Act 
----------------------------+
56239  M02S34437.ns2443  ---|          VFD    30/TCPMB-TCPM,30/0#13  CYBER 170-825

Seq #  *Modification Id* Act 
----------------------------+
56240  M02S00554.ns2443  ---|          VFD    30/TCPMG-TCPM,30/0#14  CYBER 180-830

Seq #  *Modification Id* Act 
----------------------------+
56241  M01S34438.ns2443  ---|          VFD    30/TCPMC-TCPM,30/0#20  CYBER 170-835

Seq #  *Modification Id* Act 
----------------------------+
56242  M02S00461.ns2443  ---|          VFD    30/TCPMI-TCPM,30/0#34  CYBER 180-840

Seq #  *Modification Id* Act 
----------------------------+
56243  M01S34439.ns2443  ---|          VFD    30/TCPMD-TCPM,30/0#31  CYBER 170-845

Seq #  *Modification Id* Act 
----------------------------+
56244  M02S00462.ns2443  ---|          VFD    30/TCPMJ-TCPM,30/0#33  CYBER 180-850

Seq #  *Modification Id* Act 
----------------------------+
56245  M01S34440.ns2443  ---|          VFD    30/TCPME-TCPM,30/0#30  CYBER 170-855

Seq #  *Modification Id* Act 
----------------------------+
56246  M02S00463.ns2443  ---|          VFD    30/TCPMK-TCPM,30/0#32  CYBER 180-860
56247  M02S00464.ns2443  ---|          VFD    30/TCPMM-TCPM,30/0#40  CYBER 180-990

Seq #  *Modification Id* Act 
----------------------------+
56248  M01S34441.ns2443  ---|          CON    0           END OF TABLE

Seq #  *Modification Id* Act 
----------------------------+
56249  M01S00112.ns2443  +++|**        TMNB - TABLE OF CYBER 180 MODEL NUMBERS.
56250  M01S00113.ns2443  +++|*
56251  M01S00114.ns2443  +++|*         *TMNB* IS USED TO DETERMINE THE INDEX INTO
56252  M01S00115.ns2443  +++|*         THE *TCPM* TABLE BASED ON THE MODEL NUMBER
56253  M01S00116.ns2443  +++|*         ASSOCIATED WITH THE CYBER 180 PROCESSOR.
56254  M01S00117.ns2443  +++|*         *TMNB* ALSO CONTAINS THE ACCOUNTING ADJUSTMENT
56255  M01S00118.ns2443  +++|*         FOR THE ASSOCIATED PROCESSORS.
56256  M01S00119.ns2443  +++|*
56257  M01S00120.ns2443  +++|*T        12/ ACCT ADJ,18/ *TCPM* INDEX,30/ MODEL NUMBER

Figure

56258  M01S00121.ns2443  +++|
56259  M01S00122.ns2443  +++|
56260  M01S00123.ns2443  +++| TMNB     BSS    0
56261  M01S00124.ns2443  +++|          VFD    12/38,18/TCPMF-TCPM,30/0#14  CYBER 180-810
56262  M01S00125.ns2443  +++|          VFD    12/38,18/TCPMA-TCPM,30/0#11  CYBER 170-815

Seq #  *Modification Id* Act 
----------------------------+
56263  M01S00001.ns2540  +++|          VFD    12/38,18/TCPMA-TCPM,30/0#15  CYBER 180-815S

Seq #  *Modification Id* Act 
----------------------------+
56264  M01S00126.ns2443  +++|          VFD    12/34,18/TCPMB-TCPM,30/0#10  CYBER 170-825
56265  M01S00127.ns2443  +++|          VFD    12/34,18/TCPMB-TCPM,30/0#12  CYBER 170-825

Seq #  *Modification Id* Act 
----------------------------+
56266  M01S00001.ns2545  +++|          VFD    12/34,18/TCPMB-TCPM,30/0#16  CYBER 180-825S

Seq #  *Modification Id* Act 
----------------------------+
56267  M01S00128.ns2443  +++|          VFD    12/34,18/TCPMG-TCPM,30/0#13  CYBER 180-830
56268  M01S00129.ns2443  +++|          VFD    12/28,18/TCPMC-TCPM,30/0#20  CYBER 170-835
56269  M01S00130.ns2443  +++|          VFD    12/28,18/TCPMI-TCPM,30/0#34  CYBER 180-840

Seq #  *Modification Id* Act 
----------------------------+
56270  M01S00001.ns2462  +++|          VFD    12/28,18/TCPMD-TCPM,30/0#37  CYBER 180-840S

Seq #  *Modification Id* Act 
----------------------------+
56271  M01S00131.ns2443  +++|          VFD    12/24,18/TCPMD-TCPM,30/0#31  CYBER 170-845

Seq #  *Modification Id* Act 
----------------------------+
56272  M02S00132.ns2443a ---|          VFD    12/24,30/TCPMD-TCPM,30/0#35  CYBER 180-845S

Seq #  *Modification Id* Act 
----------------------------+
56273  M01S00001.ns2443a +++|          VFD    12/24,18/TCPMD-TCPM,30/0#35  CYBER 180-845S

Seq #  *Modification Id* Act 
----------------------------+
56274  M01S00133.ns2443  +++|          VFD    12/24,18/TCPMJ-TCPM,30/0#33  CYBER 180-850
56275  M01S00134.ns2443  +++|          VFD    12/20,18/TCPME-TCPM,30/0#30  CYBER 170-855

Seq #  *Modification Id* Act 
----------------------------+
56276  M02S00135.ns2443a ---|          VFD    12/20,30/TCPME-TCPM,30/0#36  CYBER 180-855S

Seq #  *Modification Id* Act 
----------------------------+
56277  M01S00002.ns2443a +++|          VFD    12/20,18/TCPME-TCPM,30/0#36  CYBER 180-855S

Seq #  *Modification Id* Act 
----------------------------+
56278  M01S00136.ns2443  +++|          VFD    12/20,18/TCPMK-TCPM,30/0#32  CYBER 180-860

Seq #  *Modification Id* Act 
----------------------------+
56279  M02S00192.ns2642  ---|          VFD    12/12,18/TCPMB-TCPM,30/0#3A  CYBER 180-960

Seq #  *Modification Id* Act 
----------------------------+
56280  M01S00009.ns2642  +++|          VFD    12/18,18/TCPMN-TCPM,30/0#3B  CYBER 180-960-11
56281  M01S00010.ns2642  +++|          VFD    12/12,18/TCPMO-TCPM,30/0#3A  CYBER 180-960-31/32

Seq #  *Modification Id* Act 
----------------------------+
56282  M01S00137.ns2443  +++|          VFD    12/06,18/TCPMM-TCPM,30/0#40  CYBER 180-990

Seq #  *Modification Id* Act 
----------------------------+
56283  M02S00138.ns2443a ---|          VFD    12/06,30/TCPMM-TCPM,30/0#41  CYBER 180-990 MODEL B

Seq #  *Modification Id* Act 
----------------------------+
56284  M01S00003.ns2443a +++|          VFD    12/06,18/TCPMM-TCPM,30/0#41  CYBER 180-990 MODEL B

Seq #  *Modification Id* Act 
----------------------------+
56285  M01S00001.ns2603  +++|          VFD    12/06,18/TCPMM-TCPM,30/0#44  CYBER 180-994

Seq #  *Modification Id* Act 
----------------------------+
56286  M01S00139.ns2443  +++|          CON    0           END OF TABLE
56287  M01S00140.ns2443  +++| TMNBA    CON    0           *TCPM* INDEX SET BY *SSP*
56288  M00S34442.cpumtr  +++|
56289  M00S34443.cpumtr  +++|*         HARDWARE DETECTABLE CPU HEAD TYPES.
56290  M00S34444.cpumtr  +++|
56291  M00S34445.cpumtr  +++| MP64     CON    "CP64M"     6200/6400
56292  M00S34446.cpumtr  +++| MP66     CON    "CP66M"     6600
56293  M00S34447.cpumtr  +++| MP73     CON    "C173M"     CYBER 172/173
56294  M00S34448.cpumtr  +++| MP75     CON    "C175M"     CYBER 175
56295  M00S34449.cpumtr  +++| MP76     CON    "C176M"     CYBER 176

Seq #  *Modification Id* Act 
----------------------------+
56296  M01S00555.v23l617 +++| MP10     CON    "C810M"     CYBER 180-810
56297  M00S34450.cpumtr  +++| MP15     CON    "C815M"     CYBER 170-815
56298  M00S34451.cpumtr  +++| MP25     CON    "C825M"     CYBER 170-825

Seq #  *Modification Id* Act 
----------------------------+
56299  M01S00556.v23l617 +++| MP30     CON    "C830M"     CYBER 180-830
56300  M00S34452.cpumtr  +++| MP35     CON    "C835M"     CYBER 170-835

Seq #  *Modification Id* Act 
----------------------------+
56301  M01S00465.241l630 +++| MP40     CON    "C840M"     CYBER 180-840
56302  M00S34453.cpumtr  +++| MP45     CON    "C845M"     CYBER 170-845

Seq #  *Modification Id* Act 
----------------------------+
56303  M01S00466.241l630 +++| MP50     CON    "C850M"     CYBER 180-850
56304  M00S34454.cpumtr  +++| MP55     CON    "C855M"     CYBER 170-855

Seq #  *Modification Id* Act 
----------------------------+
56305  M01S00467.241l630 +++| MP60     CON    "C860M"     CYBER 180-860
56306  M00S34455.cpumtr  +++| MP86     CON    "C865M"     CYBER 170-865
56307  M00S34456.cpumtr  +++| MP87     CON    "C875M"     CYBER 170-875

Seq #  *Modification Id* Act 
----------------------------+
56308  M01S00011.ns2642  +++| MP961    CON    "C961M"     CYBER 180-960-11
56309  M01S00012.ns2642  +++| MP963    CON    "C963M"     CYBER 180-960-31/32

Seq #  *Modification Id* Act 
----------------------------+
56310  M01S00468.241l630 +++| MP90     CON    "C990M"     CYBER 180-990
56311  M00S34457.cpumtr  +++| TIPR     SPACE  4
56312  M00S34458.cpumtr  +++|*         SELECTABLE (VIA IPRDECK ENTRY CPM) CPU HEAD TYPES.

Seq #  *Modification Id* Act 
----------------------------+
56313  M01S00001.cpum130 +++|*
56314  M01S00002.cpum130 +++|*         THIS LIST MUST BE IN THE SAME ORDER AS THE LIST IN *COMSSRU*.
56315  M00S34459.cpumtr  +++|
56316  M00S34460.cpumtr  +++| TIPR     BSS    0
56317  M00S34461.cpumtr  +++|          LOC    1
56318  M00S34462.cpumtr  +++|
56319  M00S34463.cpumtr  +++|          CON    "CP62M"     6200
56320  M00S34464.cpumtr  +++|          CON    "CP64M"     6400
56321  M00S34465.cpumtr  +++|          CON    "CP65M"     6500
56322  M00S34466.cpumtr  +++|          CON    "CP66M"     6600
56323  M00S34467.cpumtr  +++|          CON    "CP67M"     6700
56324  M00S34468.cpumtr  +++|          CON    "CP71M"     CYBER 71
56325  M00S34469.cpumtr  +++|          CON    "CP72M"     CYBER 72
56326  M00S34470.cpumtr  +++|          CON    "CP73M"     CYBER 73
56327  M00S34471.cpumtr  +++|          CON    "CP74M"     CYBER 74
56328  M00S34472.cpumtr  +++|          CON    "C171M"     CYBER 171
56329  M00S34473.cpumtr  +++|          CON    "C172M"     CYBER 172
56330  M00S34474.cpumtr  +++|          CON    "C173M"     CYBER 173
56331  M00S34475.cpumtr  +++|          CON    "C174M"     CYBER 174
56332  M00S34476.cpumtr  +++|          CON    "C175M"     CYBER 175
56333  M00S34477.cpumtr  +++|          CON    "C176M"     CYBER 176
56334  M00S34478.cpumtr  +++|          CON    "C720M"     CYBER 170-720
56335  M00S34479.cpumtr  +++|          CON    "C730M"     CYBER 170-730
56336  M00S34480.cpumtr  +++|          CON    "C740M"     CYBER 170-740
56337  M00S34481.cpumtr  +++|          CON    "C750M"     CYBER 170-750
56338  M00S34482.cpumtr  +++|          CON    "C760M"     CYBER 170-760

Seq #  *Modification Id* Act 
----------------------------+
56339  M01S00003.cpum130 +++|          CON    "C810M"     CYBER 180-810
56340  M00S34483.cpumtr  +++|          CON    "C815M"     CYBER 170-815
56341  M00S34484.cpumtr  +++|          CON    "C825M"     CYBER 170-825

Seq #  *Modification Id* Act 
----------------------------+
56342  M01S00004.cpum130 +++|          CON    "C830M"     CYBER 180-830
56343  M00S34485.cpumtr  +++|          CON    "C835M"     CYBER 170-835

Seq #  *Modification Id* Act 
----------------------------+
56344  M01S00005.cpum130 +++|          CON    "C840M"     CYBER 180-840
56345  M00S34486.cpumtr  +++|          CON    "C845M"     CYBER 170-845

Seq #  *Modification Id* Act 
----------------------------+
56346  M01S00006.cpum130 +++|          CON    "C850M"     CYBER 180-850
56347  M00S34487.cpumtr  +++|          CON    "C855M"     CYBER 170-855

Seq #  *Modification Id* Act 
----------------------------+
56348  M01S00007.cpum130 +++|          CON    "C860M"     CYBER 180-860
56349  M00S34488.cpumtr  +++|          CON    "C865M"     CYBER 170-865
56350  M00S34489.cpumtr  +++|          CON    "C875M"     CYBER 170-875

Seq #  *Modification Id* Act 
----------------------------+
56351  M01S00013.ns2642  +++|          CON    "C961M"     CYBER 180-960-11
56352  M01S00014.ns2642  +++|          CON    "C963M"     CYBER 180-960-31/32

Seq #  *Modification Id* Act 
----------------------------+
56353  M01S34490.v23l617 ---|          CON    0           RESERVED FOR CDC
56354  M01S34491.v23l617 ---|          CON    0           RESERVED FOR CDC

Seq #  *Modification Id* Act 
----------------------------+
56355  M02S00557.cpum130 ---|          CON    "C810M"     CYBER 180-810
56356  M02S00558.cpum130 ---|          CON    "C830M"     CYBER 180-830

Seq #  *Modification Id* Act 
----------------------------+
56357  M02S34492.cpum130 ---|          CON    0           RESERVED FOR CDC
56358  M02S34493.cpum130 ---|          CON    0           RESERVED FOR CDC
56359  M02S34494.cpum130 ---|          CON    0           RESERVED FOR CDC

Seq #  *Modification Id* Act 
----------------------------+
56360  M02S00469.cpum130 ---|          CON    "C840M"     CYBER 180-840
56361  M02S00470.cpum130 ---|          CON    "C850M"     CYBER 180-850
56362  M02S00471.cpum130 ---|          CON    "C860M"     CYBER 180-860

Seq #  *Modification Id* Act 
----------------------------+
56363  M01S00008.cpum130 +++|          CON    "C990M"     CYBER 180-990
56364  M00S34495.cpumtr  +++|          CON    "ICM1M"     INSTALLATION DEFINED - 1
56365  M00S34496.cpumtr  +++|          CON    "ICM2M"     INSTALLATION DEFINED - 2
56366  M00S34497.cpumtr  +++|          CON    "ICM3M"     INSTALLATION DEFINED - 3
56367  M00S34498.cpumtr  +++|          CON    "ICM4M"     INSTALLATION DEFINED - 4
56368  M00S34499.cpumtr  +++|          CON    "ICM5M"     INSTALLATION DEFINED - 5

Seq #  *Modification Id* Act 
----------------------------+
56369  M02S00472.cpum130 ---|          CON    "C990M"     CYBER 180-990
56370  M00S34500.cpumtr  +++|          ERRNZ  *-TIPRL     TABLE SIZE CHANGED
56371  M00S34501.cpumtr  +++|
56372  M00S34502.cpumtr  +++|          LOC    *O

Seq #  *Modification Id* Act 
----------------------------+
56373  M01S01089.252l678 +++| SCD      SPACE  4,10
56374  M01S01090.252l678 +++|**        SCD - SET CHANNEL DATA.
56375  M01S01091.252l678 +++|*
56376  M01S01092.252l678 +++|*         THIS SUBROUTINE RECONSTRUCTS THE CHANNEL ACCESS BYTE IN EACH
56377  M01S01093.252l678 +++|*         MST ENTRY, CLEARS THE IDLE FLAG IN EACH CHANNEL STATUS TABLE
56378  M01S01094.252l678 +++|*         ENTRY AND ENSURES THAT ALL CHANNEL STATES ARE EITHER *UP* OR
56379  M01S01095.252l678 +++|*         *DOWN*.
56380  M01S01096.252l678 +++|*
56381  M01S01097.252l678 +++|*         CALLS  /MONITOR/RCB, /MONITOR/SCH.
56382  M01S01098.252l678 +++|
56383  M01S01099.252l678 +++|
56384  M01S01100.252l678 +++| SCD      PS                 ENTRY/EXIT
56385  M01S01101.252l678 +++|          SX7    3           CHANNEL STATE MASK
56386  M01S01102.252l678 +++|          SB4    NOPE
56387  M01S01103.252l678 +++|          SA2    ESTP
56388  M01S01104.252l678 +++|          MX0    -12
56389  M01S01105.252l678 +++|          AX2    12
56390  M01S01106.252l678 +++|          BX2    -X0*X2      LAST MASS STORAGE ORDINAL + 1
56391  M01S01107.252l678 +++|          SB7    X2-1
56392  M01S01108.252l678 +++| SCD1     LT     B7,B4,SCD4  IF END OF EST SCAN

Seq #  *Modification Id* Act 
----------------------------+
56393  M02S01109.261l700 ---|          SX1    B7+
56394  M02S01110.261l700 ---|          LX1    1

Seq #  *Modification Id* Act 
----------------------------+
56395  M01S00193.261l700 +++|          SX1    B7

Seq #  *Modification Id* Act 
----------------------------+
56396  M01S01111.252l678 +++|          SB7    B7-B1       DECREMENT EST ORDINAL

Seq #  *Modification Id* Act 
----------------------------+
56397  M02S01112.261l700 ---|          SB6    SCD2        *SCH* EXIT ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
56398  M01S01113.252l678 +++|          SB5    48

Seq #  *Modification Id* Act 
----------------------------+
56399  M02S01114.261l700 ---|          SB2    B5+1
56400  M02S01115.261l700 ---|          ERRNZ  ESTE-2
56401  M02S01116.261l700 ---|          TA3    X1+EQDE,EST  READ EST ENTRY

Seq #  *Modification Id* Act 
----------------------------+
56402  M01S00194.261l700 +++|          SB2    B5+B1
56403  M01S00195.261l700 +++|          CX3    X1,EST      CONVERT EST ORDINAL TO OFFSET
56404  M01S00196.261l700 +++|          TA3    X3+EQDE,EST READ EST ENTRY

Seq #  *Modification Id* Act 
----------------------------+
56405  M01S01117.252l678 +++|          PL     X3,SCD1     IF NOT MASS STORAGE
56406  M01S01118.252l678 +++| SCD2     SB5    B5-12
56407  M01S01119.252l678 +++|          SB3    B5-12

Seq #  *Modification Id* Act 
----------------------------+
56408  M01S00197.261l700 +++|          SB6    SCD1        *RCB* EXIT ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
56409  M01S01120.252l678 +++|          EQ     B3,B0,SCD3  IF BOTH CHANNELS PROCESSED
56410  M01S01121.252l678 +++|          SB3    B2-B5

Seq #  *Modification Id* Act 
----------------------------+
56411  M02S01122.261l700 ---|          BX6    X3
56412  M02S01123.261l700 ---|          LX6    B3

Seq #  *Modification Id* Act 
----------------------------+
56413  M01S00198.261l700 +++|          LX6    X3,B3

Seq #  *Modification Id* Act 
----------------------------+
56414  M01S01124.252l678 +++|          AX6    59
56415  M01S01125.252l678 +++|          BX6    X6*X7       =0 IF *UP*/*IDLE*, =3 IF *DOWN*

Seq #  *Modification Id* Act 
----------------------------+
56416  M01S00199.261l700 +++|          SB6    SCD2        *SCH* EXIT ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
56417  M01S01126.252l678 +++|          EQ     /MONITOR/SCH  SET CHANNEL STATE
56418  M01S01127.252l678 +++|
56419  M01S01128.252l678 +++| SCD3     BX5    -X0*X3
56420  M01S01129.252l678 +++|          LX5    3           MST ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
56421  M02S01130.261l700 ---|          SB6    SCD1        *RCB* EXIT ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
56422  M01S01131.252l678 +++|          EQ     /MONITOR/RCB  RECONSTRUCT CHANNEL ACCESS BYTE IN MST
56423  M01S01132.252l678 +++|
56424  M01S01133.252l678 +++| SCD4     SA2    CHTP
56425  M01S01134.252l678 +++|          SA3    SCDA        IDLE FLAG MASK
56426  M01S01135.252l678 +++|          SB6    CTALL       CHANNEL TABLE LENGTH
56427  M01S01136.252l678 +++|          SB7    B0
56428  M01S01137.252l678 +++|          AX2    12
56429  M01S01138.252l678 +++| SCD5     SA4    X2+B7       READ NEXT CHANNEL TABLE WORD
56430  M01S01139.252l678 +++|          SB7    B7+B1       ADVANCE CHANNEL TABLE INDEX
56431  M01S01140.252l678 +++|          BX7    -X3*X4      CLEAR IDLE FLAGS
56432  M01S01141.252l678 +++|          SA7    A4
56433  M01S01142.252l678 +++|          EQ     B7,B6,SCD   IF END OF CHANNEL TABLE
56434  M01S01143.252l678 +++|          EQ     SCD5        PROCESS NEXT CHANNEL TABLE WORD
56435  M01S01144.252l678 +++|
56436  M01S01145.252l678 +++|
56437  M01S01146.252l678 +++| SCDA     CON    01000100010001000100B  IDLE FLAG MASK
56438  M00S34503.cpumtr  +++| SCS      SPACE  4
56439  M00S34504.cpumtr  +++|**        SCS - SET CPU STATUS.

Seq #  *Modification Id* Act 
----------------------------+
56440  M01S02373.271l750 +++|*
56441  M00S34505.cpumtr  +++|*         EXIT   (A0) = NEXT EXCHANGE ADDRESS.
56442  M00S34506.cpumtr  +++|
56443  M00S34507.cpumtr  +++|
56444  M00S34508.cpumtr  +++| SCS      PS                 ENTRY/EXIT
56445  M00S34509.cpumtr  +++|          SA2    ACPL        SET CPU 0 IDLE
56446  M00S34510.cpumtr  +++|          SA3    A2+B1
56447  M00S34511.cpumtr  +++|          BX6    X2+X3
56448  M00S34512.cpumtr  +++|          SX7    B1
56449  M00S34513.cpumtr  +++|          BX1    X3
56450  M00S34514.cpumtr  +++|          PL     X6,SCS2     IF 2 CPU,S
56451  M00S34515.cpumtr  +++|          SX7    B0
56452  M00S34516.cpumtr  +++|          SB4    TPPR        CLEAR CPU SELECTION BITS
56453  M00S34517.cpumtr  +++|          SB5    TPPRL
56454  M00S34518.cpumtr  +++|          SX4    B1

Seq #  *Modification Id* Act 
----------------------------+
56455  M01S34519.273l780 ---|          LX4    56

Seq #  *Modification Id* Act 
----------------------------+
56456  M01S01013.273l780 +++|          LX4    58-0

Seq #  *Modification Id* Act 
----------------------------+
56457  M01S34520.252l678 ---|          TJP    0,(/PRESET/SCS0,/PRESET/SCS1,SUBCP)  CHECK SUBCP

Seq #  *Modification Id* Act 
----------------------------+
56458  M02S01147.253l688 ---|          TJP    0,(/PRESET/SCS0,SUBCP,/PRESET/SCS1)  CHECK SUBCP

Seq #  *Modification Id* Act 
----------------------------+
56459  M01S02586.253l688 +++|          TJP    (/PRESET/SCS0,SUBCP,/PRESET/SCS1)  CHECK SUBCP
56460  M00S34521.cpumtr  +++|
56461  M00S34522.cpumtr  +++| SCS0     SA3    /MONITOR/TXJP  DISABLE SUBCONTROL POINT XP FOR CPU1
56462  M00S34523.cpumtr  +++|          BX6    X3
56463  M00S34524.cpumtr  +++|          SA6    A3+B1
56464  M00S34525.cpumtr  +++| SCS1     SA3    B4
56465  M00S34526.cpumtr  +++|          BX6    -X4*X3
56466  M00S34527.cpumtr  +++|          SB4    B4+B1
56467  M00S34528.cpumtr  +++|          SA6    A3
56468  M00S34529.cpumtr  +++|          NE     B4,B5,SCS1  IF NOT END OF TABLE

Seq #  *Modification Id* Act 
----------------------------+
56469  M01S34530.271l750 ---| SCS2     TA3    JCIW,SCA    SET CPU SELECTION FOR PROGRAM MODE
56470  M01S34531.271l750 ---|          LX7    36

Seq #  *Modification Id* Act 
----------------------------+
56471  M01S02374.271l750 +++| SCS2     TA3    CWQW,SCA    SET CPU SELECTION FOR PROGRAM MODE
56472  M01S02375.271l750 +++|          LX7    24-0
56473  M00S34532.cpumtr  +++|          BX7    X3+X7
56474  M00S34533.cpumtr  +++|          SA7    A3
56475  M00S34534.cpumtr  +++|          SX3    /MONITOR/IXP

Seq #  *Modification Id* Act 
----------------------------+
56476  M01S02376.271l750 +++|          SX4    MIXT
56477  M00S34535.cpumtr  +++|          BX6    X2+X3
56478  M00S34536.cpumtr  +++|          NG     X6,SCS3     IF CPU 0 TURNED OFF
56479  M00S34537.cpumtr  +++|          NG     X1,SCS4     IF 1 CPU
56480  M00S34538.cpumtr  +++|          SA6    A2

Seq #  *Modification Id* Act 
----------------------------+
56481  M01S34539.271l750 ---|          BX6    X3

Seq #  *Modification Id* Act 
----------------------------+
56482  M01S02377.271l750 +++|          LX4    42
56483  M01S02378.271l750 +++|          BX6    X4+X3       SET EXCHANGE PACKAGE TYPE AND ADDRESS
56484  M01S02379.271l750 +++|          SA3    SCA
56485  M01S02380.271l750 +++|          LX3    24
56486  M01S02381.271l750 +++|          BX6    X6+X3       SET SYSTEM CONTROL POINT
56487  M00S34540.cpumtr  +++|          SA6    CPAL
56488  M00S34541.cpumtr  +++|          SA3    SCSC        ENABLE DUAL-CP EXTENSIONS
56489  M00S34542.cpumtr  +++|          BX7    X3
56490  M00S34543.cpumtr  +++|          SA3    A3+B1
56491  M00S34544.cpumtr  +++|          ERRNZ  SCSD-SCSC-1

Seq #  *Modification Id* Act 
----------------------------+
56492  M01S34545.271l750 ---|          SA7    /MONITOR/BNJ4  TO *BNJ*

Seq #  *Modification Id* Act 
----------------------------+
56493  M01S02382.271l750 +++|          SA7    /MONITOR/BNJ15
56494  M00S34546.cpumtr  +++|          NO
56495  M00S34547.cpumtr  +++|          BX7    X3

Seq #  *Modification Id* Act 
----------------------------+
56496  M01S34548.271l750 ---|          SA7    /MONITOR/RCCA  TO *RCC*

Seq #  *Modification Id* Act 
----------------------------+
56497  M01S02383.271l750 +++|          SA7    /MONITOR/RCCB
56498  M00S34549.cpumtr  +++|          SX3    /DCP/IXP1

Seq #  *Modification Id* Act 
----------------------------+
56499  M01S02384.271l750 +++|          SX4    DIXT
56500  M00S34550.cpumtr  +++| SCS3     SA2    A2+1        SET CPU 1 IDLE PACKAGE
56501  M00S34551.cpumtr  +++|          BX6    X2+X3
56502  M00S34552.cpumtr  +++| SCS4     SA6    A2

Seq #  *Modification Id* Act 
----------------------------+
56503  M01S34553.271l750 ---|          BX6    X3

Seq #  *Modification Id* Act 
----------------------------+
56504  M01S02385.271l750 +++|          LX4    42
56505  M01S02386.271l750 +++|          BX6    X4+X3       SET EXCHANGE PACKAGE TYPE AND ADDRESS
56506  M01S02387.271l750 +++|          SA3    SCA
56507  M01S02388.271l750 +++|          LX3    24
56508  M01S02389.271l750 +++|          BX6    X6+X3       SET SYSTEM CONTROL POINT
56509  M00S34554.cpumtr  +++|          SA6    A2+CPAL-ACPL

Seq #  *Modification Id* Act 
----------------------------+
56510  M01S34555.271l750 ---|          SA0    /MONITOR/PXP

Seq #  *Modification Id* Act 
----------------------------+
56511  M01S02390.271l750 +++|          SA1    DCPC
56512  M01S02391.271l750 +++|          ZR     X1,SCS5     IF NOT DUAL CPU MACHINE WITH CACHE
56513  M01S02392.271l750 +++|          SA1    EIBP        SET EXCHANGE PACKAGE ADDRESS
56514  M01S02393.271l750 +++|          MX7    42
56515  M01S02394.271l750 +++|          LX7    32
56516  M01S02395.271l750 +++|          SX6    /DCP/SCX1   EXCHANGE PACKAGE FOR IDLE PROGRAM STARTUP
56517  M01S02396.271l750 +++|          BX1    X7*X1
56518  M01S02397.271l750 +++|          LX6    32
56519  M01S02398.271l750 +++|          BX6    X1+X6
56520  M01S02399.271l750 +++|          SA6    A1
56521  M01S02400.271l750 +++|          SA1    SCSE        SET IDLE PACKAGE PROGRAM FOR CPU1
56522  M01S02401.271l750 +++|          BX6    X1
56523  M01S02402.271l750 +++|          SA6    /DCP/IDL1+2
56524  M01S02403.271l750 +++| SCS5     SA0    /MONITOR/PXP
56525  M00S34556.cpumtr  +++|          EQ     SCS         RETURN
56526  M00S34557.cpumtr  +++|
56527  M00S34558.cpumtr  +++| SCSC     EQ     /DCP/BNJ
56528  M00S34559.cpumtr  +++|
56529  M00S34560.cpumtr  +++| SCSD     EQ     /DCP/RCC

Seq #  *Modification Id* Act 
----------------------------+
56530  M01S02404.271l750 +++|
56531  M01S02405.271l750 +++| SCSE     EQ     2           LOOP WITHOUT DELAY

Seq #  *Modification Id* Act 
----------------------------+
56532  M01S34561.ns2418  ---| SSP      SPACE  4

Seq #  *Modification Id* Act 
----------------------------+
56533  M02S00177.cpum227 ---| SDT      SPACE  4,10
56534  M02S00178.cpum227 ---|**        SDT - SET DATE AND TIME FROM CTI-SUPPLIED VALUES.

Seq #  *Modification Id* Act 
----------------------------+
56535  M01S00013.cpum227 +++| SDT      SPACE  4,20
56536  M01S00014.cpum227 +++|**        SDT - SET DATE AND TIME FROM *CTI*-SUPPLIED VALUES.

Seq #  *Modification Id* Act 
----------------------------+
56537  M01S00179.ns2418  +++|*

Seq #  *Modification Id* Act 
----------------------------+
56538  M01S00001.ns2761  +++|*         IN ORDER TO PROVIDE A VALID DATE AND TIME ON THE DISPLAY
56539  M01S00002.ns2761  +++|*         AS SOON AS POSSIBLE, THIS ROUTINE IS CALLED AT THE BEGINNING
56540  M01S00003.ns2761  +++|*         OF *CPUMTR* PRESET.  BECAUSE OF THE LENGTH OF TIME REQUIRED
56541  M01S00004.ns2761  +++|*         TO EXECUTE *CPUMTR* PRESET, THIS ROUTINE WILL BE CALLED AGAIN
56542  M01S00005.ns2761  +++|*         AT THE END OF *CPUMTR* PRESET TO MAINTAIN CLOCK PRECISION.
56543  M01S00006.ns2761  +++|*

Seq #  *Modification Id* Act 
----------------------------+
56544  M01S00180.ns2418  +++|*         THIS CODE IS DERIVED FROM THE *FTN5* COMPILER OBJECT
56545  M01S00181.ns2418  +++|*         CODE PRODUCED FOR A FORTRAN VERSION OF THE ALGORITHM
56546  M01S00182.ns2418  +++|*         DEVELOPED IN *CYBIL* FOR NOS/VE.
56547  M01S00183.ns2418  +++|*

Seq #  *Modification Id* Act 
----------------------------+
56548  M02S00184.cpum227 ---|*         ENTRY  (DTEL) = CTI-SUPPLIED PACKED BASE DATE.
56549  M02S00185.cpum227 ---|*                (TIML) = CTI-SUPPLIED PACKED BASE TIME.
56550  M02S00186.cpum227 ---|*                (PDTL) = CTI-SUPPLIED *FRC* BASE VALUE.

Seq #  *Modification Id* Act 
----------------------------+
56551  M02S00015.ns2761  ---|*         ENTRY  (SDTA) = *CTI*-SUPPLIED PACKED BASE TIME.
56552  M02S00016.ns2761  ---|*                (SDTB) = *CTI*-SUPPLIED PACKED BASE DATE.
56553  M02S00017.ns2761  ---|*                (PDTL) = *CTI*-SUPPLIED *FRC* BASE VALUE.

Seq #  *Modification Id* Act 
----------------------------+
56554  M01S00007.ns2761  +++|*         ENTRY  (TIML) = *CTI*-SUPPLIED PACKED BASE TIME (FIRST CALL).
56555  M01S00008.ns2761  +++|*                (DTEL) = *CTI*-SUPPLIED PACKED BASE DATE (FIRST CALL).
56556  M01S00009.ns2761  +++|*                (PDTL) = *CTI*-SUPPLIED *FRC* BASE VALUE (FIRST CALL).

Seq #  *Modification Id* Act 
----------------------------+
56557  M01S00187.ns2418  +++|*
56558  M01S00188.ns2418  +++|*         EXIT   (DTEL) = CURRENT DISPLAY CODE DATE.
56559  M01S00189.ns2418  +++|*                (TIML) = CURRENT DISPLAY CODE TIME.

Seq #  *Modification Id* Act 
----------------------------+
56560  M01S00018.cpum227 +++|*
56561  M01S00019.cpum227 +++|*         USES   X - ALL.
56562  M01S00020.cpum227 +++|*                A - 1, 2, 3, 4, 5, 6, 7.
56563  M01S00021.cpum227 +++|*                B - 2, 7.
56564  M01S00022.cpum227 +++|*
56565  M01S00023.cpum227 +++|*         MACROS EDATE, ETIME.

Seq #  *Modification Id* Act 
----------------------------+
56566  M01S00190.ns2418  +++|
56567  M01S00191.ns2418  +++|

Seq #  *Modification Id* Act 
----------------------------+
56568  M02S00192.cpum227 ---| SDT      PS     0           ENTRY/EXIT

Seq #  *Modification Id* Act 
----------------------------+
56569  M01S00024.cpum227 +++| SDT      SUBR               ENTRY/EXIT

Seq #  *Modification Id* Act 
----------------------------+
56570  M01S00193.ns2418  +++|

Seq #  *Modification Id* Act 
----------------------------+
56571  M01S00010.ns2761  +++|*         SAVE *CTI*-SUPPLIED VALUES ON INITIAL CALL.
56572  M01S00011.ns2761  +++|
56573  M01S00012.ns2761  +++|          SA1    SDTB
56574  M01S00013.ns2761  +++|          NZ     X1,SDT0     IF NOT FIRST CALL TO *SDT*
56575  M01S00014.ns2761  +++|          SA1    TIML        SAVE *CTI*-SUPPLIED PACKED BASE TIME
56576  M01S00015.ns2761  +++|          SA2    DTEL        SAVE *CTI*-SUPPLIED PACKED BASE DATE
56577  M01S00016.ns2761  +++|          BX6    X1
56578  M01S00017.ns2761  +++|          LX7    X2
56579  M01S00018.ns2761  +++|          SA1    PDTL        SAVE *CTI*-SUPPLIED *FRC* BASE VALUE
56580  M01S00019.ns2761  +++|          SA6    SDTA
56581  M01S00020.ns2761  +++|          SA7    SDTB
56582  M01S00021.ns2761  +++|          BX6    X1
56583  M01S00022.ns2761  +++|          SA6    SDTC
56584  M01S00023.ns2761  +++|

Seq #  *Modification Id* Act 
----------------------------+
56585  M01S00194.ns2418  +++|*         CHECK MAINFRAME TYPE.
56586  M01S00195.ns2418  +++|

Seq #  *Modification Id* Act 
----------------------------+
56587  M02S00196.cpum174 ---|          SX0    4100B

Seq #  *Modification Id* Act 
----------------------------+
56588  M02S00197.ns2761  ---|          SA1    MABL

Seq #  *Modification Id* Act 
----------------------------+
56589  M01S00024.ns2761  +++| SDT0     SA1    MABL

Seq #  *Modification Id* Act 
----------------------------+
56590  M02S00198.cpum174 ---|          LX1    24
56591  M02S00199.cpum174 ---|          BX1    X0*X1
56592  M02S00200.cpum174 ---|          SX1    X1-100B
56593  M02S00201.cpum174 ---|          NZ     X1,SDT      IF NOT CYBER 180

Seq #  *Modification Id* Act 
----------------------------+
56594  M01S00006.cpum174 +++|          LX1    59-47

Seq #  *Modification Id* Act 
----------------------------+
56595  M02S00007.cpum227 ---|          NG     X1,SDT      IF NOT A CYBER 180 MAINFRAME

Seq #  *Modification Id* Act 
----------------------------+
56596  M01S00025.cpum227 +++|          NG     X1,SDTX     IF NOT A CME MAINFRAME

Seq #  *Modification Id* Act 
----------------------------+
56597  M01S00202.ns2418  +++|
56598  M01S00203.ns2418  +++|*         INITIALIZE *RTC* VARIABLES.
56599  M01S00204.ns2418  +++|
56600  M01S00205.ns2418  +++|          SA3    /CME/RTCC   INITIALIZE REAL TIME CLOCK
56601  M01S00206.ns2418  +++|          RC     X6          GET CURRENT *FRC* VALUE
56602  M01S00207.ns2418  +++|          BX7    X3
56603  M01S00208.ns2418  +++|          SA6    /CME/RTCA   INITIALIZE WHOLE MILLISECOND BASE TIME
56604  M01S00209.ns2418  +++|          SA7    RTCL
56605  M01S00210.ns2418  +++|          SA6    /CME/RTCB   INITIALIZE WHOLE SECOND BASE TIME

Seq #  *Modification Id* Act 
----------------------------+
56606  M01S00008.cpum174 +++|          LX1    59-42-59+47

Seq #  *Modification Id* Act 
----------------------------+
56607  M02S00009.cpum227 ---|          PL     X1,SDT      IF CYBER 865/875

Seq #  *Modification Id* Act 
----------------------------+
56608  M01S00026.cpum227 +++|          PL     X1,SDTX     IF CYBER 865/875

Seq #  *Modification Id* Act 
----------------------------+
56609  M01S00211.ns2418  +++|
56610  M01S00212.ns2418  +++|*         CALCULATE ELAPSED TIME SINCE CTI-SUPPLIED DATE/TIME.
56611  M01S00213.ns2418  +++|

Seq #  *Modification Id* Act 
----------------------------+
56612  M02S00214.ns2761  ---|          SA5    PDTL        GET CTI-SUPPLIED *FRC* VALUE

Seq #  *Modification Id* Act 
----------------------------+
56613  M01S00025.ns2761  +++|          SA5    SDTC        GET CTI-SUPPLIED *FRC* VALUE

Seq #  *Modification Id* Act 
----------------------------+
56614  M01S00215.ns2418  +++|          IX6    X6-X5
56615  M01S00216.ns2418  +++|          PL     X6,SDT1     IF CTI *FRC* VALID (.LT. CURRENT *FRC*)
56616  M01S00217.ns2418  +++|          SX6    0           USE CTI-SUPPLIED DATE/TIME INTACT
56617  M01S00218.ns2418  +++| SDT1     SA6    FRC
56618  M01S00219.ns2418  +++|          SA4    =500000     ROUND UP TO NEAREST WHOLE SECOND
56619  M01S00220.ns2418  +++|          SA3    =1000000.0
56620  M01S00221.ns2418  +++|          IX0    X6+X4
56621  M01S00222.ns2418  +++|          PX7    X0
56622  M01S00223.ns2418  +++|          FX0    X7/X3
56623  M01S00224.ns2418  +++|          UX7,B2 X0
56624  M01S00225.ns2418  +++|
56625  M01S00226.ns2418  +++|*         CALCULATE CURRENT TIME.
56626  M01S00227.ns2418  +++|
56627  M01S00228.ns2418  +++|          SA5    =60.0       ADVANCE SECONDS
56628  M01S00229.ns2418  +++|          LX0    B2,X7
56629  M01S00230.ns2418  +++|          PX7    X0
56630  M01S00231.ns2418  +++|          FX6    X7/X5
56631  M01S00232.ns2418  +++|          UX7,B2 X6

Seq #  *Modification Id* Act 
----------------------------+
56632  M02S00233.cpum227 ---|          SA5    TIML        CONVERT PACKED DECIMAL SECONDS AND MINUTES

Seq #  *Modification Id* Act 
----------------------------+
56633  M01S00027.cpum227 +++|          SA5    SDTA        CONVERT PACKED DECIMAL SECONDS AND MINUTES

Seq #  *Modification Id* Act 
----------------------------+
56634  M01S00234.ns2418  +++|          BX6    X5
56635  M01S00235.ns2418  +++|          BX4    X5
56636  M01S00236.ns2418  +++|          MX3    -4
56637  M01S00237.ns2418  +++|          LX6    56
56638  M01S00238.ns2418  +++|          LX4    44
56639  M01S00239.ns2418  +++|          BX2    -X3*X6
56640  M01S00240.ns2418  +++|          BX6    -X3*X4
56641  M01S00241.ns2418  +++|          BX4    X2
56642  M01S00242.ns2418  +++|          LX7    B2,X7       UPDATE *FRC* TO BE ELAPSED MINUTES
56643  M01S00243.ns2418  +++|          SX1    60
56644  M01S00244.ns2418  +++|          LX4    2
56645  M01S00245.ns2418  +++|          IX2    X4+X2
56646  M01S00246.ns2418  +++|          BX4    X6
56647  M01S00247.ns2418  +++|          LX4    2
56648  M01S00248.ns2418  +++|          IX6    X4+X6
56649  M01S00249.ns2418  +++|          DX4    X7*X1
56650  M01S00250.ns2418  +++|          LX2    1
56651  M01S00251.ns2418  +++|          IX0    X0-X4       CALCULATE NUMBER OF SECONDS TO ADVANCE
56652  M01S00252.ns2418  +++|          BX4    X5
56653  M01S00253.ns2418  +++|          BX5    -X3*X5
56654  M01S00254.ns2418  +++|          LX4    48
56655  M01S00255.ns2418  +++|          LX6    1
56656  M01S00256.ns2418  +++|          IX2    X5+X2
56657  M01S00257.ns2418  +++|          BX5    -X3*X4
56658  M01S00258.ns2418  +++|          IX6    X5+X6
56659  M01S00259.ns2418  +++|          SA7    FRC
56660  M01S00260.ns2418  +++|          IX7    X0+X2
56661  M01S00261.ns2418  +++|          SA6    MN
56662  M01S00262.ns2418  +++|          SA7    SS
56663  M01S00263.ns2418  +++|          IX7    X7-X1
56664  M01S00264.ns2418  +++|          NG     X7,SDT2     IF NO MINUTE CHANGE
56665  M01S00265.ns2418  +++|          SA7    A7
56666  M01S00266.ns2418  +++|          SX0    B1
56667  M01S00267.ns2418  +++|          IX7    X0+X6
56668  M01S00268.ns2418  +++|          SA7    A6
56669  M01S00269.ns2418  +++| SDT2     SA5    FRC         ADVANCE MINUTES
56670  M01S00270.ns2418  +++|          SA4    =60.0
56671  M01S00271.ns2418  +++|          PX0    X5
56672  M01S00272.ns2418  +++|          FX7    X0/X4

Seq #  *Modification Id* Act 
----------------------------+
56673  M02S00273.cpum227 ---|          SA4    TIML        CONVERT PACKED DECIMAL HOURS

Seq #  *Modification Id* Act 
----------------------------+
56674  M01S00028.cpum227 +++|          SA4    SDTA        CONVERT PACKED DECIMAL HOURS

Seq #  *Modification Id* Act 
----------------------------+
56675  M01S00274.ns2418  +++|          BX0    X4
56676  M01S00275.ns2418  +++|          LX0    32
56677  M01S00276.ns2418  +++|          UX2,B2 X7
56678  M01S00277.ns2418  +++|          BX7    -X3*X0
56679  M01S00278.ns2418  +++|          SX0    60
56680  M01S00279.ns2418  +++|          LX6    B2,X2       UPDATE *FRC* TO BE ELAPSED HOURS
56681  M01S00280.ns2418  +++|          BX2    X7
56682  M01S00281.ns2418  +++|          DX1    X6*X0
56683  M01S00282.ns2418  +++|          LX2    2
56684  M01S00283.ns2418  +++|          IX7    X2+X7
56685  M01S00284.ns2418  +++|          SA2    MN
56686  M01S00285.ns2418  +++|          LX4    36
56687  M01S00286.ns2418  +++|          IX1    X5-X1       CALCULATE NUMBER OF MINUTES TO ADVANCE
56688  M01S00287.ns2418  +++|          BX5    -X3*X4
56689  M01S00288.ns2418  +++|          LX7    1
56690  M01S00289.ns2418  +++|          IX7    X5+X7
56691  M01S00290.ns2418  +++|          SA6    A5
56692  M01S00291.ns2418  +++|          IX6    X2+X1
56693  M01S00292.ns2418  +++|          SA7    HH
56694  M01S00293.ns2418  +++|          SA6    A2
56695  M01S00294.ns2418  +++|          IX6    X6-X0
56696  M01S00295.ns2418  +++|          NG     X6,SDT3     IF NO HOUR CHANGE
56697  M01S00296.ns2418  +++|          SX0    B1
56698  M01S00297.ns2418  +++|          IX7    X0+X7
56699  M01S00298.ns2418  +++|          SA6    A6
56700  M01S00299.ns2418  +++|          SA7    A7
56701  M01S00300.ns2418  +++| SDT3     SA5    FRC         ADVANCE HOURS
56702  M01S00301.ns2418  +++|          SA4    =24.0
56703  M01S00302.ns2418  +++|          PX0    X5
56704  M01S00303.ns2418  +++|          FX7    X0/X4

Seq #  *Modification Id* Act 
----------------------------+
56705  M02S00304.cpum227 ---|          SA4    DTEL        CONVERT PACKED DECIMAL DAYS

Seq #  *Modification Id* Act 
----------------------------+
56706  M01S00029.cpum227 +++|          SA4    SDTB        CONVERT PACKED DECIMAL DAYS

Seq #  *Modification Id* Act 
----------------------------+
56707  M01S00305.ns2418  +++|          BX0    X4
56708  M01S00306.ns2418  +++|          LX0    56
56709  M01S00307.ns2418  +++|          UX2,B2 X7
56710  M01S00308.ns2418  +++|          BX7    -X3*X0
56711  M01S00309.ns2418  +++|          SX0    24
56712  M01S00310.ns2418  +++|          LX6    B2,X2       UPDATE *FRC* TO ELAPSED DAYS
56713  M01S00311.ns2418  +++|          BX2    X7
56714  M01S00312.ns2418  +++|          DX1    X6*X0
56715  M01S00313.ns2418  +++|          LX2    2
56716  M01S00314.ns2418  +++|          IX7    X2+X7
56717  M01S00315.ns2418  +++|          SA2    HH
56718  M01S00316.ns2418  +++|          BX3    -X3*X4
56719  M01S00317.ns2418  +++|          IX4    X5-X1       CALCULATE NUMBER OF HOURS TO ADVANCE
56720  M01S00318.ns2418  +++|          LX7    1
56721  M01S00319.ns2418  +++|          IX7    X3+X7
56722  M01S00320.ns2418  +++|          SA6    A5
56723  M01S00321.ns2418  +++|          IX6    X2+X4
56724  M01S00322.ns2418  +++|          SA7    DD
56725  M01S00323.ns2418  +++|          SA6    A2
56726  M01S00324.ns2418  +++|          IX6    X6-X0
56727  M01S00325.ns2418  +++|          NG     X6,SDT4     IF NO DAY CHANGE
56728  M01S00326.ns2418  +++|          SA6    A6
56729  M01S00327.ns2418  +++|          SX0    B1
56730  M01S00328.ns2418  +++|          IX6    X0+X7
56731  M01S00329.ns2418  +++|          SA6    A7
56732  M01S00330.ns2418  +++|
56733  M01S00331.ns2418  +++|*         CALCULATE CURRENT DATE.
56734  M01S00332.ns2418  +++|

Seq #  *Modification Id* Act 
----------------------------+
56735  M02S00333.cpum227 ---| SDT4     SA5    DTEL        ADVANCE DATE

Seq #  *Modification Id* Act 
----------------------------+
56736  M01S00030.cpum227 +++| SDT4     SA5    SDTB        ADVANCE DATE

Seq #  *Modification Id* Act 
----------------------------+
56737  M01S00334.ns2418  +++|          BX0    X5
56738  M01S00335.ns2418  +++|          LX0    32
56739  M01S00336.ns2418  +++|          MX7    -4          CONVERT PACKED DECIMAL MONTH AND YEAR
56740  M01S00337.ns2418  +++|          BX4    X5
56741  M01S00338.ns2418  +++|          BX3    -X7*X0
56742  M01S00339.ns2418  +++|          LX4    44
56743  M01S00340.ns2418  +++|          BX0    X3
56744  M01S00341.ns2418  +++|          BX2    -X7*X4
56745  M01S00342.ns2418  +++|          LX0    2
56746  M01S00343.ns2418  +++|          BX4    X2
56747  M01S00344.ns2418  +++|          BX1    X5
56748  M01S00345.ns2418  +++|          IX3    X0+X3
56749  M01S00346.ns2418  +++|          LX4    2
56750  M01S00347.ns2418  +++|          LX1    36
56751  M01S00348.ns2418  +++|          IX0    X4+X2
56752  M01S00349.ns2418  +++|          BX4    -X7*X1
56753  M01S00350.ns2418  +++|          LX3    1
56754  M01S00351.ns2418  +++|          LX5    48
56755  M01S00352.ns2418  +++|          IX6    X4+X3
56756  M01S00353.ns2418  +++|          BX4    -X7*X5
56757  M01S00354.ns2418  +++|          LX0    1

Seq #  *Modification Id* Act 
----------------------------+
56758  M02S00355.ns2761  ---|          BX7    X6
56759  M02S00356.ns2761  ---|          AX7    59

Seq #  *Modification Id* Act 
----------------------------+
56760  M01S00357.ns2418  +++|          SA6    YY

Seq #  *Modification Id* Act 
----------------------------+
56761  M02S00358.ns2761  ---|          MX5    -2          CHECK FOR LEAP YEAR
56762  M02S00359.ns2761  ---|          BX3    X7-X6

Seq #  *Modification Id* Act 
----------------------------+
56763  M01S00360.ns2418  +++|          IX6    X4+X0

Seq #  *Modification Id* Act 
----------------------------+
56764  M02S00361.ns2761  ---|          BX0    -X5*X3

Seq #  *Modification Id* Act 
----------------------------+
56765  M01S00362.ns2418  +++|          SA6    MM

Seq #  *Modification Id* Act 
----------------------------+
56766  M02S00363.ns2761  ---|          BX6    X0-X7
56767  M02S00364.ns2761  ---|          NZ     X6,SDT5     IF NOT LEAP YEAR
56768  M02S00365.ns2761  ---|          SX7    29          ADJUST DAYS IN FEBRUARY
56769  M02S00366.ns2761  ---|          SA7    DAYS+1

Seq #  *Modification Id* Act 
----------------------------+
56770  M01S00367.ns2418  +++|
56771  M01S00368.ns2418  +++|*         CALCULATE CURRENT MONTH AND DAY.
56772  M01S00369.ns2418  +++|

Seq #  *Modification Id* Act 
----------------------------+
56773  M02S00370.ns2761  ---| SDT5     SA5    MM

Seq #  *Modification Id* Act 
----------------------------+
56774  M01S00026.ns2761  +++|          SA5    MM

Seq #  *Modification Id* Act 
----------------------------+
56775  M01S00371.ns2418  +++|          SA4    YY
56776  M01S00372.ns2418  +++|          SA3    DD
56777  M01S00373.ns2418  +++|          SA2    FRC

Seq #  *Modification Id* Act 
----------------------------+
56778  M02S00374.ns2761  ---|          SB7    X5+
56779  M02S00375.ns2761  ---|          BX6    X4
56780  M02S00376.ns2761  ---|          IX7    X3+X2

Seq #  *Modification Id* Act 
----------------------------+
56781  M01S00027.ns2761  +++|          IX3    X3+X2

Seq #  *Modification Id* Act 
----------------------------+
56782  M01S00377.ns2418  +++|
56783  M01S00378.ns2418  +++|*         ADJUST YEAR, MONTH, DAY UNTIL DAY FITS WITHIN MONTH.
56784  M01S00379.ns2418  +++|

Seq #  *Modification Id* Act 
----------------------------+
56785  M02S00380.ns2761  ---| SDT6     SA5    B7+DAYS-1   ADJUST ELAPSED DAYS BY DAYS IN MONTH
56786  M02S00381.ns2761  ---|          BX0    X0-X0
56787  M02S00382.ns2761  ---|          IX4    X5-X7
56788  M02S00383.ns2761  ---|          IX3    X0+X4
56789  M02S00384.ns2761  ---|          PL     X3,SDT7     IF DAY FITS WITHIN MONTH
56790  M02S00385.ns2761  ---|          SB7    B7+B1       ADVANCE MONTH
56791  M02S00386.ns2761  ---|          SX0    12
56792  M02S00387.ns2761  ---|          SX4    B7
56793  M02S00388.ns2761  ---|          IX7    X7-X5       DECREMENT ELAPSED DAYS
56794  M02S00389.ns2761  ---|          IX5    X0-X4
56795  M02S00390.ns2761  ---|          PL     X5,SDT6     IF NOT YEAR ROLLOVER
56796  M02S00391.ns2761  ---|          IX3    X4-X0
56797  M02S00392.ns2761  ---|          SX6    X6+B1
56798  M02S00393.ns2761  ---|          SB7    X3
56799  M02S00394.ns2761  ---|          EQ     SDT6        LOOP UNTIL DAY FITS WITHIN MONTH

Seq #  *Modification Id* Act 
----------------------------+
56800  M01S00028.ns2761  +++| SDT5     MX7    -2          CHECK FOR LEAP YEAR
56801  M01S00029.ns2761  +++|          SX6    28
56802  M01S00030.ns2761  +++|          BX7    -X7*X4
56803  M01S00031.ns2761  +++|          NZ     X7,SDT5.1   IF NOT LEAP YEAR
56804  M01S00032.ns2761  +++|          SX6    29
56805  M01S00033.ns2761  +++| SDT5.1   SA6    DAYS+1      RESET NUMBER OF DAYS IN FEBRUARY
56806  M01S00034.ns2761  +++| SDT6     SA1    X5+DAYS-1   ADJUST ELAPSED DAYS BY DAYS IN MONTH
56807  M01S00035.ns2761  +++|          IX2    X1-X3
56808  M01S00036.ns2761  +++|          PL     X2,SDT7     IF DAYS FIT WITHIN CURRENT MONTH
56809  M01S00037.ns2761  +++|          SX5    X5+B1       ADVANCE MONTH
56810  M01S00038.ns2761  +++|          IX3    X3-X1       DECREMENT ELAPSED DAYS
56811  M01S00039.ns2761  +++|          SB7    X5-13
56812  M01S00040.ns2761  +++|          NG     B7,SDT6     IF NOT YEAR ROLLOVER
56813  M01S00041.ns2761  +++|          SX5    B1          RESET MONTH TO JANUARY
56814  M01S00042.ns2761  +++|          SX4    X4+B1       ADVANCE YEAR
56815  M01S00043.ns2761  +++|          EQ     SDT5        RECHECK FOR LEAP YEAR

Seq #  *Modification Id* Act 
----------------------------+
56816  M01S00395.ns2418  +++|

Seq #  *Modification Id* Act 
----------------------------+
56817  M01S00029.ns2797  +++|*         CHECK FOR DATE BEYOND MAXIMUM SUPPORTED DATE (33/12/31).
56818  M01S00030.ns2797  +++|
56819  M01S00031.ns2797  +++| SDT7     SX1    X4-70       BIAS YEAR BY 1970
56820  M01S00032.ns2797  +++|          PL     X1,SDT8     IF YEAR IN RANGE 1970-1999
56821  M01S00033.ns2797  +++|          SX1    X1+100      ADJUST BIAS FOR YEARS 2000 - 2033
56822  M01S00034.ns2797  +++|          SX6    X4-34
56823  M01S00035.ns2797  +++|          NG     X6,SDT8     IF YEAR IN RANGE 2000-2033
56824  M01S00036.ns2797  +++|          SA1    /MONITOR/ADTC  *DATE AT MAXIMUM*
56825  M01S00037.ns2797  +++|          BX7    X1
56826  M01S00038.ns2797  +++|          TA7    MS2W,SCA    SET MESSAGE IN SYSTEM CONTROL POINT
56827  M01S00039.ns2797  +++|          SA1    A1+B1
56828  M01S00040.ns2797  +++|          BX7    X1
56829  M01S00041.ns2797  +++|          SA7    A7+B1
56830  M01S00042.ns2797  +++|          SA1    /MONITOR/ADTB  SET PACKED DATE TO 33/12/31
56831  M01S00043.ns2797  +++|          EQ     SDT8.1      CONVERT PACKED DATE TO DISPLAY CODE
56832  M01S00044.ns2797  +++|

Seq #  *Modification Id* Act 
----------------------------+
56833  M01S00396.ns2418  +++|*         CONVERT CALCULATED VALUES TO DISPLAY WALL CLOCK DATE/TIME.
56834  M01S00397.ns2418  +++|

Seq #  *Modification Id* Act 
----------------------------+
56835  M02S00398.ns2761  ---| SDT7     SX1    X6-70       PACK DATE
56836  M02S00399.ns2761  ---|          LX1    12
56837  M02S00400.ns2761  ---|          SX2    B7
56838  M02S00401.ns2761  ---|          LX2    6
56839  M02S00402.ns2761  ---|          SX3    X7
56840  M02S00403.ns2761  ---|          BX1    X1+X2

Seq #  *Modification Id* Act 
----------------------------+
56841  M02S00044.ns2797  ---| SDT7     SX1    X4-70       BIAS YEAR BY 1970
56842  M02S00045.ns2797  ---|          PL     X1,SDT8     IF YEAR BEFORE 2000
56843  M02S00046.ns2797  ---|          SX1    X1+100      ADJUST BIAS FOR YEARS 2000 - 2033

Seq #  *Modification Id* Act 
----------------------------+
56844  M01S00047.ns2761  +++| SDT8     LX1    12          PACK DATE
56845  M01S00048.ns2761  +++|          LX5    6
56846  M01S00049.ns2761  +++|          BX1    X1+X5

Seq #  *Modification Id* Act 
----------------------------+
56847  M01S00404.ns2418  +++|          BX1    X1+X3

Seq #  *Modification Id* Act 
----------------------------+
56848  M02S00405.ns2797  ---|          EDATE  X1          CONVERT PACKED DATE TO DISPLAY CODE

Seq #  *Modification Id* Act 
----------------------------+
56849  M01S00045.ns2797  +++| SDT8.1   EDATE  X1          CONVERT PACKED DATE TO DISPLAY CODE

Seq #  *Modification Id* Act 
----------------------------+
56850  M01S00406.ns2418  +++|          SA6    DTEL
56851  M01S00407.ns2418  +++|          SA1    HH          PACK TIME
56852  M01S00408.ns2418  +++|          LX1    12
56853  M01S00409.ns2418  +++|          SA2    MN
56854  M01S00410.ns2418  +++|          LX2    6
56855  M01S00411.ns2418  +++|          SA3    SS
56856  M01S00412.ns2418  +++|          BX1    X1+X2
56857  M01S00413.ns2418  +++|          BX1    X1+X3
56858  M01S00414.ns2418  +++|          ETIME  X1          EDIT TIME
56859  M01S00415.ns2418  +++|          SA6    TIML

Seq #  *Modification Id* Act 
----------------------------+
56860  M02S00416.cpum227 ---|          EQ     SDT         RETURN

Seq #  *Modification Id* Act 
----------------------------+
56861  M01S00031.cpum227 +++|          EQ     SDTX        RETURN
56862  M01S00032.cpum227 +++|
56863  M01S00033.cpum227 +++|
56864  M01S00034.cpum227 +++| SDTA     CON    0           *CTI*-SUPPLIED PACKED BASE TIME
56865  M01S00035.cpum227 +++| SDTB     CON    0           *CTI*-SUPPLIED PACKED BASE DATE

Seq #  *Modification Id* Act 
----------------------------+
56866  M01S00050.ns2761  +++| SDTC     CON    0           *CTI*-SUPPLIED BASE *FRC* VALUE

Seq #  *Modification Id* Act 
----------------------------+
56867  M01S00417.ns2418  +++|
56868  M01S00418.ns2418  +++|*         DATE/TIME CELLS.
56869  M01S00419.ns2418  +++|
56870  M01S00420.ns2418  +++| YY       BSS    1           YEAR
56871  M01S00421.ns2418  +++| MM       BSS    1           MONTH
56872  M01S00422.ns2418  +++| DD       BSS    1           DAY
56873  M01S00423.ns2418  +++| HH       BSS    1           HOUR
56874  M01S00424.ns2418  +++| MN       BSS    1           MINUTE
56875  M01S00425.ns2418  +++| SS       BSS    1           SECOND
56876  M01S00426.ns2418  +++| FRC      BSS    1           FREE RUNNING CLOCK
56877  M01S00427.ns2418  +++|
56878  M01S00428.ns2418  +++|*         ARRAY CONTAINING THE NUMBER OF DAYS IN EACH MONTH.
56879  M01S00429.ns2418  +++|
56880  M01S00430.ns2418  +++| DAYS     DATA   31,28,31,30,31,30,31,31,30,31,30,31
56881  M01S00431.ns2418  +++|*DAYS     DATA   31,29,31,30,31,30,31,31,30,31,30,31  (LEAP YEAR)

Seq #  *Modification Id* Act 
----------------------------+
56882  M01S02406.271l750 +++| SJB      SPACE  4,10
56883  M01S02407.271l750 +++|**        SJB - SETUP JOB CONTROL BLOCK TABLE.
56884  M01S02408.271l750 +++|*
56885  M01S02409.271l750 +++|*         EXIT   JCB SET UP FOR ALL SERVICE CLASSES.
56886  M01S02410.271l750 +++|*
56887  M01S02411.271l750 +++|*         USES   X - 4.
56888  M01S02412.271l750 +++|*                B - 3.
56889  M01S02413.271l750 +++|*
56890  M01S02414.271l750 +++|*         CALLS  /MONITOR/CCP.
56891  M01S02415.271l750 +++|
56892  M01S02416.271l750 +++|
56893  M01S02417.271l750 +++| SJB      SUBR               ENTRY/EXIT
56894  M01S02418.271l750 +++|          SX4    MXJC        SET MAXIMUM SERVICE CLASS
56895  M01S02419.271l750 +++|          SB3    SJB1        SET RETURN ADDRESS
56896  M01S02420.271l750 +++| SJB1     SX4    X4-1
56897  M01S02421.271l750 +++|          ZR     X4,SJBX     IF ALL SERVICE CLASSES PROCESSED
56898  M01S02422.271l750 +++|          EQ     /MONITOR/CCP  CONVERT CPU SCHEDULING PARAMETERS

Seq #  *Modification Id* Act 
----------------------------+
56899  M01S00432.ns2418  +++| SSP      SPACE  4,10
56900  M00S34562.cpumtr  +++|**        SSP - SET SYSTEM PARAMETERS.
56901  M00S34563.cpumtr  +++|
56902  M00S34564.cpumtr  +++|
56903  M00S34565.cpumtr  +++| SSP7.9   SA1    BIOL
56904  M00S34566.cpumtr  +++|          AX1    24
56905  M00S34567.cpumtr  +++|          SX7    X1
56906  M00S34568.cpumtr  +++|          ZR     X7,SSP      IF NO BUFFERED I/O
56907  M00S34569.cpumtr  +++|          SB6    X1+CBTP     LAST ENTRY
56908  M00S34570.cpumtr  +++|          SA7    BDT
56909  M00S34571.cpumtr  +++|          MX3    -18
56910  M00S34572.cpumtr  +++|          SX7    X7+BDTL
56911  M00S34573.cpumtr  +++|          SA2    X1-1
56912  M00S34574.cpumtr  +++| SSP8     SA2    A2+B1       NEXT ENTRY
56913  M00S34575.cpumtr  +++|          BX6    X7+X2
56914  M00S34576.cpumtr  +++|          LX2    -24
56915  M00S34577.cpumtr  +++|          SA7    A7+B1
56916  M00S34578.cpumtr  +++|          SA6    A2
56917  M00S34579.cpumtr  +++|          BX4    -X3*X2
56918  M00S34580.cpumtr  +++|          IX7    X7+X4
56919  M00S34581.cpumtr  +++|          SX4    A2-B6
56920  M00S34582.cpumtr  +++|          NZ     X4,SSP8     IF MORE ENTRIES TO PROCESS
56921  M00S34583.cpumtr  +++|          SX6    X1+EMTP
56922  M00S34584.cpumtr  +++|          SX7    X1+DWTP
56923  M00S34585.cpumtr  +++|          SA6    EMTB
56924  M00S34586.cpumtr  +++|          SA7    DWTB
56925  M00S34587.cpumtr  +++|          SX6    X6-1
56926  M00S34588.cpumtr  +++|          SA6    BLMB
56927  M00S34589.cpumtr  +++|          SX6    X1+DRDP
56928  M00S34590.cpumtr  +++|          SX7    X1+WRTP
56929  M00S34591.cpumtr  +++|          SA6    DRDB
56930  M00S34592.cpumtr  +++|          SA7    WRTB

Seq #  *Modification Id* Act 
----------------------------+
56931  M02S00004.251l670 ---|          SX6    X1+SPBP
56932  M02S00005.251l670 ---|          SA6    SPBB
56933  M00S34593.cpumtr  +++|          SA2    X1+CBTP     GET NUMBER OF I/O BUFFERS

Seq #  *Modification Id* Act 
----------------------------+
56934  M01S34594.251l664 ---|          SX7    X1+IORQP
56935  M01S34595.251l664 ---|          MX3    -12
56936  M01S34596.251l664 ---|          SA7    IORQ
56937  M01S34597.251l664 ---|          LX2    12
56938  M01S34598.251l664 ---|          BX6    -X3*X2
56939  M01S34599.251l664 ---|          SA6    NIOB
56940  M01S34600.251l664 ---|          AX6    2           SET MAXIMUM DATA WRITTEN TO 1/4 OF TOTAL

Seq #  *Modification Id* Act 
----------------------------+
56941  M01S02886.251l664 +++|          SA4    X1+PUTP
56942  M01S02887.251l664 +++|          SX7    X1+IORQP
56943  M01S02888.251l664 +++|          LX2    12
56944  M01S02889.251l664 +++|          MX3    -12
56945  M01S02890.251l664 +++|          SA7    IORQ
56946  M01S02891.251l664 +++|          BX6    -X3*X2
56947  M01S02892.251l664 +++|          LX4    12
56948  M01S02893.251l664 +++|          SA6    NIOB
56949  M01S02894.251l664 +++|          BX7    -X3*X4
56950  M01S02895.251l664 +++|          AX6    2           SET MAXIMUM DATA WRITTEN TO 1/4 OF TOTAL
56951  M01S02896.251l664 +++|          SA7    NRUN
56952  M00S34601.cpumtr  +++|          SA6    MDWB

Seq #  *Modification Id* Act 
----------------------------+
56953  M01S34602.252l678 ---|          SX6    B1          PRESET ERROR BUFFER INTERLOCK
56954  M01S34603.252l678 ---|          LX6    48
56955  M01S34604.252l678 ---|          SA1    EMB
56956  M01S34605.252l678 ---|          SA6    X1
56957  M00S34606.cpumtr  +++|
56958  M00S34607.cpumtr  +++| SSP      PS                 ENTRY/EXIT

Seq #  *Modification Id* Act 
----------------------------+
56959  M01S01148.252l678 +++|          SA2    EMBP
56960  M01S01149.252l678 +++|          LX2    -24         SET *EMB* POINTER
56961  M01S01150.252l678 +++|          SX7    X2
56962  M01S01151.252l678 +++|          SA7    EMB

Seq #  *Modification Id* Act 
----------------------------+
56963  M01S01014.273l780 +++|
56964  M01S01015.273l780 +++|*         SET CONTROL POINT AND PSEUDO-CONTROL POINT PARAMETERS.
56965  M01S01016.273l780 +++|

Seq #  *Modification Id* Act 
----------------------------+
56966  M01S02961.271l716 +++|          SA1    PCPP
56967  M01S02962.271l716 +++|          SX6    X1          SET PCP AREA ADDRESS
56968  M01S02963.271l716 +++|          MX0    -12
56969  M01S02964.271l716 +++|          ERRNZ  MCTP-PCPP   CODE DEPENDS ON VALUE
56970  M01S02965.271l716 +++|          AX1    24
56971  M01S02966.271l716 +++|          BX7    -X0*X1      NUMBER OF MCT ENTRIES
56972  M01S02967.271l716 +++|          SA6    PCPA
56973  M01S02968.271l716 +++|          AX1    12          POSITION TO MCT ADDRESS
56974  M01S02969.271l716 +++|          BX6    X1
56975  M01S02970.271l716 +++|          SA7    NMCT        SET MCT ENTRY COUNT
56976  M01S02971.271l716 +++|          SA6    MCT

Seq #  *Modification Id* Act 
----------------------------+
56977  M01S34608.273l780 ---|          RJ     DBL         DETERMINE BLOCKS LOADED
56978  M00S34609.cpumtr  +++|          SA1    NCPL        SET SYSTEM CONTROL POINT NUMBER

Seq #  *Modification Id* Act 
----------------------------+
56979  M01S34610.273l780 ---|          SA2    PPCP        SET FIRST PP COMMUNICATION ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
56980  M01S34611.271l716 ---|          MX0    -12
56981  M00S34612.cpumtr  +++|          AX1    36
56982  M00S34613.cpumtr  +++|          BX6    -X0*X1

Seq #  *Modification Id* Act 
----------------------------+
56983  M01S34614.273l780 ---|          BX7    -X0*X2
56984  M00S34615.cpumtr  +++|          SX6    X6+B1
56985  M00S34616.cpumtr  +++|          SA6    SC

Seq #  *Modification Id* Act 
----------------------------+
56986  M01S34617.271l716 ---|          LX6    7           SET SYSTEM CONTROL POINT ADDRESS
56987  M01S34618.271l716 ---|          SA7    FP
56988  M01S34619.271l716 ---|          SA6    SCA

Seq #  *Modification Id* Act 
----------------------------+
56989  M02S02972.273l780 ---|          SA7    FP

Seq #  *Modification Id* Act 
----------------------------+
56990  M01S02973.271l716 +++|          SX2    X6+B1       NUMBER OF CP-S (INCLUDING CP-0)
56991  M01S02974.271l716 +++|          LX6    7
56992  M01S02975.271l716 +++|          SA6    SCA         SET SYSTEM CONTROL POINT ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
56993  M02S02976.273l780 ---|          SA3    NMCT
56994  M02S02977.273l780 ---|          NO
56995  M02S02978.273l780 ---|          IX6    X3-X2       CALCULATE PCP COUNT

Seq #  *Modification Id* Act 
----------------------------+
56996  M01S01017.273l780 +++|          IX6    X7-X2       CALCULATE PCP COUNT

Seq #  *Modification Id* Act 
----------------------------+
56997  M01S02979.271l716 +++|          SA6    NPCP

Seq #  *Modification Id* Act 
----------------------------+
56998  M01S01018.273l780 +++|          LX7    7
56999  M01S01019.273l780 +++|          SA7    PCM2        SET MAXIMUM PCP OFFSET
57000  M01S01020.273l780 +++|
57001  M01S01021.273l780 +++|*         SET PP CONFIGURATION PARAMETERS.
57002  M01S01022.273l780 +++|
57003  M01S01023.273l780 +++|          SA2    PPCP        SET FIRST PP COMMUNICATION ADDRESS
57004  M01S01024.273l780 +++|          BX7    -X0*X2
57005  M01S01025.273l780 +++|          SA7    FP

Seq #  *Modification Id* Act 
----------------------------+
57006  M01S02587.253l688 +++|          BX6    X7          SET FIRST PP COMMUNICATION ADDRESS/8
57007  M01S02588.253l688 +++|          AX6    3
57008  M01S02589.253l688 +++|          SA6    FP8

Seq #  *Modification Id* Act 
----------------------------+
57009  M01S01026.273l780 +++|          LX2    -36
57010  M01S01027.273l780 +++|          SX6    X2
57011  M01S01028.273l780 +++|          SX3    X2
57012  M01S01029.273l780 +++|          SA6    FPX         SET EXTENDED PP COMMUNICATION BLOCKS FWA

Seq #  *Modification Id* Act 
----------------------------+
57013  M01S34620.251l664 ---|          SA1    PPUL        SET PSEUDO-PP COMMUNICATIONS AREA ADDRESS
57014  M01S34621.251l664 ---|          LX1    -24
57015  M01S34622.251l664 ---|          BX1    -X0*X1
57016  M01S34623.251l664 ---|          LX1    3           MULTIPLY BY 10B
57017  M01S34624.251l664 ---|          IX7    X7+X1       ADD TO FIRST PP COMMUNICATION AREA ADDRESS
57018  M01S34625.251l664 ---|          SA1    X7+         FIND PSEUDO-PP COMMUNICATION AREA
57019  M01S34626.251l664 ---| SSP0     SX1    X1-3RCIO
57020  M01S34627.251l664 ---|          ZR     X1,SSP0.1   IF FOUND
57021  M01S34628.251l664 ---|          SX7    X7+10B      NEXT PP
57022  M01S34629.251l664 ---|          SA1    X7
57023  M01S34630.251l664 ---|          EQ     SSP0        CHECK FOR *CIO*
57024  M01S34631.251l664 ---|
57025  M01S34632.251l664 ---| SSP0.1   SA7    SP          SET PSEUDO-PP ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
57026  M01S02897.251l664 +++|          SA1    PPUL        SET CPP-S COMMUNICATION ADDRESS
57027  M01S02898.251l664 +++|          SX2    X1          GET NUMBER OF PHYSICALLY PRESENT CPP-S
57028  M01S02899.251l664 +++|          AX2    12D
57029  M01S02900.251l664 +++|          LX1    -24
57030  M01S02901.251l664 +++|          BX1    -X0*X1
57031  M01S02902.251l664 +++|          SX6    20D         NUMBER OF PP-S IN 2 BARREL SYSTEM
57032  M01S02903.251l664 +++|          SB2    X1-11D
57033  M01S02904.251l664 +++|          PL     B2,SSP.0    IF NOT 2 BARRELS
57034  M01S02905.251l664 +++|          SX6    10D
57035  M01S02906.251l664 +++| SSP.0    LX6    3
57036  M01S02907.251l664 +++|          IX6    X6+X7
57037  M01S02908.251l664 +++|          SA6    FPC         ADDRESS OF CPP COMMUNICATION AREA
57038  M01S02909.251l664 +++|          ZR     X2,SSP0.1   IF NO CPP-S
57039  M01S02910.251l664 +++|          LX2    3
57040  M01S02911.251l664 +++|          IX6    X2+X6
57041  M01S02912.251l664 +++| SSP0.1   SA6    SP          ADDRESS OF PSEUDO PP COMMUNICATION AREA

Seq #  *Modification Id* Act 
----------------------------+
57042  M01S34633.273l780 ---|          BX7    X7-X7       CLEAR INPUT REGISTER

Seq #  *Modification Id* Act 
----------------------------+
57043  M02S34634.273l780 ---|          SA7    A1

Seq #  *Modification Id* Act 
----------------------------+
57044  M02S02913.273l780 ---|          SA7    X6

Seq #  *Modification Id* Act 
----------------------------+
57045  M01S01030.273l780 +++|          IX7    X6-X7
57046  M01S01031.273l780 +++|          LX7    PPXES-PPCES
57047  M01S01032.273l780 +++|          IX7    X3+X7
57048  M01S01033.273l780 +++|          SA7    SPX         SET PSEUDO PP EXTENDED BLOCK ADDRESS
57049  M01S01034.273l780 +++|          SX7    0           CLEAR INPUT REGISTER
57050  M01S01035.273l780 +++|          SA7    X6+
57051  M01S01036.273l780 +++|
57052  M01S01037.273l780 +++|*         SET CENTRAL AND EXTENDED MEMORY CONFIGURATION PARAMETERS.
57053  M01S01038.273l780 +++|
57054  M00S34635.cpumtr  +++|          SA1    CFGL        GET HARDWARE ECS/ESM MODE

Seq #  *Modification Id* Act 
----------------------------+
57055  M01S34636.251l664 ---|          SX6    B1

Seq #  *Modification Id* Act 
----------------------------+
57056  M01S02914.251l664 +++|          SX6    B1+
57057  M00S34637.cpumtr  +++|          AX1    22
57058  M00S34638.cpumtr  +++|          BX6    X6*X1
57059  M00S34639.cpumtr  +++|          SA6    ESM         SET ESM MODE IF BIT IS SET

Seq #  *Modification Id* Act 
----------------------------+
57060  M01S34640.ns2219  ---|          BX6    X4          SET FL

Seq #  *Modification Id* Act 
----------------------------+
57061  M01S00013.ns2219  +++|          SA1    MABL        CHECK FOR 8XX
57062  M01S00014.ns2219  +++|          ZR     X6,SSP0.11  IF NOT ESM MODE
57063  M01S00015.ns2219  +++|          LX1    59-47

Seq #  *Modification Id* Act 
----------------------------+
57064  M02S00016.ns2691  ---|          PL     X1,SSP0.11  IF CYBER 8XX
57065  M02S00017.ns2691  ---|          SA6    ESM170      SET 170 ESM MODE

Seq #  *Modification Id* Act 
----------------------------+
57066  M01S00001.ns2691  +++|          NG     X1,SSP0.10  IF NOT CYBER 8XX
57067  M01S00002.ns2691  +++|          LX1    59-42-59+47
57068  M01S00003.ns2691  +++|          NG     X1,SSP0.11  IF NOT CYBER 865/875
57069  M01S00004.ns2691  +++| SSP0.10  SA6    ESM170      SET 170 ESM MODE

Seq #  *Modification Id* Act 
----------------------------+
57070  M01S00018.ns2219  +++| SSP0.11  BX6    X4          SET FL
57071  M00S34641.cpumtr  +++|          AX6    36
57072  M00S34642.cpumtr  +++|          BX7    X5          SET FLX
57073  M00S34643.cpumtr  +++|          LX7    -36
57074  M00S34644.cpumtr  +++|          SA6    MCM

Seq #  *Modification Id* Act 
----------------------------+
57075  M01S01152.252l678 +++|          SA1    MEFL        GET EXPANDED ADDRESSING FLAG
57076  M00S34645.cpumtr  +++|          SA7    MEC
57077  M00S34646.cpumtr  +++|          SA7    MXM         SET MAXIMUM MEMORY

Seq #  *Modification Id* Act 
----------------------------+
57078  M01S34647.252l678 ---|          MX1    -14
57079  M00S34648.cpumtr  +++|          AX6    6           SET FL SHIFTED
57080  M00S34649.cpumtr  +++|          SA6    MCMS

Seq #  *Modification Id* Act 
----------------------------+
57081  M01S01153.252l678 +++|          LX1    59-31
57082  M01S01154.252l678 +++|          MX4    37
57083  M00S34650.cpumtr  +++|          SA3    EEC

Seq #  *Modification Id* Act 
----------------------------+
57084  M01S34651.252l678 ---|          AX7    9           SET FLX SHIFTED
57085  M01S34652.252l678 ---|          SA7    MECS
57086  M01S34653.252l678 ---|          BX7    -X1*X7      FLX SHIFTED W/O FLAG BIT

Seq #  *Modification Id* Act 
----------------------------+
57087  M01S01155.252l678 +++|          BX4    X4*X7
57088  M01S01156.252l678 +++|          BX7    X4-X7
57089  M01S01157.252l678 +++|          PL     X1,SSP0.12  IF NOT EXPANDED ADDRESSING
57090  M01S01158.252l678 +++|          SA6    ESM170      SET EXPANDED ADDRESSING INDICATOR
57091  M01S01159.252l678 +++|          LX7    6
57092  M01S01160.252l678 +++| SSP0.12  AX4    9
57093  M01S01161.252l678 +++|          AX7    9           SET FLE / 1000B
57094  M00S34654.cpumtr  +++|          SA7    MECNF

Seq #  *Modification Id* Act 
----------------------------+
57095  M01S01162.252l678 +++|          BX7    X4+X7       SET FLX FLAG BIT SHIFTED
57096  M01S01163.252l678 +++|          SA7    MECS
57097  M01S01164.252l678 +++|          MX4    -2          SET EXTENDED MEMORY SHIFT COUNT
57098  M01S01165.252l678 +++|          LX1    0-29-59+31
57099  M01S01166.252l678 +++|          BX7    -X4*X1
57100  M01S01167.252l678 +++|          SA7    TNSC
57101  M01S01168.252l678 +++|          SB4    X7
57102  M01S01169.252l678 +++|          SX7    X7-6        (0 TO 3)-6 = (-6 TO -3)
57103  M01S01170.252l678 +++|          MX4    -3          SET USER EM SHIFT COUNT
57104  M01S01171.252l678 +++|          SA7    MESC
57105  M01S01172.252l678 +++|          LX1    0-33-0+29   POSITION USER EM SHIFT COUNT
57106  M01S01173.252l678 +++|          BX7    -X4*X1
57107  M01S01174.252l678 +++|          SA7    UESC        STORE USER EM SHIFT COUNT
57108  M01S01175.252l678 +++|          SX1    20B
57109  M01S01176.252l678 +++|          LX7    B4,X1
57110  M01S01177.252l678 +++|          SA7    TCNT        SET TRACK SIZE
57111  M00S34655.cpumtr  +++|          SA1    MABL
57112  M00S34656.cpumtr  +++|          LX1    59-47

Seq #  *Modification Id* Act 
----------------------------+
57113  M01S34657.cpum190 ---|          NG     X1,SSP0.3   IF NOT CME

Seq #  *Modification Id* Act 
----------------------------+
57114  M02S00001.cpum207 ---|          NG     X1,SSP0.31  IF NOT CME

Seq #  *Modification Id* Act 
----------------------------+
57115  M01S00001.cpum207 +++|          NG     X1,SSP0.3   IF NOT CME
57116  M00S34658.cpumtr  +++|          LX6    6           SET MAXIMUM MEMORY
57117  M00S34659.cpumtr  +++|          SA6    MXM

Seq #  *Modification Id* Act 
----------------------------+
57118  M01S00059.cpum107 +++|          SX6    B0+         CLEAR THE NON-CME INDICATOR
57119  M01S00060.cpum107 +++|          SA6    NCME

Seq #  *Modification Id* Act 
----------------------------+
57120  M01S34660.ns2443  ---|          SX6    EEMC+100B   CLEAR CM COPY FLAG TO ACCESS EXTERNAL ECS

Seq #  *Modification Id* Act 
----------------------------+
57121  M01S00141.ns2443  +++|          SA1    MABL
57122  M01S00142.ns2443  +++|          LX1    59-42
57123  M01S00143.ns2443  +++|          MX7    -8

Seq #  *Modification Id* Act 
----------------------------+
57124  M02S00144.271l750 ---|          SA4    NVE

Seq #  *Modification Id* Act 
----------------------------+
57125  M02S00145.252l678 ---|          PL     X1,SSP0.14  IF 170 - 865/875
57126  M02S00146.252l678 ---|          ZR     X4,SSP0.12  IF *NVE* NOT PRESENT

Seq #  *Modification Id* Act 
----------------------------+
57127  M01S01178.252l678 +++|          PL     X1,SSP0.15  IF 170 - 865/875

Seq #  *Modification Id* Act 
----------------------------+
57128  M02S01179.271l750 ---|          ZR     X4,SSP0.13  IF *NVE* NOT PRESENT

Seq #  *Modification Id* Act 
----------------------------+
57129  M02S00147.271l750 ---|          SA6    NPIT        ENABLE PIT ACCOUNTING

Seq #  *Modification Id* Act 
----------------------------+
57130  M03S00148.271l750 ---| SSP0.12  SA1    EABL+CPEI   GET PROCESSOR DESCRIPTOR POINTER

Seq #  *Modification Id* Act 
----------------------------+
57131  M03S01180.271l750 ---| SSP0.13  SA2    EABL+CPEI   GET PROCESSOR DESCRIPTOR POINTER

Seq #  *Modification Id* Act 
----------------------------+
57132  M02S00001.271l750 ---| SSP0.13  SA1    EABL+CPEI   GET PROCESSOR DESCRIPTOR POINTER

Seq #  *Modification Id* Act 
----------------------------+
57133  M01S02423.271l750 +++|          SA1    EABL+CPEI   GET PROCESSOR DESCRIPTOR POINTER

Seq #  *Modification Id* Act 
----------------------------+
57134  M01S00149.ns2443  +++|          LX1    18
57135  M01S00150.ns2443  +++|          SA4    X1          ISOLATE MODEL NUMBER
57136  M01S00151.ns2443  +++|          AX4    28
57137  M01S00152.ns2443  +++|          SX2    TMNB

Seq #  *Modification Id* Act 
----------------------------+
57138  M01S00002.cpum207 +++|          SA1    X1+3        GET CYBER 990 LARGE MEMORY INDICATOR
57139  M01S00003.cpum207 +++|          LX1    59-12
57140  M01S00004.cpum207 +++|          PL     X1,SSP0.14  IF NOT A LARGE MEMORY CYBER 990
57141  M01S00005.cpum207 +++|          SX6    B0+
57142  M01S00006.cpum207 +++|          SA6    CCMB
57143  M01S00007.cpum207 +++|          SA1    MEC         SET PROGRAM MODE FLE TO MACHINE FLE
57144  M01S00008.cpum207 +++|          BX6    X1
57145  M01S00009.cpum207 +++|          SA6    MECPRG

Seq #  *Modification Id* Act 
----------------------------+
57146  M02S00153.252l678 ---| SSP0.13  SA1    X2

Seq #  *Modification Id* Act 
----------------------------+
57147  M03S00154.252l678 ---|          ZR     X1,SSP0.14  IF END OF TABLE

Seq #  *Modification Id* Act 
----------------------------+
57148  M01S01181.252l678 +++| SSP0.14  SA1    X2

Seq #  *Modification Id* Act 
----------------------------+
57149  M02S00004.252l678 ---|          ZR     X1,SSP0.15  IF END OF TABLE

Seq #  *Modification Id* Act 
----------------------------+
57150  M01S01182.252l678 +++|          ZR     X1,SSP0.16  IF END OF TABLE

Seq #  *Modification Id* Act 
----------------------------+
57151  M01S00155.ns2443  +++|          SX2    X2+B1
57152  M01S00156.ns2443  +++|          BX6    X1-X4
57153  M01S00157.ns2443  +++|          BX6    -X7*X6

Seq #  *Modification Id* Act 
----------------------------+
57154  M02S00158.252l678 ---|          NZ     X6,SSP0.13  IF NO MATCH ON MODEL NUMBER

Seq #  *Modification Id* Act 
----------------------------+
57155  M01S01183.252l678 +++|          NZ     X6,SSP0.14  IF NO MATCH ON MODEL NUMBER

Seq #  *Modification Id* Act 
----------------------------+
57156  M01S00159.ns2443  +++|          AX1    30          SET *TCPM* INDEX
57157  M01S00160.ns2443  +++|          SX7    X1
57158  M01S00161.ns2443  +++|          SA7    TMNBA
57159  M01S00162.ns2443  +++|          MX7    -12
57160  M01S00163.ns2443  +++|          AX1    18          SET ACCOUNTING ADJUSTMENT
57161  M01S00164.ns2443  +++|          BX7    -X7*X1
57162  M01S00165.ns2443  +++|          AX6    X7,B1

Proceed to Part 44