Deck CPUMTR Part 025

308 Modifications

Seq #  *Modification Id* Act 
----------------------------+
31361  M01S18220.251l664 ---|          SA6    DHSF
31362  M01S18221.251l664 ---| RDB8     SX5    B1

Seq #  *Modification Id* Act 
----------------------------+
31363  M01S01297.251l664 +++| RDB8     SA2    A3-LSLK+HSLK
31364  M01S01298.251l664 +++|          NG     X2,LBMX     IF I/O ERROR
31365  M01S01299.251l664 +++|          SX5    B1
31366  M00S18222.cpumtr  +++|          LX5    48
31367  M00S18223.cpumtr  +++|          SB6    RDB9        DELINK BUFFER FROM CONTROL BUFFER CHAIN
31368  M00S18224.cpumtr  +++|          IX6    X3+X5
31369  M00S18225.cpumtr  +++|          SA6    A3
31370  M00S18226.cpumtr  +++|          EQ     DCC         DELINK CONTROL BUFFER FROM CONTROL BUFFER
31371  M00S18227.cpumtr  +++|
31372  M00S18228.cpumtr  +++| RDB9     TX1    DRDB        LINK BUFFER TO READ CHAIN

Seq #  *Modification Id* Act 
----------------------------+
31373  M01S18229.cpum198 ---|          SB6    LBMX

Seq #  *Modification Id* Act 
----------------------------+
31374  M01S00003.cpum198 +++|          SA2    BCNT        CHECK BUFFER COUNT
31375  M01S00004.cpum198 +++|          SX4    B1          SET READ TRIGGER
31376  M01S00005.cpum198 +++|          BX3    X0
31377  M01S00006.cpum198 +++|          SX2    X2-1
31378  M01S00007.cpum198 +++|          LX4    58-0
31379  M01S00008.cpum198 +++|          ZR     X2,RDB9.1   IF REQUEST WAS FOR ONE BUFFER
31380  M01S00009.cpum198 +++|          LX3    CBTLS

Seq #  *Modification Id* Act 
----------------------------+
31381  M02S00010.cpum242 ---|+         TA2    X3+IOLK,CBT **  PERFORM UPDATE IN ONE WORD **
31382  M02S00011.cpum242 ---|          BX6    X2+X4       **
31383  M02S00012.cpum242 ---|          SA6    A2          **

Seq #  *Modification Id* Act 
----------------------------+
31384  M01S00010.cpum242 +++|+         TA2    X3+IOLK,CBT **** PERFORM IN ONE WORD ****
31385  M01S00011.cpum242 +++|          BX6    X2+X4       **** PERFORM IN ONE WORD ****
31386  M01S00012.cpum242 +++|          SA6    A2          **** PERFORM IN ONE WORD ****

Seq #  *Modification Id* Act 
----------------------------+
31387  M01S00013.cpum198 +++| RDB9.1   SB6    LBMX        SET EXIT ADDRESS
31388  M00S18230.cpumtr  +++|          EQ     LCC         LINK CONTROL BUFFER
31389  M00S18231.cpumtr  +++|
31390  M00S18232.cpumtr  +++| RDB10    BX5    X0          CHECK RECALL CONTROL
31391  M00S18233.cpumtr  +++|          LX5    CBTLS
31392  M00S18234.cpumtr  +++|          TA2    X5+LSLK,CBT
31393  M00S18235.cpumtr  +++|          MX3    -24
31394  M00S18236.cpumtr  +++|          BX4    -X3*X2
31395  M00S18237.cpumtr  +++|          NZ     X4,SBB      IF RECALL CONTROL SET
31396  M00S18238.cpumtr  +++|          SA1    RPRM        GET RECALL PARAMETER
31397  M00S18239.cpumtr  +++|          SX6    2           SET UP *IOC* CALL
31398  M00S18240.cpumtr  +++|          LX6    24
31399  M00S18241.cpumtr  +++|          BX6    X6+X1
31400  M00S18242.cpumtr  +++|          LX6    12
31401  M00S18243.cpumtr  +++|          BX6    X6+X0
31402  M00S18244.cpumtr  +++|          TA6    IORQ
31403  M00S18245.cpumtr  +++|          XJ                 SET RECALL CONTROL
31404  M00S18246.cpumtr  +++|
31405  M00S18247.cpumtr  +++|          NZ     X6,SRR      IF FUNCTION WAS ACCEPTED
31406  M00S18248.cpumtr  +++|          BX2    X0
31407  M00S18249.cpumtr  +++|          LX2    CBTLS
31408  M00S18250.cpumtr  +++|          TA3    X2+LSLK,CBT READ ACCESS COUNT
31409  M00S18251.cpumtr  +++|          EQ     RDB8        PROCESS RESPONSE
31410  M00S18252.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31411  M01S18253.251l670 ---| RDB11    NZ     X7,RDB18    IF BUFFERS HAVE BEEN ALLOCATED

Seq #  *Modification Id* Act 
----------------------------+
31412  M02S00189.cpum151 ---| RDB11    NZ     X7,RDB19    IF BUFFERS ALLOCATED

Seq #  *Modification Id* Act 
----------------------------+
31413  M01S00006.cpum151 +++| RDB11    NZ     X7,SRR      IF BUFFERS ALLOCATED
31414  M00S18254.cpumtr  +++|          EQ     SBB         SET BUFFER BUSY RESPONSE
31415  M00S18255.cpumtr  +++|
31416  M00S18256.cpumtr  +++|*         ALLOCATE ADDITIONAL BUFFERS.
31417  M00S18257.cpumtr  +++|
31418  M00S18258.cpumtr  +++| RDB12    SB6    RDB13       RETURN ADDRESS FOR ROUTINE *SNS*
31419  M00S18259.cpumtr  +++|          EQ     SNS         SET NEXT SECTOR
31420  M00S18260.cpumtr  +++|
31421  M00S18261.cpumtr  +++| RDB13    NZ     X0,SRR      IF EOI

Seq #  *Modification Id* Act 
----------------------------+
31422  M01S18262.241l630 ---|          SB6    RDB2        SET RETURN ADDRESS
31423  M01S18263.241l630 ---|          EQ     CLP         CONVERT LOGICAL TO PHYSICAL

Seq #  *Modification Id* Act 
----------------------------+
31424  M01S00287.241l630 +++|          EQ     RDB2        ALLOCATE NEXT BUFFER
31425  M00S18264.cpumtr  +++|
31426  M00S18265.cpumtr  +++| RDB14    SA1    SFRF        GET SYSTEM FILE READ FLAG
31427  M00S18266.cpumtr  +++|*         SB0    0           (ONE SYSTEM DEVICE)

Seq #  *Modification Id* Act 
----------------------------+
31428  M01S18267.251l664 ---|          ZR     X1,RDB20    IF SYSTEM FILE READ

Seq #  *Modification Id* Act 
----------------------------+
31429  M01S01300.251l664 +++|          NZ     X1,RDB20    IF SYSTEM FILE READ
31430  M00S18268.cpumtr  +++|*         SB0    0           (ONE SYSTEM DEVICE)

Seq #  *Modification Id* Act 
----------------------------+
31431  M01S18269.251l664 ---| RDB14.1  SA1    ANBA        GET DATA WRITTEN THRESHOLD

Seq #  *Modification Id* Act 
----------------------------+
31432  M01S01301.251l664 +++|          SA1    ANBA        GET DATA WRITTEN THRESHOLD
31433  M00S18270.cpumtr  +++|          SX6    X1-1        UPDATE THRESHOLD FOR WRITE

Seq #  *Modification Id* Act 
----------------------------+
31434  M01S18271.251l664 ---|          SX1    X6-4

Seq #  *Modification Id* Act 
----------------------------+
31435  M01S01302.251l664 +++|          SX1    X6-DWLT
31436  M00S18272.cpumtr  +++|          NG     X1,RDB15    IF AT LOWER LIMIT
31437  M00S18273.cpumtr  +++|          SA6    A1+         SAVE NEW THRESHOLD
31438  M00S18274.cpumtr  +++| RDB15    SB6    RDB16       RETURN ADDRESS FOR ROUTINE *ANB*
31439  M00S18275.cpumtr  +++|          EQ     ANB         ALLOCATE NEXT BUFFER
31440  M00S18276.cpumtr  +++|
31441  M00S18277.cpumtr  +++| RDB16    ZR     X0,RDB11    IF BUFFER NOT AVAILABLE
31442  M00S18278.cpumtr  +++|          NZ     X7,RDB17    IF NOT FIRST BUFFER ALLOCATED

Seq #  *Modification Id* Act 
----------------------------+
31443  M01S18279.251l664 ---|          BX7    X0          SAVE FIRST BUFFER ALLOCATED

Seq #  *Modification Id* Act 
----------------------------+
31444  M01S01303.251l664 +++|          SX7    X0+         SAVE ORDINAL OF FIRST BUFFER ALLOCATED
31445  M00S18280.cpumtr  +++|          SA7    FCBI
31446  M00S18281.cpumtr  +++|          SB6    RDB17       RETURN ADDRESS FOR ROUTINE *SRC*
31447  M00S18282.cpumtr  +++|          EQ     SRC         SET RECALL CONTROL
31448  M00S18283.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31449  M01S18284.cpum151 ---| RDB17    LX0    36          SAVE LAST BUFFER ALLOCATED
31450  M01S18285.cpum151 ---|          AX7    12
31451  M01S18286.cpum151 ---|          BX7    X7+X0
31452  M01S18287.cpum151 ---|          LX0    24
31453  M01S18288.cpum151 ---|          BX6    X0          INITIATE I/O ON BUFFER
31454  M01S18289.cpum151 ---|          TA6    IORQ
31455  M01S18290.cpum151 ---|          XJ
31456  M01S18291.cpum151 ---|

Seq #  *Modification Id* Act 
----------------------------+
31457  M02S18292.cpum151 ---| RDB17.1  SB4    B4-1
31458  M02S18293.cpum151 ---|          NZ     B4,RDB12    IF REQUESTED COUNT NOT ALLOCATED
31459  M02S18294.cpum151 ---| RDB18    MX2    -12
31460  M02S18295.cpum151 ---|          AX7    12

Seq #  *Modification Id* Act 
----------------------------+
31461  M02S00190.cpum151 ---| RDB18    SA3    RBCT        DECREMENT READ BUFFER ALLOCATION
31462  M02S00191.cpum151 ---|          SX6    X3+B1
31463  M02S00192.cpum151 ---|          SA6    A3
31464  M02S00193.cpum151 ---|          NZ     X6,RDB12    IF MORE TO ALLOCATE
31465  M02S00194.cpum151 ---|          SB0    0

Seq #  *Modification Id* Act 
----------------------------+
31466  M02S18296.cpum151 ---|          BX2    -X2*X7
31467  M02S18297.cpum151 ---|          SX4    B1
31468  M02S18298.cpum151 ---|          ZR     X2,SRR      IF .LT. THREE BUFFERS ALLOCATED

Seq #  *Modification Id* Act 
----------------------------+
31469  M02S00195.cpum151 ---| RDB19    SA3    DBAT        FETCH ALLOCATION TRIGGER
31470  M02S00196.cpum151 ---|          MX2    -12
31471  M02S00197.cpum151 ---|          SB6    X3
31472  M02S00198.cpum151 ---|          AX7    B6          POSITION *CBT* ORDINAL
31473  M02S00199.cpum151 ---|          SX4    1
31474  M02S00200.cpum151 ---|          BX2    -X2*X7
31475  M02S00201.cpum151 ---|          ZR     X2,SRR      IF .LT. TRIGGER VALUE ALLOCATED

Seq #  *Modification Id* Act 
----------------------------+
31476  M01S18299.cpum151 ---|          LX2    CBTLS
31477  M01S18300.cpum151 ---|          LX4    58-0
31478  M01S18301.cpum151 ---|+         TA3    X2+IOLK,CBT ** PERFORM UPDATE IN ONE WORD **
31479  M01S18302.cpum151 ---|          BX6    X3+X4       **
31480  M01S18303.cpum151 ---|          SA6    A3          **

Seq #  *Modification Id* Act 
----------------------------+
31481  M01S00007.cpum151 +++| RDB17    SB6    RDB18       CHECK ALLOCATION TRIGGER

Seq #  *Modification Id* Act 
----------------------------+
31482  M02S00008.cpum198 ---|          EQ     CAT

Seq #  *Modification Id* Act 
----------------------------+
31483  M01S00014.cpum198 +++|          SA2    DTSF        CHECK FOR DATA STREAMING
31484  M01S00015.cpum198 +++|          SX6    B1+
31485  M01S00016.cpum198 +++|          ZR     X2,CAT      IF NOT STREAMING DATA
31486  M01S00017.cpum198 +++|          SA6    DBAT
31487  M01S00018.cpum198 +++|          EQ     CAT         CHECK ALLOCATION TRIGGER

Seq #  *Modification Id* Act 
----------------------------+
31488  M01S00009.cpum151 +++|
31489  M01S00010.cpum151 +++| RDB18    TA7    IORQ        INITIATE I/O
31490  M01S00011.cpum151 +++|          XJ
31491  M01S00012.cpum151 +++|
31492  M01S00013.cpum151 +++| RDB19    NZ     X6,RDB12    IF MORE BUFFERS TO ALLOCATE
31493  M00S18304.cpumtr  +++|          EQ     SRR         SET RECALL REPLY
31494  M00S18305.cpumtr  +++|
31495  M00S18306.cpumtr  +++|*         IF A JOB IS READING THE SYSTEM FILE, AND THE DATA IS
31496  M00S18307.cpumtr  +++|*         NOT ALREADY RESIDENT IN ESM/LCM, THE OTHER SYSTEM DEVICES
31497  M00S18308.cpumtr  +++|*         ARE SEARCHED TO SEE IF THE DATA HAPPENS TO ALREADY BE IN
31498  M00S18309.cpumtr  +++|*         ESM/LCM, BUT READ FROM A DIFFERENT UNIT (THIS METHOD
31499  M00S18310.cpumtr  +++|*         DEPENDS ON THE FACT THAT EVERY COPY OF THE SYSTEM FILE
31500  M00S18311.cpumtr  +++|*         HAS IDENTICAL LOGICAL AND PHYSICAL ADDRESSES FOR EVERY
31501  M00S18312.cpumtr  +++|*         RECORD).  IF THE DATA IS FOUND TO NOT RESIDE IN ESM/LCM
31502  M00S18313.cpumtr  +++|*         IN ANY FORM, THE SYSTEM DEVICE WITH THE LEAST ACTIVITY
31503  M00S18314.cpumtr  +++|*         IS USED TO READ THE DATA.
31504  M00S18315.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31505  M01S18316.251l664 ---| RDB20    SA1    SYDI        CURRENT SYSTEM DEVICE INDEX (INTO *RDBA*)
31506  M01S18317.251l664 ---|          SA2    OEST        ORIGINAL EST ORDINAL
31507  M01S18318.251l664 ---|          SA3    RDBA+X1     READ SYSTEM DEVICE TABLE
31508  M01S18319.251l664 ---|          BX5    X7          SAVE (X7)
31509  M01S18320.251l664 ---|          SX6    X1+B1       ADVANCE INDEX
31510  M01S18321.251l664 ---|          ZR     X3,RDB23    IF END OF TABLE
31511  M01S18322.251l664 ---|          BX4    X3-X2
31512  M01S18323.251l664 ---|          SA6    A1
31513  M01S18324.251l664 ---|          ZR     X4,RDB20    IF SAME EST ORDINAL AS REQUESTED
31514  M01S18325.251l664 ---|          R=     X7,ESTE
31515  M01S18326.251l664 ---|          IX7    X3*X7
31516  M01S18327.251l664 ---|          TA2    X7+EQDE,EST READ EST ENTRY
31517  M01S18328.251l664 ---|          MX7    -12
31518  M01S18329.251l664 ---|          BX6    X3
31519  M01S18330.251l664 ---|          BX4    -X7*X2      MST ADDRESS / 10B
31520  M01S18331.251l664 ---|          LX4    3
31521  M01S18332.251l664 ---|          SA1    X4+DALL
31522  M01S18333.251l664 ---|          SA2    BSDA        PREVIOUS BEST SYSTEM DEVICE ACTIVITY
31523  M01S18334.251l664 ---|          IX2    X1-X2
31524  M01S18335.251l664 ---|          BX7    X1
31525  M01S18336.251l664 ---|          PL     X2,RDB21    IF NO IMPROVEMENT IN ACTIVITY
31526  M01S18337.251l664 ---|          SA6    BSEO        SET NEW BEST SYSTEM DEVICE
31527  M01S18338.251l664 ---|          SA7    BSDA        SET NEW LOWEST ACTIVITY
31528  M01S18339.251l664 ---| RDB21    SA1    FNTA        FNT ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
31529  M02S18340.251l664 ---|          SB5    RDB2        *SPC* RETURN ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
31530  M01S18341.251l664 ---|          R=     X7,FSTL
31531  M01S18342.251l664 ---|          TX0    SP
31532  M01S18343.251l664 ---|          MX3    -48
31533  M01S18344.251l664 ---|          IX0    X1-X0
31534  M01S18345.251l664 ---|          LX6    48
31535  M01S18346.251l664 ---|          IX1    X1+X7
31536  M01S18347.251l664 ---|          ERX2   X1          READ FST
31537  M01S18348.251l664 ---|          BX2    -X3*X2      CLEAR OLD EST ORDINAL
31538  M01S18349.251l664 ---|          BX7    X6+X2
31539  M01S18350.251l664 ---|          LX3    -12
31540  M01S18351.251l664 ---|          EWX7   X1          UPDATE FST WITH NEW EQUIPMENT
31541  M01S18352.251l664 ---|          PL     X0,RDB22    IF FNT IN USER NFL
31542  M01S18353.251l664 ---|          SA2    X1-2        READ MESSAGE BUFFER
31543  M01S18354.251l664 ---|          LX6    -12
31544  M01S18355.251l664 ---|          BX2    -X3*X2      UPDATE EST ORDINAL
31545  M01S18356.251l664 ---|          BX7    X6+X2
31546  M01S18357.251l664 ---|          SA7    A2          UPDATE MESSAGE BUFFER WITH NEW EQUIPMENT

Seq #  *Modification Id* Act 
----------------------------+
31547  M02S18358.251l664 ---| RDB22    SA2    LUN
31548  M02S18359.251l664 ---|          BX6    X4
31549  M02S18360.251l664 ---|          SB6    X2          LOGICAL UNIT NUMBER
31550  M02S18361.251l664 ---|          SA6    A2+B1       MST ADDRESS
31551  M02S18362.251l664 ---|          ERRNZ  MSTA-LUN-1  ADDRESSES MUST BE CONSECUTIVE
31552  M02S18363.251l664 ---|          SA1    X4+DILL
31553  M02S18364.251l664 ---|          BX7    X5          RESTORE (X7)
31554  M02S18365.251l664 ---|          EQ     SPC         SET PHYSICAL CHARACTERISTICS

Seq #  *Modification Id* Act 
----------------------------+
31555  M02S00288.251l664 ---| RDB22    BX6    X4
31556  M02S00289.251l664 ---|          SA6    MSTA        SET NEW MST ADDRESS
31557  M02S00290.251l664 ---|          BX7    X5          RESTORE X7
31558  M02S00291.251l664 ---|          EQ     RDB2        CHECK NEXT SYSTEM DEVICE

Seq #  *Modification Id* Act 
----------------------------+
31559  M01S18366.251l664 ---|
31560  M01S18367.251l664 ---| RDB23    SA1    BSEO        BEST SYSTEM DEVICE ORDINAL
31561  M01S18368.251l664 ---|          R=     X4,ESTE
31562  M01S18369.251l664 ---|          IX7    X1*X4
31563  M01S18370.251l664 ---|          TA3    X7+EQDE,EST READ EST ENTRY
31564  M01S18371.251l664 ---|          MX4    -12
31565  M01S18372.251l664 ---|          SX7    -B1
31566  M01S18373.251l664 ---|          BX4    -X4*X3      MST ADDRESS / 10B
31567  M01S18374.251l664 ---|          SA7    SFRF        CLEAR SYSTEM FILE READ FLAG
31568  M01S18375.251l664 ---|          LX4    3
31569  M01S18376.251l664 ---|          BX6    X1
31570  M01S18377.251l664 ---|          EQ     RDB21       SET UP AND READ DEVICE
31571  M01S18378.251l664 ---|
31572  M01S18379.251l664 ---|
31573  M01S18380.251l664 ---| RDBA     BSS    MXSY+1      SYSTEM DEVICE TABLE

Seq #  *Modification Id* Act 
----------------------------+
31574  M01S01304.251l664 +++| RDB20    SA1    SYDI        SYSTEM DEVICE INDEX
31575  M01S01305.251l664 +++|          BX5    X7          SAVE (X7)
31576  M01S01306.251l664 +++|          SX6    X1+B1       INCREMENT INDEX
31577  M01S01307.251l664 +++|          SA3    RDBB-1+X6
31578  M01S01308.251l664 +++|          ZR     X3,RDB23    IF END OF TABLE
31579  M01S01309.251l664 +++|          SA6    A1
31580  M01S01310.251l664 +++|          SA1    X3          *DALL* WORD OF THIS DEVICE
31581  M01S01311.251l664 +++|          SA2    BSDA        *DALL* OF PREVIOUS BEST SYSTEM DEVICE
31582  M01S01312.251l664 +++|          IX2    X1-X2
31583  M01S01313.251l664 +++|          BX7    X1
31584  M01S01314.251l664 +++|          PL     X2,RDB21    IF NO ACTIVITY IMPROVEMENT
31585  M01S01315.251l664 +++|          SA6    BSDI        SET NEW BEST SYSTEM DEVICE INDEX
31586  M01S01316.251l664 +++|          SA7    A2+         SET NEW BEST ACTIVITY
31587  M01S01317.251l664 +++| RDB21    SA1    FNTA        FNT ADDRESS
31588  M01S01318.251l664 +++|          R=     X7,FSTL
31589  M01S01319.251l664 +++|          MX4    -48
31590  M01S01320.251l664 +++|          TX0    SP
31591  M01S01321.251l664 +++|          SA2    RDBA-1+X6   EST ORDINAL
31592  M01S01322.251l664 +++|          IX0    X1-X0
31593  M01S01323.251l664 +++|          LX2    48
31594  M01S01324.251l664 +++|          IX7    X1+X7
31595  M01S01325.251l664 +++|          ERX1   X7          READ FST
31596  M01S01326.251l664 +++|          BX6    -X4*X1      CLEAR OLD EST ORDINAL
31597  M01S01327.251l664 +++|          BX6    X6+X2       ADD NEW EST ORDINAL
31598  M01S01328.251l664 +++|          LX4    -12
31599  M01S01329.251l664 +++|          EWX6   X7          UPDATE FST
31600  M01S01330.251l664 +++|          PL     X0,RDB22    IF FNT IN JOB NFL
31601  M01S01331.251l664 +++|          SA1    X7-2        READ MB+0
31602  M01S01332.251l664 +++|          LX2    -12
31603  M01S01333.251l664 +++|          BX6    -X4*X1      CLEAR OLD EST ORDINAL
31604  M01S01334.251l664 +++|          BX6    X6+X2       ADD NEW EST ORDINAL
31605  M01S01335.251l664 +++|          SA6    A1
31606  M01S01336.251l664 +++| RDB22    SX6    X3-DALL     SAVE MST ADDRESS
31607  M01S01337.251l664 +++|          SA6    MSTA
31608  M01S01338.251l664 +++|          BX7    X5          RESTORE (X7)
31609  M01S01339.251l664 +++|          EQ     RDB2        CHECK NEXT SYSTEM DEVICE
31610  M01S01340.251l664 +++|
31611  M01S01341.251l664 +++| RDB23    SA1    BSDI        BEST SYSTEM DEVICE INDEX
31612  M01S01342.251l664 +++|          SA3    RDBB-1+X1   MST ADDRESS (*DALL* ADDRESS)
31613  M01S01343.251l664 +++|          BX7    X7-X7
31614  M01S01344.251l664 +++|          BX6    X1
31615  M01S01345.251l664 +++|          SA7    SFRF        CLEAR SYSTEM FILE READ FLAG
31616  M01S01346.251l664 +++|          EQ     RDB21       READ SYSTEM FILE FROM SELECTED DEVICE
31617  M01S01347.251l664 +++|
31618  M01S01348.251l664 +++| RDBA     BSS    MXSY        TABLE OF SYSTEM DEVICE EST ORDINALS
31619  M01S01349.251l664 +++|
31620  M01S01350.251l664 +++| RDBB     BSS    MXSY+1      TABLE OF SYSTEM DEVICE MST ADDRESSES
31621  M00S18381.cpumtr  +++| REB      SPACE  4,15

Seq #  *Modification Id* Act 
----------------------------+
31622  M01S18382.283l840 ---|**        REB - RELEASE EMPTY BUFFER.

Seq #  *Modification Id* Act 
----------------------------+
31623  M01S00402.283l840 +++|**        REB - RELEASE EMPTY READ BUFFER AND INTERLOCK NEXT BUFFER.
31624  M00S18383.cpumtr  +++|*
31625  M00S18384.cpumtr  +++|*         ENTRY  INPUT REQUEST DECODED BY LBM MAIN ROUTINE.
31626  M00S18385.cpumtr  +++|*

Seq #  *Modification Id* Act 
----------------------------+
31627  M01S18386.283l840 ---|*         EXIT   CONTROL GIVEN TO LBMX.

Seq #  *Modification Id* Act 
----------------------------+
31628  M01S00403.283l840 +++|*         EXIT   TO *RDB* TO INTERLOCK NEXT BUFFER IF *REB* FUNCTION.
31629  M01S00404.283l840 +++|*                TO *LBMX* IF *REN* FUNCTION.
31630  M00S18387.cpumtr  +++|*
31631  M00S18388.cpumtr  +++|*         USES   A - 1, 2, 3, 6, 7.

Seq #  *Modification Id* Act 
----------------------------+
31632  M01S18389.251l670 ---|*                B - 4, 6.

Seq #  *Modification Id* Act 
----------------------------+
31633  M01S00202.251l670 +++|*                B - 6.
31634  M00S18390.cpumtr  +++|*                X - ALL.
31635  M00S18391.cpumtr  +++|*

Seq #  *Modification Id* Act 
----------------------------+
31636  M01S18392.241l630 ---|*         CALLS  ANB, CHA, CLP, DCC, DCH, LCC, SNS, SRC.

Seq #  *Modification Id* Act 
----------------------------+
31637  M02S00292.cpum243 ---|*         CALLS  ANB, CHA, DCC, DCH, LCC, SNS, SRC.

Seq #  *Modification Id* Act 
----------------------------+
31638  M01S00018.cpum243 +++|*         CALLS  ANB, CSD, CHA, DCC, DCH, LCC, SNS, SRC.
31639  M00S18393.cpumtr  +++|
31640  M00S18394.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31641  M01S18395.283l840 ---| REB      SX6    B0+         CLEAR *REN* FUNCTION FLAG
31642  M01S18396.283l840 ---|          SA6    REBF

Seq #  *Modification Id* Act 
----------------------------+
31643  M01S00405.283l840 +++| REB      BSS    0           ENTRY
31644  M01S00406.283l840 +++|          SX7    B0+         CLEAR *REN* FUNCTION FLAG
31645  M01S00407.283l840 +++|
31646  M01S00408.283l840 +++|*         ENTRY FROM *REN* FUNCTION.
31647  M01S00409.283l840 +++|*         DECREMENT READ ACCESS COUNT.
31648  M01S00410.283l840 +++|
31649  M00S18397.cpumtr  +++| REB1     SA1    BIDX        GET CONTROL BUFFER INDEX

Seq #  *Modification Id* Act 
----------------------------+
31650  M01S00411.283l840 +++|          SA7    REBA
31651  M00S18398.cpumtr  +++|          BX0    X1
31652  M00S18399.cpumtr  +++|          BX6    X1          SET CONTROL BUFFER INTERLOCK
31653  M00S18400.cpumtr  +++|          SA6    INLB
31654  M00S18401.cpumtr  +++|          TX7    DRDB        SET READ AS CURRENT LIST
31655  M00S18402.cpumtr  +++|          SA7    CLST
31656  M00S18403.cpumtr  +++|          LX6    CBTLS
31657  M00S18404.cpumtr  +++|          MX3    12
31658  M00S18405.cpumtr  +++|          TA2    X6+LSLK,CBT READ ACCESS COUNT WORD
31659  M00S18406.cpumtr  +++|          BX5    X3*X2       GET ACCESS COUNT
31660  M00S18407.cpumtr  +++|          AX5    49
31661  M00S18408.cpumtr  +++|          ZR     X5,REB2     IF COUNT = 0 OR 1
31662  M00S18409.cpumtr  +++|          SX4    B1
31663  M00S18410.cpumtr  +++|          LX4    48
31664  M00S18411.cpumtr  +++|          IX6    X2-X4       DECREMENT COUNT
31665  M00S18412.cpumtr  +++|          SA6    A2
31666  M00S18413.cpumtr  +++|          EQ     REB4        CHECK READ THRESHOLD
31667  M00S18414.cpumtr  +++|
31668  M00S18415.cpumtr  +++| REB2     BX6    -X3*X2      CLEAR ACCESS COUNT
31669  M00S18416.cpumtr  +++|          SA6    A2
31670  M00S18417.cpumtr  +++|          SA2    A2+IOLK-LSLK
31671  M00S18418.cpumtr  +++|          NO
31672  M00S18419.cpumtr  +++|          LX2    59-55
31673  M00S18420.cpumtr  +++|          NG     X2,REB4     IF SYSTEM FILE BUFFER, LEAVE ON CHAIN
31674  M00S18421.cpumtr  +++|          SB6    REB3        RETURN ADDRESS FOR ROUTINE *DCC*
31675  M00S18422.cpumtr  +++|          EQ     DCC         DELINK CONTROL BUFFER FROM CONTROL BUFFER
31676  M00S18423.cpumtr  +++|
31677  M00S18424.cpumtr  +++| REB3     SB6    REB4        LINK TO EMPTY LIST
31678  M00S18425.cpumtr  +++|          TX1    EMTB
31679  M00S18426.cpumtr  +++|          EQ     LCC         LINK CONTROL BUFFER
31680  M00S18427.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31681  M01S00412.283l840 +++|*         CHECK FOR READ-AHEAD TRIGGER.
31682  M01S00413.283l840 +++|
31683  M00S18428.cpumtr  +++| REB4     SA1    BIDX        GET READ THRESHOLD BIT
31684  M00S18429.cpumtr  +++|          LX1    CBTLS
31685  M00S18430.cpumtr  +++|          TA1    X1+IOLK,CBT
31686  M00S18431.cpumtr  +++|          BX0    X1
31687  M00S18432.cpumtr  +++|          BX6    X6-X6       CLEAR CONTROL BUFFER INTERLOCK
31688  M00S18433.cpumtr  +++|          SA6    INLB
31689  M00S18434.cpumtr  +++|          SA1    LSEC        SAVE LOGICAL TRACK AND SECTOR
31690  M00S18435.cpumtr  +++|          SA2    LTRK
31691  M00S18436.cpumtr  +++|          BX6    X1
31692  M00S18437.cpumtr  +++|          BX7    X2
31693  M00S18438.cpumtr  +++|          SA6    OLSC
31694  M00S18439.cpumtr  +++|          SA7    BCNT
31695  M00S18440.cpumtr  +++|          LX0    59-58       TEST READ THRESHOLD

Seq #  *Modification Id* Act 
----------------------------+
31696  M01S18441.283l840 ---|          PL     X0,REB18    IF READ THRESHOLD NOT SET

Seq #  *Modification Id* Act 
----------------------------+
31697  M01S00414.283l840 +++|          PL     X0,REB18    IF NOT READ-AHEAD TRIGGER BUFFER

Seq #  *Modification Id* Act 
----------------------------+
31698  M01S18442.251l670 ---|          SB4    RBTH        SET BUFFER COUNT TO ALLOCATE

Seq #  *Modification Id* Act 
----------------------------+
31699  M02S18443.251l670 ---|          SX7    B0          CLEAR BUFFERS ALLOCATED STACK

Seq #  *Modification Id* Act 
----------------------------+
31700  M02S01351.251l670 ---|          SX7    B0+         CLEAR BUFFERS ALLOCATED STACK

Seq #  *Modification Id* Act 
----------------------------+
31701  M01S18444.251l670 ---|          SA1    REBF

Seq #  *Modification Id* Act 
----------------------------+
31702  M02S18445.251l670 ---|          ZR     X1,REB7     IF *REB* FUNCTION

Seq #  *Modification Id* Act 
----------------------------+
31703  M02S00293.251l670 ---|          ZR     X1,REB8     IF *REB* FUNCTION

Seq #  *Modification Id* Act 
----------------------------+
31704  M01S00203.251l670 +++|          BX7    X7-X7
31705  M01S00204.251l670 +++|          SA3    RBTH        SET BUFFER COUNT TO ALLOCATE
31706  M01S00205.251l670 +++|          BX6    -X3
31707  M01S00206.251l670 +++|          ERRNZ  RBCT+1-RBTH  CODE DEPENDS ON VALUE
31708  M01S00207.251l670 +++|          SA6    A3-B1

Seq #  *Modification Id* Act 
----------------------------+
31709  M02S00208.283l840 ---|          SA1    REBF

Seq #  *Modification Id* Act 
----------------------------+
31710  M01S00415.283l840 +++|          SA1    REBA

Seq #  *Modification Id* Act 
----------------------------+
31711  M01S00209.251l670 +++|          ZR     X1,REB7     IF *REB* FUNCTION
31712  M00S18446.cpumtr  +++|
31713  M00S18447.cpumtr  +++|*         FIND LAST CONSECUTIVE BUFFER ON HASH CHAIN.
31714  M00S18448.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31715  M01S18449.cpum151 ---| REB5     SB6    REB6

Seq #  *Modification Id* Act 
----------------------------+
31716  M01S00014.cpum151 +++| REB5     ZR     X6,REB18    IF ALL BUFFERS ALLOCATED
31717  M01S00015.cpum151 +++|          SB6    REB6
31718  M00S18450.cpumtr  +++|          EQ     SNS         SET NEXT SECTOR
31719  M00S18451.cpumtr  +++|
31720  M00S18452.cpumtr  +++| REB6     NZ     X0,REB18    IF END OF LOGICAL TRACK CHAIN

Seq #  *Modification Id* Act 
----------------------------+
31721  M01S18453.241l630 ---| REB7     SB6    REB8
31722  M01S18454.241l630 ---|          EQ     CLP         CONVERT LOGICAL TO PHYSICAL
31723  M01S18455.241l630 ---|

Seq #  *Modification Id* Act 
----------------------------+
31724  M01S18456.251l670 ---| REB8     SB6    REB9

Seq #  *Modification Id* Act 
----------------------------+
31725  M01S00210.251l670 +++| REB7     SB6    REB8

Seq #  *Modification Id* Act 
----------------------------+
31726  M01S18457.283l840 ---|          EQ     CHA         CALCULATE HASH ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
31727  M01S00416.283l840 +++|          TEQ    (/BUFIO/CSD,BIOMMF,/BUFIO/CHA)  CHECK BUFFER STATUS
31728  M00S18458.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31729  M01S18459.251l670 ---| REB9     ZR     X2,REB9.1   IF END OF CONSECUTIVE CHAIN
31730  M01S18460.251l670 ---|          NG     X2,REB18    IF HASH TABLE BUSY
31731  M01S18461.251l670 ---|          ZR     X0,REB9.1   IF END OF CONSECUTIVE CHAIN

Seq #  *Modification Id* Act 
----------------------------+
31732  M01S00211.251l670 +++| REB8     ZR     X2,REB9     IF END OF CONSECUTIVE CHAIN

Seq #  *Modification Id* Act 
----------------------------+
31733  M02S00212.283l840 ---|          NG     X2,REB18    IF HASH TABLE BUSY

Seq #  *Modification Id* Act 
----------------------------+
31734  M01S00417.283l840 +++|          NG     X2,REB18    IF BUFFER CANNOT BE ALLOCATED

Seq #  *Modification Id* Act 
----------------------------+
31735  M01S00213.251l670 +++|          ZR     X0,REB9     IF END OF CONSECUTIVE CHAIN

Seq #  *Modification Id* Act 
----------------------------+
31736  M01S18462.cpum151 ---|          LX0    36          SAVE NEW LAST
31737  M01S18463.cpum151 ---|          AX7    12
31738  M01S18464.cpum151 ---|          BX7    X7+X0
31739  M01S18465.cpum151 ---|          SB4    B4-B1
31740  M01S18466.cpum151 ---|          NZ     B4,REB5     IF NOT ENOUGH BUFFERS AVAILABLE
31741  M01S18467.cpum151 ---|          EQ     REB15       SET READ TRIGGER

Seq #  *Modification Id* Act 
----------------------------+
31742  M01S00016.cpum151 +++|          SB6    REB5
31743  M01S00017.cpum151 +++|          EQ     CAT         CHECK ALLOCATION TRIGGER
31744  M00S18468.cpumtr  +++|
31745  M00S18469.cpumtr  +++|*         ALLOCATE ADDITIONAL BUFFERS.
31746  M00S18470.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31747  M01S18471.251l664 ---| REB9.1   SA1    BIDX        CHECK SYSTEM FILE DATA FLAG
31748  M01S18472.251l664 ---|          BX6    X6-X6
31749  M01S18473.251l664 ---|          LX1    CBTLS
31750  M01S18474.251l664 ---|          TA1    X1+IOLK,CBT
31751  M01S18475.251l664 ---|          NO
31752  M01S18476.251l664 ---|          LX1    59-55
31753  M01S18477.251l664 ---|          PL     X1,REB9.2   IF NOT SYSTEM FILE DATA
31754  M01S18478.251l664 ---|          SA6    SFRF
31755  M01S18479.251l664 ---| REB9.2   SB4    RBTH        SET BUFFER COUNT TO ALLOCATE

Seq #  *Modification Id* Act 
----------------------------+
31756  M02S01352.251l670 ---| REB9.1   SB4    RBTH        SET NUMBER OF BUFFERS TO ALLOCATE

Seq #  *Modification Id* Act 
----------------------------+
31757  M01S00214.251l670 +++| REB9     SA3    RBTH        SET BUFFER COUNT TO ALLOCATE
31758  M01S00215.251l670 +++|          BX6    -X3
31759  M01S00216.251l670 +++|          ERRNZ  RBCT+1-RBTH  CODE DEPENDS ON VALUE
31760  M01S00217.251l670 +++|          SA6    A3-B1
31761  M00S18480.cpumtr  +++| REB10    SB6    REB11
31762  M00S18481.cpumtr  +++|          EQ     ANB         ALLOCATE NEXT BUFFER
31763  M00S18482.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31764  M01S18483.cpum151 ---| REB11    ZR     X0,REB15    IF NO BUFFERS AVAILABLE
31765  M01S18484.cpum151 ---|          BX6    X0          SAVE LATEST BUFFER
31766  M01S18485.cpum151 ---|          LX0    36          SAVE NEW LAST
31767  M01S18486.cpum151 ---|          AX7    12
31768  M01S18487.cpum151 ---|          BX7    X7+X0
31769  M01S18488.cpum151 ---|          TA6    IORQ        INITIATE I/O
31770  M01S18489.cpum151 ---|          XJ
31771  M01S18490.cpum151 ---|

Seq #  *Modification Id* Act 
----------------------------+
31772  M02S18491.cpum151 ---| REB11.1  SB4    B4-B1       DECREMENT COUNT
31773  M02S18492.cpum151 ---|          ZR     B4,REB15    IF COUNT ALLOCATED
31774  M02S18493.cpum151 ---|          SB6    REB12       RETURN ADDRESS FOR ROUTINE *SNS*

Seq #  *Modification Id* Act 
----------------------------+
31775  M02S00218.cpum151 ---| REB12    SA3    RBCT        DECREMENT READ BUFFER ALLOCATION
31776  M02S00219.cpum151 ---|          SX6    X3+B1
31777  M02S00220.cpum151 ---|          SA6    A3
31778  M02S00221.cpum151 ---|          ZR     X6,REB15    IF ALL BUFFERS ALLOCATED
31779  M02S00222.cpum151 ---|          SB6    REB13

Seq #  *Modification Id* Act 
----------------------------+
31780  M01S00018.cpum151 +++| REB11    ZR     X0,REB18    IF NO BUFFERS AVAILABLE
31781  M01S00019.cpum151 +++|          SB6    REB12
31782  M01S00020.cpum151 +++|          EQ     CAT         CHECK ALLOCATION TRIGGER
31783  M01S00021.cpum151 +++|
31784  M01S00022.cpum151 +++| REB12    TA7    IORQ        INITIATE I/O
31785  M01S00023.cpum151 +++|          XJ
31786  M01S00024.cpum151 +++|
31787  M01S00025.cpum151 +++| REB13    ZR     X6,REB18    IF ALL BUFFERS ALLOCATED
31788  M01S00026.cpum151 +++|          SB6    REB14
31789  M00S18494.cpumtr  +++|          EQ     SNS         SET NEXT SECTOR
31790  M00S18495.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31791  M01S18496.251l670 ---| REB12    NZ     X0,REB18    IF EOI

Seq #  *Modification Id* Act 
----------------------------+
31792  M02S00223.cpum151 ---| REB13    NZ     X0,REB18    IF EOI

Seq #  *Modification Id* Act 
----------------------------+
31793  M02S18497.cpum151 ---|          SB6    REB13       RETURN ADDRESS FOR ROUTINE *CLP*
31794  M02S18498.cpum151 ---|          EQ     CLP         CONVERT LOGICAL TO PHYSICAL
31795  M02S18499.cpum151 ---|

Seq #  *Modification Id* Act 
----------------------------+
31796  M02S18500.cpum151 ---| REB13    SB6    REB14       RETURN ADDRESS FOR ROUTINE *CHA*

Seq #  *Modification Id* Act 
----------------------------+
31797  M02S01353.cpum151 ---|          SB6    REB14       SET *CHA* EXIT ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
31798  M01S00027.cpum151 +++| REB14    NZ     X0,REB18    IF EOI
31799  M01S00028.cpum151 +++|          SB6    REB15

Seq #  *Modification Id* Act 
----------------------------+
31800  M01S18501.283l840 ---|          EQ     CHA         CALCULATE HASH ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
31801  M01S00418.283l840 +++|          TEQ    (/BUFIO/CSD,BIOMMF,/BUFIO/CHA)  CHECK BUFFER STATUS
31802  M00S18502.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31803  M01S18503.cpum151 ---| REB14    ZR     X2,REB10    IF FIRST ACCESS TO HASH ENTRY
31804  M01S18504.cpum151 ---|          NG     X2,REB15    IF HASH TABLE BUSY
31805  M01S18505.cpum151 ---|          ZR     X0,REB10    IF BUFFER NOT FOUND
31806  M01S18506.cpum151 ---|          LX0    36          SAVE LATEST BUFFER
31807  M01S18507.cpum151 ---|          AX7    12
31808  M01S18508.cpum151 ---|          BX7    X7+X0

Seq #  *Modification Id* Act 
----------------------------+
31809  M02S18509.cpum151 ---|          EQ     REB11.1     CONTINUE ALLOCATION

Seq #  *Modification Id* Act 
----------------------------+
31810  M02S00224.cpum151 ---|          EQ     REB12       CONTINUE ALLOCATION

Seq #  *Modification Id* Act 
----------------------------+
31811  M01S18510.cpum151 ---|

Seq #  *Modification Id* Act 
----------------------------+
31812  M02S18511.cpum151 ---| REB15    MX1    -12
31813  M02S18512.cpum151 ---|          AX7    12
31814  M02S18513.cpum151 ---|          BX1    -X1*X7
31815  M02S18514.cpum151 ---|          SX4    B1
31816  M02S18515.cpum151 ---|          ZR     X1,REB18    IF .LT. THREE BUFFERS ALLOCATED

Seq #  *Modification Id* Act 
----------------------------+
31817  M02S00225.cpum151 ---| REB15    SA3    DBAT        FETCH ALLOCATION TRIGGER
31818  M02S00226.cpum151 ---|          MX1    -12
31819  M02S00227.cpum151 ---|          SB6    X3
31820  M02S00228.cpum151 ---|          AX7    B6          POSITION *CBT* ORDINAL
31821  M02S00229.cpum151 ---|          SX4    1
31822  M02S00230.cpum151 ---|          BX1    -X1*X7
31823  M02S00231.cpum151 ---|          ZR     X1,REB18    IF .LT. TRIGGER VALUE ALLOCATED

Seq #  *Modification Id* Act 
----------------------------+
31824  M01S18516.cpum151 ---|          LX1    CBTLS
31825  M01S18517.cpum151 ---|          LX4    58-0
31826  M01S18518.cpum151 ---| +        TA3    X1+IOLK,CBT ** PERFORM IN ONE WORD
31827  M01S18519.cpum151 ---|          BX7    X3+X4       **
31828  M01S18520.cpum151 ---|          SA7    A3          **

Seq #  *Modification Id* Act 
----------------------------+
31829  M01S00029.cpum151 +++| REB15    ZR     X2,REB10    IF FIRST ACCESS TO HASH ENTRY

Seq #  *Modification Id* Act 
----------------------------+
31830  M02S00030.283l840 ---|          NG     X2,REB18    IF HASH TABLE BUSY

Seq #  *Modification Id* Act 
----------------------------+
31831  M01S00419.283l840 +++|          NG     X2,REB18    IF BUFFER CANNOT BE ALLOCATED

Seq #  *Modification Id* Act 
----------------------------+
31832  M01S00031.cpum151 +++|          ZR     X0,REB10    IF BUFFER NOT FOUND
31833  M01S00032.cpum151 +++|          SB6    REB13
31834  M01S00033.cpum151 +++|          EQ     CAT         CHECK ALLOCATION TRIGGER
31835  M00S18521.cpumtr  +++|
31836  M00S18522.cpumtr  +++|*         CHECK FOR NEXT BUFFER AVAILABLE FOR RESPONSE.
31837  M00S18523.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31838  M01S18524.251l664 ---| REB18    SX7    B0+
31839  M01S18525.251l664 ---|          SA1    REBF        GET FUNCTION FLAG
31840  M01S18526.251l664 ---|          SA7    FHEA        CLEAR FIRST HASH ENTRY ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
31841  M02S01354.283l840 ---| REB18    SA1    REBF        GET FUNCTION FLAG

Seq #  *Modification Id* Act 
----------------------------+
31842  M01S00420.283l840 +++| REB18    SA1    REBA        GET FUNCTION FLAG
31843  M00S18527.cpumtr  +++|          NZ     X1,LBMX     IF *REN* FUNCTION
31844  M00S18528.cpumtr  +++|          SA1    BCNT        GET ORIGINAL LTRK
31845  M00S18529.cpumtr  +++|          SA2    OLSC        GET ORIGINAL LSEC
31846  M00S18530.cpumtr  +++|          BX6    X1
31847  M00S18531.cpumtr  +++|          BX7    X2
31848  M00S18532.cpumtr  +++|          SA6    LTRK
31849  M00S18533.cpumtr  +++|          SA7    LSEC

Seq #  *Modification Id* Act 
----------------------------+
31850  M01S18534.251l670 ---|          SX6    RBTH        SET BUFFER COUNT TO ALLOCATE
31851  M01S18535.251l670 ---|          SA6    BCNT

Seq #  *Modification Id* Act 
----------------------------+
31852  M01S00232.251l670 +++|          SX6    B1          SET BUFFER COUNT TO ALLOCATE
31853  M01S00233.251l670 +++|          SA6    A1

Seq #  *Modification Id* Act 
----------------------------+
31854  M01S00019.cpum198 +++|          SA6    DTSF        SET DATA STREAMING FLAG
31855  M00S18536.cpumtr  +++|          EQ     RDB         USE READ FUNCTION CODE

Seq #  *Modification Id* Act 
----------------------------+
31856  M01S00421.283l840 +++|
31857  M01S00422.283l840 +++|
31858  M01S00423.283l840 +++| REBA     CON    0           *REN* FUNCTION FLAG
31859  M00S18537.cpumtr  +++| REN      SPACE  4,10
31860  M00S18538.cpumtr  +++|**        REN - RELEASE READ BUFFER.
31861  M00S18539.cpumtr  +++|*
31862  M00S18540.cpumtr  +++|*         ENTRY  INPUT REQUEST DECODED BY LBM MAIN ROUTINE.
31863  M00S18541.cpumtr  +++|*
31864  M00S18542.cpumtr  +++|*         EXIT   CONTROL GIVEN TO *REB*.
31865  M00S18543.cpumtr  +++|*
31866  M00S18544.cpumtr  +++|*         USES   A - 7.
31867  M00S18545.cpumtr  +++|*                X - 7.
31868  M00S18546.cpumtr  +++|
31869  M00S18547.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31870  M01S18548.283l840 ---| REN      SX7    1           SET *REN* FUNCTION FLAG
31871  M01S18549.283l840 ---|          SA7    REBF

Seq #  *Modification Id* Act 
----------------------------+
31872  M01S00424.283l840 +++| REN      BSS    0           ENTRY
31873  M01S00425.283l840 +++|          SX7    1           INDICATE *REN* FUNCTION
31874  M00S18550.cpumtr  +++|          EQ     REB1        USE *REB* CODE
31875  M00S18551.cpumtr  +++| RFB      SPACE  4,10
31876  M00S18552.cpumtr  +++|**        RFB - RELEASE AND FLUSH BUFFER.
31877  M00S18553.cpumtr  +++|*
31878  M00S18554.cpumtr  +++|*         ENTRY  INPUT REQUEST DECODED BY LBM MAIN ROUTINE.
31879  M00S18555.cpumtr  +++|*

Seq #  *Modification Id* Act 
----------------------------+
31880  M01S18556.283l840 ---|*         EXIT   CONTROL GIVEN TO FLB3.

Seq #  *Modification Id* Act 
----------------------------+
31881  M01S00426.283l840 +++|*         EXIT   TO *FLB1*.
31882  M00S18557.cpumtr  +++|*
31883  M00S18558.cpumtr  +++|*         USES   A - 2.
31884  M00S18559.cpumtr  +++|*                X - 0, 2.
31885  M00S18560.cpumtr  +++|
31886  M00S18561.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31887  M01S18562.283l840 ---| RFB      SA2    BIDX        GET BUFFER INDEX

Seq #  *Modification Id* Act 
----------------------------+
31888  M01S00427.283l840 +++| RFB      BSS    0           ENTRY
31889  M01S00428.283l840 +++|          SA2    BIDX        GET BUFFER INDEX
31890  M00S18563.cpumtr  +++|          BX6    X2
31891  M00S18564.cpumtr  +++|          LX2    CBTLS
31892  M00S18565.cpumtr  +++|          SA6    INLB        INTERLOCK BUFFER
31893  M00S18566.cpumtr  +++|          NZ     X2,FLB1     IF BUFFER INDEX
31894  M00S18567.cpumtr  +++|          EQ     /PROGRAM/HNG  HANG CALLER
31895  M00S18568.cpumtr  +++| RWB      SPACE  4,15
31896  M00S18569.cpumtr  +++|**        RWB - REWRITE BUFFER.
31897  M00S18570.cpumtr  +++|*
31898  M00S18571.cpumtr  +++|*         ENTRY  INPUT REQUEST DECODED BY LBM MAIN ROUTINE.
31899  M00S18572.cpumtr  +++|*
31900  M00S18573.cpumtr  +++|*         EXIT   CONTROL GIVEN TO LBMX.
31901  M00S18574.cpumtr  +++|*
31902  M00S18575.cpumtr  +++|*         USES   A - 1, 6.
31903  M00S18576.cpumtr  +++|*                X - 1, 6.
31904  M00S18577.cpumtr  +++|*
31905  M00S18578.cpumtr  +++|*         CALLS  WTB.
31906  M00S18579.cpumtr  +++|
31907  M00S18580.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31908  M01S18581.283l840 ---| RWB      SA1    LSEC        FORCE PREREAD

Seq #  *Modification Id* Act 
----------------------------+
31909  M01S00429.283l840 +++| RWB      BSS    0           ENTRY
31910  M01S00430.283l840 +++|          SA1    LSEC        FORCE PREREAD
31911  M00S18582.cpumtr  +++|          SX6    X1+1
31912  M00S18583.cpumtr  +++|          SA6    OLSC
31913  M00S18584.cpumtr  +++|          MX6    -1          BYPASS CHECK OF I/O ACTIVE COUNT
31914  M00S18585.cpumtr  +++|          SA6    BCNT

Seq #  *Modification Id* Act 
----------------------------+
31915  M01S18586.241l630 ---|          EQ     WTB         USE *WTB* FUNCTION

Seq #  *Modification Id* Act 
----------------------------+
31916  M01S00294.241l630 +++|*         EQ     WTB         USE *WTB* FUNCTION
31917  M00S18587.cpumtr  +++| WTB      SPACE  4,15
31918  M00S18588.cpumtr  +++|**        WTB - WRITE BUFFER.
31919  M00S18589.cpumtr  +++|*
31920  M00S18590.cpumtr  +++|*         ENTRY  INPUT REQUEST DECODED BY LBM MAIN ROUTINE.
31921  M00S18591.cpumtr  +++|*
31922  M00S18592.cpumtr  +++|*         EXIT   CONTROL GIVEN TO LBMX.
31923  M00S18593.cpumtr  +++|*
31924  M00S18594.cpumtr  +++|*         USES   A - 1, 2, 3, 4, 6, 7.

Seq #  *Modification Id* Act 
----------------------------+
31925  M01S18595.251l664 ---|*                B - 5, 6.

Seq #  *Modification Id* Act 
----------------------------+
31926  M01S01355.251l664 +++|*                B - 6.
31927  M00S18596.cpumtr  +++|*                X - 0, 1, 2, 3, 4, 6, 7.
31928  M00S18597.cpumtr  +++|*

Seq #  *Modification Id* Act 
----------------------------+
31929  M01S18598.241l630 ---|*         CALLS  ANB, CHA, CHT, CLP, DCC, SBB, SRC, SRR.

Seq #  *Modification Id* Act 
----------------------------+
31930  M02S00295.cpum243 ---|*         CALLS  ANB, CHA, CHT, DCC, SBB, SRC, SRP.

Seq #  *Modification Id* Act 
----------------------------+
31931  M01S00019.cpum243 +++|*         CALLS  ANB, CSD, CHA, CHT, DCC, SBB, SRC, SRP.
31932  M00S18599.cpumtr  +++|
31933  M00S18600.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31934  M01S18601.283l840 ---| WTB      SA1    ANBA        GET DATA WRITTEN THRESHOLD

Seq #  *Modification Id* Act 
----------------------------+
31935  M01S00431.283l840 +++| WTB      BSS    0           ENTRY
31936  M01S00432.283l840 +++|          SA1    ANBA        GET DATA WRITTEN THRESHOLD
31937  M00S18602.cpumtr  +++|          TX7    MDWB        GET UPPER LIMIT
31938  M00S18603.cpumtr  +++|          SX6    X1+B1       UPDATE THRESHOLD FOR WRITE
31939  M00S18604.cpumtr  +++|          IX7    X6-X7
31940  M00S18605.cpumtr  +++|          PL     X7,WTB1     IF AT UPPER LIMIT
31941  M00S18606.cpumtr  +++|          SA6    A1+         SAVE NEW THRESHOLD
31942  M00S18607.cpumtr  +++| WTB1     SX7    0           CLEAR PUSH STACK
31943  M00S18608.cpumtr  +++|          TX6    WRTB        SET WRITE AS CURRENT LIST
31944  M00S18609.cpumtr  +++|          SA6    CLST

Seq #  *Modification Id* Act 
----------------------------+
31945  M01S18610.241l630 ---|          SB6    WTB2        RETURN ADDRESS FOR ROUTINE *CLP*
31946  M01S18611.241l630 ---|          EQ     CLP         CONVERT LOGICAL TO PHYSICAL
31947  M01S18612.241l630 ---|
31948  M00S18613.cpumtr  +++| WTB2     SB6    WTB3        *CHA* RETURN ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
31949  M01S18614.283l840 ---|          EQ     CHA         CALCULATE HASH ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
31950  M01S00433.283l840 +++|          TEQ    (/BUFIO/CSD1,BIOMMF,/BUFIO/CHA)  CHECK BUFFER STATUS
31951  M00S18615.cpumtr  +++|
31952  M00S18616.cpumtr  +++| WTB3     ZR     X2,WTB12    IF FIRST ACCESS

Seq #  *Modification Id* Act 
----------------------------+
31953  M01S18617.283l840 ---|          NG     X2,WTB17    IF HASH TABLE FULL

Seq #  *Modification Id* Act 
----------------------------+
31954  M01S00434.283l840 +++|          NG     X2,WTB17    IF BUFFER CANNOT BE ACCESSED OR ALLOCATED
31955  M00S18618.cpumtr  +++|          ZR     X0,WTB9     IF CONTROL BUFFER NOT FOUND

Seq #  *Modification Id* Act 
----------------------------+
31956  M01S18619.251l664 ---|          BX6    X0          GET CONTROL BUFFER INDEX

Seq #  *Modification Id* Act 
----------------------------+
31957  M01S01356.251l664 +++|          SX6    X0+         BUFFER ORDINAL
31958  M00S18620.cpumtr  +++|          SA6    INLB        SET CONTROL BUFFER INTERLOCK
31959  M00S18621.cpumtr  +++|          LX6    CBTLS
31960  M00S18622.cpumtr  +++|          TA2    X6+LSLK,CBT
31961  M00S18623.cpumtr  +++|          MX3    12
31962  M00S18624.cpumtr  +++|          BX3    X3*X2
31963  M00S18625.cpumtr  +++|          NZ     X3,SBB      IF READ OR WRITE BUFFER
31964  M00S18626.cpumtr  +++|          TA2    X6+IOLK,CBT
31965  M00S18627.cpumtr  +++|          NG     X2,WTB8     IF I/O INTERLOCK SET

Seq #  *Modification Id* Act 
----------------------------+
31966  M01S18628.251l664 ---|          BX7    X0          SAVE CONTROL BUFFER INDEX

Seq #  *Modification Id* Act 
----------------------------+
31967  M01S01357.251l664 +++|          SX7    X0+         SAVE BUFFER ORDINAL
31968  M00S18629.cpumtr  +++|          SA7    FCBI
31969  M00S18630.cpumtr  +++|          SB6    WTB4        RETURN ADDRESS FOR ROUTINE *DCC*
31970  M00S18631.cpumtr  +++|          EQ     DCC         DELINK CONTROL BUFFER FROM CONTROL BUFFER
31971  M00S18632.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31972  M01S18633.251l664 ---| WTB4     SB6    WTB5        LINK TO END OF WRITE LIST

Seq #  *Modification Id* Act 
----------------------------+
31973  M01S01358.251l664 +++| WTB4     SB6    WTB6        LINK TO WRITE LIST
31974  M00S18634.cpumtr  +++|          TX1    WRTB
31975  M00S18635.cpumtr  +++|          EQ     LCC         LINK CONTROL BUFFER
31976  M00S18636.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31977  M01S18637.251l664 ---| WTB5     SA2    LSEC
31978  M01S18638.251l664 ---|          SA3    OLSC
31979  M01S18639.251l664 ---|          IX3    X3-X2
31980  M01S18640.251l664 ---|          ZR     X3,WTB6     IF START OF 4K
31981  M01S18641.251l664 ---|          BX1    X0
31982  M01S18642.251l664 ---|          LX1    CBTLS
31983  M01S18643.251l664 ---|          MX3    2
31984  M01S18644.251l664 ---|          TA2    X1,CBT
31985  M01S18645.251l664 ---|          LX3    58-59
31986  M01S18646.251l664 ---|          BX2    X2*X3
31987  M01S18647.251l664 ---|          NZ     X2,WTB7     IF DISK NOT READY OR CATASTROFIC
31988  M00S18648.cpumtr  +++| WTB6     BX1    X0          GET ADDRESS OF CONTROL BUFFER
31989  M00S18649.cpumtr  +++|          LX1    CBTLS
31990  M00S18650.cpumtr  +++|          TA2    X1+IOLK,CBT SET WRITE DATA ACCESS FLAG
31991  M00S18651.cpumtr  +++|          MX3    12          CLEAR OLD ACCESS FLAGS
31992  M00S18652.cpumtr  +++|          BX2    -X3*X2
31993  M00S18653.cpumtr  +++|          MX3    1
31994  M00S18654.cpumtr  +++|          LX3    57-59
31995  M00S18655.cpumtr  +++|          BX6    X2+X3
31996  M00S18656.cpumtr  +++|          SA6    A2

Seq #  *Modification Id* Act 
----------------------------+
31997  M01S18657.251l664 ---| WTB7     TA2    X1+LSLK,CBT SET WRITE INTERLOCK

Seq #  *Modification Id* Act 
----------------------------+
31998  M01S01359.251l664 +++|          TA2    X1+LSLK,CBT SET WRITE INTERLOCK
31999  M00S18658.cpumtr  +++|          MX3    12
32000  M00S18659.cpumtr  +++|          BX2    -X3*X2
32001  M00S18660.cpumtr  +++|          MX3    1
32002  M00S18661.cpumtr  +++|          BX6    X2+X3
32003  M00S18662.cpumtr  +++|          SA6    A2

Seq #  *Modification Id* Act 
----------------------------+
32004  M01S18663.251l664 ---|          SA2    LSEC        CHECK FOR START OF 4K
32005  M01S18664.251l664 ---|          SA3    OLSC
32006  M01S18665.251l664 ---|          IX3    X3-X2
32007  M01S18666.251l664 ---|          BX1    X0
32008  M01S18667.251l664 ---|          NZ     X3,LBMX     IF NOT START OF 4K
32009  M01S18668.251l664 ---|          LX1    CBTLS
32010  M01S18669.251l664 ---|          TA2    X1,CBT      CLEAR STATUS
32011  M01S18670.251l664 ---|          MX3    6
32012  M01S18671.251l664 ---|          BX6    -X3*X2
32013  M01S18672.251l664 ---|          SA6    A2
32014  M01S18673.251l664 ---|          EQ     LBMX        PROCESS RESPONSE

Seq #  *Modification Id* Act 
----------------------------+
32015  M01S01360.251l664 +++|          EQ     LBMX        EXIT
32016  M00S18674.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
32017  M01S18675.251l664 ---| WTB8     LX2    59-56
32018  M01S18676.251l664 ---|          NG     X2,SBB      IF I/O LINKUP SET
32019  M01S18677.251l664 ---|          SA3    SUBF

Seq #  *Modification Id* Act 
----------------------------+
32020  M02S01361.283l840 ---| WTB8     SA3    SUBF

Seq #  *Modification Id* Act 
----------------------------+
32021  M01S00435.283l840 +++| WTB8     SA3    OPAR
32022  M00S18678.cpumtr  +++|          TA2    X6+LSLK,CBT CHECK RECALL CONTROL
32023  M00S18679.cpumtr  +++|          NZ     X3,SBB      IF RECALL NOT ALLOWED
32024  M00S18680.cpumtr  +++|          MX3    -24
32025  M00S18681.cpumtr  +++|          BX3    -X3*X2
32026  M00S18682.cpumtr  +++|          NZ     X3,SBB      IF RECALL CONTROL SET
32027  M00S18683.cpumtr  +++|          BX6    X0
32028  M00S18684.cpumtr  +++|          SA6    FCBI
32029  M00S18685.cpumtr  +++|          SA1    RPRM        GET RECALL PARAMETER
32030  M00S18686.cpumtr  +++|          SX6    B1+B1
32031  M00S18687.cpumtr  +++|          LX6    24
32032  M00S18688.cpumtr  +++|          BX6    X6+X1
32033  M00S18689.cpumtr  +++|          LX6    12
32034  M00S18690.cpumtr  +++|          BX6    X6+X0
32035  M00S18691.cpumtr  +++|          TA6    IORQ
32036  M00S18692.cpumtr  +++|          XJ                 SET RECALL CONTROL
32037  M00S18693.cpumtr  +++|
32038  M00S18694.cpumtr  +++|          NZ     X6,SRR      IF FUNCTION ACCEPTED
32039  M00S18695.cpumtr  +++|          EQ     SBB         SET BUFFER BUSY RESPONSE
32040  M00S18696.cpumtr  +++|
32041  M00S18697.cpumtr  +++|*         CHECK FOR AMOUNT OF ACTIVITY ON DEVICE.
32042  M00S18698.cpumtr  +++|
32043  M00S18699.cpumtr  +++| WTB9     SA2    MSTA        CHECK DEVICE ACTIVITY
32044  M00S18700.cpumtr  +++|          SA2    X2+DALL

Seq #  *Modification Id* Act 
----------------------------+
32045  M01S18701.242l642 ---|          MX3    12
32046  M01S18702.242l642 ---|          BX4    X3*X2
32047  M01S18703.242l642 ---|          LX4    12

Seq #  *Modification Id* Act 
----------------------------+
32048  M01S00620.242l642 +++|          SX3    77B
32049  M01S00621.242l642 +++|          LX2    12
32050  M01S00622.242l642 +++|          BX4    X3*X2
32051  M00S18704.cpumtr  +++|          SX2    X4-DACL
32052  M00S18705.cpumtr  +++|          NG     X2,WTB12    IF DEVICE ACTIVITY OKAY

Seq #  *Modification Id* Act 
----------------------------+
32053  M01S18706.251l670 ---|          SA4    BCNT        GET COUNT

Seq #  *Modification Id* Act 
----------------------------+
32054  M01S00234.251l670 +++|          TX3    A5-1,-SP
32055  M01S00235.251l670 +++|          ZR     X3,WTB10    IF PSEUDO PP CALL
32056  M01S00236.251l670 +++|          SA2    A5+B1
32057  M01S00237.251l670 +++|          LX2    59-4
32058  M01S00238.251l670 +++|          NG     X2,WTB12    IF *1MV* CALL
32059  M01S00239.251l670 +++| WTB10    SA4    BCNT
32060  M00S18707.cpumtr  +++|          PL     X4,SBB      IF NOT CALLED BY *RWB*
32061  M00S18708.cpumtr  +++|
32062  M00S18709.cpumtr  +++|*         ALLOCATE A BUFFER FOR WRITE.
32063  M00S18710.cpumtr  +++|
32064  M00S18711.cpumtr  +++| WTB12    SB6    WTB13       RETURN ADDRESS FOR ROUTINE *ANB*
32065  M00S18712.cpumtr  +++|          EQ     ANB         ALLOCATE NEXT BUFFER
32066  M00S18713.cpumtr  +++|
32067  M00S18714.cpumtr  +++| WTB13    ZR     X0,SBB      IF BUFFER NOT AVAILABLE

Seq #  *Modification Id* Act 
----------------------------+
32068  M01S18715.251l664 ---|          BX6    X0          SAVE BUFFER INDEX FOR RESPONSE

Seq #  *Modification Id* Act 
----------------------------+
32069  M01S01362.251l664 +++|          SX6    X0+         SAVE BUFFER ORDINAL FOR RESPONSE
32070  M00S18716.cpumtr  +++|          SA6    FCBI
32071  M00S18717.cpumtr  +++|          SA2    LSEC        CHECK FOR I/O ON 4K BOUNDARY
32072  M00S18718.cpumtr  +++|          SA3    OLSC
32073  M00S18719.cpumtr  +++|          IX3    X3-X2

Seq #  *Modification Id* Act 
----------------------------+
32074  M01S18720.251l664 ---|          ZR     X3,WTB5     IF ON 4K BOUNDARY

Seq #  *Modification Id* Act 
----------------------------+
32075  M01S01363.251l664 +++|          ZR     X3,WTB6     IF ON FIRST PRU OF BUFFER
32076  M00S18721.cpumtr  +++|          SB6    WTB14       RETURN ADDRESS FOR ROUTINE *DCC*
32077  M00S18722.cpumtr  +++|          EQ     DCC         DELINK CONTROL BUFFER FROM CONTROL BUFFER
32078  M00S18723.cpumtr  +++|
32079  M00S18724.cpumtr  +++| WTB14    SB6    WTB15       LINK TO READ LIST
32080  M00S18725.cpumtr  +++|          TX1    DRDB
32081  M00S18726.cpumtr  +++|          EQ     LCC         LINK CONTROL BUFFER
32082  M00S18727.cpumtr  +++|
32083  M00S18728.cpumtr  +++| WTB15    SB6    WTB16       RETURN ADDRESS FOR ROUTINE *SRC*
32084  M00S18729.cpumtr  +++|          EQ     SRC         SET RECALL CONTROL
32085  M00S18730.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
32086  M01S18731.251l664 ---| WTB16    BX6    X0          INITIATE I/O ON BUFFER

Seq #  *Modification Id* Act 
----------------------------+
32087  M01S01364.251l664 +++| WTB16    SX6    X0+         INITIATE I/O ON BUFFER
32088  M00S18732.cpumtr  +++|          TA6    IORQ
32089  M00S18733.cpumtr  +++|          XJ
32090  M00S18734.cpumtr  +++|
32091  M00S18735.cpumtr  +++|          EQ     SRR         SET RECALL REPLY
32092  M00S18736.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
32093  M01S18737.283l840 ---| WTB17    SX6    B1          SET TO COUNT HASH TABLE FULL

Seq #  *Modification Id* Act 
----------------------------+
32094  M01S00436.283l840 +++| WTB17    SX6    X2+2
32095  M01S00437.283l840 +++|          ZR     X6,SBB      IF SHARED DEVICE BUFFER CANNOT BE ACCESSED
32096  M01S00438.283l840 +++|          SX6    B1          SET TO COUNT HASH TABLE FULL
32097  M00S18738.cpumtr  +++|          SB6    SBB         EXIT TO SET BUFFER BUSY
32098  M00S18739.cpumtr  +++|          LX6    24
32099  M00S18740.cpumtr  +++|          EQ     CHT         UPDATE COUNTERS
32100  M00S18741.cpumtr  +++| ANB      TITLE  SUBROUTINES.
32101  M00S18742.cpumtr  +++| ANB      SPACE  4,20
32102  M00S18743.cpumtr  +++|**        ANB - ALLOCATE NEXT BUFFER.
32103  M00S18744.cpumtr  +++|*
32104  M00S18745.cpumtr  +++|*         ENTRY  (X7) = BUFFERS ALLOCATED STACK.
32105  M00S18746.cpumtr  +++|*                (B6) = RETURN ADDRESS.
32106  M00S18747.cpumtr  +++|*                (B3) = SCRATCH AREA *SCRC* ADDRESS.
32107  M00S18748.cpumtr  +++|*                (CHEA) = CURRENT HASH ENTRY ADDRESS.

Seq #  *Modification Id* Act 
----------------------------+
32108  M01S01365.251l664 +++|*                (CLST) = ADDRESS OF CURRENT LIST CONTROL WORD.
32109  M01S01366.251l664 +++|*                (SFRF) = SYSTEM FILE READ FLAG.

Seq #  *Modification Id* Act 
----------------------------+
32110  M01S18749.241l630 ---|*                (PCYL) = PHYSICAL CYLINDER.
32111  M01S18750.241l630 ---|*                (UNIT) = UNIT NUMBER.
32112  M01S18751.241l630 ---|*                (TKSC) = CURRENT PHYSICAL TRACK/SECTOR.
32113  M00S18752.cpumtr  +++|*
32114  M00S18753.cpumtr  +++|*         EXIT   (X0) = CONTROL BUFFER INDEX ALLOCATED.
32115  M00S18754.cpumtr  +++|*                     = 0  IF NO BUFFER AVAILABLE.
32116  M00S18755.cpumtr  +++|*                ALLOCATED CONTROL BUFFER WILL CONTAIN
32117  M00S18756.cpumtr  +++|*                CORRECT PARAMETERS FOR THE REQUEST.
32118  M00S18757.cpumtr  +++|*
32119  M00S18758.cpumtr  +++|*         USES   A - 1, 2, 3, 4, 6.
32120  M00S18759.cpumtr  +++|*                B - 3, 6.
32121  M00S18760.cpumtr  +++|*                X - 0, 1, 2, 3, 4, 5, 6.
32122  M00S18761.cpumtr  +++|*

Seq #  *Modification Id* Act 
----------------------------+
32123  M01S18762.241l630 ---|*         CALLS  DCC, DCH, LCC, LCH.

Seq #  *Modification Id* Act 
----------------------------+
32124  M01S00296.241l630 +++|*         CALLS  CLP, DCC, DCH, LCC, LCH.
32125  M00S18763.cpumtr  +++|
32126  M00S18764.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
32127  M01S18765.283l840 ---| ANB      SA2    PUTO        PUT ORDINAL

Seq #  *Modification Id* Act 
----------------------------+
32128  M01S00439.283l840 +++| ANB      BSS    0           ENTRY
32129  M01S00440.283l840 +++|          SA2    PUTO        PUT ORDINAL
32130  M00S18766.cpumtr  +++|          BX0    X0-X0       PRESET NO BUFFER FOUND
32131  M00S18767.cpumtr  +++|          LX2    PUTLS
32132  M00S18768.cpumtr  +++|          TA2    X2+UNCT,PUT READ *PUT*

Seq #  *Modification Id* Act 
----------------------------+
32133  M01S18769.251l670 ---|          MX3    52
32134  M01S18770.251l670 ---|          MX4    -12
32135  M01S18771.251l670 ---|          LX2    -24
32136  M01S18772.251l670 ---|          BX4    -X4*X2
32137  M01S18773.251l670 ---|          BX3    X3*X4
32138  M01S18774.251l670 ---|          LX2    59-58+24

Seq #  *Modification Id* Act 
----------------------------+
32139  M01S00240.251l670 +++|          MX5    6
32140  M01S00241.251l670 +++|          SA1    A2+B1
32141  M01S00242.251l670 +++|          ERRNZ  UNCT+1-HSCT CODE DEPENDS ON VALUE
32142  M01S00243.251l670 +++|          MX4    -4
32143  M01S00244.251l670 +++|          LX2    -24-8
32144  M01S00245.251l670 +++|          BX6    X5*X1       PHYSICAL SECTORS PER I/O BUFFER
32145  M01S00246.251l670 +++|          BX3    -X4*X2
32146  M01S00247.251l670 +++|          LX6    6
32147  M01S00248.251l670 +++|          LX2    59-58+32
32148  M01S00249.251l670 +++|          SA6    ANBD
32149  M00S18775.cpumtr  +++|          NZ     X3,/MONITOR/RB6  IF TOO MANY REQUESTS ON UNIT

Seq #  *Modification Id* Act 
----------------------------+
32150  M01S18776.271l716 ---|          PL     X2,ANB0     IF *RW* FLAG NOT SET

Seq #  *Modification Id* Act 
----------------------------+
32151  M01S01877.271l716 +++|          PL     X2,ANB1     IF *RW* FLAG NOT SET

Seq #  *Modification Id* Act 
----------------------------+
32152  M01S18777.251l670 ---|          SA1    A2+B1
32153  M01S18778.251l670 ---|          ERRNZ  HSCT-UNCT-1 INDEXES MUST BE CONSECUTIVE
32154  M00S18779.cpumtr  +++|          LX1    59-12-8
32155  M00S18780.cpumtr  +++|          ERRNZ  RCTH-400B   VALUE MUST BE 400B
32156  M00S18781.cpumtr  +++|          NG     X1,/MONITOR/RB6  IF TOO MANY REQUESTS PROCESSED

Seq #  *Modification Id* Act 
----------------------------+
32157  M01S18782.271l716 ---| ANB0     SX6    B6          SAVE (B6)

Seq #  *Modification Id* Act 
----------------------------+
32158  M01S01878.271l716 +++| ANB1     SX6    B6          SAVE (B6)
32159  M00S18783.cpumtr  +++|          SA6    B3
32160  M00S18784.cpumtr  +++|          SA6    ANBA+1      SET DATA WRITTEN NOT SKIPPED
32161  M00S18785.cpumtr  +++|          SB3    B3+1
32162  M00S18786.cpumtr  +++|          TB6    EMTB        INITIALIZE LIST INDEX

Seq #  *Modification Id* Act 
----------------------------+
32163  M01S18787.271l716 ---| ANB1     SA1    B6          GET LIST BASE WORD
32164  M01S18788.271l716 ---|          SX0    X1          GET FIRST CONTROL BUFFER ON LIST
32165  M01S18789.271l716 ---|          ZR     X0,ANB15    IF LIST IS EMPTY
32166  M01S18790.271l716 ---| ANB2     BX6    X0          SET CONTROL BUFFER INTERLOCK

Seq #  *Modification Id* Act 
----------------------------+
32167  M01S01879.271l716 +++| ANB2     SA1    B6          GET LIST BASE WORD
32168  M01S01880.271l716 +++|          SX0    X1          GET FIRST CONTROL BUFFER ON LIST
32169  M01S01881.271l716 +++|          ZR     X0,ANB20    IF LIST IS EMPTY
32170  M01S01882.271l716 +++| ANB3     BX6    X0          SET CONTROL BUFFER INTERLOCK
32171  M00S18791.cpumtr  +++|          SA6    INLB
32172  M00S18792.cpumtr  +++|          LX6    CBTLS
32173  M00S18793.cpumtr  +++|          TA2    X6+LSLK,CBT GET LIST LINK WORD
32174  M00S18794.cpumtr  +++|          MX5    12          GET ACCESS COUNT
32175  M00S18795.cpumtr  +++|          BX4    X5*X2

Seq #  *Modification Id* Act 
----------------------------+
32176  M01S18796.271l716 ---|          NZ     X4,ANB14    IF ACCESS COUNT NOT ZERO
32177  M01S18797.271l716 ---|          SA4    A2-LSLK+IOLK  GET ACCESS FLAGS WORD
32178  M01S18798.271l716 ---|          NG     X4,ANB14    IF I/O INTERLOCK FLAG IS SET
32179  M01S18799.271l716 ---|          LX4    59-57
32180  M01S18800.271l716 ---|          PL     X4,ANB5     IF NOT WRITE DATA

Seq #  *Modification Id* Act 
----------------------------+
32181  M01S01883.271l716 +++|          NZ     X4,ANB19    IF ACCESS COUNT NOT ZERO
32182  M01S01884.271l716 +++|          SA4    A2-LSLK+IOLK  GET ACCESS FLAGS WORD
32183  M01S01885.271l716 +++|          NG     X4,ANB19    IF I/O INTERLOCK FLAG IS SET
32184  M01S01886.271l716 +++|          LX4    59-57
32185  M01S01887.271l716 +++|          PL     X4,ANB7     IF NOT WRITE DATA

Seq #  *Modification Id* Act 
----------------------------+
32186  M01S01367.251l664 +++|
32187  M01S01368.251l664 +++|*         AVOID FLUSH TO DOWN DEVICE.
32188  M01S01369.251l664 +++|

Seq #  *Modification Id* Act 
----------------------------+
32189  M02S01370.284l847 ---|          SA4    A2+B1
32190  M02S01371.284l847 ---|          ERRNZ  HSLK-IOLK-1 CODE DEPENDS ON VALUE
32191  M02S01372.284l847 ---|          MX5    -12
32192  M02S01373.284l847 ---|          BX4    -X5*X4
32193  M02S01374.284l847 ---|          LX4    PUTLS
32194  M02S01375.284l847 ---|          TA4    X4+UNCT,PUT
32195  M02S01376.284l847 ---|          LX4    -36

Seq #  *Modification Id* Act 
----------------------------+
32196  M03S01377.284l847 ---|          BX4    -X5*X4
32197  M03S01378.284l847 ---|          LX4    1
32198  M03S01379.284l847 ---|          ERRNZ  ESTE-2      CODE DEPENDS ON VALUE

Seq #  *Modification Id* Act 
----------------------------+
32199  M02S00131.284l847 ---|          BX3    -X5*X4      GET EST ORDINAL

Seq #  *Modification Id* Act 
----------------------------+
32200  M01S00022.284l847 +++|          SA4    A2+FSTC-LSLK  GET EST ORDINAL FROM CONTROL BUFFER

Seq #  *Modification Id* Act 
----------------------------+
32201  M02S00132.284l847 ---|          CX4    X3,EST      CONVERT EST ORDINAL TO OFFSET

Seq #  *Modification Id* Act 
----------------------------+
32202  M01S00023.284l847 +++|          BX6    X5*X4
32203  M01S00024.284l847 +++|          LX6    -48
32204  M01S00025.284l847 +++|          CX4    X6,EST      CONVERT EST ORDINAL TO OFFSET

Seq #  *Modification Id* Act 
----------------------------+
32205  M01S01380.251l664 +++|          SX6    B1
32206  M01S01381.251l664 +++|          TA4    X4+EQDE,EST
32207  M01S01382.251l664 +++|          LX4    59-49
32208  M01S01383.251l664 +++|          LX3    X4,B1

Seq #  *Modification Id* Act 
----------------------------+
32209  M02S01384.271l716 ---|          PL     X4,ANB2.1   IF DEVICE NOT DOWN
32210  M02S01385.271l716 ---|          NG     X3,ANB14    IF DEVICE IS DOWN

Seq #  *Modification Id* Act 
----------------------------+
32211  M01S01888.271l716 +++|          PL     X4,ANB4     IF DEVICE NOT DOWN
32212  M01S01889.271l716 +++|          NG     X3,ANB19    IF DEVICE IS DOWN
32213  M00S18801.cpumtr  +++|
32214  M00S18802.cpumtr  +++|*         WRITE BUFFER FOUND, FLUSH TO DISK.
32215  M00S18803.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
32216  M01S18804.251l664 ---|          TA2    WRTBC,BST   COUNT WRITE BUFFER REALLOCATED (FLUSHED)
32217  M01S18805.251l664 ---|          SX6    B1

Seq #  *Modification Id* Act 
----------------------------+
32218  M02S01386.271l716 ---| ANB2.1   TA2    WRTBC,BST   COUNT WRITE BUFFER REALLOCATED (FLUSHED)

Seq #  *Modification Id* Act 
----------------------------+
32219  M02S01890.283l840 ---| ANB4     TA2    WRTBC,BST   COUNT WRITE BUFFER REALLOCATED (FLUSHED)

Seq #  *Modification Id* Act 
----------------------------+
32220  M01S00441.283l840 +++| ANB4     TA2    WRTBC,IBST  COUNT WRITE BUFFER REALLOCATED (FLUSHED)
32221  M00S18806.cpumtr  +++|          IX6    X2+X6
32222  M00S18807.cpumtr  +++|          SA6    A2

Seq #  *Modification Id* Act 
----------------------------+
32223  M01S18808.251l664 ---|          BX6    X0          INITIATE I/O

Seq #  *Modification Id* Act 
----------------------------+
32224  M01S01387.251l664 +++|          SX6    X0+
32225  M00S18809.cpumtr  +++|          TA6    IORQ
32226  M00S18810.cpumtr  +++|          XJ
32227  M00S18811.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
32228  M01S18812.271l716 ---|          SB6    ANB3        RETURN ADDRESS FOR ROUTINE *DCC*

Seq #  *Modification Id* Act 
----------------------------+
32229  M01S01891.271l716 +++|          SB6    ANB5        RETURN ADDRESS FOR ROUTINE *DCC*
32230  M00S18813.cpumtr  +++|          EQ     DCC         DELINK CONTROL BUFFER FROM CONTROL BUFFER
32231  M00S18814.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
32232  M01S18815.271l716 ---| ANB3     SB6    ANB4        LINK TO DATA WRITTEN LIST

Seq #  *Modification Id* Act 
----------------------------+
32233  M01S01892.271l716 +++| ANB5     SB6    ANB6        LINK TO DATA WRITTEN LIST
32234  M00S18816.cpumtr  +++|          TX1    DWTB
32235  M00S18817.cpumtr  +++|          EQ     LCC         LINK CONTROL BUFFER
32236  M00S18818.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
32237  M01S18819.271l716 ---| ANB4     SX0    B0+         CLEAR BUFFER FOUND

Seq #  *Modification Id* Act 
----------------------------+
32238  M01S01893.271l716 +++| ANB6     SX0    B0+         CLEAR BUFFER FOUND
32239  M00S18820.cpumtr  +++|          SA1    ANBA+1
32240  M00S18821.cpumtr  +++|          NZ     X1,ANBX     IF DATA WRITTEN LIST PROCESSED
32241  M00S18822.cpumtr  +++|          TB6    DWTB        DATA WRITTEN LIST WAS SKIPPED INITIALLY

Seq #  *Modification Id* Act 
----------------------------+
32242  M01S18823.271l716 ---|          EQ     ANB1        PROCESS DATA WRITTEN LIST

Seq #  *Modification Id* Act 
----------------------------+
32243  M01S01894.271l716 +++|          EQ     ANB2        PROCESS DATA WRITTEN LIST
32244  M00S18824.cpumtr  +++|
32245  M00S18825.cpumtr  +++|*         UPDATE CONTROL BUFFER FOR NEW REQUEST.
32246  M00S18826.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
32247  M01S18827.271l716 ---| ANB5     TX2    B6-1,-BLMB  INCREMENT SELECTED LIST

Seq #  *Modification Id* Act 
----------------------------+
32248  M01S01895.271l716 +++| ANB7     TX2    B6-1,-BLMB  INCREMENT SELECTED LIST

Seq #  *Modification Id* Act 
----------------------------+
32249  M01S18828.283l840 ---|          TA2    X2,BST

Seq #  *Modification Id* Act 
----------------------------+
32250  M01S00442.283l840 +++|          TA2    X2,IBST
32251  M00S18829.cpumtr  +++|          SX6    1
32252  M00S18830.cpumtr  +++|          IX6    X2+X6
32253  M00S18831.cpumtr  +++|          SA6    A2

Seq #  *Modification Id* Act 
----------------------------+
32254  M01S18832.271l716 ---|          SB6    ANB6        RETURN ADDRESS FOR ROUTINE *DCC*

Seq #  *Modification Id* Act 
----------------------------+
32255  M01S01896.271l716 +++|          SB6    ANB8        RETURN ADDRESS FOR ROUTINE *DCC*
32256  M00S18833.cpumtr  +++|          EQ     DCC         DELINK CONTROL BUFFER FROM BUFFER LIST
32257  M00S18834.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
32258  M01S18835.271l716 ---| ANB6     SB6    ANB7        RETURN ADDRESS FOR ROUTINE *DCH*

Seq #  *Modification Id* Act 
----------------------------+
32259  M01S01897.271l716 +++| ANB8     SB6    ANB9        RETURN ADDRESS FOR ROUTINE *DCH*
32260  M00S18836.cpumtr  +++|          EQ     DCH         DELINK CONTROL BUFFER FROM HASH LINK
32261  M00S18837.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
32262  M01S18838.251l664 ---| ANB7     SA3    CHEA        GET HASH ENTRY ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
32263  M02S18839.251l664 ---|          SA2    TKSC        GET CURRENT TRACK/SECTOR

Seq #  *Modification Id* Act 
----------------------------+
32264  M02S00297.251l664 ---|          SA2    LSEC        GET CURRENT LOGICAL SECTOR

Seq #  *Modification Id* Act 
----------------------------+
32265  M01S18840.251l664 ---|          SA1    X3

Seq #  *Modification Id* Act 
----------------------------+
32266  M02S01388.ns2446  ---| ANB7     TX5    A5-1,-SP

Seq #  *Modification Id* Act 
----------------------------+
32267  M02S00017.271l716 ---| ANB7     SA3    CHEA

Seq #  *Modification Id* Act 
----------------------------+
32268  M01S01898.271l716 +++| ANB9     SA3    CHEA

Seq #  *Modification Id* Act 
----------------------------+
32269  M01S01389.251l664 +++|          SA2    LSEC        GET CURRENT LOGICAL SECTOR

Seq #  *Modification Id* Act 
----------------------------+
32270  M02S01390.ns2446  ---|          SA3    CHEA        GET HASH ENTRY ADDRESS
32271  M02S01391.ns2446  ---|          ZR     X5,ANB7.1   IF PSEUDO PP CALL
32272  M02S01392.ns2446  ---|          SA4    OLSC
32273  M02S01393.ns2446  ---|          SA1    A5+1
32274  M02S01394.ns2446  ---|          BX4    X4-X2
32275  M02S01395.ns2446  ---|          LX1    59-4
32276  M02S01396.ns2446  ---|          PL     X1,ANB7.1   IF NOT DEVICE VERIFICATION
32277  M02S01397.ns2446  ---|          SA1    PSUB
32278  M02S01398.ns2446  ---|          SX1    X1-BMWR
32279  M02S01399.ns2446  ---|          NZ     X1,ANB7.1   IF NOT A WRITE OPERATION
32280  M02S01400.ns2446  ---|          ZR     X4,ANB11    IF NOT A PRE-READ BEFORE WRITE
32281  M02S01401.ns2446  ---| ANB7.1   SA1    X3

Seq #  *Modification Id* Act 
----------------------------+
32282  M01S00018.ns2446  +++|          SA1    X3
32283  M00S18841.cpumtr  +++|          BX5    X1

Seq #  *Modification Id* Act 
----------------------------+
32284  M01S18842.271l716 ---|          NZ     X5,ANB8     IF NOT FIRST ENTRY

Seq #  *Modification Id* Act 
----------------------------+
32285  M01S01899.271l716 +++|          NZ     X5,ANB11    IF NOT FIRST ENTRY

Seq #  *Modification Id* Act 
----------------------------+
32286  M01S18843.241l630 ---|          SA3    PCYL        FORM HASH ENTRY

Seq #  *Modification Id* Act 
----------------------------+
32287  M01S00298.241l630 +++|          SA3    LTRK        FORM HASH ENTRY
32288  M00S18844.cpumtr  +++|          LX2    24
32289  M00S18845.cpumtr  +++|          BX5    X2
32290  M00S18846.cpumtr  +++|          LX2    12
32291  M00S18847.cpumtr  +++|          BX5    X5+X2
32292  M00S18848.cpumtr  +++|          LX3    48
32293  M00S18849.cpumtr  +++|          BX6    X5+X3
32294  M00S18850.cpumtr  +++|          SA6    A1+

Seq #  *Modification Id* Act 
----------------------------+
32295  M01S18851.271l716 ---|          EQ     ANB11       SET NEW PARAMETERS IN BUFFER
32296  M01S18852.271l716 ---|
32297  M01S18853.271l716 ---| ANB8     MX6    12          CHECK FIRST AND LAST LIMITS

Seq #  *Modification Id* Act 
----------------------------+
32298  M01S01900.271l716 +++|          EQ     ANB14       CREATE NEW HASH ENTRY
32299  M01S01901.271l716 +++|
32300  M01S01902.271l716 +++| ANB11    MX6    12          CHECK FIRST AND LAST LIMITS
32301  M00S18854.cpumtr  +++|          LX6    36
32302  M00S18855.cpumtr  +++|          BX4    X6*X5
32303  M00S18856.cpumtr  +++|          LX6    12
32304  M00S18857.cpumtr  +++|          BX3    X6*X5
32305  M00S18858.cpumtr  +++|          AX4    24
32306  M00S18859.cpumtr  +++|          AX3    36
32307  M00S18860.cpumtr  +++|          IX6    X4-X2

Seq #  *Modification Id* Act 
----------------------------+
32308  M01S18861.271l716 ---|          PL     X6,ANB9     IF LAST LIMIT VALID
32309  M01S18862.271l716 ---|          BX4    X2          SET NEW LAST LIMIT
32310  M01S18863.271l716 ---|          EQ     ANB10       MODIFY HASH ENTRY
32311  M01S18864.271l716 ---|
32312  M01S18865.271l716 ---| ANB9     IX6    X2-X3
32313  M01S18866.271l716 ---|          BX3    X2          SET NEW FIRST LIMIT
32314  M01S18867.271l716 ---|          PL     X6,ANB11    IF FIRST LIMIT VALID
32315  M01S18868.271l716 ---| ANB10    LX3    36          MODIFY HASH ENTRY

Seq #  *Modification Id* Act 
----------------------------+
32316  M01S01903.271l716 +++|          PL     X6,ANB12    IF LAST LIMIT VALID
32317  M01S01904.271l716 +++|          BX4    X2
32318  M01S01905.271l716 +++|          EQ     ANB13       MODIFY HASH ENTRY
32319  M01S01906.271l716 +++|
32320  M01S01907.271l716 +++| ANB12    IX6    X2-X3       CHECK FIRST LIMIT
32321  M01S01908.271l716 +++|          BX3    X2
32322  M01S01909.271l716 +++|          PL     X6,ANB14    IF FIRST LIMIT VALID
32323  M01S01910.271l716 +++| ANB13    LX3    36
32324  M00S18869.cpumtr  +++|          LX4    24
32325  M00S18870.cpumtr  +++|          MX6    24
32326  M00S18871.cpumtr  +++|          LX6    48
32327  M00S18872.cpumtr  +++|          BX5    -X6*X5      CLEAR OLD LIMITS
32328  M00S18873.cpumtr  +++|          BX5    X5+X4       ADD NEW LIMITS
32329  M00S18874.cpumtr  +++|          BX6    X5+X3
32330  M00S18875.cpumtr  +++|          SA6    A1

Seq #  *Modification Id* Act 
----------------------------+
32331  M01S18876.241l630 ---| ANB11    SA3    UNIT        GET NEW UNIT
32332  M01S18877.241l630 ---|          BX2    X0          CONTROL BUFFER ORDINAL

Seq #  *Modification Id* Act 
----------------------------+
32333  M02S00299.271l716 ---| ANB11    SB6    ANB11.1     *CLP* RETURN ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
32334  M01S01911.271l716 +++| ANB14    SB6    ANB15       *CLP* RETURN ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
32335  M01S00300.241l630 +++|          EQ     CLP         CONVERT LOGICAL TO PHYSICAL DISK ADDRESS
32336  M01S00301.241l630 +++|

Seq #  *Modification Id* Act 
----------------------------+
32337  M01S00026.284l847 +++|*         (X0) = CONTROL BUFFER ORDINAL.
32338  M01S00027.284l847 +++|*         (X1) = PHYSICAL CYLINDER NUMBER.
32339  M01S00028.284l847 +++|*         (X3) = PHYSICAL UNIT NUMBER.
32340  M01S00029.284l847 +++|*         (X4) = 48/, 6/PHYSICAL TRACK, 6/PHYSICAL SECTOR.
32341  M01S00030.284l847 +++|

Seq #  *Modification Id* Act 
----------------------------+
32342  M02S00302.271l716 ---| ANB11.1  BX2    X0          CONTROL BUFFER ORDINAL

Seq #  *Modification Id* Act 
----------------------------+
32343  M01S01912.271l716 +++| ANB15    BX2    X0          CONTROL BUFFER ORDINAL
32344  M00S18878.cpumtr  +++|          LX2    CBTLS

Seq #  *Modification Id* Act 
----------------------------+
32345  M01S18879.241l630 ---|          SA4    PCYL        GET NEW CYLINDER
32346  M01S18880.241l630 ---|          SA1    TKSC        GET NEW TK, SEC
32347  M00S18881.cpumtr  +++|          LX3    48

Seq #  *Modification Id* Act 
----------------------------+
32348  M01S18882.241l630 ---|          LX4    36
32349  M01S18883.241l630 ---|          LX1    24

Seq #  *Modification Id* Act 
----------------------------+
32350  M01S00303.241l630 +++|          LX1    36
32351  M01S00304.241l630 +++|          LX4    24
32352  M00S18884.cpumtr  +++|          BX6    X3+X4
32353  M00S18885.cpumtr  +++|          SA4    LSEC        BUILD LOGICAL NEXT SECTOR IN BUFFER
32354  M00S18886.cpumtr  +++|          SX3    LSLB/4
32355  M00S18887.cpumtr  +++|          IX5    X3+X4
32356  M00S18888.cpumtr  +++|          BX6    X6+X1
32357  M00S18889.cpumtr  +++|          BX6    X5+X6

Seq #  *Modification Id* Act 
----------------------------+
32358  M01S18890.284l847 ---|          SX5    B1

Seq #  *Modification Id* Act 
----------------------------+
32359  M01S18891.251l664 ---|          TA6    X2,CBT

Seq #  *Modification Id* Act 
----------------------------+
32360  M01S01402.251l664 +++|          TA6    X2+PAD1,CBT

Seq #  *Modification Id* Act 
----------------------------+
32361  M01S18892.241l630 ---|          TSX2   (2,1,IHPFMD)

Seq #  *Modification Id* Act 
----------------------------+
32362  M02S00305.ns2422  ---|          SA2    ANBD        PHYSICAL SECTORS PER I/O BUFFER

Seq #  *Modification Id* Act 
----------------------------+
32363  M02S00001.251l670 ---|          TA2    SPBB        PHYSICAL SECTORS PER I/O BUFFER

Seq #  *Modification Id* Act 
----------------------------+
32364  M01S00250.251l670 +++|          SA2    ANBD        PHYSICAL SECTORS PER I/O BUFFER

Seq #  *Modification Id* Act 
----------------------------+
32365  M02S00306.284l847 ---|          AX2    2           PHYSICAL SECTORS PER CONTROL WORD

Seq #  *Modification Id* Act 
----------------------------+
32366  M01S00031.284l847 +++|          MX5    -1
32367  M01S00032.284l847 +++|          AX2    1
32368  M01S00033.284l847 +++|          BX5    -X5*X2      SECTOR INCREMENT - SECTOR SIZE .EQ. 8K
32369  M01S00034.284l847 +++|          AX2    1           SECTOR INCREMENT - SECTORS SIZES .LT. 8K
32370  M01S00035.284l847 +++|          LX5    24
32371  M00S18893.cpumtr  +++|          LX2    24
32372  M00S18894.cpumtr  +++|          BX2    X2+X3       MERGE LOGICAL SECTOR INCREMENT
32373  M00S18895.cpumtr  +++|          ERRNZ  PSLB-4      CODE PRESETS SECTOR CONTROL WORD WORDS
32374  M00S18896.cpumtr  +++|          IX6    X6+X2       *PAD2*
32375  M00S18897.cpumtr  +++|          SA6    A6+B1

Seq #  *Modification Id* Act 
----------------------------+
32376  M01S01403.251l664 +++|          ERRNZ  PAD2-PAD1-1  CODE DEPENDS ON VALUE
32377  M00S18898.cpumtr  +++|          IX6    X6+X2       *PAD3*

Seq #  *Modification Id* Act 
----------------------------+
32378  M01S00036.284l847 +++|          IX6    X6+X5       INCREMENT FOR 8K SECTORS
32379  M00S18899.cpumtr  +++|          SA6    A6+B1

Seq #  *Modification Id* Act 
----------------------------+
32380  M01S01404.251l664 +++|          ERRNZ  PAD3-PAD2-1  CODE DEPENDS ON VALUE
32381  M00S18900.cpumtr  +++|          IX6    X6+X2       *PAD4*
32382  M00S18901.cpumtr  +++|          AX6    12          SET NO LINK IN LAST CONTROL WORD
32383  M00S18902.cpumtr  +++|          LX6    12
32384  M00S18903.cpumtr  +++|          SA6    A6+B1

Seq #  *Modification Id* Act 
----------------------------+
32385  M01S01405.251l664 +++|          ERRNZ  PAD4-PAD3-1  CODE DEPENDS ON VALUE
32386  M00S18904.cpumtr  +++|          SA1    FNTA        BUILD PSEUDO-*FST*

Seq #  *Modification Id* Act 
----------------------------+
32387  M01S00037.284l847 +++|          SX5    B1
32388  M00S18905.cpumtr  +++|          IX1    X1+X5
32389  M00S18906.cpumtr  +++|          ERX1   X1
32390  M00S18907.cpumtr  +++|          SA2    LTRK
32391  M00S18908.cpumtr  +++|          MX3    24
32392  M00S18909.cpumtr  +++|          BX6    X1*X3       EQUIPMENT
32393  M00S18910.cpumtr  +++|          LX2    24
32394  M00S18911.cpumtr  +++|          LX4    12
32395  M00S18912.cpumtr  +++|          BX6    X6+X2       LOGICAL TRACK
32396  M00S18913.cpumtr  +++|          BX6    X6+X4       LOGICAL SECTOR
32397  M00S18914.cpumtr  +++|          SA6    A6+B1       SET *FST* IN CONTROL BUFFER
32398  M00S18915.cpumtr  +++|          ERRNZ  FSTC-PAD4-1 INDEXES MUST BE CONSECUTIVE

Seq #  *Modification Id* Act 
----------------------------+
32399  M01S18916.251l664 ---|          SA2    SFRF        CHECK SYSTEM FILE READ FLAG
32400  M01S18917.251l664 ---|          BX6    X6-X6
32401  M01S18918.251l664 ---|          AX2    1
32402  M01S18919.251l664 ---|          NZ     X2,ANB12.1  IF NOT SYSTEM FILE READ
32403  M01S18920.251l664 ---|          SX6    B1          SET SYSTEM FILE BIT
32404  M01S18921.251l664 ---|          LX6    55
32405  M01S18922.251l664 ---| ANB12.1  BX1    X0

Seq #  *Modification Id* Act 
----------------------------+
32406  M01S01406.251l664 +++|          SA2    SFRF        SET/CLEAR SYSTEM FILE READ FLAG
32407  M01S01407.251l664 +++|          BX1    X0
32408  M01S01408.251l664 +++|          BX6    X2
32409  M00S18923.cpumtr  +++|          LX1    CBTLS

Seq #  *Modification Id* Act 
----------------------------+
32410  M01S18924.251l664 ---|          TA2    X1+IOLK,CBT
32411  M01S18925.251l664 ---|          MX3    -48

Seq #  *Modification Id* Act 
----------------------------+
32412  M01S01409.251l664 +++|          MX3    -48
32413  M01S01410.251l664 +++|          SA2    A6+B1
32414  M01S01411.251l664 +++|          ERRNZ  IOLK-FSTC-1 CODE DEPENDS ON VALUE
32415  M01S01412.251l664 +++|          SA4    A2+B1
32416  M01S01413.251l664 +++|          ERRNZ  HSLK-IOLK-1 CODE DEPENDS ON VALUE
32417  M00S18926.cpumtr  +++|          BX2    -X3*X2
32418  M00S18927.cpumtr  +++|          BX6    X6+X2

Seq #  *Modification Id* Act 
----------------------------+
32419  M01S18928.251l664 ---|          SA6    A2
32420  M00S18929.cpumtr  +++|          SA1    CLST        LINK TO CURRENT LIST

Seq #  *Modification Id* Act 
----------------------------+
32421  M01S18930.271l716 ---|          SB6    ANB13

Seq #  *Modification Id* Act 
----------------------------+
32422  M01S01913.271l716 +++|          SB6    ANB18

Seq #  *Modification Id* Act 
----------------------------+
32423  M02S01414.253l688 ---|          SA6    A2+
32424  M02S01415.253l688 ---|          BX6    -X3*X4      CLEAR ERROR DATA

Seq #  *Modification Id* Act 
----------------------------+
32425  M01S01574.253l688 +++|          SA6    A2
32426  M01S01575.253l688 +++|          BX5    -X3*X4      CLEAR ERROR DATA

Seq #  *Modification Id* Act 
----------------------------+
32427  M01S01416.251l664 +++|          SA3    CHAN
32428  M01S01417.251l664 +++|          SA2    CHRV
32429  M01S01418.251l664 +++|          TX4    A5-1,-SP

Seq #  *Modification Id* Act 
----------------------------+
32430  M02S01419.271l716 ---|          ZR     X4,ANB11.2  IF PSEUDO PP
32431  M02S01420.271l716 ---|          SA2    A5+1
32432  M02S01421.271l716 ---| ANB11.2  LX2    59-4

Seq #  *Modification Id* Act 
----------------------------+
32433  M03S01422.271l716 ---|          LX3    48
32434  M03S01423.271l716 ---|          PL     X2,ANB12    IF CHANNEL NOT SELECTED BY CALLER
32435  M03S01424.271l716 ---|          SX4    B1
32436  M03S01425.271l716 ---|          LX4    58
32437  M03S01426.271l716 ---|          BX6    X3+X6       MERGE CHANNEL
32438  M03S01427.271l716 ---|          BX6    X4+X6       MERGE CHANNEL SELECTION FLAG
32439  M03S01428.271l716 ---| ANB12    SA6    A4

Seq #  *Modification Id* Act 
----------------------------+
32440  M02S01576.271l716 ---|          PL     X2,ANB12    IF CHANNEL NOT SELECTED BY CALLER

Seq #  *Modification Id* Act 
----------------------------+
32441  M01S01914.271l716 +++|          ZR     X4,ANB16    IF PSEUDO PP
32442  M01S01915.271l716 +++|          SA2    A5+1
32443  M01S01916.271l716 +++| ANB16    LX2    59-4
32444  M01S01917.271l716 +++|          PL     X2,ANB17    IF CHANNEL NOT SELECTED BY CALLER

Seq #  *Modification Id* Act 
----------------------------+
32445  M01S01577.253l688 +++|          LX3    54
32446  M01S01578.253l688 +++|          SA2    A4-HSLK+PAD4
32447  M01S01579.253l688 +++|          BX6    X2+X3       MERGE CHANNEL INTO *PAD4*
32448  M01S01580.253l688 +++|          SA6    A2
32449  M01S01581.253l688 +++|          SX4    B1+
32450  M01S01582.253l688 +++|          LX4    58
32451  M01S01583.253l688 +++|          BX5    X4+X5       MERGE CHANNEL SELECTION FLAG INTO *HSLK*

Seq #  *Modification Id* Act 
----------------------------+
32452  M02S01584.271l716 ---| ANB12    BX6    X5

Seq #  *Modification Id* Act 
----------------------------+
32453  M01S01918.271l716 +++| ANB17    BX6    X5

Seq #  *Modification Id* Act 
----------------------------+
32454  M01S01585.253l688 +++|          SA6    A4
32455  M00S18931.cpumtr  +++|          EQ     LCC         LINK CONTROL BUFFER
32456  M00S18932.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
32457  M01S18933.271l716 ---| ANB13    SA2    B3-B1       RESTORE (B6)

Seq #  *Modification Id* Act 
----------------------------+
32458  M01S01919.271l716 +++| ANB18    SA2    B3-B1       RESTORE (B6)
32459  M00S18934.cpumtr  +++|          SB3    B3-B1
32460  M00S18935.cpumtr  +++|          SA1    CHEA
32461  M00S18936.cpumtr  +++|          SB6    X2
32462  M00S18937.cpumtr  +++|          EQ     LCH         LINK CONTROL BUFFER TO HASH CHAIN
32463  M00S18938.cpumtr  +++|
32464  M00S18939.cpumtr  +++|*         GET NEXT CONTROL BUFFER ON THREAD.
32465  M00S18940.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
32466  M01S18941.271l716 ---| ANB14    BX1    X0          GET CONTROL BUFFER ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
32467  M01S01920.271l716 +++| ANB19    BX1    X0          GET CONTROL BUFFER ADDRESS
32468  M00S18942.cpumtr  +++|          LX1    CBTLS
32469  M00S18943.cpumtr  +++|          TA2    X1+LSLK,CBT READ LIST LINK WORD
32470  M00S18944.cpumtr  +++|          MX3    -12         GET FORWARD LINK
32471  M00S18945.cpumtr  +++|          AX2    24
32472  M00S18946.cpumtr  +++|          BX0    -X3*X2

Seq #  *Modification Id* Act 
----------------------------+
32473  M01S18947.271l716 ---|          NZ     X0,ANB2     IF ANOTHER BUFFER TO CHECK
32474  M01S18948.271l716 ---|          TX1    B6,-DWTB
32475  M01S18949.271l716 ---|          NZ     X1,ANB15    IF NOT PROCESSING DATA WRITTEN LIST

Seq #  *Modification Id* Act 
----------------------------+
32476  M01S01921.271l716 +++|          NZ     X0,ANB3     IF ANOTHER BUFFER TO CHECK
32477  M01S01922.271l716 +++|          TX1    B6,-DWTB
32478  M01S01923.271l716 +++|          NZ     X1,ANB20    IF NOT PROCESSING DATA WRITTEN LIST
32479  M00S18950.cpumtr  +++|          SA1    ANBA+1
32480  M00S18951.cpumtr  +++|          ZR     X1,ANBX     IF DATA WRITTEN SKIPPED INITIALLY
32481  M00S18952.cpumtr  +++|
32482  M00S18953.cpumtr  +++|*         CHECK NEXT LIST.
32483  M00S18954.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
32484  M01S18955.251l664 ---| ANB15    SB6    B6+B1       UPDATE LIST INDEX

Proceed to Part 26