Deck CPUMTR Part 045

308 Modifications

Seq #  *Modification Id* Act 
----------------------------+

Seq #  *Modification Id* Act 
----------------------------+
58215  M01S00459.251l670 +++| RBT9     SA1    EFRL        SET ABORT FLAG
58216  M00S35191.cpumtr  +++|          SX6    2000B
58217  M00S35192.cpumtr  +++|          BX6    X6+X1
58218  M00S35193.cpumtr  +++|          SA6    A1
58219  M00S35194.cpumtr  +++|
58220  M00S35195.cpumtr  +++| RBT      PS                 ENTRY/EXIT

Seq #  *Modification Id* Act 
----------------------------+
58221  M01S35196.cpum121 ---|          RJ     VUQ         VALIDATE UNIT I/O QUEUES

Seq #  *Modification Id* Act 
----------------------------+
58222  M02S00001.283l840 ---|          TA1    BSTP,BDT    INITIALIZE TABLE ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
58223  M01S01089.283l840 +++|          TA1    IBSP,BDT    INITIALIZE TABLE ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
58224  M02S00002.251l670 ---| RBT0     SA2    A1+B1       GET NEXT ENTRY

Seq #  *Modification Id* Act 
----------------------------+
58225  M01S00460.251l670 +++| RBT1     SA2    A1+B1       READ NEXT ENTRY

Seq #  *Modification Id* Act 
----------------------------+
58226  M01S02988.271l716 +++|          MX3    6
58227  M01S02989.271l716 +++|          LX3    18-54
58228  M01S02990.271l716 +++|          BX6    -X3*X1      CLEAR INTERLOCKS
58229  M01S02991.271l716 +++|          SA6    A1

Seq #  *Modification Id* Act 
----------------------------+
58230  M01S00003.cpum121 +++|          MX7    12
58231  M01S00004.cpum121 +++|          BX6    X7*X1       NUMBER OF ENTRIES IN CURRENT TABLE (NE)
58232  M01S00005.cpum121 +++|          MX7    -6
58233  M01S00006.cpum121 +++|          LX1    18
58234  M01S00007.cpum121 +++|          LX6    12
58235  M01S00008.cpum121 +++|          TB3    A1-PUTP,-BDT

Seq #  *Modification Id* Act 
----------------------------+
58236  M02S00009.251l670 ---|          TB2    A1-CBTP,-BDT
58237  M02S00010.251l670 ---|          ZR     B3,RBT0.1   IF *PUT* POINTER
58238  M02S00011.251l670 ---|          NZ     B2,RBT0.2   IF NOT *CBT* POINTER
58239  M02S00012.251l670 ---| RBT0.1   SX6    X6+1        ADJUST COUNT FOR NULL ENTRY
58240  M02S00013.251l670 ---| RBT0.2   BX5    -X7*X1      LENGTH OF ENTRY (LE)

Seq #  *Modification Id* Act 
----------------------------+
58241  M01S00461.251l670 +++|          ZR     B3,RBT2     IF *PUT* POINTER
58242  M01S00462.251l670 +++|          SB3    B3+PUTP-FTTP
58243  M01S00463.251l670 +++|          ZR     B3,RBT2     IF *FTT* POINTER
58244  M01S00464.251l670 +++|          SB3    B3+FTTP-CBTP
58245  M01S00465.251l670 +++| RBT2     NZ     B3,RBT3     IF NOT *CBT* POINTER
58246  M01S00466.251l670 +++|          SX6    X6+1
58247  M01S00467.251l670 +++| RBT3     BX5    -X7*X1      LENGTH OF ENTRY (LE)

Seq #  *Modification Id* Act 
----------------------------+
58248  M01S00014.cpum121 +++|          LX1    18
58249  M01S00015.cpum121 +++|          MX7    -18
58250  M01S00016.cpum121 +++|          IX3    X6*X5       NE*LE
58251  M01S00017.cpum121 +++|          BX4    -X7*X1      TABLE LENGTH (LT)
58252  M01S00018.cpum121 +++|          IX3    X4-X3

Seq #  *Modification Id* Act 
----------------------------+
58253  M02S00019.251l670 ---|          NZ     X3,RBT5     IF (NE*LE).NE.(LT)
58254  M02S00020.251l670 ---|          TB3    A1-CBTP,-BDT
58255  M02S00021.251l670 ---|          ZR     B3,RBT0.3   IF LAST ENTRY IN TABLE

Seq #  *Modification Id* Act 
----------------------------+
58256  M01S00468.251l670 +++|          NZ     X3,RBT9     IF (NE*LE) .NE. (LT)
58257  M01S00469.251l670 +++|          TB3    A1-CBTP,-BDT
58258  M01S00470.251l670 +++|          ZR     B3,RBT4     IF LAST ENTRY IN TABLE

Seq #  *Modification Id* Act 
----------------------------+
58259  M01S00022.cpum121 +++|          LX1    24
58260  M01S00023.cpum121 +++|          BX3    -X7*X2      FWA OF NEXT TABLE
58261  M01S00024.cpum121 +++|          BX5    -X7*X1      FWA OF CURRENT TABLE
58262  M01S00025.cpum121 +++|          IX6    X5+X4       FWA + LT
58263  M01S00026.cpum121 +++|          BX7    X6-X3

Seq #  *Modification Id* Act 
----------------------------+
58264  M02S00027.251l670 ---|          NZ     X7,RBT5     IF (FWA+LT).NE.(NEXT FWA)
58265  M02S00028.251l670 ---|          SA1    A2
58266  M02S00029.251l670 ---|          EQ     RBT0        LOOP
58267  M02S00030.251l670 ---|
58268  M02S00031.251l670 ---| RBT0.3   RJ     VUQ         VALIDATE UNIT I/O QUEUES

Seq #  *Modification Id* Act 
----------------------------+
58269  M01S00471.251l670 +++|          NZ     X7,RBT9     IF (FWA+LT) .NE. (NEXT FWA)
58270  M01S00472.251l670 +++|          SA1    A2
58271  M01S00473.251l670 +++|          EQ     RBT1        LOOP
58272  M01S00474.251l670 +++|
58273  M01S00475.251l670 +++| RBT4     RJ     VUQ         VALIDATE UNIT I/O QUEUES

Seq #  *Modification Id* Act 
----------------------------+
58274  M01S35197.ns2363  ---|          NZ     X2,RBT5     IF ERROR FOUND
58275  M00S35198.cpumtr  +++|          RJ     VWL         VALIDATE WRITE LIST

Seq #  *Modification Id* Act 
----------------------------+
58276  M01S35199.ns2363  ---|          NZ     X2,RBT5     IF ERROR FOUND

Seq #  *Modification Id* Act 
----------------------------+
58277  M01S35200.283l840 ---|          RJ     MEL         MOVE ALL BUFFERS TO EMPTY LIST

Seq #  *Modification Id* Act 
----------------------------+
58278  M02S35201.283l840 ---|          NZ     X2,RBT5     IF ERROR FOUND

Seq #  *Modification Id* Act 
----------------------------+
58279  M02S00476.283l840 ---|          NZ     X2,RBT9     IF ERROR FOUND

Seq #  *Modification Id* Act 
----------------------------+
58280  M01S01090.283l840 +++|          RJ     RCB         RECOVER CBT
58281  M01S01091.283l840 +++|          NZ     X6,RBT9     IF ERROR FOUND
58282  M01S01092.283l840 +++|          RJ     RBS         RECOVER BUFFER STATUS TABLES
58283  M00S35202.cpumtr  +++|
58284  M00S35203.cpumtr  +++|*         CLEAN UP CHANNEL CONTROL TABLE(S).
58285  M00S35204.cpumtr  +++|
58286  M00S35205.cpumtr  +++|          TA1    CCTP,BDT    GET TABLE DESCRIPTOR
58287  M00S35206.cpumtr  +++|          LX1    -24
58288  M00S35207.cpumtr  +++|          SB2    X1          LENGTH OF TABLE
58289  M00S35208.cpumtr  +++|          SB3    B0          INITIALIZE INDEX
58290  M00S35209.cpumtr  +++|          MX0    -48
58291  M00S35210.cpumtr  +++|          SX6    B0

Seq #  *Modification Id* Act 
----------------------------+
58292  M01S35211.251l670 ---| RBT1     TA6    B3+CREQ,CCT CLEAR ENTRY

Seq #  *Modification Id* Act 
----------------------------+
58293  M01S00477.251l670 +++| RBT5     TA6    B3+CREQ,CCT CLEAR ENTRY
58294  M00S35212.cpumtr  +++|          TA1    B3+CCNT,CCT
58295  M00S35213.cpumtr  +++|          BX7    -X0*X1
58296  M00S35214.cpumtr  +++|          SA7    A1
58297  M00S35215.cpumtr  +++|          SB3    B3+CCTL     INCREMENT INDEX

Seq #  *Modification Id* Act 
----------------------------+
58298  M01S35216.251l670 ---|          LT     B3,B2,RBT1  IF NOT END OF TABLE
58299  M01S35217.251l670 ---|
58300  M01S35218.251l670 ---|*         CLEAN UP PHYSICAL UNIT TABLE(S).

Seq #  *Modification Id* Act 
----------------------------+
58301  M01S00478.251l670 +++|          LT     B3,B2,RBT5  IF NOT END OF TABLE
58302  M01S00479.251l670 +++|
58303  M01S00480.251l670 +++|*         CLEAN UP PHYSICAL UNIT AND FUNCTION TIMEOUT TABLES.
58304  M00S35219.cpumtr  +++|
58305  M00S35220.cpumtr  +++|          TA1    PUTP,BDT    GET TABLE DESCRIPTOR
58306  M00S35221.cpumtr  +++|          LX1    -24
58307  M00S35222.cpumtr  +++|          SB2    X1          LENGTH OF TABLE
58308  M00S35223.cpumtr  +++|          SB3    PUTL        INITIALIZE INDEX
58309  M00S35224.cpumtr  +++|          MX0    -54

Seq #  *Modification Id* Act 
----------------------------+
58310  M01S35225.272l774 ---|          MX2    27

Seq #  *Modification Id* Act 
----------------------------+
58311  M01S00206.272l774 +++|          TNO    RBT5.1,IH819  CLEAR READ RECOVERY INDEX FOR 819-S

Seq #  *Modification Id* Act 
----------------------------+
58312  M02S00207.ns2783  ---|          MX0    -57         PRESERVE EQUIPMENT NUMBER FOR 9853/583X

Seq #  *Modification Id* Act 
----------------------------+
58313  M01S00149.ns2783  +++|          MX0    -57         PRESERVE EQUIPMENT NUMBER FOR 9853/*DAS*

Seq #  *Modification Id* Act 
----------------------------+
58314  M01S00208.272l774 +++| RBT5.1   MX2    27

Seq #  *Modification Id* Act 
----------------------------+
58315  M01S35226.251l670 ---|          MX3    12

Seq #  *Modification Id* Act 
----------------------------+
58316  M01S00481.251l670 +++|          MX3    18
58317  M00S35227.cpumtr  +++|          LX2    24+27
58318  M00S35228.cpumtr  +++|          LX3    12+0
58319  M00S35229.cpumtr  +++|          BX2    X2+X3

Seq #  *Modification Id* Act 
----------------------------+
58320  M02S00001.251l670 ---|          MX7    48

Seq #  *Modification Id* Act 
----------------------------+
58321  M01S35230.251l670 ---| RBT2     TA1    B3+UNCT,PUT CLEAR ENTRY
58322  M01S35231.251l670 ---|          TA3    B3+HSCT,PUT
58323  M01S35232.251l670 ---|          BX6    -X0*X1

Seq #  *Modification Id* Act 
----------------------------+
58324  M02S35233.251l670 ---|          BX7    X2*X3

Seq #  *Modification Id* Act 
----------------------------+
58325  M01S35234.251l670 ---|          SA6    A1

Seq #  *Modification Id* Act 
----------------------------+
58326  M02S00482.ns2783  ---|          MX5    48

Seq #  *Modification Id* Act 
----------------------------+
58327  M01S00483.251l670 +++|          BX7    X7-X7

Seq #  *Modification Id* Act 
----------------------------+
58328  M02S00484.ns2783  ---| RBT6     TA1    B3+UNCT,PUT CLEAR ENTRY

Seq #  *Modification Id* Act 
----------------------------+
58329  M01S00150.ns2783  +++| RBT6     TA1    B3+UNCT,PUT CLEAR INTERLOCK AND FLAGS

Seq #  *Modification Id* Act 
----------------------------+
58330  M01S00485.251l670 +++|          SX4    B3
58331  M01S00486.251l670 +++|          BX6    -X0*X1
58332  M01S00487.251l670 +++|          TA3    B3+HSCT,PUT
58333  M01S00488.251l670 +++|          AX4    PUTLS-FTTLS
58334  M01S00489.251l670 +++|          SA6    A1
58335  M01S00490.251l670 +++|          TA7    X4,FTT      CLEAR FTT ENTRY

Seq #  *Modification Id* Act 
----------------------------+
58336  M01S35235.ns2313a ---|          SA7    A3

Seq #  *Modification Id* Act 
----------------------------+
58337  M01S00002.ns2313a +++|          BX6    X2*X3
58338  M01S00003.ns2313a +++|          SA6    A3

Seq #  *Modification Id* Act 
----------------------------+
58339  M02S00004.ns2783  ---|          TA1    B3+PILL,PUT CLEAR INTERLOCKING PP *OA*

Seq #  *Modification Id* Act 
----------------------------+
58340  M03S00005.ns2783  ---|          BX6    X7*X1

Seq #  *Modification Id* Act 
----------------------------+
58341  M02S00491.ns2783  ---|          BX6    X5*X1

Seq #  *Modification Id* Act 
----------------------------+
58342  M02S00006.ns2783  ---|          SA6    A1
58343  M00S35236.cpumtr  +++|          SB3    B3+PUTL     INCREMENT INDEX

Seq #  *Modification Id* Act 
----------------------------+
58344  M01S35237.251l670 ---|          LT     B3,B2,RBT2  IF NOT END OF TABLE

Seq #  *Modification Id* Act 
----------------------------+
58345  M01S00492.251l670 +++|          LT     B3,B2,RBT6  IF NOT END OF TABLE
58346  M00S35238.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
58347  M01S35239.283l840 ---|*         CLEAN UP *HAT* AND *EMB*.
58348  M01S35240.283l840 ---|
58349  M01S35241.283l840 ---|          TA1    HATP,BDT    GET TABLE DESCRIPTOR
58350  M01S35242.283l840 ---|          LX1    -24
58351  M01S35243.283l840 ---|          SB3    B0          INITIALIZE INDEX

Seq #  *Modification Id* Act 
----------------------------+
58352  M02S35244.283l840 ---|          SB2    X1+EMBL     LENGTH OF TABLES
58353  M02S35245.283l840 ---|          ERRNZ  EMBP-HATP-1 INDEXES MUST BE CONSECUTIVE
58354  M02S35246.283l840 ---|          BX6    X6-X6

Seq #  *Modification Id* Act 
----------------------------+
58355  M02S01269.283l840 ---|          BX6    X6-X6
58356  M02S01270.283l840 ---|          SB2    X1+0

Seq #  *Modification Id* Act 
----------------------------+
58357  M01S35247.283l840 ---|          BX7    X7-X7

Seq #  *Modification Id* Act 
----------------------------+
58358  M02S35248.283l840 ---| RBT3     TA6    B3,HAT      CLEAR TABLE(S)

Seq #  *Modification Id* Act 
----------------------------+
58359  M02S00493.283l840 ---| RBT7     TA6    B3,HAT      CLEAR TABLE(S)

Seq #  *Modification Id* Act 
----------------------------+
58360  M01S35249.283l840 ---|          TA7    B3+1,HAT
58361  M01S35250.283l840 ---|          SB3    B3+2

Seq #  *Modification Id* Act 
----------------------------+
58362  M02S35251.283l840 ---|          LT     B3,B2,RBT3  IF NOT END OF TABLE(S)

Seq #  *Modification Id* Act 
----------------------------+
58363  M02S00494.283l840 ---|          LT     B3,B2,RBT7  IF NOT END OF TABLE(S)

Seq #  *Modification Id* Act 
----------------------------+
58364  M02S35252.283l840 ---|          SX6    B1          INITIALIZE *EMB* CONTROL WORD
58365  M02S35253.283l840 ---|          LX6    48
58366  M02S35254.283l840 ---|          TA6    EMB

Seq #  *Modification Id* Act 
----------------------------+
58367  M01S35255.283l840 ---|
58368  M00S35256.cpumtr  +++|*         CLEAN UP PLT.
58369  M00S35257.cpumtr  +++|
58370  M00S35258.cpumtr  +++|          SB2    PLTL        LENGTH OF TABLE

Seq #  *Modification Id* Act 
----------------------------+
58371  M01S35259.283l840 ---|          SB3    B0          INITIALIZE INDEX
58372  M01S35260.283l840 ---|          BX6    X6-X6

Seq #  *Modification Id* Act 
----------------------------+
58373  M01S01093.283l840 +++|          SB3    B0+         INITIALIZE INDEX
58374  M01S01094.283l840 +++|          SX7    B0+
58375  M01S01095.283l840 +++|          SX6    B0+

Seq #  *Modification Id* Act 
----------------------------+
58376  M01S35261.251l670 ---| RBT4     TA7    B3,PLT      CLEAR TABLE

Seq #  *Modification Id* Act 
----------------------------+
58377  M01S00495.251l670 +++| RBT8     TA7    B3,PLT      CLEAR TABLE
58378  M00S35262.cpumtr  +++|          TA6    B3+1,PLT
58379  M00S35263.cpumtr  +++|          SB3    B3+2

Seq #  *Modification Id* Act 
----------------------------+
58380  M01S35264.251l670 ---|          LT     B3,B2,RBT4  IF NOT END OF TABLE

Seq #  *Modification Id* Act 
----------------------------+
58381  M01S00496.251l670 +++|          LT     B3,B2,RBT8  IF NOT END OF TABLE

Seq #  *Modification Id* Act 
----------------------------+
58382  M01S01096.283l840 +++|          EQ     RBT         RETURN
58383  M01S01097.283l840 +++| RCB      SPACE  4,15
58384  M01S01098.283l840 +++|**        RCB - RECOVER CBT.
58385  M01S01099.283l840 +++|*
58386  M01S01100.283l840 +++|*         EXIT   (X6) = 0 IF NO ERROR.
58387  M01S01101.283l840 +++|*                (X6) .NE. 0 IF ERROR DETECTED.
58388  M01S01102.283l840 +++|*                BUFFER INTERLOCKS CLEARED.
58389  M01S01103.283l840 +++|*                I/0 ACTIVITY FLAGS AND UNIT QUEUE LINKAGE CLEARED.
58390  M01S01104.283l840 +++|*                READ BUFFERS DROPPED AND LINKED TO EMPTY LIST.
58391  M01S01105.283l840 +++|*                WRITE BUFFERS LINKED TO WRITE LIST.
58392  M01S01106.283l840 +++|*
58393  M01S01107.283l840 +++|*         USES   X - ALL.
58394  M01S01108.283l840 +++|*                A - 0, 1, 2, 3, 4, 6, 7.
58395  M01S01109.283l840 +++|*                B - 2, 3, 6, 7.
58396  M01S01110.283l840 +++|*
58397  M01S01111.283l840 +++|*         CALLS  /BUFIO/DCH, /BUFIO/LCC.
58398  M00S35265.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
58399  M01S01112.283l840 +++|
58400  M01S01113.283l840 +++| RCB9     SX6    1           SET ERROR STATUS
58401  M01S01114.283l840 +++|
58402  M01S01115.283l840 +++| RCB      PS                 ENTRY/EXIT
58403  M01S01116.283l840 +++|
58404  M00S35266.cpumtr  +++|*         CLEAN UP BUFFER MANAGER LIST POINTERS.
58405  M00S35267.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
58406  M01S35268.283l840 ---|          TA6    DWTB        DATA WRITTEN LIST
58407  M01S35269.283l840 ---|          TA6    DRDB        READ LIST
58408  M01S35270.283l840 ---|          TA6    WRTB        WRITE LIST
58409  M01S35271.283l840 ---|          EQ     RBT         RETURN
58410  M01S35272.283l840 ---| MEL      SPACE  4,10
58411  M01S35273.283l840 ---|**        MEL - MOVE ALL BUFFERS TO EMPTY LIST.
58412  M01S35274.283l840 ---|*
58413  M01S35275.283l840 ---|*         EXIT   (X2) = 0  IF NO ERROR(S) FOUND.

Seq #  *Modification Id* Act 
----------------------------+
58414  M01S01117.283l840 +++|          SX6    B0+
58415  M01S01118.283l840 +++|          TA6    EMTB        CLEAR EMPTY LIST POINTER
58416  M01S01119.283l840 +++|          TA6    DWTB        CLEAR DATA WRITTEN LIST POINTER
58417  M01S01120.283l840 +++|          TA6    DRDB        CLEAR READ LIST POINTER
58418  M01S01121.283l840 +++|          TA6    WRTB        CLEAR WRITE LIST POINTER
58419  M00S35276.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
58420  M01S01122.283l840 +++|*         DETERMINE BASE ADDRESS OF DATA BUFFERS.
58421  M00S35277.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
58422  M01S35278.283l840 ---| MEL      PS                 ENTRY/EXIT
58423  M01S35279.283l840 ---|          SX2    B1          PRESET ERROR FOUND
58424  M01S35280.283l840 ---|          SB7    A0          SAVE (A0)

Seq #  *Modification Id* Act 
----------------------------+
58425  M01S01123.283l840 +++|          SB7    A0+         SAVE (A0)
58426  M00S35281.cpumtr  +++|          SA0    IBOE        CM BUFFER

Seq #  *Modification Id* Act 
----------------------------+
58427  M01S35282.252l678 ---|          TX0    SLDE+ETLT*100B+IBDT,ECLT  *IBDT* ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
58428  M01S01271.252l678 +++|          TX0    ETLT*100B+IBDT,ECLT
58429  M01S01272.252l678 +++|          TX0    X0,TCNT     *IBDT* ADDRESS
58430  M00S35283.cpumtr  +++|          SX1    A0
58431  M00S35284.cpumtr  +++|          LX1    30
58432  M00S35285.cpumtr  +++|          BX0    X0+X1
58433  M00S35286.cpumtr  +++|          RE     MXMF        READ *IBDT*

Seq #  *Modification Id* Act 
----------------------------+
58434  M01S35287.283l840 ---|          EQ     MEL         RETURN ERROR ON HALF-EXIT

Seq #  *Modification Id* Act 
----------------------------+
58435  M01S01124.283l840 +++|          EQ     RCB9        RETURN ERROR ON HALF-EXIT
58436  M00S35288.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
58437  M01S35289.283l840 ---|*         SEARCH *IBDT* FOR PROPER MACHINE ID.
58438  M01S35290.283l840 ---|
58439  M00S35291.cpumtr  +++|          SA3    A0-B1

Seq #  *Modification Id* Act 
----------------------------+
58440  M01S35292.283l840 ---|          SA4    MMFL

Seq #  *Modification Id* Act 
----------------------------+
58441  M01S01125.283l840 +++|          SA4    MMFL        GET MACHINE ID
58442  M00S35293.cpumtr  +++|          MX0    12
58443  M00S35294.cpumtr  +++|          SB2    MXMF        LENGTH OF *IBDT*
58444  M00S35295.cpumtr  +++|          SA0    B7          RESTORE (A0)

Seq #  *Modification Id* Act 
----------------------------+
58445  M01S35296.283l840 ---| MEL1     SA3    A3+B1       NEXT ENTRY
58446  M01S35297.283l840 ---|          BX5    X3-X4

Seq #  *Modification Id* Act 
----------------------------+
58447  M01S01126.283l840 +++| RCB1     SA3    A3+1        NEXT ENTRY
58448  M01S01127.283l840 +++|          BX5    X3-X4       CHECK MACHINE ID
58449  M00S35298.cpumtr  +++|          BX5    X0*X5

Seq #  *Modification Id* Act 
----------------------------+
58450  M01S35299.283l840 ---|          ZR     X5,MEL2     IF ID MATCH
58451  M01S35300.283l840 ---|          SB2    B2-B1
58452  M01S35301.283l840 ---|          NZ     B2,MEL1     IF NOT END OF TABLE
58453  M01S35302.283l840 ---|          EQ     MEL         RETURN ERROR

Seq #  *Modification Id* Act 
----------------------------+
58454  M01S01128.283l840 +++|          ZR     X5,RCB2     IF THIS MACHINE
58455  M01S01129.283l840 +++|          SB2    B2-1
58456  M01S01130.283l840 +++|          NZ     B2,RCB1     IF NOT END OF TABLE
58457  M01S01131.283l840 +++|          EQ     RCB9        RETURN ERROR
58458  M00S35303.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
58459  M01S35304.283l840 ---| MEL2     MX0    -12

Seq #  *Modification Id* Act 
----------------------------+
58460  M01S01132.283l840 +++| RCB2     MX0    -12
58461  M00S35305.cpumtr  +++|          LX3    -12

Seq #  *Modification Id* Act 
----------------------------+
58462  M01S35306.252l678 ---|          BX0    -X0*X3      FWA/1000B OF CONTROL BUFFERS
58463  M01S35307.252l678 ---|          LX0    9

Seq #  *Modification Id* Act 
----------------------------+
58464  M02S01273.283l840 ---|          BX0    -X0*X3      FWA/*EMBS* OF CONTROL BUFFERS
58465  M02S01274.283l840 ---|          TLX0   9,TNSC

Seq #  *Modification Id* Act 
----------------------------+
58466  M01S35308.283l840 ---|          SB6    B1          INITIALIZE CONTROL BUFFER ORDINAL
58467  M01S35309.283l840 ---|          SX1    PSLB*1000B  LENGTH OF I/O BUFFER
58468  M01S35310.283l840 ---|          TB2    NIOB        NUMBER OF I/O BUFFERS
58469  M01S35311.283l840 ---|          SX4    B1
58470  M01S35312.283l840 ---|          LX4    21          PRESET EMPTY LIST INDEX
58471  M01S35313.283l840 ---|          SB3    CBTL        PRESET INDEX
58472  M01S35314.283l840 ---| MEL3     TA5    B3+IOLK,CBT
58473  M01S35315.283l840 ---|          LX5    59-57
58474  M01S35316.283l840 ---|          NG     X5,MEL8     IF WRITE DATA IN BUFFER
58475  M01S35317.283l840 ---|          LX5    59-54-59+57

Seq #  *Modification Id* Act 
----------------------------+
58476  M02S35318.283l840 ---|          NG     X5,MEL      IF RECOVERED FLAG SET, RETURN ERROR
58477  M02S35319.283l840 ---|          BX6    X6-X6

Seq #  *Modification Id* Act 
----------------------------+
58478  M02S00008.283l840 ---|          PL     X5,MEL3.1   IF RECOVERED FLAG NOT SET
58479  M02S00009.283l840 ---|          SA5    REML        SET RECOVERY ERROR

Seq #  *Modification Id* Act 
----------------------------+
58480  M01S01133.283l840 +++|          BX7    -X0*X3
58481  M01S01134.283l840 +++|          TLX7   9,TNSC      FWA OF I/O BUFFERS
58482  M01S01135.283l840 +++|          SB3    RCBA        SET REGISTER SAVE BUFFER ADDRESS
58483  M01S01136.283l840 +++|          SX1    LSLB*100B
58484  M01S01137.283l840 +++|          SX0    B0+         INITIALIZE BUFFER ORDINAL
58485  M01S01138.283l840 +++|          IX7    X7-X1       INITIALIZE BUFER ADDRESS
58486  M01S01139.283l840 +++|
58487  M01S01140.283l840 +++|*         CHECK NEXT BUFFER.
58488  M01S01141.283l840 +++|
58489  M01S01142.283l840 +++| RCB3     SX1    LSLB*100B
58490  M01S01143.283l840 +++|          SX0    X0+B1       ADVANCE CBT ORDINAL
58491  M01S01144.283l840 +++|          IX7    X7+X1       ADVANCE DATA BUFFER ADDRESS
58492  M01S01145.283l840 +++|          BX5    X0
58493  M01S01146.283l840 +++|          TX6    X0-1,-NIOB
58494  M01S01147.283l840 +++|          LX5    CBTLS       SET CBT OFFSET
58495  M01S01148.283l840 +++|          ZR     X6,RCB      IF ALL BUFFERS PROCESSED
58496  M01S01149.283l840 +++|          TA1    X5+IOLK,CBT
58497  M01S01150.283l840 +++|          TA2    X5+HSLK,CBT
58498  M01S01151.283l840 +++|          SX6    B0+
58499  M01S01152.283l840 +++|          TA6    X5+LSLK,CBT CLEAR LIST LINKAGE AND FLAGS
58500  M01S01153.283l840 +++|          MX6    -48
58501  M01S01154.283l840 +++|          LX1    59-57
58502  M01S01155.283l840 +++|          BX6    -X6*X2      CLEAR *HSLK* FLAGS
58503  M01S01156.283l840 +++|          SA6    A2
58504  M01S01157.283l840 +++|          PL     X1,RCB5     IF NO WRITE DATA IN BUFFER
58505  M01S01158.283l840 +++|
58506  M01S01159.283l840 +++|*         PROCESS WRITE BUFFER.
58507  M01S01160.283l840 +++|
58508  M01S01161.283l840 +++|          LX1    59-54-59+57
58509  M01S01162.283l840 +++|          NG     X1,RCB4     IF RECOVERED FLAG SET
58510  M01S01163.283l840 +++|          SA2    REML        SET ERROR FLAG
58511  M01S01164.283l840 +++|          SX6    WLNL        *NON-LINKED WRITE BUFFER.*
58512  M01S01165.283l840 +++|          BX6    X6+X2
58513  M01S01166.283l840 +++|          SA6    A2
58514  M01S01167.283l840 +++| RCB4     LX1    54-54-59+54 RESTORE *IOLK*
58515  M01S01168.283l840 +++|          MX3    -24
58516  M01S01169.283l840 +++|          BX3    -X3*X1      DATA BUFFER ADDRESS
58517  M01S01170.283l840 +++|          BX3    X3-X7
58518  M01S01171.283l840 +++|          NZ     X3,RCB9     IF DATA BUFFER ADDRESS INCORRECT
58519  M01S01172.283l840 +++|          SX6    B1
58520  M01S01173.283l840 +++|          LX6    57-0
58521  M01S01174.283l840 +++|          BX6    X6+X7       SET WRITE FLAG AND BUFFER ADDRESS
58522  M01S01175.283l840 +++|          SA6    A1          UPDATE *IOLK*
58523  M01S01176.283l840 +++|          TX1    WRTB        SET WRITE LIST
58524  M01S01177.283l840 +++|          EQ     RCB8        LINK BUFFER TO WRITE LIST
58525  M01S01178.283l840 +++|
58526  M01S01179.283l840 +++|*         PROCESS READ BUFFER.
58527  M01S01180.283l840 +++|
58528  M01S01181.283l840 +++| RCB5     LX1    59-54-59+57
58529  M01S01182.283l840 +++|          PL     X1,RCB6     IF RECOVERED FLAG NOT SET
58530  M01S01183.283l840 +++|          SA2    REML        SET RECOVERY ERROR

Seq #  *Modification Id* Act 
----------------------------+
58531  M01S00010.ns2363  +++|          SX6    WLRD        *READ DATA ON WRITE LIST.*

Seq #  *Modification Id* Act 
----------------------------+
58532  M02S00011.283l840 ---|          BX6    X5+X6
58533  M02S00012.283l840 ---|          SA6    A5
58534  M02S00013.283l840 ---| MEL3.1   BX6    X6-X6

Seq #  *Modification Id* Act 
----------------------------+
58535  M01S35320.283l840 ---|          BX7    X7-X7
58536  M01S35321.283l840 ---|          TA6    B3+PAD1,CBT CLEAN UP BUFFER
58537  M01S35322.283l840 ---|          TA7    B3+PAD2,CBT
58538  M01S35323.283l840 ---|          TA6    B3+PAD3,CBT
58539  M01S35324.283l840 ---|          TA7    B3+PAD4,CBT
58540  M01S35325.283l840 ---|          TA6    B3+FSTC,CBT
58541  M01S35326.283l840 ---|          BX7    X0
58542  M01S35327.283l840 ---|          BX6    X4
58543  M01S35328.283l840 ---|          TA7    B3+IOLK,CBT
58544  M01S35329.283l840 ---|          TA6    B3+HSLK,CBT
58545  M01S35330.283l840 ---| MEL4     SX6    B6-B1       BACKWARD LINK
58546  M01S35331.283l840 ---|          SB6    B6+B1
58547  M01S35332.283l840 ---|          SX7    B6          FORWARD LINK
58548  M01S35333.283l840 ---|          LX6    36
58549  M01S35334.283l840 ---|          LX7    24
58550  M01S35335.283l840 ---|          BX7    X7+X6
58551  M01S35336.283l840 ---|          TA7    B3+LSLK,CBT
58552  M01S35337.283l840 ---|          SB3    B3+CBTL     INCREMENT INDEX
58553  M01S35338.283l840 ---|          IX0    X0+X1       INCREMENT I/O BUFFER ADDRESS
58554  M01S35339.283l840 ---|          LE     B6,B2,MEL3  IF NOT END OF TABLE
58555  M01S35340.283l840 ---|          AX7    36          CLEAR FORWARD LINK OF LAST BUFFER
58556  M01S35341.283l840 ---|          LX7    36
58557  M01S35342.283l840 ---|          SA7    A7
58558  M01S35343.283l840 ---|          SX6    B6-B1       BUILD EMPTY LIST POINTER(S)
58559  M01S35344.283l840 ---|          LX6    18
58560  M01S35345.283l840 ---|          BX2    X6+X2
58561  M01S35346.283l840 ---|          LX6    18
58562  M01S35347.283l840 ---|          BX6    X6+X2
58563  M01S35348.283l840 ---|          TA6    EMTB

Seq #  *Modification Id* Act 
----------------------------+
58564  M01S01184.283l840 +++|          BX6    X2+X6
58565  M01S01185.283l840 +++|          SA6    A2
58566  M01S01186.283l840 +++| RCB6     SX6    B0
58567  M01S01187.283l840 +++|          TA6    X5+PAD1,CBT CLEAN UP BUFFER
58568  M01S01188.283l840 +++|          SA6    A6+B1
58569  M01S01189.283l840 +++|          ERRNZ  PAD2-PAD1-1
58570  M01S01190.283l840 +++|          SA6    A6+B1
58571  M01S01191.283l840 +++|          ERRNZ  PAD3-PAD2-1
58572  M01S01192.283l840 +++|          SA6    A6+B1
58573  M01S01193.283l840 +++|          ERRNZ  PAD4-PAD3-1

Seq #  *Modification Id* Act 
----------------------------+
58574  M02S01194.284l847 ---|          TA6    X5+FSTC,CBT

Seq #  *Modification Id* Act 
----------------------------+
58575  M01S01195.283l840 +++|          TA7    X5+IOLK,CBT SET BUFFER ADDRESS
58576  M01S01196.283l840 +++|          SB6    RCB7        SET *DCH* RETURN ADDRESS
58577  M01S01197.283l840 +++|          EQ     /BUFIO/DCH  DELINK BUFFER FROM HASH LIST
58578  M00S35349.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
58579  M01S35350.283l840 ---|*         PUT ALL BUFFERS WITH WRITE DATA ON UNIT I/O QUEUE.

Seq #  *Modification Id* Act 
----------------------------+
58580  M01S01198.283l840 +++| RCB7     TX1    EMTB        SET EMPTY LIST
58581  M00S35351.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
58582  M01S35352.283l840 ---|          SA5    MELA        PRESET *IOC* TO RETURN HERE

Seq #  *Modification Id* Act 
----------------------------+
58583  M02S35353.283l840 ---|          SA3    /BUFIO/IOC6

Seq #  *Modification Id* Act 
----------------------------+
58584  M02S00497.283l840 ---|          SA3    /BUFIO/IOCA

Seq #  *Modification Id* Act 
----------------------------+
58585  M01S35354.283l840 ---|          SA4    /BUFIO/IOCX
58586  M01S35355.283l840 ---|          BX6    X5
58587  M01S35356.283l840 ---|          SA6    A3
58588  M01S35357.283l840 ---|          SA6    A4
58589  M01S35358.283l840 ---|          BX7    X3
58590  M01S35359.283l840 ---|          BX6    X4
58591  M01S35360.283l840 ---|          SA7    A5
58592  M01S35361.283l840 ---|          SA6    A5+B1
58593  M01S35362.283l840 ---|          SB2    CBTL        INITIALIZE INDEX
58594  M01S35363.283l840 ---| MEL5     TA5    B2+IOLK,CBT
58595  M01S35364.283l840 ---|          LX5    59-57
58596  M01S35365.283l840 ---|          NG     X5,MEL7     IF WRITE DATA IN BUFFER
58597  M01S35366.283l840 ---| MEL6     SB2    B2+CBTL     INCREMENT INDEX
58598  M01S35367.283l840 ---|          SX6    B2
58599  M01S35368.283l840 ---|          AX6    CBTLS
58600  M01S35369.283l840 ---|          TX7    NIOB        NUMBER OF I/O BUFFERS
58601  M01S35370.283l840 ---|          IX6    X7-X6
58602  M01S35371.283l840 ---|          PL     X6,MEL5     IF NOT END OF TABLE
58603  M01S35372.283l840 ---|          SA3    MELA        RESTORE *IOC*
58604  M01S35373.283l840 ---|          SA4    MELA+1
58605  M01S35374.283l840 ---|          BX6    X3
58606  M01S35375.283l840 ---|          BX7    X4

Seq #  *Modification Id* Act 
----------------------------+
58607  M02S35376.283l840 ---|          SA6    /BUFIO/IOC6

Seq #  *Modification Id* Act 
----------------------------+
58608  M02S00498.283l840 ---|          SA6    /BUFIO/IOCA

Seq #  *Modification Id* Act 
----------------------------+
58609  M01S35377.283l840 ---|          SA7    /BUFIO/IOCX
58610  M01S35378.283l840 ---|          SX2    B0          SET NO ERROR
58611  M01S35379.283l840 ---|          EQ     MEL         RETURN

Seq #  *Modification Id* Act 
----------------------------+
58612  M01S01199.283l840 +++|*         LINK BUFFER TO WRITE OR EMPTY LIST.
58613  M00S35380.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
58614  M01S35381.ns2363  ---|*         WRITE DATA IN BUFFER, PUT IN UNIT I/O QUEUE IF NECESSARY.

Seq #  *Modification Id* Act 
----------------------------+
58615  M02S00014.283l840 ---|*         WRITE DATA IN BUFFER, PUT IN UNIT I/O QUEUE.

Seq #  *Modification Id* Act 
----------------------------+
58616  M01S01200.283l840 +++| RCB8     SB6    RCB3        SET *LCC* RETURN ADDRESS
58617  M01S01201.283l840 +++|          EQ     /BUFIO/LCC  SET LIST LINKAGE
58618  M00S35382.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
58619  M01S35383.ns2363  ---| MEL7     LX5    57-59
58620  M01S35384.ns2363  ---|          NG     X5,MEL6     IF I/O INTERLOCK ALREADY SET
58621  M01S35385.ns2363  ---|          SX2    B2          SET CONTROL BUFFER NUMBER

Seq #  *Modification Id* Act 
----------------------------+
58622  M02S00015.283l840 ---| MEL7     SX2    B2          SET CONTROL BUFFER NUMBER

Seq #  *Modification Id* Act 
----------------------------+
58623  M01S35386.283l840 ---|          AX2    CBTLS
58624  M01S35387.283l840 ---|          EQ     /BUFIO/IOC  INSERT BUFFER IN UNIT I/O QUEUE
58625  M00S35388.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
58626  M01S35389.283l840 ---|*         WRITE DATA IN BUFFER, CLEAN UP AND VERIFY.
58627  M01S35390.283l840 ---|
58628  M01S35391.283l840 ---| MEL8     LX5    59-54-59+57

Seq #  *Modification Id* Act 
----------------------------+
58629  M02S35392.283l840 ---|          PL     X5,MEL      IF RECOVERED FLAG NOT SET
58630  M02S35393.283l840 ---|          LX5    54-59

Seq #  *Modification Id* Act 
----------------------------+
58631  M02S00016.283l840 ---|          NG     X5,MEL9     IF RECOVERED FLAG SET
58632  M02S00017.283l840 ---|          SA3    REML        SET ERROR FLAG
58633  M02S00018.283l840 ---|          SX6    WLNL        *NON-LINKED WRITE BUFFER.*
58634  M02S00019.283l840 ---|          BX6    X6+X3
58635  M02S00020.283l840 ---|          SA6    A3
58636  M02S00021.283l840 ---| MEL9     LX5    54-59

Seq #  *Modification Id* Act 
----------------------------+
58637  M01S35394.283l840 ---|          MX3    -24
58638  M01S35395.283l840 ---|          BX3    -X3*X5
58639  M01S35396.283l840 ---|          BX3    X3-X0
58640  M01S35397.283l840 ---|          NZ     X3,MEL      IF I/O BUFFER ADDRESS INCORRECT
58641  M01S35398.283l840 ---|          SX3    2777B       CLEAN UP *IOLK*
58642  M01S35399.283l840 ---|          LX3    -12
58643  M01S35400.283l840 ---|          BX6    -X3*X5
58644  M01S35401.283l840 ---|          SA6    A5
58645  M01S35402.283l840 ---|          TA5    B3+HSLK,CBT CLEAN UP *HSLK*
58646  M01S35403.283l840 ---|          MX3    -12
58647  M01S35404.283l840 ---|          BX6    -X3*X5      *PUT* ORDINAL
58648  M01S35405.283l840 ---|          BX6    X4+X6       INSERT EMPTY LIST INDEX
58649  M01S35406.283l840 ---|          SA6    A5
58650  M01S35407.283l840 ---|          EQ     MEL4        FINISH BUFFER AND CHECK NEXT ONE
58651  M01S35408.283l840 ---|
58652  M01S35409.283l840 ---|
58653  M01S35410.283l840 ---| MELA     EQ     MEL6        *IOC* RETURN ADDRESS
58654  M01S35411.283l840 ---|          BSS    1           SAVE AREA
58655  M01S35412.283l840 ---|          ERRNZ  *-MELA-2    WORDS MUST BE CONSECUTIVE

Seq #  *Modification Id* Act 
----------------------------+
58656  M01S01202.283l840 +++| RCBA     BSS    2           REGISTER SAVE BUFFER
58657  M00S35413.cpumtr  +++| VUQ      SPACE  4,10
58658  M00S35414.cpumtr  +++|**        VUQ - VALIDATE UNIT I/O QUEUE(S).

Seq #  *Modification Id* Act 
----------------------------+
58659  M01S35415.ns2363  ---|*
58660  M01S35416.ns2363  ---|*         EXIT   (X2) = 0  IF NO ERROR(S) FOUND.
58661  M00S35417.cpumtr  +++|
58662  M00S35418.cpumtr  +++|
58663  M00S35419.cpumtr  +++| VUQ      PS                 ENTRY/EXIT

Seq #  *Modification Id* Act 
----------------------------+
58664  M01S00022.ns2363  +++|          SA1    REML        CLEAR PREVIOUS ERRORS
58665  M01S00023.ns2363  +++|          MX7    48
58666  M01S00024.ns2363  +++|          BX7    X7*X1
58667  M01S00025.ns2363  +++|          SA7    A1
58668  M00S35420.cpumtr  +++|
58669  M00S35421.cpumtr  +++|*         SCAN PUT(S), DELETING READ REQUEST(S) FROM QUEUE(S).
58670  M00S35422.cpumtr  +++|
58671  M00S35423.cpumtr  +++|          TA1    PUTP,BDT    TABLE DESCRIPTOR
58672  M00S35424.cpumtr  +++|          LX1    -24
58673  M00S35425.cpumtr  +++|          SB2    X1          LENGTH OF TABLE(S)
58674  M00S35426.cpumtr  +++|          SB6    PUTL        INITIALIZE INDEX
58675  M00S35427.cpumtr  +++|          MX6    -12
58676  M00S35428.cpumtr  +++| VUQ1     TA2    B6+UNCT,PUT READ QUEUE CONTROL

Seq #  *Modification Id* Act 
----------------------------+
58677  M01S35429.ns2363  ---|          SB4    B0          INITIALIZE REQUEST COUNT

Seq #  *Modification Id* Act 
----------------------------+
58678  M02S00026.ns2783  ---|          SA3    A2+PILL-UNCT  CLEAR PREVIOUS ERRORS
58679  M02S00027.ns2783  ---|          MX7    -48
58680  M02S00028.ns2783  ---|          BX7    -X7*X3
58681  M02S00029.ns2783  ---|          SA7    A3

Seq #  *Modification Id* Act 
----------------------------+
58682  M01S00151.ns2783  +++|          BX7    X7-X7
58683  M01S00152.ns2783  +++|          SA7    A2+PILL-UNCT  CLEAR PREVIOUS ERRORS, INTERLOCK, FLAGS

Seq #  *Modification Id* Act 
----------------------------+
58684  M01S00030.ns2363  +++|          MX7    24          CLEAR I/O QUEUE
58685  M01S00031.ns2363  +++|          BX7    X7*X2
58686  M01S00032.ns2363  +++|          SA7    A2
58687  M00S35430.cpumtr  +++|          LX2    -24
58688  M00S35431.cpumtr  +++|          BX3    -X6*X2
58689  M00S35432.cpumtr  +++|          LX2    24
58690  M00S35433.cpumtr  +++|          BX0    -X6*X2      FIRST
58691  M00S35434.cpumtr  +++|          LX0    CBTLS

Seq #  *Modification Id* Act 
----------------------------+
58692  M01S35435.ns2363  ---|          ZR     X3,VUQ7     IF QUEUE SIZE .EQ. 0
58693  M01S35436.ns2363  ---|          ZR     X0,VUQ      IF FIRST .EQ. 0

Seq #  *Modification Id* Act 
----------------------------+
58694  M01S00033.ns2363  +++|          NZ     X3,VUQ1.1   IF QUEUE SIZE .NE. 0
58695  M01S00034.ns2363  +++|
58696  M01S00035.ns2363  +++|*         QUEUE SIZE IS ZERO - VERIFY IT IS EMPTY.
58697  M01S00036.ns2363  +++|
58698  M01S00037.ns2363  +++|          MX3    -24
58699  M01S00038.ns2363  +++|          BX2    -X3*X2
58700  M01S00039.ns2363  +++|          ZR     X2,VUQ6     IF FIRST AND CURRENT .EQ. 0
58701  M01S00040.ns2363  +++|          SA3    A2+PILL-UNCT  SET ERROR FLAG
58702  M01S00041.ns2363  +++|          SX7    IOQS        *I/O QUEUE SIZE.*
58703  M01S00042.ns2363  +++|          LX7    48
58704  M01S00043.ns2363  +++|          BX7    X7+X3
58705  M01S00044.ns2363  +++|          SA7    A3
58706  M01S00045.ns2363  +++| VUQ1.1   ZR     X0,VUQ      IF FIRST .EQ. 0
58707  M00S35437.cpumtr  +++|          TA3    X0+IOLK,CBT
58708  M00S35438.cpumtr  +++|          LX3    -36
58709  M00S35439.cpumtr  +++|          BX2    -X6*X3

Seq #  *Modification Id* Act 
----------------------------+
58710  M01S35440.ns2363  ---|          NZ     X2,VUQ      IF BACKWARD LINK OF FIRST BUFFER .NE. 0

Seq #  *Modification Id* Act 
----------------------------+
58711  M01S00046.ns2363  +++|          NZ     X2,VUQ8     IF BACKWARD LINK OF FIRST BUFFER .NE. 0
58712  M00S35441.cpumtr  +++| VUQ2     TA3    X0+IOLK,CBT READ BUFFER
58713  M00S35442.cpumtr  +++|          LX3    -24
58714  M00S35443.cpumtr  +++|          BX7    X0
58715  M00S35444.cpumtr  +++|          BX0    -X6*X3      NEXT BUFFER
58716  M00S35445.cpumtr  +++|          ZR     X0,VUQ3     IF END OF QUEUE
58717  M00S35446.cpumtr  +++|          AX7    CBTLS
58718  M00S35447.cpumtr  +++|          LX0    CBTLS
58719  M00S35448.cpumtr  +++|          TA4    X0+IOLK,CBT CHECK BACKWARD LINK OF NEXT BUFFER
58720  M00S35449.cpumtr  +++|          LX4    -36
58721  M00S35450.cpumtr  +++|          BX4    -X6*X4
58722  M00S35451.cpumtr  +++|          BX2    X4-X7

Seq #  *Modification Id* Act 
----------------------------+
58723  M01S35452.ns2363  ---|          NZ     X2,VUQ      IF BACKWARD LINK NOT CORRECT

Seq #  *Modification Id* Act 
----------------------------+
58724  M01S00047.ns2363  +++|          NZ     X2,VUQ8     IF BACKWARD LINK NOT CORRECT
58725  M00S35453.cpumtr  +++| VUQ3     LX3    59-57+24

Seq #  *Modification Id* Act 
----------------------------+
58726  M01S35454.ns2363  ---|          NG     X3,VUQ4     IF WRITE DATA IN BUFFER
58727  M01S35455.ns2363  ---|          SB3    VUQ5        *DLB* RETURN ADDRESS
58728  M01S35456.ns2363  ---|          SA3    A3-IOLK     CONTROL BUFFER ADDRESS
58729  M01S35457.ns2363  ---|          SB5    B0          *DLB* CONTROL
58730  M01S35458.ns2363  ---|          SA2    A2          PUT ADDRESS
58731  M01S35459.ns2363  ---|          EQ     /BUFIO/DLB  DELETE BUFFER FROM I/O QUEUE

Seq #  *Modification Id* Act 
----------------------------+
58732  M01S00048.ns2363  +++|          PL     X3,VUQ5     IF NOT WRITE DATA IN BUFFER
58733  M00S35460.cpumtr  +++|
58734  M00S35461.cpumtr  +++|*         WRITE DATA FOUND IN BUFFER.
58735  M00S35462.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
58736  M01S35463.ns2363  ---| VUQ4     SA4    A3+HSLK-IOLK  GET *PUT* ORDINAL
58737  M01S35464.ns2363  ---|          SB4    B4+B1       INCREMENT REQUEST COUNT

Seq #  *Modification Id* Act 
----------------------------+
58738  M01S00049.ns2363  +++|          SA4    A3+HSLK-IOLK  GET *PUT* ORDINAL
58739  M00S35465.cpumtr  +++|          SX5    B6
58740  M00S35466.cpumtr  +++|          BX4    -X6*X4
58741  M00S35467.cpumtr  +++|          AX5    PUTLS
58742  M00S35468.cpumtr  +++|          BX4    X5-X4

Seq #  *Modification Id* Act 
----------------------------+
58743  M01S35469.ns2363  ---|          SX2    B1          PRESET ERROR
58744  M01S35470.ns2363  ---|          NZ     X4,VUQ      IF PUT ORDINAL INCORRECT

Seq #  *Modification Id* Act 
----------------------------+
58745  M01S00050.ns2363  +++|          NZ     X4,VUQ10    IF PUT ORDINAL INCORRECT
58746  M00S35471.cpumtr  +++|          LX3    59-54-59+57

Seq #  *Modification Id* Act 
----------------------------+
58747  M01S35472.ns2363  ---|          NG     X3,VUQ      IF RECOVERED FLAG ALREADY SET

Seq #  *Modification Id* Act 
----------------------------+
58748  M01S00051.ns2363  +++|          NG     X3,VUQ8     IF RECOVERED FLAG ALREADY SET
58749  M00S35473.cpumtr  +++|          MX7    1
58750  M00S35474.cpumtr  +++|          BX7    X3+X7       SET RECOVERED FLAG
58751  M00S35475.cpumtr  +++|          LX7    54-59

Seq #  *Modification Id* Act 
----------------------------+
58752  M01S35476.ns2363  ---|          PL     X7,VUQ      IF I/O INTERLOCK NOT SET

Seq #  *Modification Id* Act 
----------------------------+
58753  M01S00052.ns2363  +++|          PL     X7,VUQ8     IF I/O INTERLOCK NOT SET
58754  M00S35477.cpumtr  +++|          SA7    A3
58755  M00S35478.cpumtr  +++| VUQ5     MX6    -12
58756  M00S35479.cpumtr  +++|          NZ     X0,VUQ2     IF NOT END OF QUEUE

Seq #  *Modification Id* Act 
----------------------------+
58757  M01S35480.ns2363  ---|
58758  M01S35481.ns2363  ---|*         END OF QUEUE FOUND, VERIFY SIZE.
58759  M01S35482.ns2363  ---|
58760  M01S35483.ns2363  ---|          SA4    A2          GET QUEUE CONTROL
58761  M01S35484.ns2363  ---|          BX5    -X6*X4      FIRST
58762  M01S35485.ns2363  ---|          LX4    -24
58763  M01S35486.ns2363  ---|          BX3    -X6*X4      QUEUE SIZE
58764  M01S35487.ns2363  ---|          SX7    B4          WRITE BUFFER(S) LEFT ON QUEUE
58765  M01S35488.ns2363  ---|          BX3    X3-X7
58766  M01S35489.ns2363  ---|          SX2    B1          PRESET ERROR
58767  M01S35490.ns2363  ---|          NZ     X3,VUQ      IF SIZE NOT CORRECT
58768  M01S35491.ns2363  ---|          LX4    12
58769  M01S35492.ns2363  ---|          BX7    X6*X4       CLEAR CURRENT
58770  M01S35493.ns2363  ---|          BX7    X7+X5       INSERT FIRST AS CURRENT
58771  M01S35494.ns2363  ---|          LX7    12
58772  M01S35495.ns2363  ---|          SA7    A4
58773  M00S35496.cpumtr  +++| VUQ6     SB6    B6+PUTL     INCREMENT *PUT* INDEX
58774  M00S35497.cpumtr  +++|          LT     B6,B2,VUQ1  IF NOT END OF *PUT*-S

Seq #  *Modification Id* Act 
----------------------------+
58775  M01S35498.ns2363  ---|          SX2    B0          CLEAR ERROR INDICATION
58776  M00S35499.cpumtr  +++|          EQ     VUQ         RETURN
58777  M00S35500.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
58778  M01S35501.ns2363  ---|*         QUEUE SIZE IS ZERO - VERIFY IT IS EMPTY.
58779  M01S35502.ns2363  ---|
58780  M01S35503.ns2363  ---| VUQ7     MX3    -24
58781  M01S35504.ns2363  ---|          BX2    -X3*X2
58782  M01S35505.ns2363  ---|          ZR     X2,VUQ6     IF FIRST AND CURRENT .EQ. 0
58783  M01S35506.ns2363  ---|          EQ     VUQ         RETURN ERROR

Seq #  *Modification Id* Act 
----------------------------+
58784  M01S00053.ns2363  +++|
58785  M01S00054.ns2363  +++| VUQ8     SX7    IOQL        * I/O QUEUE LINKAGE.*
58786  M01S00055.ns2363  +++| VUQ9     LX7    48
58787  M01S00056.ns2363  +++|          SA3    A2+PILL-UNCT  SET ERROR FLAG
58788  M01S00057.ns2363  +++|          BX7    X7+X3
58789  M01S00058.ns2363  +++|          SA7    A3
58790  M01S00059.ns2363  +++|          EQ     VUQ6        CHECK NEXT *PUT*
58791  M01S00060.ns2363  +++|
58792  M01S00061.ns2363  +++| VUQ10    SX7    IOQP        * I/O QUEUE *PUT* ORDINAL.*
58793  M01S00062.ns2363  +++|          EQ     VUQ9        CONTINUE
58794  M00S35507.cpumtr  +++| VWL      SPACE  4,10
58795  M00S35508.cpumtr  +++|**        VWL - VALIDATE WRITE LIST.

Seq #  *Modification Id* Act 
----------------------------+
58796  M01S35509.ns2363  ---|*
58797  M01S35510.ns2363  ---|*         EXIT   (X2) = 0  IF NO ERROR(S) FOUND.
58798  M00S35511.cpumtr  +++|
58799  M00S35512.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
58800  M01S00063.ns2363  +++| VWL7     SA1    REML        SET ERROR FLAG
58801  M01S00064.ns2363  +++|          BX7    X7+X1
58802  M01S00065.ns2363  +++|          SA7    A1
58803  M01S00066.ns2363  +++|
58804  M00S35513.cpumtr  +++| VWL      PS                 ENTRY/EXIT
58805  M00S35514.cpumtr  +++|          TA2    WRTB        WRITE LIST POINTER(S)
58806  M00S35515.cpumtr  +++|          LX2    -36
58807  M00S35516.cpumtr  +++|          SB2    X2          BUFFER COUNT
58808  M00S35517.cpumtr  +++|          ZR     B2,VWL      IF NO WRITE BUFFERS

Seq #  *Modification Id* Act 
----------------------------+
58809  M01S35518.ns2363  ---|          SX2    B1          PRESET ERROR FOUND
58810  M00S35519.cpumtr  +++|          TA1    WRTB
58811  M00S35520.cpumtr  +++|          SX3    X1          FIRST
58812  M00S35521.cpumtr  +++|          SB4    B0          PRESET BUFFER COUNT
58813  M00S35522.cpumtr  +++|          SX5    B0          PRESET BACKWARD LINK
58814  M00S35523.cpumtr  +++|          MX0    -12

Seq #  *Modification Id* Act 
----------------------------+
58815  M01S35524.ns2363  ---|          ZR     X3,VWL      IF FIRST BUFFER .EQ. 0

Seq #  *Modification Id* Act 
----------------------------+
58816  M01S00067.ns2363  +++|          ZR     X3,VWL3     IF FIRST BUFFER .EQ. 0
58817  M00S35525.cpumtr  +++| VWL1     LX3    CBTLS
58818  M00S35526.cpumtr  +++|          TA3    X3+LSLK,CBT READ BUFFER
58819  M00S35527.cpumtr  +++|          LX3    -36
58820  M00S35528.cpumtr  +++|          BX4    -X0*X3
58821  M00S35529.cpumtr  +++|          BX5    X5-X4

Seq #  *Modification Id* Act 
----------------------------+
58822  M01S35530.ns2363  ---|          NZ     X5,VWL      IF BACKWARD LINK INCORRECT

Seq #  *Modification Id* Act 
----------------------------+
58823  M01S00068.ns2363  +++|          NZ     X5,VWL3     IF BACKWARD LINK INCORRECT
58824  M00S35531.cpumtr  +++|          SA5    A3+IOLK-LSLK
58825  M00S35532.cpumtr  +++|          LX5    59-54

Seq #  *Modification Id* Act 
----------------------------+
58826  M01S35533.ns2363  ---|          NG     X5,VWL      IF RECOVERED FLAG ALREADY SET

Seq #  *Modification Id* Act 
----------------------------+
58827  M01S00069.ns2363  +++|          NG     X5,VWL3     IF RECOVERED FLAG ALREADY SET
58828  M00S35534.cpumtr  +++|          MX7    1
58829  M00S35535.cpumtr  +++|          BX7    X5+X7       SET RECOVERED FLAG
58830  M00S35536.cpumtr  +++|          LX7    59-57-59+54

Seq #  *Modification Id* Act 
----------------------------+
58831  M01S35537.ns2363  ---|          PL     X7,VWL      IF NOT WRITE DATA

Seq #  *Modification Id* Act 
----------------------------+
58832  M01S00070.ns2363  +++|          PL     X7,VWL4     IF NOT WRITE DATA
58833  M00S35538.cpumtr  +++|          LX7    57-59

Seq #  *Modification Id* Act 
----------------------------+
58834  M01S35539.ns2363  ---|          NG     X7,VWL      IF I/O INTERLOCK SET

Seq #  *Modification Id* Act 
----------------------------+
58835  M01S00071.ns2363  +++|          NG     X7,VWL5     IF I/O INTERLOCK SET
58836  M00S35540.cpumtr  +++|          SA7    A5
58837  M00S35541.cpumtr  +++|          SB4    B4+B1       COUNT BUFFER
58838  M00S35542.cpumtr  +++|          LX3    12
58839  M00S35543.cpumtr  +++|          BX3    -X0*X3
58840  M00S35544.cpumtr  +++|          TX5    A5-IOLK,-CBT
58841  M00S35545.cpumtr  +++|          AX5    CBTLS
58842  M00S35546.cpumtr  +++|          NZ     X3,VWL1     IF FORWARD LINK .NE. 0

Seq #  *Modification Id* Act 
----------------------------+
58843  M01S35547.ns2363  ---|          NE     B4,B2,VWL   IF COUNT NOT CORRECT

Seq #  *Modification Id* Act 
----------------------------+
58844  M01S00072.ns2363  +++|          NE     B4,B2,VWL6  IF COUNT NOT CORRECT
58845  M00S35548.cpumtr  +++|          LX1    -18
58846  M00S35549.cpumtr  +++|          SX1    X1
58847  M00S35550.cpumtr  +++|          BX5    X1-X5

Seq #  *Modification Id* Act 
----------------------------+
58848  M01S35551.ns2363  ---|          NZ     X5,VWL      IF LAST POINTER NOT CORRECT
58849  M01S35552.ns2363  ---|          SX2    B0          SET NO ERROR
58850  M01S35553.ns2363  ---|          EQ     VWL         RETURN

Seq #  *Modification Id* Act 
----------------------------+
58851  M01S00073.ns2363  +++|          ZR     X5,VWL      IF LAST POINTER CORRECT
58852  M01S00074.ns2363  +++|
58853  M01S00075.ns2363  +++| VWL3     SX7    WLLE        * WRITE LIST LINKAGE.*
58854  M01S00076.ns2363  +++|          EQ     VWL7        CONTINUE
58855  M01S00077.ns2363  +++|
58856  M01S00078.ns2363  +++| VWL4     SX7    WLRD        * READ DATA ON WRITE LIST.*
58857  M01S00079.ns2363  +++|          EQ     VWL7        CONTINUE
58858  M01S00080.ns2363  +++|
58859  M01S00081.ns2363  +++| VWL5     SX7    WLIB        * INTERLOCKED BUFFER ON WRITE LIST.*
58860  M01S00082.ns2363  +++|          EQ     VWL7        CONTINUE
58861  M01S00083.ns2363  +++|
58862  M01S00084.ns2363  +++| VWL6     SX7    WLBC        * WRITE LIST BUFFER COUNT.*
58863  M01S00085.ns2363  +++|          EQ     VWL7        CONTINUE
58864  M01S00086.ns2363  +++|
58865  M00S35554.cpumtr  +++| CIR      SPACE  4
58866  M00S35555.cpumtr  +++|**        CIR - CLEAR INTERLOCKS.
58867  M00S35556.cpumtr  +++|
58868  M00S35557.cpumtr  +++|
58869  M00S35558.cpumtr  +++| CIRX     SA0    B3+         RESTORE (A0)
58870  M00S35559.cpumtr  +++| CIR      PS                 ENTRY/EXIT
58871  M00S35560.cpumtr  +++|          SA1    CIRA        CHECK RECOVERY MODE
58872  M00S35561.cpumtr  +++|          SB2    1000B       INTERLOCK RETRY COUNT
58873  M00S35562.cpumtr  +++|          SX1    X1-3
58874  M00S35563.cpumtr  +++|          NZ     X1,CIR      IF NOT LEVEL THREE RECOVERY
58875  M00S35564.cpumtr  +++|          SB3    A0+         SAVE (A0)
58876  M00S35565.cpumtr  +++|
58877  M00S35566.cpumtr  +++|*         CLEAR FLAG REGISTER BITS IF MMF PRESENT.
58878  M00S35567.cpumtr  +++|
58879  M00S35568.cpumtr  +++|          TX5    MMK
58880  M00S35569.cpumtr  +++|          SB4    CIRI
58881  M00S35570.cpumtr  +++| CIR1     SB6    CIR2

Seq #  *Modification Id* Act 
----------------------------+
58882  M01S35571.252l678 ---|          TJP    0,(/ECS/SFR,/PRESET/CIR11,MMF)

Seq #  *Modification Id* Act 
----------------------------+
58883  M02S01275.253l688 ---|          TJP    0,(/ECS/SFR,MMF,/PRESET/CIR11)

Seq #  *Modification Id* Act 
----------------------------+
58884  M01S02593.253l688 +++|          TJP    (/ECS/SFR,MMF,/PRESET/CIR11)
58885  M00S35572.cpumtr  +++|
58886  M00S35573.cpumtr  +++| CIR2     SA0    /MMF/MBUF

Seq #  *Modification Id* Act 
----------------------------+
58887  M01S35574.251l664 ---|          TX0    20B+ETLT*100B+FRET,ECLT

Seq #  *Modification Id* Act 
----------------------------+
58888  M02S02933.252l678 ---|          TX0    SLDE+ETLT*100B+FRET,ECLT

Seq #  *Modification Id* Act 
----------------------------+
58889  M01S01276.252l678 +++|          TX0    ETLT*100B+FRET,ECLT
58890  M01S01277.252l678 +++|          TX0    X0,TCNT
58891  M00S35575.cpumtr  +++|          SX2    A0+
58892  M00S35576.cpumtr  +++|          LX2    30
58893  M00S35577.cpumtr  +++|          BX0    X0+X2
58894  M00S35578.cpumtr  +++|          RE     18
58895  M00S35579.cpumtr  +++|          EQ     CIR9        IF PARITY ERROR
58896  M00S35580.cpumtr  +++|          SB6    CIR5

Seq #  *Modification Id* Act 
----------------------------+
58897  M01S35581.252l678 ---|          TSX0   (402B,6B,ESM)

Seq #  *Modification Id* Act 
----------------------------+
58898  M01S01278.252l678 +++|          TSX0   (402B,ESM,6B)
58899  M00S35582.cpumtr  +++|          LX0    21
58900  M00S35583.cpumtr  +++|          BX0    X0+X5
58901  M00S35584.cpumtr  +++|          ZR     X7,CIR4     IF INTERLOCK OBTAINED
58902  M00S35585.cpumtr  +++|          SA2    A0+B4

Seq #  *Modification Id* Act 
----------------------------+
58903  M01S35586.252l678 ---|          AX2    12
58904  M01S35587.252l678 ---|          BX2    X5*X2

Seq #  *Modification Id* Act 
----------------------------+
58905  M01S01279.252l678 +++|          LX2    6
58906  M01S01280.252l678 +++|          SX2    X2
58907  M01S01281.252l678 +++|          AX2    6
58908  M01S01282.252l678 +++|          TX2    X2,-MIN
58909  M00S35588.cpumtr  +++|          NZ     X2,CIR4     IF INTERLOCK HELD BY THIS MACHINE
58910  M00S35589.cpumtr  +++|          SB2    B2-B1       DECREMENT RETRY COUNT
58911  M00S35590.cpumtr  +++|          PL     B2,CIR1     IF NOT END OF RETRY COUNT
58912  M00S35591.cpumtr  +++|          JP     CIR11
58913  M00S35592.cpumtr  +++|
58914  M00S35593.cpumtr  +++| CIR3     SX2    X5+.TRTI    CLEAR TRTI INTERLOCK

Seq #  *Modification Id* Act 
----------------------------+
58915  M01S35594.252l678 ---|          TSX0   (403B,7B,ESM)

Seq #  *Modification Id* Act 
----------------------------+
58916  M01S01283.252l678 +++|          TSX0   (403B,ESM,7B)
58917  M00S35595.cpumtr  +++|          LX0    21
58918  M00S35596.cpumtr  +++|          BX0    X0+X2
58919  M00S35597.cpumtr  +++| CIR4     RE     /ECS/FRWC
58920  M00S35598.cpumtr  +++|          EQ     CIR3
58921  M00S35599.cpumtr  +++|          SB4    18
58922  M00S35600.cpumtr  +++|
58923  M00S35601.cpumtr  +++| CIR5     SB4    B4-B1
58924  M00S35602.cpumtr  +++|          SA0    /MMF/MBUF
58925  M00S35603.cpumtr  +++|          SA3    A0+B4
58926  M00S35604.cpumtr  +++|          NG     B4,CIR9     IF END OF FLAG BITS
58927  M00S35605.cpumtr  +++|          AX3    12
58928  M00S35606.cpumtr  +++|          BX3    X5*X3
58929  M00S35607.cpumtr  +++|          NZ     X3,/ECS/CFR IF INTERLOCK HELD BY THIS MACHINE
58930  M00S35608.cpumtr  +++|          EQ     CIR5
58931  M00S35609.cpumtr  +++|
58932  M00S35610.cpumtr  +++|*         CLEAR DEVICE INTERLOCKS FOR SHARED DEVICES IN ECS.
58933  M00S35611.cpumtr  +++|
58934  M00S35612.cpumtr  +++| CIR9     TX5    MIN         SET MACHINE INDEX

Seq #  *Modification Id* Act 
----------------------------+
58935  M01S35613.251l664 ---|          MX7    -MXMF

Seq #  *Modification Id* Act 
----------------------------+
58936  M01S02934.251l664 +++|          MX7    -6
58937  M00S35614.cpumtr  +++|          SB7    B0-B1       SET START OF EST SEARCH
58938  M00S35615.cpumtr  +++|          SA0    /MMF/MBUF
58939  M00S35616.cpumtr  +++|          SB5    CIR10       *SSD* RETURN
58940  M00S35617.cpumtr  +++|          JP     /PROGRAM/SSD  SEARCH FOR SHARED DEVICE
58941  M00S35618.cpumtr  +++|
58942  M00S35619.cpumtr  +++| CIR10    NG     B7,CIR11    IF END OF SHARED DEVICES
58943  M00S35620.cpumtr  +++|          SX1    A0+
58944  M00S35621.cpumtr  +++|          SX0    X4+SDGL
58945  M00S35622.cpumtr  +++|          LX1    30
58946  M00S35623.cpumtr  +++|          BX0    X0+X1
58947  M00S35624.cpumtr  +++|          RE     1           READ DEVICE INTERLOCK
58948  M00S35625.cpumtr  +++|          JP     /PROGRAM/SSD
58949  M00S35626.cpumtr  +++|          SA1    A0
58950  M00S35627.cpumtr  +++|          BX2    -X7*X1
58951  M00S35628.cpumtr  +++|          AX2    B1
58952  M00S35629.cpumtr  +++|          BX2    X5-X2
58953  M00S35630.cpumtr  +++|          NZ     X2,/PROGRAM/SSD  IF NOT INTERLOCKED BY THIS MACHINE
58954  M00S35631.cpumtr  +++|          BX6    X7*X1
58955  M00S35632.cpumtr  +++|          SA6    A1
58956  M00S35633.cpumtr  +++|          WE     1           WRITE CLEARED INTERLOCK
58957  M00S35634.cpumtr  +++|          JP     /PROGRAM/SSD
58958  M00S35635.cpumtr  +++|
58959  M00S35636.cpumtr  +++| CIR11    SA2    ESTP        SET LAST MASS STORAGE ORDINAL + 1
58960  M00S35637.cpumtr  +++|          MX4    -12

Seq #  *Modification Id* Act 
----------------------------+
58961  M01S35638.252l678 ---|          MX3    -MXMF
58962  M00S35639.cpumtr  +++|          AX2    12
58963  M00S35640.cpumtr  +++|          BX2    -X4*X2
58964  M00S35641.cpumtr  +++|          SB7    X2+
58965  M00S35642.cpumtr  +++| CIR12    ZR     B7,CIR13    IF END OF DEVICES

Seq #  *Modification Id* Act 
----------------------------+
58966  M01S35643.261l700 ---|          SX1    B7-1
58967  M01S35644.261l700 ---|          R=     X2,ESTE
58968  M01S35645.261l700 ---|          IX1    X1*X2

Seq #  *Modification Id* Act 
----------------------------+
58969  M01S00210.261l700 +++|          SX2    B7-B1
58970  M01S00211.261l700 +++|          CX1    X2,EST      CONVERT EST ORDINAL TO OFFSET
58971  M00S35646.cpumtr  +++|          TA1    X1+EQDE,EST READ EST ENTRY
58972  M00S35647.cpumtr  +++|          SB7    B7-B1

Seq #  *Modification Id* Act 
----------------------------+
58973  M01S00212.261l700 +++|          BX2    -X4*X1
58974  M00S35648.cpumtr  +++|          PL     X1,CIR12    IF NOT MASS STORAGE

Seq #  *Modification Id* Act 
----------------------------+
58975  M01S35649.261l700 ---|          BX2    -X4*X1
58976  M00S35650.cpumtr  +++|          LX2    3

Seq #  *Modification Id* Act 
----------------------------+
58977  M01S00213.261l700 +++|          MX6    12
58978  M00S35651.cpumtr  +++|          SA1    X2+DULL     CLEAR INTERLOCKS

Seq #  *Modification Id* Act 
----------------------------+
58979  M01S35652.261l700 ---|          MX6    12
58980  M00S35653.cpumtr  +++|          LX6    -12
58981  M00S35654.cpumtr  +++|          BX6    -X6*X1
58982  M00S35655.cpumtr  +++|          SA6    A1
58983  M00S35656.cpumtr  +++|          BX6    X6-X1
58984  M00S35657.cpumtr  +++|          SA1    X2+TDGL
58985  M00S35658.cpumtr  +++|          IX6    X1-X6
58986  M00S35659.cpumtr  +++|          SA6    A1
58987  M00S35660.cpumtr  +++|          EQ     CIR12
58988  M00S35661.cpumtr  +++|
58989  M00S35662.cpumtr  +++|*         CLEAR INTERLOCKS AND EXIT.
58990  M00S35663.cpumtr  +++|
58991  M00S35664.cpumtr  +++| CIR13    NG     B2,CIRX     IF NO INTERLOCK TO CLEAR
58992  M00S35665.cpumtr  +++|          SB6    CIRX
58993  M00S35666.cpumtr  +++|          SB4    CIRI

Seq #  *Modification Id* Act 
----------------------------+
58994  M01S35667.252l678 ---|          TJP    0,(/ECS/CFR,/PRESET/CIRX,MMF)  CLEAR INTERLOCK IF MMF

Seq #  *Modification Id* Act 
----------------------------+
58995  M02S01284.253l688 ---|          TJP    0,(/ECS/CFR,MMF,/PRESET/CIRX)  CLEAR INTERLOCK IF MMF

Seq #  *Modification Id* Act 
----------------------------+
58996  M01S02594.253l688 +++|          TJP    (/ECS/CFR,MMF,/PRESET/CIRX)  CLEAR INTERLOCK IF MMF
58997  M00S35668.cpumtr  +++|
58998  M00S35669.cpumtr  +++| CIRA     CON    0           RECOVERY MODE
58999  M00S35670.cpumtr  +++| CLE      SPACE  4,10
59000  M00S35671.cpumtr  +++|**        CLE - CLEAR ECS.

Seq #  *Modification Id* Act 
----------------------------+
59001  M01S00001.cpum235 +++|*
59002  M01S00002.cpum235 +++|*         FOR UEM AND ESM, WRITE MEMORY WITH ALL ZEROS.  FOR ECS AND
59003  M01S00003.cpum235 +++|*         LCME, WRITE MEMORY WITH ALL ONES AND REWRITE WITH ALL ZEROS.
59004  M00S35672.cpumtr  +++|*

Seq #  *Modification Id* Act 
----------------------------+
59005  M01S35673.252l678 ---|*         EXIT   (A0), (X0) RESTORED.
59006  M01S35674.252l678 ---|*
59007  M01S35675.252l678 ---|*         USES   A - 0, 1, 7.
59008  M01S35676.252l678 ---|*                B - 2, 4, 5, 6.
59009  M01S35677.252l678 ---|*                X - 0, 1, 4, 5, 6, 7.

Seq #  *Modification Id* Act 
----------------------------+
59010  M01S01285.252l678 +++|*         EXIT   (A0) RESTORED.

Seq #  *Modification Id* Act 
----------------------------+
59011  M02S01286.cpum172 ---|*
59012  M02S01287.cpum172 ---|*         USES   A - 0, 1, 2, 6, 7.

Seq #  *Modification Id* Act 
----------------------------+
59013  M01S00001.cpum172 +++|*                (X0) RESTORED.
59014  M01S00002.cpum172 +++|*
59015  M01S00003.cpum172 +++|*         USES   A - 0, 1, 2, 4, 6, 7.

Seq #  *Modification Id* Act 
----------------------------+
59016  M01S01288.252l678 +++|*                B - 2, 4, 5, 6, 7.
59017  M01S01289.252l678 +++|*                X - ALL.
59018  M00S35678.cpumtr  +++|
59019  M00S35679.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
59020  M01S00006.ns2520  +++| CLE15    SA1    CCMB
59021  M01S00007.ns2520  +++|          NZ     X1,CLE      IF NOT LARGE MEMORY 990
59022  M01S00008.ns2520  +++|          SA0    CLEE
59023  M01S00009.ns2520  +++|          LX2    X0          SAVE (X0)
59024  M01S00010.ns2520  +++|          BX6    X6-X6
59025  M01S00011.ns2520  +++|          SX0    A0          SET BUFFER ADDRESS
59026  M01S00012.ns2520  +++|          SB6    377B
59027  M01S00013.ns2520  +++|          LX0    30
59028  M01S00014.ns2520  +++| CLE16    SA6    A0+B6       CLEAR BUFFER
59029  M01S00015.ns2520  +++|          SB6    B6-B1
59030  M01S00016.ns2520  +++|          PL     B6,CLE16    IF MORE TO CLEAR
59031  M01S00017.ns2520  +++|          WE     400B
59032  M01S00018.ns2520  +++|+         SA0    B2          RESTORE REGISTERS
59033  M01S00019.ns2520  +++|          BX0    X2
59034  M01S00020.ns2520  +++|          SA7    CLEA        SET *CLE* RAN INDICATOR
59035  M01S00021.ns2520  +++|
59036  M00S35680.cpumtr  +++| CLE      PS                 ENTRY/EXIT
59037  M00S35681.cpumtr  +++|          SA1    CLEA
59038  M00S35682.cpumtr  +++|          NZ     X1,CLE      IF *CLE* HAS BEEN RUN
59039  M00S35683.cpumtr  +++|          SA1    EMS         CHECK FOR FULL INITIALIZE PENDING

Seq #  *Modification Id* Act 
----------------------------+
59040  M01S35684.ns2520  ---|          ZR     X1,CLE      IF NO ECS EQUIPMENT
59041  M01S35685.ns2520  ---|          SA1    X1+DILL     CHECK FOR ESM
59042  M01S35686.ns2520  ---|          MX7    -3
59043  M01S35687.ns2520  ---|          AX1    18
59044  M01S35688.ns2520  ---|          SB2    A0          SAVE (A0)

Seq #  *Modification Id* Act 
----------------------------+
59045  M01S00022.ns2520  +++|          MX7    -3
59046  M01S00023.ns2520  +++|          SB2    A0
59047  M01S00024.ns2520  +++|          ZR     X1,CLE15    IF NO XM EQUIPMENT
59048  M01S00025.ns2520  +++|          SA1    X1+DILL
59049  M01S00026.ns2520  +++|          AX1    18          EXTRACT XM TYPE
59050  M00S35689.cpumtr  +++|          BX7    -X7*X1

Seq #  *Modification Id* Act 
----------------------------+
59051  M01S35690.252l678 ---|          BX5    X0          SAVE (X0)

Seq #  *Modification Id* Act 
----------------------------+
59052  M01S35691.cpum172 ---|          SX7    X7-5
59053  M01S35692.cpum172 ---|          SA0    CLEB        FWA IN CM OF 400 WORD BUFFER

Seq #  *Modification Id* Act 
----------------------------+
59054  M02S35693.cpum172 ---|          NZ     X7,CLE0     IF NOT ESM

Seq #  *Modification Id* Act 
----------------------------+
59055  M02S01290.cpum172 ---|          NZ     X7,CLE1     IF NOT ESM

Seq #  *Modification Id* Act 
----------------------------+
59056  M02S35694.cpum172 ---|          SX0    12B         SET FLAGS FOR MAINTENANCE FUNCTION

Seq #  *Modification Id* Act 
----------------------------+
59057  M03S00001.cpum172 ---|          TSX0   (12B,2,ESM)

Seq #  *Modification Id* Act 
----------------------------+
59058  M02S01291.cpum172 ---|          TSX0   (12B,ESM,2)

Seq #  *Modification Id* Act 
----------------------------+
59059  M01S35695.cpum172 ---|          SX1    377B        SET FUNCTIONS TO MATCH *POWER ON* STATUS
59060  M01S35696.cpum172 ---|          LX0    21-0
59061  M01S35697.cpum172 ---|          BX0    X0+X1

Seq #  *Modification Id* Act 
----------------------------+
59062  M01S00004.cpum172 +++|          SA0    CLEE
59063  M01S00005.cpum172 +++|          BX6    X0          SAVE (X0)
59064  M01S00006.cpum172 +++|          SX7    X7-5
59065  M01S00007.cpum172 +++|          SA6    A0-B1
59066  M01S00008.cpum172 +++|          NZ     X7,CLE1     IF NOT ESM
59067  M01S00009.cpum172 +++|          SA2    ESM
59068  M01S00010.cpum172 +++|          SA4    CLEB
59069  M01S00011.cpum172 +++|          LX2    3+21        FUNCTION TO MATCH *POWER ON* STATUS
59070  M01S00012.cpum172 +++|          BX0    X4+X2
59071  M00S35698.cpumtr  +++|          RE     /ECS/FRWC

Seq #  *Modification Id* Act 
----------------------------+
59072  M01S35699.252l678 ---| CLE0     SA1    A1+STLL-DILL
59073  M01S35700.252l678 ---|          LX1    59-LIAL

Seq #  *Modification Id* Act 
----------------------------+
59074  M02S35701.252l678 ---|          PL     X1,CLE9     IF FULL INITIALIZE NOT SELECTED

Seq #  *Modification Id* Act 
----------------------------+
59075  M02S00001.252l678 ---|          PL     X1,CLE5.1   IF FULL INITIALIZE NOT SELECTED

Seq #  *Modification Id* Act 
----------------------------+
59076  M01S35702.252l678 ---|          SA1    MECS        GET ECS FIELD LENGTH
59077  M01S35703.252l678 ---|          MX7    -12
59078  M01S35704.252l678 ---|          BX6    -X7*X1

Seq #  *Modification Id* Act 
----------------------------+
59079  M01S01292.252l678 +++| CLE1     SA1    A1+STLL-DILL

Seq #  *Modification Id* Act 
----------------------------+
59080  M02S01293.cpum235 ---|          MX7    60          (X7) = ALL ONES

Seq #  *Modification Id* Act 
----------------------------+
59081  M01S00004.cpum235 +++|          SX7    X7+1
59082  M01S00005.cpum235 +++|          AX7    60          = 0 FOR ESM/UEM, -0 FOR ECS/LCME

Seq #  *Modification Id* Act 
----------------------------+
59083  M01S01294.252l678 +++|          LX1    59-LIAL
59084  M01S01295.252l678 +++|          PL     X1,CLE9     IF FULL INITIALIZE NOT SELECTED

Seq #  *Modification Id* Act 
----------------------------+
59085  M02S01296.cpum172 ---|          TX6    MECNF
59086  M02S01297.cpum172 ---|          SX4    400B        EXTENDED MEMORY INCREMENT

Seq #  *Modification Id* Act 
----------------------------+
59087  M01S35705.cpum172 ---|          LX6    1
59088  M01S35706.cpum172 ---|          SB4    X6          (B4) = NO. OF 400 WORD BLOCKS TO TEST

Seq #  *Modification Id* Act 
----------------------------+
59089  M01S00013.cpum172 +++|          SA2    MECNF
59090  M01S00014.cpum172 +++|          SX4    400B        EXTENDED MEMORY INCREMENT
59091  M01S00015.cpum172 +++|          LX2    1
59092  M01S00016.cpum172 +++|          SB4    X2          NUMBER OF 400 WORD BLOCKS TO TEST

Seq #  *Modification Id* Act 
----------------------------+
59093  M01S35707.252l678 ---|          MX7    60          (X7) = ALL ONES
59094  M01S35708.252l678 ---|          SX4    400B        (X4) = ECS INCREMENT
59095  M01S35709.252l678 ---| CLE1     SB5    B4-B1
59096  M01S35710.252l678 ---|          SX0    A0
59097  M01S35711.252l678 ---|          LX0    30
59098  M01S35712.252l678 ---|          SB6    377B
59099  M01S35713.252l678 ---| CLE2     SA7    A0+B6
59100  M01S35714.252l678 ---|          SB6    B6-B1
59101  M01S35715.252l678 ---|          PL     B6,CLE2     IF NOT END OF BUFFER
59102  M01S35716.252l678 ---| CLE3     WE     400B
59103  M01S35717.252l678 ---|+         SB5    B5-B1       DECREMENT BLOCK COUNT
59104  M01S35718.252l678 ---|          IX0    X0+X4       INCREMENT FWA IN ECS
59105  M01S35719.252l678 ---|          PL     B5,CLE3     IF NOT END OF ECS
59106  M01S35720.252l678 ---|          MX1    30
59107  M01S35721.252l678 ---|          BX0    X1*X0
59108  M01S35722.252l678 ---|          SB5    B4-B1
59109  M01S35723.252l678 ---| CLE4     SB6    377B
59110  M01S35724.252l678 ---|          RE     400B
59111  M01S35725.252l678 ---| CLE5     SA1    A0+B6

Seq #  *Modification Id* Act 
----------------------------+
59112  M01S01298.252l678 +++|          SA1    CLEC
59113  M01S01299.252l678 +++|          SB5    B0
59114  M01S01300.252l678 +++|          BX6    X1          SET MESSAGE FOR DISPLAY
59115  M01S01301.252l678 +++|          SA6    DSCP*CPAS+MS1W

Seq #  *Modification Id* Act 
----------------------------+
59116  M02S01302.cpum235 ---|          SA1    A1+B1
59117  M02S01303.cpum235 ---|          SA2    A1+B1

Seq #  *Modification Id* Act 
----------------------------+
59118  M01S00006.cpum235 +++|          SA1    A1+1
59119  M01S00007.cpum235 +++|          SA2    A1+1

Seq #  *Modification Id* Act 
----------------------------+
59120  M01S01304.252l678 +++|          BX6    X1
59121  M01S01305.252l678 +++|          MX3    -3
59122  M01S01306.252l678 +++|          SA6    A6+B1
59123  M01S01307.252l678 +++|          BX6    X2
59124  M01S01308.252l678 +++|          SA1    A2+B1
59125  M01S01309.252l678 +++|          SA6    A6+B1
59126  M01S01310.252l678 +++|          BX6    X1
59127  M01S01311.252l678 +++|          SA6    A6+B1
59128  M01S01312.252l678 +++| CLE2     SX0    A0          SET ADDRESSES FOR TRANSFER
59129  M01S01313.252l678 +++|          SB6    377B
59130  M01S01314.252l678 +++|          LX0    30
59131  M01S01315.252l678 +++| CLE3     SA7    A0+B6       STORE TEST PATTERN IN BUFFER
59132  M01S01316.252l678 +++|          SB6    B6-B1
59133  M01S01317.252l678 +++|          PL     B6,CLE3     IF NOT END OF BUFFER
59134  M01S01318.252l678 +++| CLE4     SX1    B5
59135  M01S01319.252l678 +++|          BX6    X2
59136  M01S01320.252l678 +++|          LX1    2           EXTENDED MEMORY ADDRESS / 100B
59137  M01S01321.252l678 +++|          SB7    B0
59138  M01S01322.252l678 +++| CLE5     BX5    -X3*X1      EXTRACT NEXT DIGIT
59139  M01S01323.252l678 +++|          AX1    3
59140  M01S01324.252l678 +++|          SX5    X5+1R0-1R
59141  M01S01325.252l678 +++|          LX5    B7          CONVERT NUMBER FOR MESSAGE
59142  M01S01326.252l678 +++|          SB7    B7+6
59143  M01S01327.252l678 +++|          IX6    X6+X5
59144  M01S01328.252l678 +++|          NZ     X1,CLE5     IF MORE DIGITS
59145  M01S01329.252l678 +++|          SA6    DSCP*CPAS+MS1W+2
59146  M01S01330.252l678 +++|          WE     400B

Seq #  *Modification Id* Act 
----------------------------+
59147  M01S00008.cpum235 +++|-         EQ     *           (HANG ON HALF-EXIT)

Seq #  *Modification Id* Act 
----------------------------+
59148  M01S01331.252l678 +++|+         SB5    B5+B1       INCREMENT BLOCK COUNT
59149  M01S01332.252l678 +++|          IX0    X0+X4
59150  M01S01333.252l678 +++|          NE     B5,B4,CLE4  IF NOT END OF EXTENDED MEMORY
59151  M01S01334.252l678 +++| CLE6     SX1    B5-B1
59152  M01S01335.252l678 +++|          BX6    X2
59153  M01S01336.252l678 +++|          LX1    2           EXTENDED MEMORY ADDRESS / 100B
59154  M01S01337.252l678 +++|          SB7    B0

Seq #  *Modification Id* Act 
----------------------------+
59155  M01S00009.cpum235 +++|          BX7    -X7
59156  M01S00010.cpum235 +++|          SA7    CLEE        INSURE COMPARE ERROR IF NO TRANSFER
59157  M01S00011.cpum235 +++|          BX7    -X7

Seq #  *Modification Id* Act 
----------------------------+
59158  M01S01338.252l678 +++| CLE7     BX5    -X3*X1      EXTRACT NEXT DIGIT
59159  M01S01339.252l678 +++|          AX1    3
59160  M01S01340.252l678 +++|          SX5    X5+1R0-1R
59161  M01S01341.252l678 +++|          LX5    B7          CONVERT NUMBER FOR MESSAGE
59162  M01S01342.252l678 +++|          SB7    B7+6
59163  M01S01343.252l678 +++|          IX6    X6+X5
59164  M01S01344.252l678 +++|          NZ     X1,CLE7     IF MORE DIGITS
59165  M01S01345.252l678 +++|          SB6    377B
59166  M01S01346.252l678 +++|          SA6    DSCP*CPAS+MS1W+2
59167  M01S01347.252l678 +++|          IX0    X0-X4       DECREMENT EXTENDED MEMORY ADDRESS
59168  M01S01348.252l678 +++|          SB5    B5-B1
59169  M01S01349.252l678 +++|          RE     400B        FILL BUFFER

Seq #  *Modification Id* Act 
----------------------------+
59170  M01S00012.cpum235 +++|-         EQ     *           (HANG ON HALF-EXIT)

Seq #  *Modification Id* Act 
----------------------------+
59171  M01S01350.252l678 +++| CLE8     SA1    A0+B6
59172  M00S35726.cpumtr  +++|          SB6    B6-1
59173  M00S35727.cpumtr  +++|          BX1    X1-X7
59174  M00S35728.cpumtr  +++|+         NG     X1,*        IF COMPARE ERROR
59175  M00S35729.cpumtr  +++|-         NZ     X1,*        IF COMPARE ERROR

Seq #  *Modification Id* Act 
----------------------------+
59176  M01S35730.252l678 ---|          PL     B6,CLE5     IF NOT END OF BUFFER
59177  M01S35731.252l678 ---|          IX0    X0+X4
59178  M01S35732.252l678 ---|          SB5    B5-B1
59179  M01S35733.252l678 ---|          PL     B5,CLE4     IF NOT END OF ECS
59180  M01S35734.252l678 ---|          BX7    -X7         COMPLIMENT X7
59181  M01S35735.252l678 ---|          PL     X7,CLE1     IF BOTH PATTERNS NOT USED

Seq #  *Modification Id* Act 
----------------------------+
59182  M02S00002.252l678 ---|          EQ     CLE5.2      PROCESS *IBDT*

Seq #  *Modification Id* Act 
----------------------------+
59183  M01S01351.252l678 +++|          PL     B6,CLE8     IF NOT END OF BUFFER
59184  M01S01352.252l678 +++|          NZ     B5,CLE6     IF NOT END OF EXTENDED MEMORY
59185  M01S01353.252l678 +++|          BX7    -X7
59186  M01S01354.252l678 +++|          SX6    B0
59187  M01S01355.252l678 +++|          PL     X7,CLE2     IF BOTH PATTERNS NOT USED
59188  M01S01356.252l678 +++|          SA6    DSCP*CPAS+MS1W
59189  M01S01357.252l678 +++|          EQ     CLE10       PROCESS *IBDT*
59190  M00S35736.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
59191  M01S00003.cpum123 +++|*         CHECK FOR CYBER 8XX MACHINE AND LEVEL 1 OR 2 DEADSTART.
59192  M01S00004.cpum123 +++|

Seq #  *Modification Id* Act 
----------------------------+
59193  M02S00005.252l678 ---| CLE5.1   SA1    MABL        CHECK MACHINE TYPE

Seq #  *Modification Id* Act 
----------------------------+
59194  M01S01358.252l678 +++| CLE9     SA1    MABL        CHECK MACHINE TYPE

Seq #  *Modification Id* Act 
----------------------------+
59195  M01S00006.cpum123 +++|          SA4    CIRA        GET RECOVERY LEVEL
59196  M01S00007.cpum123 +++|          LX1    59-47

Seq #  *Modification Id* Act 
----------------------------+
59197  M02S00008.252l678 ---|          NG     X1,CLE9     IF NOT CYBER 170-8X5
59198  M02S00009.252l678 ---|          SX4    X4-1
59199  M02S00010.252l678 ---|          ZR     X4,CLE5.2   IF LEVEL 1 DEADSTART
59200  M02S00011.252l678 ---|          SX4    X4-1
59201  M02S00012.252l678 ---|          NZ     X4,CLE9     IF NOT LEVEL 2 DEADSTART

Seq #  *Modification Id* Act 
----------------------------+
59202  M01S01359.252l678 +++|          NG     X1,CLE14    IF NOT CYBER 170-8X5
59203  M01S01360.252l678 +++|          SX4    X4-1
59204  M01S01361.252l678 +++|          ZR     X4,CLE10    IF LEVEL 1 DEADSTART
59205  M01S01362.252l678 +++|          SX4    X4-1
59206  M01S01363.252l678 +++|          NZ     X4,CLE14    IF NOT LEVEL 2 DEADSTART

Seq #  *Modification Id* Act 
----------------------------+
59207  M01S00013.cpum123 +++|
59208  M00S35737.cpumtr  +++|*         BUILD *IBDT* AND ENTER IN LABEL TRACK.
59209  M00S35738.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
59210  M01S35739.cpum123 ---|          SA1    DSDL

Seq #  *Modification Id* Act 
----------------------------+
59211  M02S00014.252l678 ---| CLE5.2   SA1    DSDL

Seq #  *Modification Id* Act 
----------------------------+
59212  M01S01364.252l678 +++| CLE10    SA1    EEM         CHECK FOR LINK DEVICE
59213  M01S01365.252l678 +++|          SA4    MMFL
59214  M01S01366.252l678 +++|          MX6    -9          MASK FOR EST ORDINAL
59215  M01S01367.252l678 +++|          AX4    36
59216  M01S01368.252l678 +++|          BX4    X4-X1
59217  M01S01369.252l678 +++|          BX4    -X6*X4
59218  M01S01370.252l678 +++|          SB4    1           (B4) = IBDT LIMIT
59219  M01S01371.252l678 +++|          SX6    1000B
59220  M01S01372.252l678 +++|          NZ     X4,CLE11    IF NOT LINK DEVICE
59221  M01S01373.252l678 +++|          SB4    MXMF

Seq #  *Modification Id* Act 
----------------------------+
59222  M02S01374.cpum172 ---| CLE11    SA1    EMS         COMPUTE LENGTH FROM TRACKS

Seq #  *Modification Id* Act 
----------------------------+
59223  M01S00017.cpum172 +++| CLE11    SA1    TNSC
59224  M01S00018.cpum172 +++|          SB7    60
59225  M01S00019.cpum172 +++|          SA2    TCNT        EXTENDED MEMORY SECTOR LIMIT
59226  M01S00020.cpum172 +++|          SB5    X1
59227  M01S00021.cpum172 +++|          SB7    B7-B5
59228  M01S00022.cpum172 +++|          SA1    EMS         GET TRACK COUNT FROM MST
59229  M01S00023.cpum172 +++|          LX6    B5

Seq #  *Modification Id* Act 
----------------------------+
59230  M01S01375.252l678 +++|          SA1    X1
59231  M01S01376.252l678 +++|          ERRNZ  TDGL        CODE DEPENDS ON VALUE

Seq #  *Modification Id* Act 
----------------------------+
59232  M02S01377.cpum172 ---|          TLX6   0,TNSC
59233  M02S01378.cpum172 ---|          SX4    20B*101B
59234  M02S01379.cpum172 ---|          TLX4   0,TNSC
59235  M02S01380.cpum172 ---|          AX1    48

Seq #  *Modification Id* Act 
----------------------------+
59236  M01S00024.cpum172 +++|          SX4    20B*101B
59237  M01S00025.cpum172 +++|          AX1    48
59238  M01S00026.cpum172 +++|          LX4    B5

Seq #  *Modification Id* Act 
----------------------------+
59239  M01S01381.252l678 +++|          SX6    X6-1
59240  M01S01382.252l678 +++|          IX1    X1*X4
59241  M01S01383.252l678 +++|          IX4    X1+X6
59242  M01S01384.252l678 +++|          AX4    9           FWA OF BUFFERS IS END OF DEVICE

Seq #  *Modification Id* Act 
----------------------------+
59243  M02S01385.cpum172 ---|          TLX4   60,-TNSC

Seq #  *Modification Id* Act 
----------------------------+
59244  M01S00027.cpum172 +++|          LX4    B7

Seq #  *Modification Id* Act 
----------------------------+
59245  M01S35740.252l678 ---|          MX0    -12
59246  M01S35741.252l678 ---|          BX4    X4-X4
59247  M01S35742.252l678 ---|          SB4    MXMF
59248  M01S35743.252l678 ---| CLE6     SA1    A1+B1
59249  M01S35744.252l678 ---|          BX6    -X0*X1      LENGTH
59250  M01S35745.252l678 ---|          IX4    X4+X6       ADD TO TOTAL REQUIRED
59251  M01S35746.252l678 ---|          SB4    B4-B1
59252  M01S35747.252l678 ---|          NZ     B4,CLE6     IF NOT END OF TABLE
59253  M01S35748.252l678 ---|          SA1    MECNF
59254  M01S35749.252l678 ---|          IX4    X1-X4       FWA OF BUFFERS = FL - TOTAL REQUIRED
59255  M01S35750.252l678 ---|          SA1    DSDL

Seq #  *Modification Id* Act 
----------------------------+
59256  M01S01386.252l678 +++|          SA1    DSDL
59257  M01S01387.252l678 +++|          MX0    -12
59258  M00S35751.cpumtr  +++|          SB5    12
59259  M00S35752.cpumtr  +++|          LX6    X0,B5       POSITION MASK

Seq #  *Modification Id* Act 
----------------------------+
59260  M01S35753.252l678 ---|          SB4    MXMF
59261  M01S35754.252l678 ---| CLE7     SA1    A1+B1

Seq #  *Modification Id* Act 
----------------------------+
59262  M01S01388.252l678 +++| CLE12    SA1    A1+B1
59263  M00S35755.cpumtr  +++|          MX0    -12
59264  M00S35756.cpumtr  +++|          BX7    X6*X1       CLEAR FWA FIELD
59265  M00S35757.cpumtr  +++|          BX0    -X0*X1      LENGTH

Seq #  *Modification Id* Act 
----------------------------+
59266  M01S35758.252l678 ---|          ZR     X0,CLE8     IF NO I/O BUFFERS ON THIS MAINFRAME

Seq #  *Modification Id* Act 
----------------------------+
59267  M01S01389.252l678 +++|          ZR     X0,CLE13    IF NO I/O BUFFERS ON THIS MAINFRAME
59268  M00S35759.cpumtr  +++|          LX1    X4,B5       POSITION FWA
59269  M00S35760.cpumtr  +++|          BX7    X7+X1

Seq #  *Modification Id* Act 
----------------------------+
59270  M01S35761.252l678 ---| CLE8     SA7    A1

Seq #  *Modification Id* Act 
----------------------------+
59271  M01S01390.252l678 +++| CLE13    SA7    A1
59272  M00S35762.cpumtr  +++|          IX4    X4+X0       NEW FWA

Seq #  *Modification Id* Act 
----------------------------+
59273  M01S35763.252l678 ---|          SB4    B4-B1
59274  M01S35764.252l678 ---|          NZ     B4,CLE7     IF NOT END OF *IBDT*

Seq #  *Modification Id* Act 
----------------------------+
59275  M01S01391.252l678 +++|          SB6    A1-DSDL
59276  M01S01392.252l678 +++|          NE     B4,B6,CLE12 IF NOT END OF *IBDT*
59277  M00S35765.cpumtr  +++|          SA0    DSDL+1      WRITE TO LABEL TRACK

Seq #  *Modification Id* Act 
----------------------------+
59278  M01S35766.v23l617 ---|          SA1    ECLT        ECS LABEL TRACK ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
59279  M01S00573.v23l617 +++|          SA1    ECLT        EXTENDED MEMORY LABEL TRACK ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
59280  M01S35767.252l678 ---|          SX0    X1+SLDE+ETLT*100B+IBDT

Seq #  *Modification Id* Act 
----------------------------+
59281  M02S01393.cpum172 ---|          TX0    X1+ETLT*100B+IBDT,TCNT

Seq #  *Modification Id* Act 
----------------------------+
59282  M02S35768.cpum172 ---|          SX1    A0

Seq #  *Modification Id* Act 
----------------------------+
59283  M02S01394.cpum172 ---|          SX1    A0+

Seq #  *Modification Id* Act 
----------------------------+
59284  M01S00028.cpum172 +++|          SX0    X1+ETLT*100B+IBDT
59285  M01S00029.cpum172 +++|          SX1    A0
59286  M01S00030.cpum172 +++|          IX0    X0+X2
59287  M00S35769.cpumtr  +++|          LX1    30
59288  M00S35770.cpumtr  +++|          BX0    X0+X1

Seq #  *Modification Id* Act 
----------------------------+
59289  M01S35771.252l678 ---|          WE     MXMF

Seq #  *Modification Id* Act 
----------------------------+
59290  M01S01395.252l678 +++|          WE     B4

Seq #  *Modification Id* Act 
----------------------------+
59291  M01S35772.cpum172 ---|+         SX6    B1          SET *CLE* RAN INDICATOR

Seq #  *Modification Id* Act 
----------------------------+
59292  M01S00031.cpum172 +++| CLE14    SX6    B1          SET *CLE* RAN INDICATOR
59293  M00S35773.cpumtr  +++|          BX7    X7-X7
59294  M00S35774.cpumtr  +++|          SA6    CLEA

Seq #  *Modification Id* Act 
----------------------------+
59295  M01S35775.252l678 ---| CLE9     SA0    B2          RESTORE (A0)
59296  M01S35776.252l678 ---|          BX0    X5          RESTORE (X0)

Seq #  *Modification Id* Act 
----------------------------+
59297  M02S01396.cpum172 ---| CLE14    SA0    B2+         RESTORE (A0)

Seq #  *Modification Id* Act 
----------------------------+
59298  M01S00032.cpum172 +++|          SA2    CLED        RESTORE REGISTERS
59299  M01S00033.cpum172 +++|          BX0    X2
59300  M01S00034.cpum172 +++|          SA0    B2
59301  M00S35777.cpumtr  +++|          EQ     CLE         RETURN
59302  M00S35778.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
59303  M01S35779.cpum172 ---| CLEA     CON    0
59304  M01S35780.cpum172 ---| CLEB     BSS    400B        ECS PRESET BUFFER

Seq #  *Modification Id* Act 
----------------------------+
59305  M01S00035.cpum172 +++|
59306  M01S00036.cpum172 +++| CLEA     CON    0
59307  M01S00037.cpum172 +++| CLEB     VFD    36/0,3/2,21/377B

Seq #  *Modification Id* Act 
----------------------------+
59308  M01S01397.252l678 +++| CLEC     DATA   C*TESTING EXTENDED MEMORY       00*

Seq #  *Modification Id* Act 
----------------------------+
59309  M01S00038.cpum172 +++| CLED     CON    0
59310  M01S00039.cpum172 +++| CLEE     BSS    400B        EXTENDED MEMORY PRESET BUFFER
59311  M00S35781.cpumtr  +++| DBL      SPACE  4
59312  M00S35782.cpumtr  +++|**        DBL - DETERMINE BLOCKS LOADED.
59313  M00S35783.cpumtr  +++|*         *DBL* SETS THE CONDITION WORDS IN *TDBL* WHICH TELL IF A
59314  M00S35784.cpumtr  +++|*         BLOCK HAS BEEN LOADED.  THESE CONDITION WORDS ARE USED FOR
59315  M00S35785.cpumtr  +++|*         SETTING THE CONDITIONAL VALUES IN THE *T* INSTRUCTIONS.
59316  M00S35786.cpumtr  +++|*
59317  M00S35787.cpumtr  +++|*         EXIT   TDBL IS SET ACCORDING TO THE BLOCKS LOADED.
59318  M00S35788.cpumtr  +++|
59319  M00S35789.cpumtr  +++|
59320  M00S35790.cpumtr  +++| DBL      PS                 ENTRY/EXIT
59321  M00S35791.cpumtr  +++|          SA1    TDBL-1      CONDITION WORDS TO SET
59322  M00S35792.cpumtr  +++|          SB2    BLKT        LOADED BLOCK TABLE ADDRESS
59323  M00S35793.cpumtr  +++| DBL1     SA1    A1+B1
59324  M00S35794.cpumtr  +++|          ZR     X1,DBL      IF END OF CONDITION WORDS
59325  M00S35795.cpumtr  +++|          SA2    B2-B1
59326  M00S35796.cpumtr  +++| DBL2     SA2    A2+B1       READ LOADED BLOCKS
59327  M00S35797.cpumtr  +++|          BX6    X2-X1
59328  M00S35798.cpumtr  +++|          AX6    18
59329  M00S35799.cpumtr  +++|          BX7    X7-X7
59330  M00S35800.cpumtr  +++|          ZR     X6,DBL1     IF BLOCK PRESENT
59331  M00S35801.cpumtr  +++|          NZ     X2,DBL2     IF NOT END OF LOADED BLOCKS
59332  M00S35802.cpumtr  +++|          SA7    A1          CLEAR CONDITION WORD - BLOCK NOT PRESENT
59333  M00S35803.cpumtr  +++|          EQ     DBL1
59334  M00S35804.cpumtr  +++| ILD      SPACE  4
59335  M00S35805.cpumtr  +++|**        ILD - INITIALIZE MULTI-MAINFRAME LINK DEVICE.
59336  M00S35806.cpumtr  +++|*

Seq #  *Modification Id* Act 
----------------------------+
59337  M01S35807.251l664 ---|*         ENTRY  (A1) = EFRL.
59338  M01S35808.251l664 ---|*                (X1) = (EFRL).
59339  M01S35809.251l664 ---|*                (X7) = RECOVERY MODE.

Seq #  *Modification Id* Act 
----------------------------+
59340  M01S02935.251l664 +++|*         ENTRY  (EFRL) = 30/,6/  LS,12/,12/  LT.

Proceed to Part 46