Deck CPUMTR Part 024

308 Modifications

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

Seq #  *Modification Id* Act 
----------------------------+
30351  M01S17771.251l664 ---|          EQ     DAB         DROP ALL BUFFERS
30352  M01S17772.251l664 ---|          ERRNZ  *-BMDB      INDEX MUST MATCH POSITION IN TABLE
30353  M00S17773.cpumtr  +++|          EQ     FAW         FLUSH ALL WRITE BUFFERS

Seq #  *Modification Id* Act 
----------------------------+
30354  M01S17774.283l840 ---|          ERRNZ  *-BMFW      INDEX MUST MATCH POSITION IN TABLE

Seq #  *Modification Id* Act 
----------------------------+
30355  M01S00235.283l840 +++|          ERRNZ  BMFW-10B
30356  M01S00236.283l840 +++|          TEQ    (/BUFIO/RRA,BIOMMF,/PROGRAM/HNG)
30357  M01S00237.283l840 +++|          ERRNZ  BMTR-11B
30358  M01S00238.283l840 +++|          TEQ    (/BUFIO/RWA,BIOMMF,/PROGRAM/HNG)
30359  M01S00239.283l840 +++|          ERRNZ  BMTW-12B

Seq #  *Modification Id* Act 
----------------------------+
30360  M01S01079.251l664 +++|          EQ     DAB         DROP ALL BUFFERS

Seq #  *Modification Id* Act 
----------------------------+
30361  M02S01080.283l840 ---|          ERRNZ  *-BMDB      INDEX MUST MATCH POSITION IN TABLE

Seq #  *Modification Id* Act 
----------------------------+
30362  M01S17775.283l840 ---|          LOC    *O

Seq #  *Modification Id* Act 
----------------------------+
30363  M01S00240.283l840 +++|          ERRNZ  BMDB-13B
30364  M01S00241.283l840 +++|          EQ     DBD         DROP ALL BUFFERS ON DEVICE
30365  M01S00242.283l840 +++|          ERRNZ  BMDD-14B
30366  M01S00243.283l840 +++|          TEQ    (/BUFIO/CRR,BIOMMF,/PROGRAM/HNG)
30367  M01S00244.283l840 +++|          ERRNZ  BMCR-15B
30368  M01S00245.283l840 +++|          TEQ    (/BUFIO/CWR,BIOMMF,/PROGRAM/HNG)
30369  M01S00246.283l840 +++|          ERRNZ  BMCW-16B
30370  M00S17776.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
30371  M01S17777.283l840 ---|*         SET UP LBM RESPONSE.

Seq #  *Modification Id* Act 
----------------------------+
30372  M01S00247.283l840 +++|*         PROCESS NORMAL COMPLETION.
30373  M00S17778.cpumtr  +++|
30374  M00S17779.cpumtr  +++| LBMX     SA3    PUTO        COUNT BUFFER REQUEST

Seq #  *Modification Id* Act 
----------------------------+
30375  M01S17780.251l664 ---|          SX6    B1

Seq #  *Modification Id* Act 
----------------------------+
30376  M01S01081.251l664 +++|          SX7    B1+
30377  M00S17781.cpumtr  +++|          LX3    PUTLS

Seq #  *Modification Id* Act 
----------------------------+
30378  M01S01082.251l664 +++|          SX6    B0+         CLEAR STATUS

Seq #  *Modification Id* Act 
----------------------------+
30379  M01S17782.cpum242 ---| +        TA1    X3+ACST,PUT **        PERFORM UPDATE IN ONE WORD

Seq #  *Modification Id* Act 
----------------------------+
30380  M02S17783.cpum242 ---|          IX6    X1+X6       **
30381  M02S17784.cpum242 ---|          SA6    A1          **
30382  M02S17785.cpum242 ---|          SA1    STAT        GET STATUS BITS

Seq #  *Modification Id* Act 
----------------------------+
30383  M02S01083.cpum242 ---|          IX7    X1+X7       **
30384  M02S01084.cpum242 ---|          SA7    A1          **

Seq #  *Modification Id* Act 
----------------------------+
30385  M01S00007.cpum242 +++|+         TA1    X3+ACST,PUT **** PERFORM IN ONE WORD ****
30386  M01S00008.cpum242 +++|          IX7    X1+X7       **** PERFORM IN ONE WORD ****
30387  M01S00009.cpum242 +++|          SA7    A1          **** PERFORM IN ONE WORD ****
30388  M00S17786.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
30389  M01S17787.251l664 ---|*         ENTRY  (X1) = (STAT).

Seq #  *Modification Id* Act 
----------------------------+
30390  M02S01085.283l840 ---|*         ENTRY  (X6) = STATUS.

Seq #  *Modification Id* Act 
----------------------------+
30391  M01S00248.283l840 +++|*         EXIT BUFFER MANAGER WITH STATUS FROM *X6*.
30392  M00S17788.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
30393  M01S17789.ns2318  ---| LBMXS    MX2    2

Seq #  *Modification Id* Act 
----------------------------+
30394  M02S00008.251l664 ---| LBMXS    MX2    5

Seq #  *Modification Id* Act 
----------------------------+
30395  M01S17790.251l664 ---|          BX6    X1*X2
30396  M01S17791.251l664 ---|
30397  M01S17792.251l664 ---|*         GET UNIT, CYL, TRACK, SEC, FROM CONTROL BUFFER.
30398  M01S17793.251l664 ---|
30399  M01S17794.251l664 ---|          SA2    FCBI

Seq #  *Modification Id* Act 
----------------------------+
30400  M01S01086.251l664 +++| LBMXS    SA2    FCBI

Seq #  *Modification Id* Act 
----------------------------+
30401  M01S17795.271l716 ---|          ZR     X2,LBM7     IF NO BUFFER FOR RESPONSE

Seq #  *Modification Id* Act 
----------------------------+
30402  M01S01867.271l716 +++|          ZR     X2,LBM9     IF NO BUFFER FOR RESPONSE

Seq #  *Modification Id* Act 
----------------------------+
30403  M01S17796.251l664 ---|          BX6    X6+X2       GET UNIT, CYL, TRK, SEC

Seq #  *Modification Id* Act 
----------------------------+
30404  M01S01087.251l664 +++|          BX1    X2
30405  M00S17797.cpumtr  +++|          LX2    CBTLS

Seq #  *Modification Id* Act 
----------------------------+
30406  M01S17798.251l664 ---|          TA3    X2,CBT
30407  M01S17799.251l664 ---|          MX2    30
30408  M01S17800.251l664 ---|          LX2    -6

Seq #  *Modification Id* Act 
----------------------------+
30409  M01S01088.251l664 +++|          TA3    X2+HSLK,CBT GET DRIVER STATUS

Seq #  *Modification Id* Act 
----------------------------+
30410  M01S17801.251l664 ---|          BX2    X2*X3

Seq #  *Modification Id* Act 
----------------------------+
30411  M01S01089.251l664 +++|          MX4    1
30412  M01S01090.251l664 +++|          BX2    X4*X3       GET I/O ERROR FLAG
30413  M01S01091.251l664 +++|          LX2    57-59

Seq #  *Modification Id* Act 
----------------------------+
30414  M01S17802.251l664 ---|          BX6    X6+X2

Seq #  *Modification Id* Act 
----------------------------+
30415  M01S01092.251l664 +++|          BX6    X6+X2       MERGE STATUS AND ERROR FLAG

Seq #  *Modification Id* Act 
----------------------------+
30416  M01S00001.cpum176 +++|          SX4    5
30417  M01S00002.cpum176 +++|          LX4    55-0
30418  M01S00003.cpum176 +++|          BX2    X4*X6       I/O ERROR AND ADDRESS ERROR FLAGS

Seq #  *Modification Id* Act 
----------------------------+
30419  M02S01093.ns2446  ---|          NZ     X2,LBM7     IF I/O ERROR
30420  M02S01094.ns2446  ---|          BX6    X6+X1       MERGE STATUS AND BUFFER ORDINAL

Seq #  *Modification Id* Act 
----------------------------+
30421  M01S00007.ns2446  +++|          TX5    A5-1,-SP

Seq #  *Modification Id* Act 
----------------------------+
30422  M02S00008.271l716 ---|          ZR     X5,LBM6     IF PSEUDO PP

Seq #  *Modification Id* Act 
----------------------------+
30423  M01S01868.271l716 +++|          ZR     X5,LBM7     IF PSEUDO PP

Seq #  *Modification Id* Act 
----------------------------+
30424  M01S00009.ns2446  +++|          SA3    NCHV
30425  M01S00010.ns2446  +++|          SA4    A5+B1
30426  M01S00011.ns2446  +++|          LX4    59-6

Seq #  *Modification Id* Act 
----------------------------+
30427  M02S00012.271l716 ---|          NZ     X3,LBM6     IF NO *CHRV* DATA PRESENT
30428  M02S00013.271l716 ---|          NG     X4,LBM6.1   IF *1MV* RECALL AFTER FLUSH

Seq #  *Modification Id* Act 
----------------------------+
30429  M03S00014.271l716 ---| LBM6     NZ     X2,LBM7     IF NO I/O ERROR

Seq #  *Modification Id* Act 
----------------------------+
30430  M02S00004.271l716 ---| LBM6     NZ     X2,LBM7     IF I/O ERROR OR ADDRESS ERROR

Seq #  *Modification Id* Act 
----------------------------+
30431  M02S00015.271l716 ---| LBM6.1   BX6    X6+X1       MERGE STATUS AND BUFFER ORDINAL

Seq #  *Modification Id* Act 
----------------------------+
30432  M02S17803.271l716 ---|          SA1    DHSF
30433  M02S17804.271l716 ---|          NZ     X1,LBM7     IF HARDWARE STATUS NOT TO BE RETURNED
30434  M02S17805.271l716 ---|          MX2    2           GET HARDWARE STATUS
30435  M02S17806.271l716 ---|          LX2    -1
30436  M02S17807.271l716 ---|          BX2    X2*X3
30437  M02S17808.271l716 ---|          LX2    -1
30438  M02S17809.271l716 ---|          BX6    X6+X2

Seq #  *Modification Id* Act 
----------------------------+
30439  M01S17810.271l716 ---| LBM7     SA1    RETA        GET RETURN ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
30440  M01S01869.271l716 +++|          NZ     X3,LBM7     IF NO *CHRV* DATA PRESENT
30441  M01S01870.271l716 +++|          NG     X4,LBM8     IF *1MV* RECALL AFTER FLUSH
30442  M01S01871.271l716 +++| LBM7     NZ     X2,LBM9     IF I/O OR ADDRESS ERROR
30443  M01S01872.271l716 +++|
30444  M01S01873.271l716 +++| LBM8     BX6    X6+X1       MERGE STATUS AND BUFFER ORDINAL
30445  M01S01874.271l716 +++|
30446  M01S01875.271l716 +++| LBM9     SA1    RETA        GET RETURN ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
30447  M01S17811.251l664 ---|          SB6    X1
30448  M01S17812.251l664 ---|          SA5    PPOR        RESTORE PP OR ADDRESS
30449  M01S17813.251l664 ---|          SA5    X5

Seq #  *Modification Id* Act 
----------------------------+
30450  M01S01095.251l664 +++|          SB6    X1
30451  M00S17814.cpumtr  +++|          BX7    X7-X7       CLEAR CONTROL BUFFER INTERLOCK
30452  M00S17815.cpumtr  +++|          SA7    INLB

Seq #  *Modification Id* Act 
----------------------------+
30453  M01S00180.251l670 +++|          SA7    MSTA        CLEAR MST ADDRESS FOR *CDAM*

Seq #  *Modification Id* Act 
----------------------------+
30454  M01S01096.251l664 +++|          SA5    A5+
30455  M00S17816.cpumtr  +++|          JP     B6          RETURN
30456  M00S17817.cpumtr  +++|
30457  M00S17818.cpumtr  +++|
30458  M00S17819.cpumtr  +++| PARM     BSS    0           PARAMETER AREA
30459  M00S17820.cpumtr  +++| AILE     BSS    1           ALGORITHM INDEX FOR *LDAM* EQUIPMENT
30460  M00S17821.cpumtr  +++| BAFS     BSS    1           *BFMM* ABSOLUTE FST ADDRESS
30461  M00S17822.cpumtr  +++| BCNT     BSS    1           BUFFER COUNT PARAMETER
30462  M00S17823.cpumtr  +++| BDDC     BSS    1           *BFMM* DEVICE DESCRIPTORS AND BUFFER COUNT
30463  M00S17824.cpumtr  +++| BFST     BSS    1           *BFMM* ORIGINAL FST ENTRY
30464  M00S17825.cpumtr  +++| BIDX     BSS    1           BUFFER INDEX PARAMETER
30465  M00S17826.cpumtr  +++| BSDA     BSS    1           BEST SYSTEM DEVICE ACTIVITY

Seq #  *Modification Id* Act 
----------------------------+
30466  M01S17827.251l664 ---| BSEO     BSS    1           BEST SYSTEM DEVICE EST ORDINAL

Seq #  *Modification Id* Act 
----------------------------+
30467  M01S01097.251l664 +++| BSDI     BSS    1           INDEX OF BEST SYSTEM DEVICE
30468  M00S17828.cpumtr  +++| CAFL     BSS    1           ROUTINE *CHA* - FORWARD LINK STORAGE
30469  M00S17829.cpumtr  +++| CETS     BSS    LLCV+1      ROUTINE *CHA* - EVICT TABLE STORAGE
30470  M00S17830.cpumtr  +++| CHAD     BSS    1           ROUTINE *CHA* - HASH ADDRESS STORAGE

Seq #  *Modification Id* Act 
----------------------------+
30471  M01S01098.251l664 +++| CHAN     BSS    1           CHANNEL SELECTED BY CALLER
30472  M00S17831.cpumtr  +++| CHEA     BSS    1           CURRENT HASH ENTRY ADDRESS
30473  M00S17832.cpumtr  +++| CLST     BSS    1           CURRENT LIST

Seq #  *Modification Id* Act 
----------------------------+
30474  M01S17833.251l664 ---| CSBS     BSS    1           ROUTINE *CHA* - *SBS* PARAMETER STORAGE

Seq #  *Modification Id* Act 
----------------------------+
30475  M01S01099.251l664 +++| CSBS     BSS    1           ROUTINE *CHA* SCRATCH

Seq #  *Modification Id* Act 
----------------------------+
30476  M01S00181.251l670 +++| DBAT     BSS    2           DATA BUFFER ALLOCATION TRIGGER
30477  M01S00182.251l670 +++| DCNT     EQU    DBAT+1      DEFAULT BUFFER COUNT

Seq #  *Modification Id* Act 
----------------------------+
30478  M01S00002.cpum198 +++| DTSF     BSS    1           DATA STREAMING FLAG SET BY *REB*

Seq #  *Modification Id* Act 
----------------------------+
30479  M01S17834.251l664 ---| DHSF     BSS    1           DISABLE HARDWARE STATUS RETURN
30480  M00S17835.cpumtr  +++| FBLB     BSS    1           FLUSH ALL WRITE BUFFERS LINK BYTE

Seq #  *Modification Id* Act 
----------------------------+
30481  M01S17836.cpum243 ---| FCBI     BSS    1           FIRST CONTROL BUFFER ALLOCATED

Seq #  *Modification Id* Act 
----------------------------+
30482  M01S00009.cpum243 +++| FCBI     BSS    1           FIRST CONTROL BUFFER (PROGRAM MODE)
30483  M01S00010.cpum243 +++| FCBM     BSS    1           FIRST CONTROL BUFFER (MONITOR MODE)

Seq #  *Modification Id* Act 
----------------------------+
30484  M01S17837.251l664 ---| FHEA     BSS    1           FIRST HASH ENTRY ADDRESS
30485  M00S17838.cpumtr  +++| FNTA     BSS    1           FNT ADDRESS
30486  M00S17839.cpumtr  +++| HTA      BSS    1           HASH TABLE BASE ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
30487  M01S17840.241l630 ---| HTM      BSS    1           HASH TABLE MASK
30488  M00S17841.cpumtr  +++| LSEC     BSS    1           LOGICAL SECTOR
30489  M00S17842.cpumtr  +++| LTRK     BSS    1           LOGICAL TRACK

Seq #  *Modification Id* Act 
----------------------------+
30490  M01S17843.241l630 ---| LUN      BSS    1           LOGICAL UNIT NUMBER
30491  M00S17844.cpumtr  +++| MSTA     BSS    1           MST ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
30492  M01S01100.251l664 +++| NCHV     BSS    1           *CHRV* PRESENT FLAG

Seq #  *Modification Id* Act 
----------------------------+
30493  M01S17845.251l664 ---| OEST     BSS    1           ORIGINAL EST ORDINAL
30494  M00S17846.cpumtr  +++| OLSC     BSS    1           ORIGINAL LOGICAL SECTOR

Seq #  *Modification Id* Act 
----------------------------+
30495  M01S17847.241l630 ---| PCYL     BSS    1           PHYSICAL CYLINDER

Seq #  *Modification Id* Act 
----------------------------+
30496  M01S17848.251l664 ---| PPOR     BSS    1           PP *OR* ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
30497  M02S01101.283l840 ---| PSUB     BSS    1           PRIMARY SUBFUNCTION

Seq #  *Modification Id* Act 
----------------------------+
30498  M01S00249.283l840 +++| OPAR     BSS    1           OPERATION CODE PARAMETER
30499  M01S00250.283l840 +++| OPRC     BSS    1           BUFFER MANAGER OPERATION CODE

Seq #  *Modification Id* Act 
----------------------------+
30500  M01S17849.241l630 ---| PUTO     BSS    1           *PUT* ORDINAL

Seq #  *Modification Id* Act 
----------------------------+
30501  M01S00278.241l630 +++| PUTO     BSS    1           24/SUSL, 18/RLSN, 18/PUTO
30502  M01S00279.241l630 +++|*                              SUSL = SINGLE UNIT SECTOR LIMIT
30503  M01S00280.241l630 +++|*                              RLSN = RELATIVE SECTOR NUMBER IN UNIT
30504  M01S00281.241l630 +++|*                              PUTO = *PUT* ORDINAL

Seq #  *Modification Id* Act 
----------------------------+
30505  M01S00183.251l670 +++| RBCT     BSS    2           READ BUFFER COUNT
30506  M01S00184.251l670 +++| RBTH     EQU    RBCT+1      READ BUFFER THRESHOLD

Seq #  *Modification Id* Act 
----------------------------+
30507  M01S17850.283l840 ---| REBF     BSS    1           *REB*/*REN* FUNCTION FLAG STORAGE
30508  M00S17851.cpumtr  +++| RETA     BSS    1           RETURN ADDRESS (USED IN ROUTINE *LBM*)
30509  M00S17852.cpumtr  +++| RPRM     BSS    1           RECALL PARAMETER

Seq #  *Modification Id* Act 
----------------------------+
30510  M01S00251.283l840 +++| SDEO     BSS    1           EST ORDINAL IF SHARED DEVICE

Seq #  *Modification Id* Act 
----------------------------+
30511  M02S00252.cpum244 ---| SDUR     BSS    1           SHARED DEVICE UNABLE TO RELEASE ACCESS

Seq #  *Modification Id* Act 
----------------------------+
30512  M01S00004.cpum244 +++| SDUR     CON    0           SHARED DEVICE UNABLE TO RELEASE ACCESS
30513  M01S00005.cpum244 +++| SDWR     CON    0           SHARED DEVICE WRITE ACCESS REQUESTED
30514  M00S17853.cpumtr  +++| SFRF     BSS    1           SYSTEM FILE READ FLAG

Seq #  *Modification Id* Act 
----------------------------+
30515  M01S17854.251l664 ---| STAT     BSS    1           STATUS RESPONSE
30516  M01S17855.251l664 ---| SUBF     BSS    1           SUBFUNCTION CODE

Seq #  *Modification Id* Act 
----------------------------+
30517  M02S01102.283l840 ---| SUBF     BSS    1           SECONDARY SUBFUNCTION/BUFFER COUNT
30518  M00S17856.cpumtr  +++| SYDI     BSS    1           SYSTEM DEVICE TABLE INDEX

Seq #  *Modification Id* Act 
----------------------------+
30519  M01S17857.241l630 ---| TKSC     BSS    1           TRACK/SECTOR WORD
30520  M01S17858.241l630 ---| UNIT     BSS    1           UNIT NUMBER
30521  M00S17859.cpumtr  +++| PARML    EQU    *-PARM      PARAMETER BLOCK LENGTH
30522  M00S17860.cpumtr  +++|
30523  M00S17861.cpumtr  +++| INLB     CON    0           CONTROL BUFFER INTERLOCK CELL
30524  M00S17862.cpumtr  +++|          SPACE  4,10
30525  M00S17863.cpumtr  +++|**        SCRATCH AREA.
30526  M00S17864.cpumtr  +++|
30527  M00S17865.cpumtr  +++|
30528  M00S17866.cpumtr  +++| SCRA     BSS    14B         *DTKM* REGISTER SAVE AREA
30529  M00S17867.cpumtr  +++| SCRB     BSS    14B         *LBM* PROGRAM MODE REGISTER AREA
30530  M00S17868.cpumtr  +++|          TITLE  FUNCTION PROCESSORS.

Seq #  *Modification Id* Act 
----------------------------+
30531  M01S01103.251l664 +++| CDA      SPACE  4,15
30532  M01S01104.251l664 +++|**        CDA - CHECK DEVICE ACCESSIBILITY.
30533  M01S01105.251l664 +++|*
30534  M01S01106.251l664 +++|*         ENTRY  (A5) = PP OUTPUT REGISTER ADDRESS.
30535  M01S01107.251l664 +++|*                (B5) = EXIT ADDRESS.
30536  M01S01108.251l664 +++|*                (X5) = -7777B.
30537  M01S01109.251l664 +++|*                (MSTA) = MST ADDRESS.
30538  M01S01110.251l664 +++|*
30539  M01S01111.251l664 +++|*         EXIT   (X6) = 0 IF DEVICE MAY BE ACCESSED.
30540  M01S01112.251l664 +++|*                     = 3/0, 1/1, 56/0  IF DEVICE MUST NOT BE ACCESSED.
30541  M01S01113.251l664 +++|*                TO *LBMXS* IF DEVICE IS INACCESSIBLE.
30542  M01S01114.251l664 +++|*
30543  M01S01115.251l664 +++|*         USES   A - 2, 3, 4.
30544  M01S01116.251l664 +++|*                X - 2, 3, 4, 6.
30545  M01S01117.251l664 +++|
30546  M01S01118.251l664 +++|
30547  M01S01119.251l664 +++|

Seq #  *Modification Id* Act 
----------------------------+
30548  M02S01120.283l840 ---| CDA      SA4    A5+1

Seq #  *Modification Id* Act 
----------------------------+
30549  M01S00253.283l840 +++| CDA      BSS    0           ENTRY
30550  M01S00254.283l840 +++|          SA4    A5+1

Seq #  *Modification Id* Act 
----------------------------+
30551  M01S01121.251l664 +++|          TX3    A5-1,-SP
30552  M01S01122.251l664 +++|          NZ     X3,CDA0     IF NOT PSEUDO PP
30553  M01S01123.251l664 +++|          SA4    CHRV
30554  M01S01124.251l664 +++| CDA0     SA3    MSTA

Seq #  *Modification Id* Act 
----------------------------+
30555  M02S01125.ns2543  ---|          SX6    B0+

Seq #  *Modification Id* Act 
----------------------------+
30556  M01S00001.ns2543  +++|          BX6    X6-X6
30557  M01S00002.ns2543  +++|          LX4    59-5

Seq #  *Modification Id* Act 
----------------------------+
30558  M01S01126.251l664 +++|          SA2    X3+DALL     GET DEVICE STATUS

Seq #  *Modification Id* Act 
----------------------------+
30559  M02S01127.ns2543  ---|          LX4    59-5

Seq #  *Modification Id* Act 
----------------------------+
30560  M02S00003.ns2574  ---|          SA3    DSSL

Seq #  *Modification Id* Act 
----------------------------+
30561  M01S00001.ns2574  +++|          SA3    INWL

Seq #  *Modification Id* Act 
----------------------------+
30562  M01S01128.251l664 +++|          LX2    59-55

Seq #  *Modification Id* Act 
----------------------------+
30563  M02S00004.ns2574  ---|          LX3    59-2

Seq #  *Modification Id* Act 
----------------------------+
30564  M01S00002.ns2574  +++|          LX3    59-15

Seq #  *Modification Id* Act 
----------------------------+
30565  M01S01129.251l664 +++|          PL     X2,CDA2     IF DEVICE IS ACCESSIBLE
30566  M01S01130.251l664 +++|          NG     X4,CDA2     IF SYSTEM FILE READ

Seq #  *Modification Id* Act 
----------------------------+
30567  M02S00005.ns2574  ---|          NG     X3,CDA2     IF DEADSTART IN PROGRESS

Seq #  *Modification Id* Act 
----------------------------+
30568  M01S00003.ns2574  +++|          NG     X3,CDA2     IF DEADSTART SEQUENCING NOT COMPLETE

Seq #  *Modification Id* Act 
----------------------------+
30569  M01S01131.251l664 +++|          SX3    X2+B1
30570  M01S01132.251l664 +++|          LX4    59-1-59+5
30571  M01S01133.251l664 +++|          ERRNZ  EPAD-2      CODE DEPENDS ON VALUE
30572  M01S01134.251l664 +++|          NG     X4,CDA2     IF CALLER MAY ACCESS DOWN DEVICE
30573  M01S01135.251l664 +++|          LX3    59-2
30574  M01S01136.251l664 +++|          LX4    59-2-59+1
30575  M01S01137.251l664 +++|          NG     X3,CDA1     IF DEVICE IS DOWN
30576  M01S01138.251l664 +++|          NG     X4,CDA2     IF CALLER MAY ACCESS OFF/SUSPECT DEVICE

Seq #  *Modification Id* Act 
----------------------------+
30577  M02S01139.273l780 ---|          SX4    7600B
30578  M02S01140.273l780 ---|          SA3    A5-1
30579  M02S01141.273l780 ---|          AX3    36-7
30580  M02S01142.273l780 ---|          BX3    X4*X3       CONTROL POINT ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
30581  M01S00826.273l780 +++|          TX3    A5-1,-FP
30582  M01S00827.273l780 +++|          LX3    PPXES-PPCES
30583  M01S00828.273l780 +++|          TA3    X3+ACPP,FPX
30584  M01S00829.273l780 +++|          SX3    X3          CONTROL POINT ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
30585  M01S01143.251l664 +++|          SA3    X3+JCIW
30586  M01S01144.251l664 +++|          SA4    A3+SEPW-JCIW
30587  M01S01145.251l664 +++|          LX3    -24
30588  M01S01146.251l664 +++|          BX3    -X5*X3
30589  M01S01147.251l664 +++|          SX3    X3-LSSI-1
30590  M01S01148.251l664 +++|          PL     X3,CDA2     IF SUBSYSTEM
30591  M01S01149.251l664 +++|          SA3    A3+TFSW-JCIW
30592  M01S01150.251l664 +++|          LX4    59-56
30593  M01S01151.251l664 +++|          LX3    -48
30594  M01S01152.251l664 +++|          NG     X4,CDA2     IF *UTL=* ENTRY POINT IS PRESENT

Seq #  *Modification Id* Act 
----------------------------+
30595  M02S01153.261l700 ---|          SX4    EJTE

Seq #  *Modification Id* Act 
----------------------------+
30596  M01S01154.251l664 +++|          BX3    -X5*X3

Seq #  *Modification Id* Act 
----------------------------+
30597  M02S01155.261l700 ---|          IX3    X4*X3
30598  M02S01156.261l700 ---|          TA4    X3+SCHE,EJT

Seq #  *Modification Id* Act 
----------------------------+
30599  M01S00129.261l700 +++|          CX4    X3,EJT      CONVERT EJT ORDINAL TO OFFSET
30600  M01S00130.261l700 +++|          TA4    X4+SCHE,EJT

Seq #  *Modification Id* Act 
----------------------------+
30601  M01S01157.251l664 +++|          LX2    59-57-59+55
30602  M01S01158.251l664 +++|          LX4    59-34
30603  M01S01159.251l664 +++|          ERRNZ  UCTM-2      CODE DEPENDS ON VALUE
30604  M01S01160.251l664 +++|          NG     X4,CDA2     IF UNCONDITIONAL JOB TERMINATION IS SET

Seq #  *Modification Id* Act 
----------------------------+
30605  M02S01161.283l840 ---|          SA3    PSUB

Seq #  *Modification Id* Act 
----------------------------+
30606  M01S00255.283l840 +++|          SA3    OPRC

Seq #  *Modification Id* Act 
----------------------------+
30607  M01S01162.251l664 +++|          NG     X2,CDA1     IF DEVICE IS OFF

Seq #  *Modification Id* Act 
----------------------------+
30608  M02S01163.cpum171 ---|          SX3    X3-BMWR

Seq #  *Modification Id* Act 
----------------------------+
30609  M03S01164.cpum171 ---|          ZR     X3,CDA2     IF WRITE OPERATION

Seq #  *Modification Id* Act 
----------------------------+
30610  M02S00016.cpum171 ---|          ZR     X3,SBB      IF WRITE OPERATION ON SUSPECT DEVICE

Seq #  *Modification Id* Act 
----------------------------+
30611  M01S00001.cpum171 +++|          SX2    X3-BMWR
30612  M01S00002.cpum171 +++|          ZR     X2,SBB      IF WRITE OPERATION ON SUSPECT DEVICE
30613  M01S00003.cpum171 +++|          SX2    X3-BMRW
30614  M01S00004.cpum171 +++|          ZR     X2,SBB      IF REWRITE OPERATION ON SUSPECT DEVICE
30615  M01S00005.cpum171 +++|          SX2    X3-BMFO
30616  M01S00006.cpum171 +++|          PL     X2,CDA2     IF OPERATION ALLOWED ON SUSPECT DEVICE

Seq #  *Modification Id* Act 
----------------------------+
30617  M01S01165.251l664 +++| CDA1     SX6    B1          SET *INACCESSIBLE* STATUS
30618  M01S01166.251l664 +++|          LX6    56
30619  M01S01167.251l664 +++|          EQ     LBMXS       EXIT
30620  M01S01168.251l664 +++|
30621  M01S01169.251l664 +++| CDA2     JP     B5          EXIT
30622  M00S17869.cpumtr  +++| DAB      SPACE  4,15
30623  M00S17870.cpumtr  +++|**        DAB - DROP ALL BUFFERS.
30624  M00S17871.cpumtr  +++|*
30625  M00S17872.cpumtr  +++|*         ENTRY  INPUT REQUEST DECODED BY LBM MAIN ROUTINE.
30626  M00S17873.cpumtr  +++|*
30627  M00S17874.cpumtr  +++|*         EXIT   CONTROL GIVEN TO LBMX.
30628  M00S17875.cpumtr  +++|*

Seq #  *Modification Id* Act 
----------------------------+
30629  M01S17876.cpum134 ---|*         USES   A - 1, 2, 6.

Seq #  *Modification Id* Act 
----------------------------+
30630  M01S00008.cpum134 +++|*         USES   A - 2, 3, 6, 7.
30631  M00S17877.cpumtr  +++|*                B - 6.

Seq #  *Modification Id* Act 
----------------------------+
30632  M01S17878.cpum134 ---|*                X - 1, 2, 3, 6.

Seq #  *Modification Id* Act 
----------------------------+
30633  M01S00009.cpum134 +++|*                X - 0, 1, 2, 3, 6, 7.
30634  M00S17879.cpumtr  +++|*

Seq #  *Modification Id* Act 
----------------------------+
30635  M01S17880.241l630 ---|*         CALLS  CHA, CLP, DCC, DCH, LCC, SNS.

Seq #  *Modification Id* Act 
----------------------------+
30636  M02S00282.cpum134 ---|*         CALLS  CHA, DCC, DCH, LCC, SNS.

Seq #  *Modification Id* Act 
----------------------------+
30637  M01S00010.cpum134 +++|*         CALLS  CHA, DCC, DCH, LCC.
30638  M00S17881.cpumtr  +++|
30639  M00S17882.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
30640  M01S17883.241l630 ---| DAB      SB6    DAB1        SET RETURN ADDRESS FOR ROUTINE *CLP*
30641  M01S17884.241l630 ---|          EQ     CLP         CONVERT LOGICAL TO PHYSICAL
30642  M01S17885.241l630 ---|
30643  M01S17886.241l630 ---| DAB1     SB6    DAB2        RETURN ADDRESS FOR ROUTINE *CHA*

Seq #  *Modification Id* Act 
----------------------------+
30644  M02S00283.cpum134 ---| DAB      SB6    DAB2        RETURN ADDRESS FOR *CHA*

Seq #  *Modification Id* Act 
----------------------------+
30645  M01S17887.cpum134 ---|          EQ     CHA         CALCULATE HASH ADDRESS
30646  M01S17888.cpum134 ---|
30647  M01S17889.cpum134 ---| DAB2     ZR     X2,DAB8     IF HASH ENTRY NOT FOUND
30648  M01S17890.cpum134 ---|          NG     X2,DAB8     IF HASH TABLE BUSY
30649  M01S17891.cpum134 ---|          ZR     X0,DAB8     IF CONTROL BUFFER NOT FOUND
30650  M01S17892.cpum134 ---|          BX6    X0          FORM ADDRESS OF CONTROL BUFFER
30651  M01S17893.cpum134 ---|          SA6    INLB        SET CONTROL BUFFER INTERLOCK
30652  M01S17894.cpum134 ---|          LX6    CBTLS
30653  M01S17895.cpum134 ---|          TA2    X6+IOLK,CBT GET I/O LINK WORD
30654  M01S17896.cpum134 ---|          MX6    1           SET DELINK FUNCTION
30655  M01S17897.cpum134 ---|          PL     X2,DAB3     IF I/O INTERLOCK NOT SET
30656  M01S17898.cpum134 ---|          LX2    59-56
30657  M01S17899.cpum134 ---|          LX6    36-59
30658  M01S17900.cpum134 ---|          NG     X2,DAB7     IF I/O LINKUP SET
30659  M01S17901.cpum134 ---|          SA4    A2+LSLK-IOLK  CHECK RECALL CONTROL
30660  M01S17902.cpum134 ---|          LX4    -24
30661  M01S17903.cpum134 ---|          AX4    36
30662  M01S17904.cpum134 ---|          BX6    X6+X0
30663  M01S17905.cpum134 ---|          NZ     X4,DAB7     IF RECALL CONTROL IS SET
30664  M01S17906.cpum134 ---|          TA6    IORQ
30665  M01S17907.cpum134 ---|          XJ
30666  M01S17908.cpum134 ---|
30667  M01S17909.cpum134 ---|          SA2    A2          REREAD ACCESS FLAGS
30668  M01S17910.cpum134 ---|          NG     X2,DAB7     IF I/O STILL ACTIVE
30669  M01S17911.cpum134 ---| DAB3     SB6    DAB4        RETURN ADDRESS FOR ROUTINE *DCH*
30670  M01S17912.cpum134 ---|          EQ     DCH         DELINK CONTROL BUFFER FROM HASH LINK
30671  M01S17913.cpum134 ---|
30672  M01S17914.cpum134 ---| DAB4     SB6    DAB5        RETURN ADDRESS FOR ROUTINE *DCC*
30673  M01S17915.cpum134 ---|          EQ     DCC         DELINK CONTROL BUFFER FROM CONTROL BUFFER
30674  M01S17916.cpum134 ---|
30675  M01S17917.cpum134 ---| DAB5     SB6    DAB6        LINK TO EMPTY LIST
30676  M01S17918.cpum134 ---|          TX1    EMTB
30677  M01S17919.cpum134 ---|          EQ     LCC         LINK CONTROL BUFFER
30678  M01S17920.cpum134 ---|
30679  M01S17921.cpum134 ---| DAB6     BX1    X0          FORM ADDRESS OF BUFFER
30680  M01S17922.cpum134 ---|          LX1    CBTLS
30681  M01S17923.cpum134 ---|          TA2    X1+IOLK,CBT READ ACCESS FLAG WORD
30682  M01S17924.cpum134 ---|          MX3    12
30683  M01S17925.cpum134 ---|          BX6    -X3*X2
30684  M01S17926.cpum134 ---|          SA6    A2+
30685  M01S17927.cpum134 ---|          SA2    A2+LSLK-IOLK  READ ACCESS COUNT WORD
30686  M01S17928.cpum134 ---|          BX6    -X3*X2      CLEAR ACCESS COUNT
30687  M01S17929.cpum134 ---|          SA6    A2
30688  M01S17930.cpum134 ---| DAB7     BX6    X6-X6       CLEAR CONTROL BUFFER INTERLOCK
30689  M01S17931.cpum134 ---|          SA6    INLB
30690  M01S17932.cpum134 ---| DAB8     SB6    DAB9        RETURN ADDRESS FOR ROUTINE *SNS*
30691  M01S17933.cpum134 ---|          EQ     SNS         SET NEXT SECTOR
30692  M01S17934.cpum134 ---|
30693  M01S17935.cpum134 ---| DAB9     NZ     X0,LBMX     IF EOI
30694  M01S17936.cpum134 ---|          SA1    LSEC
30695  M01S17937.cpum134 ---|          NZ     X1,DAB      IF NO TRACK SWITCH
30696  M01S17938.cpum134 ---|          EQ     LBMX        PROCESS RESPONSE

Seq #  *Modification Id* Act 
----------------------------+
30697  M01S00011.cpum134 +++| DAB      BSS    0           ENTRY

Seq #  *Modification Id* Act 
----------------------------+
30698  M01S01170.251l664 +++|          SX7    B1          INDICATE PP HAS NO *CHRV* DATA
30699  M01S01171.251l664 +++|          SA7    NCHV

Seq #  *Modification Id* Act 
----------------------------+
30700  M02S01172.283l840 ---|          BX7    X7-X7

Seq #  *Modification Id* Act 
----------------------------+
30701  M01S00256.283l840 +++|          SX7    -B1         SET LOCATE HASH TABLE ENTRY

Seq #  *Modification Id* Act 
----------------------------+
30702  M01S00012.cpum134 +++|          SB6    DAB1        RETURN ADDRESS FOR *CHA*
30703  M01S00013.cpum134 +++|          EQ     CHA         CALCULATE HASH ADDRESS
30704  M01S00014.cpum134 +++|
30705  M01S00015.cpum134 +++| DAB1     ZR     X1,LBMX     IF HASH TABLE BUSY
30706  M01S00016.cpum134 +++|          SA2    X1          GET HASH ENTRY
30707  M01S00017.cpum134 +++|          MX7    -12
30708  M01S00018.cpum134 +++| DAB2     ZR     X2,LBMX     IF NO ENTRIES TO PROCESS
30709  M01S00019.cpum134 +++|          BX6    -X7*X2
30710  M01S00020.cpum134 +++|          BX0    -X7*X2
30711  M01S00021.cpum134 +++|          SA6    INLB        SET *CBT* INTERLOCK
30712  M01S00022.cpum134 +++|          LX6    CBTLS
30713  M01S00023.cpum134 +++|          MX7    -48

Seq #  *Modification Id* Act 
----------------------------+
30714  M02S00024.cpum165 ---|          TA2    X6+IOLK,CBT GET I/O INTERLOCK FORM *CBT*

Seq #  *Modification Id* Act 
----------------------------+
30715  M01S00001.cpum165 +++|          TA2    X6+IOLK,CBT GET I/O INTERLOCK FROM *CBT*

Seq #  *Modification Id* Act 
----------------------------+
30716  M01S00025.cpum134 +++|          SA3    A2+B1       GET HASH LINK WORD FROM *CBT*
30717  M01S00026.cpum134 +++|          ERRNZ  HSLK-IOLK-1 CODE DEPENDS ON VALUE
30718  M01S00027.cpum134 +++|          BX6    X6-X6
30719  M01S00028.cpum134 +++|          NG     X2,DAB6     IF I/O INTERLOCK SET
30720  M01S00029.cpum134 +++|          BX6    X3          SAVE HASH LINK WORD
30721  M01S00030.cpum134 +++|          SA3    A3+B1
30722  M01S00031.cpum134 +++|          ERRNZ  LSLK-HSLK-1 CODE DEPENDS ON VALUE
30723  M01S00032.cpum134 +++|          SA6    DABA
30724  M01S00033.cpum134 +++|          BX6    -X7*X2      CLEAR I/O FLAGS
30725  M01S00034.cpum134 +++|          BX7    -X7*X3      CLEAR ACCESS COUNT
30726  M01S00035.cpum134 +++|          SA6    A2
30727  M01S00036.cpum134 +++|          SA7    A3
30728  M01S00037.cpum134 +++|          SB6    DAB3        RETURN ADDRESS FOR *DCH*
30729  M01S00038.cpum134 +++|          EQ     DCH         DELINK *CBT* FROM HASH LINK
30730  M01S00039.cpum134 +++|

Seq #  *Modification Id* Act 
----------------------------+
30731  M02S00040.cpum165 ---| DAB3     SB6    DAB4        RETURN ADDRESS FOR *DCC*

Seq #  *Modification Id* Act 
----------------------------+
30732  M01S00002.cpum165 +++| DAB3     BX1    X0
30733  M01S00003.cpum165 +++|          SX2    B1
30734  M01S00004.cpum165 +++|          LX1    CBTLS
30735  M01S00005.cpum165 +++|          LX2    57
30736  M01S00006.cpum165 +++|          TA1    X1+IOLK,CBT
30737  M01S00007.cpum165 +++|          BX7    -X2*X1      CLEAR WRITE FLAG
30738  M01S00008.cpum165 +++|          SA7    A1
30739  M01S00009.cpum165 +++|          SB6    DAB4        RETURN ADDRESS FOR *DCC*

Seq #  *Modification Id* Act 
----------------------------+
30740  M01S00041.cpum134 +++|          EQ     DCC         DELINK *CBT* FROM LIST LINK
30741  M01S00042.cpum134 +++|
30742  M01S00043.cpum134 +++| DAB4     SB6    DAB5        RETURN ADDRESS FOR *LCC*
30743  M01S00044.cpum134 +++|          TX1    EMTB
30744  M01S00045.cpum134 +++|          EQ     LCC         LINK *CBT* TO EMPTY LIST
30745  M01S00046.cpum134 +++|
30746  M01S00047.cpum134 +++| DAB5     SA3    DABA        FIND NEXT *CBT* ON HASH LINK
30747  M01S00048.cpum134 +++|          BX6    X6-X6
30748  M01S00049.cpum134 +++| DAB6     AX3    24
30749  M01S00050.cpum134 +++|          MX7    -12
30750  M01S00051.cpum134 +++|          SA6    INLB        CLEAR *CBT* INTERLOCK
30751  M01S00052.cpum134 +++|          BX2    -X7*X3      NEXT *CBT* ORDINAL
30752  M01S00053.cpum134 +++|          EQ     DAB2        LOOP FOR NEXT *CBT*
30753  M01S00054.cpum134 +++|
30754  M01S00055.cpum134 +++|
30755  M01S00056.cpum134 +++| DABA     BSS    1           CURRENT *HSLK* WORD

Seq #  *Modification Id* Act 
----------------------------+
30756  M01S00257.283l840 +++| DBD      SPACE  4,15
30757  M01S00258.283l840 +++|**        DBD - DROP ALL BUFFERS ON SPECIFIED DEVICE.
30758  M01S00259.283l840 +++|*
30759  M01S00260.283l840 +++|*         ENTRY  INPUT REQUEST DECODED BY LBM MAIN ROUTINE.
30760  M01S00261.283l840 +++|*

Seq #  *Modification Id* Act 
----------------------------+
30761  M02S00262.284l847 ---|*         EXIT   TO *LBMX* IF ALL BUFFERS DROPPPED.
30762  M02S00263.284l847 ---|*                TO *SBB* IF NOT ALL BUFFERS DROPPPED.

Seq #  *Modification Id* Act 
----------------------------+
30763  M01S00002.284l847 +++|*         EXIT   TO *LBMX* IF ALL BUFFERS DROPPED.
30764  M01S00003.284l847 +++|*                TO *SBB* IF NOT ALL BUFFERS DROPPED.

Seq #  *Modification Id* Act 
----------------------------+
30765  M01S00264.283l840 +++|*
30766  M01S00265.283l840 +++|*         USES   X - 0, 1, 2, 3, 4, 6, 7.
30767  M01S00266.283l840 +++|*                A - 1, 2, 3, 4, 6.
30768  M01S00267.283l840 +++|*                B - 4, 5, 6.
30769  M01S00268.283l840 +++|*
30770  M01S00269.283l840 +++|*         CALLS  DCC, DCH, LCC.
30771  M01S00270.283l840 +++|
30772  M01S00271.283l840 +++|
30773  M01S00272.283l840 +++| DBD      BSS    0           ENTRY
30774  M01S00273.283l840 +++|
30775  M01S00274.283l840 +++|*         SET FIRST PUT ORDINAL.
30776  M01S00275.283l840 +++|
30777  M01S00276.283l840 +++|          SA1    FNTA        GET EST ORDINAL
30778  M01S00277.283l840 +++|          MX0    -12
30779  M01S00278.283l840 +++|          CX2    X1,EST
30780  M01S00279.283l840 +++|          TA1    X2+EQDE,EST

Seq #  *Modification Id* Act 
----------------------------+
30781  M01S00004.284l847 +++|          BX1    -X0*X1
30782  M01S00005.284l847 +++|          LX1    3           MST ADDRESS
30783  M01S00006.284l847 +++|          SA3    A1+EQAE-EQDE
30784  M01S00007.284l847 +++|          MX2    -4
30785  M01S00008.284l847 +++|          LX3    -18
30786  M01S00009.284l847 +++|          BX3    -X2*X3      PARTITION NUMBER
30787  M01S00010.284l847 +++|          SX2    HATLE
30788  M01S00011.284l847 +++|          IX6    X2*X3       HASH TABLE PARTITION OFFSET
30789  M01S00012.284l847 +++|          SA6    DBDC

Seq #  *Modification Id* Act 
----------------------------+
30790  M02S00280.284l847 ---|          BX1    -X0*X1
30791  M02S00281.284l847 ---|          LX1    3           MST ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
30792  M01S00282.283l840 +++|          SA1    X1+DILL
30793  M01S00283.283l840 +++|          SB4    LBMX        SET EXIT ADDRESS FOR ALL BUFFERS DROPPPED
30794  M01S00284.283l840 +++|          LX1    -24
30795  M01S00285.283l840 +++|          BX6    -X0*X1
30796  M01S00286.283l840 +++|          SA6    DBDA        SET FIRST PUT ORDINAL
30797  M01S00287.283l840 +++|
30798  M01S00288.283l840 +++|*         SET HASH TABLE ADDRESS AND SAVE NEXT PUT ORDINAL.
30799  M01S00289.283l840 +++|
30800  M01S00290.283l840 +++| DBD1     SA1    DBDA        GET PUT ORDINAL
30801  M01S00291.283l840 +++|          ZR     X1,RB4      IF ALL UNITS PROCESSED, EXIT
30802  M01S00292.283l840 +++|          LX1    PUTLS
30803  M01S00293.283l840 +++|          TA2    X1+HSCT,PUT
30804  M01S00294.283l840 +++|          MX0    -12
30805  M01S00295.283l840 +++|          BX6    -X0*X2
30806  M01S00296.283l840 +++|          SA6    A1          SAVE NEXT PUT ORDINAL
30807  M01S00297.283l840 +++|          MX0    -18
30808  M01S00298.283l840 +++|          LX2    -24
30809  M01S00299.283l840 +++|          BX6    -X0*X2

Seq #  *Modification Id* Act 
----------------------------+
30810  M01S00013.284l847 +++|          SA3    DBDC        GET HASH TABLE PARTITION OFFSET

Seq #  *Modification Id* Act 
----------------------------+
30811  M01S00300.283l840 +++|          SB5    -B1         INITIALIZE HASH TABLE INDEX

Seq #  *Modification Id* Act 
----------------------------+
30812  M01S00014.284l847 +++|          IX6    X6+X3       ADD HASH TABLE PARTITION OFFSET

Seq #  *Modification Id* Act 
----------------------------+
30813  M01S00301.283l840 +++|          SA6    DBDB        SAVE HASH TABLE ADDRESS
30814  M01S00302.283l840 +++|
30815  M01S00303.283l840 +++|*         GET NEXT HASH TABLE ENTRY.
30816  M01S00304.283l840 +++|
30817  M01S00305.283l840 +++| DBD2     SA1    DBDB        GET HASH TABLE ADDRESS
30818  M01S00306.283l840 +++|          SB5    B5+1        ADVANCE HASH TABLE INDEX
30819  M01S00307.283l840 +++|          SX2    B5-HATLE
30820  M01S00308.283l840 +++|          ZR     X2,DBD1     IF END OF HASH TABLE
30821  M01S00309.283l840 +++|          SA1    X1+B5       GET HASH ENTRY
30822  M01S00310.283l840 +++|          MX7    -12
30823  M01S00311.283l840 +++|          BX7    -X7*X1      SET FIRST BUFFER ORDINAL
30824  M01S00312.283l840 +++|
30825  M01S00313.283l840 +++|*         DROP INACTIVE BUFFERS.
30826  M01S00314.283l840 +++|
30827  M01S00315.283l840 +++| DBD3     SA7    INLB        SET BUFFER INTERLOCK
30828  M01S00316.283l840 +++|          BX0    X7          NEXT BUFFER ORDINAL
30829  M01S00317.283l840 +++|          LX7    CBTLS       SET CBT OFFSET
30830  M01S00318.283l840 +++|          ZR     X0,DBD2     IF END OF BUFFERS IN ENTRY
30831  M01S00319.283l840 +++|          TA2    X7+IOLK,CBT GET I/O INTERLOCK AND WRITE FLAG
30832  M01S00320.283l840 +++|          TA3    X7+HSLK,CBT GET HASH LINK
30833  M01S00321.283l840 +++|          TA4    X7+LSLK,CBT GET ACTIVITY COUNT
30834  M01S00322.283l840 +++|          SX1    5000B
30835  M01S00323.283l840 +++|          MX6    12
30836  M01S00324.283l840 +++|          LX1    48
30837  M01S00325.283l840 +++|          MX7    -12
30838  M01S00326.283l840 +++|          BX2    X1*X2       I/O INTERLOCK AND WRITE FLAG
30839  M01S00327.283l840 +++|          LX3    -24
30840  M01S00328.283l840 +++|          BX4    X6*X4       ACTIVITY COUNT
30841  M01S00329.283l840 +++|          BX7    -X7*X3      SET NEXT BUFFER ORDINAL
30842  M01S00330.283l840 +++|          BX6    X2+X4
30843  M01S00331.283l840 +++|          ZR     X6,DBD4     IF NO ACTIVITY REMAINS
30844  M01S00332.283l840 +++|          SB4    SBB         SET BUFFER BUSY EXIT
30845  M01S00333.283l840 +++|          EQ     DBD3        CHECK NEXT BUFFER
30846  M01S00334.283l840 +++|
30847  M01S00335.283l840 +++| DBD4     SB6    DBD5        SET *DCH* RETURN ADDRESS
30848  M01S00336.283l840 +++|          EQ     DCH         DELINK BUFFER FROM HASH TABLE
30849  M01S00337.283l840 +++|
30850  M01S00338.283l840 +++| DBD5     SB6    DBD6        SET *DCC* RETURN ADDRESS
30851  M01S00339.283l840 +++|          EQ     DCC         DELINK BUFFER FROM CURRENT LIST
30852  M01S00340.283l840 +++|
30853  M01S00341.283l840 +++| DBD6     SB6    DBD3        SET *LCC* RETURN ADDRESS
30854  M01S00342.283l840 +++|          TX1    EMTB
30855  M01S00343.283l840 +++|          EQ     LCC         LINK BUFFER TO EMPTY LIST
30856  M01S00344.283l840 +++|
30857  M01S00345.283l840 +++|
30858  M01S00346.283l840 +++| DBDA     BSS    1           NEXT PUT ORDINAL
30859  M01S00347.283l840 +++| DBDB     BSS    1           HASH TABLE ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
30860  M01S00015.284l847 +++| DBDC     BSS    1           HASH TABLE PARTITION OFFSET
30861  M00S17939.cpumtr  +++| FAW      SPACE  4,15
30862  M00S17940.cpumtr  +++|**        FAW - FLUSH ALL WRITE BUFFERS.
30863  M00S17941.cpumtr  +++|*
30864  M00S17942.cpumtr  +++|*         ENTRY  INPUT REQUEST DECODED BY LBM MAIN ROUTINE.
30865  M00S17943.cpumtr  +++|*
30866  M00S17944.cpumtr  +++|*         EXIT   CONTROL GIVEN TO LBMX.
30867  M00S17945.cpumtr  +++|*
30868  M00S17946.cpumtr  +++|*         USES   A - 1, 2, 3, 6.

Seq #  *Modification Id* Act 
----------------------------+
30869  M01S17947.251l664 ---|*                B - 6.
30870  M01S17948.251l664 ---|*                X - 0, 1, 2, 3, 6.

Seq #  *Modification Id* Act 
----------------------------+
30871  M01S01173.251l664 +++|*                B - 5, 6.
30872  M01S01174.251l664 +++|*                X - 0, 1, 2, 3, 5, 6.
30873  M00S17949.cpumtr  +++|*

Seq #  *Modification Id* Act 
----------------------------+
30874  M01S17950.251l664 ---|*         CALLS  DCC, LCC.

Seq #  *Modification Id* Act 
----------------------------+
30875  M01S01175.251l664 +++|*         CALLS  CDA, DCC, LCC.
30876  M00S17951.cpumtr  +++|
30877  M00S17952.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
30878  M01S17953.283l840 ---| FAW      TX6    DWTB        SET DATA WRITTEN AS CURRENT LIST

Seq #  *Modification Id* Act 
----------------------------+
30879  M01S00348.283l840 +++| FAW      BSS    0           ENTRY
30880  M01S00349.283l840 +++|          TX6    DWTB        SET DATA WRITTEN AS CURRENT LIST
30881  M00S17954.cpumtr  +++|          SA6    CLST
30882  M00S17955.cpumtr  +++|          TA1    WRTB        GET FIRST WRITE BUFFER
30883  M00S17956.cpumtr  +++|          SX6    X1+         SAVE LINK BYTE
30884  M00S17957.cpumtr  +++|          SA6    FBLB
30885  M00S17958.cpumtr  +++| FAW1     SA1    FBLB        READ NEXT CONTROL BUFFER
30886  M00S17959.cpumtr  +++|          ZR     X1,FAW5     IF ALL BUFFERS FLUSHED
30887  M00S17960.cpumtr  +++|          SB6    X1
30888  M00S17961.cpumtr  +++|          SX6    X1          SET CONTROL BUFFER INTERLOCK

Seq #  *Modification Id* Act 
----------------------------+
30889  M01S17962.251l664 ---|          MX0    -12

Seq #  *Modification Id* Act 
----------------------------+
30890  M01S01176.251l664 +++|          MX5    -12
30891  M00S17963.cpumtr  +++|          LX1    CBTLS

Seq #  *Modification Id* Act 
----------------------------+
30892  M01S17964.251l664 ---|          SA3    FNTA
30893  M00S17965.cpumtr  +++|          SA6    INLB

Seq #  *Modification Id* Act 
----------------------------+
30894  M01S17966.284l847 ---|          TA1    X1+HSLK,CBT

Seq #  *Modification Id* Act 
----------------------------+
30895  M02S17967.284l847 ---|          BX1    -X0*X1      *PUT* ORDINAL

Seq #  *Modification Id* Act 
----------------------------+
30896  M02S01177.284l847 ---|          BX1    -X5*X1      *PUT* ORDINAL

Seq #  *Modification Id* Act 
----------------------------+
30897  M01S17968.284l847 ---|          LX1    PUTLS
30898  M01S17969.284l847 ---|          TA2    X1+UNCT,PUT EST ORDINAL
30899  M01S17970.284l847 ---|          BX1    X2
30900  M01S17971.284l847 ---|          LX1    -36

Seq #  *Modification Id* Act 
----------------------------+
30901  M02S17972.284l847 ---|          SA2    A1+LSLK-HSLK  GET LINK TO NEXT BUFFER
30902  M02S17973.284l847 ---|          BX6    X2
30903  M02S17974.284l847 ---|          MX2    12
30904  M02S17975.284l847 ---|          BX1    -X0*X1      EST ORDINAL ASSIGNED TO BUFFER
30905  M02S17976.284l847 ---|          BX2    X2*X6
30906  M02S17977.284l847 ---|          LX6    -24

Seq #  *Modification Id* Act 
----------------------------+
30907  M02S01178.284l847 ---|          SA2    A1+B1       GET LINK TO NEXT BUFFER
30908  M02S01179.284l847 ---|          ERRNZ  LSLK-HSLK-1 CODE DEPENDS ON VALUE

Seq #  *Modification Id* Act 
----------------------------+
30909  M01S00016.284l847 +++|          TA1    X1+FSTC,CBT EST ORDINAL
30910  M01S00017.284l847 +++|          LX1    12
30911  M01S00018.284l847 +++|          SA2    A1+LSLK-FSTC  GET LINK TO NEXT BUFFER

Seq #  *Modification Id* Act 
----------------------------+
30912  M02S00019.cpum238 ---|          BX6    -X5*X1      EST ORDINAL

Seq #  *Modification Id* Act 
----------------------------+
30913  M01S00001.cpum238 +++|          BX1    -X5*X1      EST ORDINAL

Seq #  *Modification Id* Act 
----------------------------+
30914  M01S01180.251l664 +++|          BX0    X2

Seq #  *Modification Id* Act 
----------------------------+
30915  M02S01181.284l847 ---|          BX1    -X5*X1      EST ORDINAL

Seq #  *Modification Id* Act 
----------------------------+
30916  M02S00020.cpum238 ---|          CX3    X6,EST      CONVERT EST ORDINAL TO OFFSET

Seq #  *Modification Id* Act 
----------------------------+
30917  M01S00002.cpum238 +++|          CX3    X1,EST      CONVERT EST ORDINAL TO OFFSET

Seq #  *Modification Id* Act 
----------------------------+
30918  M01S00021.284l847 +++|          TA3    X3+EQDE,EST

Seq #  *Modification Id* Act 
----------------------------+
30919  M01S01182.251l664 +++|          SB5    FAW1.1      SET *CDA* EXIT ADDRESS

Seq #  *Modification Id* Act 
----------------------------+
30920  M02S01183.cpum203 ---|          LX1    1

Seq #  *Modification Id* Act 
----------------------------+
30921  M02S00001.271l716 ---|          LX3    X1,B1

Seq #  *Modification Id* Act 
----------------------------+
30922  M02S01184.271l716 ---|          ERRNZ  ESTE-2      CODE DEPENDS ON VALUE

Seq #  *Modification Id* Act 
----------------------------+
30923  M02S01876.284l847 ---|          CX3    X1,EST      CONVERT EST ORDINAL TO OFFSET

Seq #  *Modification Id* Act 
----------------------------+
30924  M03S01185.284l847 ---|          TA3    X1+EQDE,EST

Seq #  *Modification Id* Act 
----------------------------+
30925  M02S00002.284l847 ---|          TA3    X3+EQDE,EST

Seq #  *Modification Id* Act 
----------------------------+
30926  M01S01186.251l664 +++|          BX6    -X5*X3
30927  M01S01187.251l664 +++|          LX6    3
30928  M01S01188.251l664 +++|          SA6    MSTA        STORE MST ADDRESS FOR *CDA*
30929  M01S01189.251l664 +++|          EQ     CDA         CHECK DEVICE ACCESSIBILITY
30930  M01S01190.251l664 +++|
30931  M01S01191.251l664 +++| FAW1.1   SA3    FNTA
30932  M01S01192.251l664 +++|          MX2    12
30933  M01S01193.251l664 +++|          BX2    X2*X0
30934  M01S01194.251l664 +++|          LX0    -24
30935  M00S17978.cpumtr  +++|          BX1    X1-X3

Seq #  *Modification Id* Act 
----------------------------+
30936  M01S17979.251l664 ---|          BX6    -X0*X6      NEXT CONTROL BUFFER INDEX

Seq #  *Modification Id* Act 
----------------------------+
30937  M01S01195.251l664 +++|          BX6    -X5*X0      NEXT BUFFER ORDINAL
30938  M00S17980.cpumtr  +++|          SX0    B6
30939  M00S17981.cpumtr  +++|          SA6    FBLB
30940  M00S17982.cpumtr  +++|          NZ     X2,FAW1     IF BUFFER CURRENTLY BEING ACCESSED
30941  M00S17983.cpumtr  +++|          ZR     X3,FAW2     IF FLUSHING ALL BUFFERS
30942  M00S17984.cpumtr  +++|          NZ     X1,FAW1     IF NOT SELECTED EQUIPMENT
30943  M00S17985.cpumtr  +++| FAW2     SB6    FAW3        RETURN ADDRESS FOR ROUTINE *DCC*
30944  M00S17986.cpumtr  +++|          EQ     DCC         DELINK CONTROL BUFFER FROM CONTROL BUFFER
30945  M00S17987.cpumtr  +++|
30946  M00S17988.cpumtr  +++| FAW3     TX1    DWTB        LINK BUFFER TO DATA WRITTEN LIST
30947  M00S17989.cpumtr  +++|          SB6    FAW4
30948  M00S17990.cpumtr  +++|          EQ     LCC         LINK CONTROL BUFFER
30949  M00S17991.cpumtr  +++|
30950  M00S17992.cpumtr  +++| FAW4     BX6    X0          INITIATE I/O ON BUFFER
30951  M00S17993.cpumtr  +++|          TA6    IORQ
30952  M00S17994.cpumtr  +++|          XJ
30953  M00S17995.cpumtr  +++|
30954  M00S17996.cpumtr  +++|          EQ     FAW1        PROCESS NEXT WRITE BUFFER
30955  M00S17997.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
30956  M01S17998.283l840 ---| FAW5     SA1    SUBF

Seq #  *Modification Id* Act 
----------------------------+
30957  M01S00350.283l840 +++| FAW5     SA1    OPAR
30958  M00S17999.cpumtr  +++|          ZR     X1,LBMX     IF BUFFER COUNT = 0
30959  M00S18000.cpumtr  +++|          TNO    /BUFIO/LBMX,IHPFMD  EXIT IF NOT 819
30960  M00S18001.cpumtr  +++|          SX6    3           RESTART 819 I/O
30961  M00S18002.cpumtr  +++|          LX6    36
30962  M00S18003.cpumtr  +++|          TA6    IORQ
30963  M00S18004.cpumtr  +++|          XJ
30964  M00S18005.cpumtr  +++|
30965  M00S18006.cpumtr  +++|          EQ     LBMX        RETURN
30966  M00S18007.cpumtr  +++| FLB      SPACE  4,15
30967  M00S18008.cpumtr  +++|**        FLB - FLUSH BUFFER TO DISK.
30968  M00S18009.cpumtr  +++|*
30969  M00S18010.cpumtr  +++|*         ENTRY  INPUT REQUEST DECODED BY LBM MAIN ROUTINE.
30970  M00S18011.cpumtr  +++|*
30971  M00S18012.cpumtr  +++|*         EXIT   CONTROL GIVEN TO LBMX.
30972  M00S18013.cpumtr  +++|*                TO /PROGRAM/ HNG IF CONTROL BUFFER NOT FOUND.
30973  M00S18014.cpumtr  +++|*

Seq #  *Modification Id* Act 
----------------------------+
30974  M01S18015.251l664 ---|*         USES   A - 2, 6.
30975  M01S18016.251l664 ---|*                B - 6.
30976  M01S18017.251l664 ---|*                X - 1, 2, 3, 6.

Seq #  *Modification Id* Act 
----------------------------+
30977  M02S01196.283l840 ---|*                A - 1, 2, 3, 6.

Seq #  *Modification Id* Act 
----------------------------+
30978  M01S00351.283l840 +++|*                X - 0, 1, 2, 3, 4, 6, 7.
30979  M01S00352.283l840 +++|*                A - 1, 2, 3, 6, 7.

Seq #  *Modification Id* Act 
----------------------------+
30980  M01S01197.251l664 +++|*                B - 6.

Seq #  *Modification Id* Act 
----------------------------+
30981  M02S01198.283l840 ---|*                X - 1, 2, 3, 6.
30982  M00S18018.cpumtr  +++|*

Seq #  *Modification Id* Act 
----------------------------+
30983  M01S18019.241l630 ---|*         CALLS  CHA, CLP, DCC, LCC.

Seq #  *Modification Id* Act 
----------------------------+
30984  M02S00284.251l664 ---|*         CALLS  DCC, LCC.

Seq #  *Modification Id* Act 
----------------------------+
30985  M01S01199.251l664 +++|*         CALLS  DCC, LCC, SRR.
30986  M00S18020.cpumtr  +++|
30987  M00S18021.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
30988  M01S18022.283l840 ---| FLB      SA2    BIDX

Seq #  *Modification Id* Act 
----------------------------+
30989  M01S00353.283l840 +++| FLB      BSS    0           ENTRY
30990  M01S00354.283l840 +++|          SA2    BIDX
30991  M00S18023.cpumtr  +++|          ZR     X2,LBMX     IF NO CONTROL BUFFER
30992  M00S18024.cpumtr  +++|          BX6    X2          INTERLOCK BUFFER
30993  M00S18025.cpumtr  +++|          LX2    CBTLS
30994  M00S18026.cpumtr  +++|          SA6    INLB
30995  M00S18027.cpumtr  +++|          TA3    X2+LSLK,CBT CHECK ACTIVITY COUNT
30996  M00S18028.cpumtr  +++|          MX4    12
30997  M00S18029.cpumtr  +++|          BX3    X4*X3
30998  M00S18030.cpumtr  +++|          NZ     X3,FLB7     IF BUFFER INTERLOCKED

Seq #  *Modification Id* Act 
----------------------------+
30999  M01S00355.283l840 +++|
31000  M01S00356.283l840 +++|*         ENTRY FROM *RFB*.
31001  M01S00357.283l840 +++|*         BUFFER IS WRITE INTERLOCKED IF ENTERED FROM *RFB*.
31002  M01S00358.283l840 +++|
31003  M00S18031.cpumtr  +++| FLB1     TA3    X2+IOLK,CBT CHECK I/O ACTIVE
31004  M00S18032.cpumtr  +++|          NG     X3,FLB6     IF INTERLOCK SET
31005  M00S18033.cpumtr  +++|          LX3    59-57
31006  M00S18034.cpumtr  +++|          PL     X3,FLB6     IF NOT WRITE DATA
31007  M00S18035.cpumtr  +++|          BX0    X6

Seq #  *Modification Id* Act 
----------------------------+
31008  M01S18036.251l664 ---|          TA6    IORQ        INITIATE WRITE OF BUFFER
31009  M01S18037.251l664 ---|          XJ

Seq #  *Modification Id* Act 
----------------------------+
31010  M01S01200.251l664 +++|          TX2    A5-1,-SP
31011  M01S01201.251l664 +++|          SA3    A5+1
31012  M01S01202.251l664 +++|          NZ     X2,FLB1.1   IF NOT PSEUDO PP
31013  M01S01203.251l664 +++|          SA3    CHRV
31014  M01S01204.251l664 +++| FLB1.1   TA6    IORQ
31015  M01S01205.251l664 +++|          LX3    59-4
31016  M01S01206.251l664 +++|          PL     X3,FLB2     IF NOT DEVICE VERIFICATION
31017  M01S01207.251l664 +++|          SB6    FLB2        SET *SRC* RETURN ADDRESS
31018  M01S01208.251l664 +++|          EQ     SRC         SET RECALL CONTROL
31019  M01S01209.251l664 +++|
31020  M01S01210.251l664 +++| FLB2     XJ                 INITIATE I/O
31021  M00S18038.cpumtr  +++|
31022  M00S18039.cpumtr  +++|          SB6    FLB4        RETURN ADDRESS FOR ROUTINE *DCC*
31023  M00S18040.cpumtr  +++|          EQ     DCC         DELINK CONTROL BUFFER FROM CONTROL BUFFER
31024  M00S18041.cpumtr  +++|
31025  M00S18042.cpumtr  +++| FLB4     SB6    FLB5        LINK TO DATA WRITTEN LIST
31026  M00S18043.cpumtr  +++|          TX1    DWTB
31027  M00S18044.cpumtr  +++|          EQ     LCC         LINK CONTROL BUFFER
31028  M00S18045.cpumtr  +++|
31029  M00S18046.cpumtr  +++| FLB5     BX1    X0          GET ACCESS COUNT WORD
31030  M00S18047.cpumtr  +++|          LX1    CBTLS
31031  M00S18048.cpumtr  +++|          TA2    X1+LSLK,CBT
31032  M00S18049.cpumtr  +++|          MX3    12          CLEAR WRITE INTERLOCK
31033  M00S18050.cpumtr  +++|          BX6    -X3*X2

Seq #  *Modification Id* Act 
----------------------------+
31034  M01S18051.251l664 ---|          SA6    A2          CLEAR WRITE INTERLOCK

Seq #  *Modification Id* Act 
----------------------------+
31035  M01S01211.251l664 +++|          SA6    A2+

Seq #  *Modification Id* Act 
----------------------------+
31036  M01S18052.283l840 ---| FLB6     SA1    SUBF

Seq #  *Modification Id* Act 
----------------------------+
31037  M01S00359.283l840 +++| FLB6     SA1    OPAR
31038  M00S18053.cpumtr  +++|          ZR     X1,FLB7     IF NO WRITE REQUEST
31039  M00S18054.cpumtr  +++|          SX1    X1-BMWR

Seq #  *Modification Id* Act 
----------------------------+
31040  M01S18055.283l840 ---|          SX7    B0          CLEAR SUBFUNCTION

Seq #  *Modification Id* Act 
----------------------------+
31041  M01S00360.283l840 +++|          SX7    B0          CLEAR PARAMETER
31042  M00S18056.cpumtr  +++|          SA7    A1
31043  M00S18057.cpumtr  +++|          ZR     X1,WTB      IF WRITE
31044  M00S18058.cpumtr  +++|          EQ     RWB         REWRITE
31045  M00S18059.cpumtr  +++|
31046  M00S18060.cpumtr  +++|*         THE BUFFER INDEX IS RETURNED HERE FOR THOSE ROUTINES WHICH
31047  M00S18061.cpumtr  +++|*         NEED TO CHECK IF THE BUFFER FLUSH HAS COMPLETED.
31048  M00S18062.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31049  M01S18063.251l664 ---| FLB7     SA1    BIDX
31050  M01S18064.251l664 ---|          SX7    B1          SET TO NOT RETURN HARDWARE STATUS
31051  M01S18065.251l664 ---|          BX6    X1
31052  M01S18066.251l664 ---|          SA7    DHSF

Seq #  *Modification Id* Act 
----------------------------+
31053  M01S01212.251l664 +++| FLB7     TX2    A5-1,-SP

Seq #  *Modification Id* Act 
----------------------------+
31054  M01S18067.251l664 ---|          SA6    FCBI
31055  M01S18068.251l664 ---|          EQ     LBMX        RETURN

Seq #  *Modification Id* Act 
----------------------------+
31056  M01S01213.251l664 +++|          SA1    BIDX
31057  M01S01214.251l664 +++|          SA3    A5+B1
31058  M01S01215.251l664 +++|          BX6    X1
31059  M01S01216.251l664 +++|          SA6    FCBI
31060  M01S01217.251l664 +++|          ZR     X2,LBMX     IF PSEUDO PP
31061  M01S01218.251l664 +++|          LX3    59-4
31062  M01S01219.251l664 +++|          SX6    B1
31063  M01S01220.251l664 +++|          PL     X3,LBMX     IF NOT DEVICE VERIFICATION OPERATION
31064  M01S01221.251l664 +++|          LX6    6-0
31065  M01S01222.251l664 +++|          LX3    4-59
31066  M01S01223.251l664 +++|          BX6    X6+X3       SET BUFFER FLUSH FLAG
31067  M01S01224.251l664 +++|          SA6    A3
31068  M01S01225.251l664 +++|          EQ     SRR         SET RECALL RESPONSE

Seq #  *Modification Id* Act 
----------------------------+
31069  M01S18069.cpum243 ---| INB      SPACE  4,15

Seq #  *Modification Id* Act 
----------------------------+
31070  M01S00011.cpum243 +++| INB      SPACE  4,30
31071  M00S18070.cpumtr  +++|**        INB - INTERLOCK BUFFER.
31072  M00S18071.cpumtr  +++|*
31073  M00S18072.cpumtr  +++|*         MONITOR MODE ONLY.
31074  M00S18073.cpumtr  +++|*
31075  M00S18074.cpumtr  +++|*         NOTE - FOR PERFORMANCE REASONS, *INB* IS CALLED DIRECTLY BY
31076  M00S18075.cpumtr  +++|*                *BFMM* AND *PIOM* TO AVOID UNNECCESSARY BUFFER MANAGER
31077  M00S18076.cpumtr  +++|*                START UP AND SHUT DOWN OVERHEAD.
31078  M00S18077.cpumtr  +++|*
31079  M00S18078.cpumtr  +++|*         ENTRY  (X2) = SUBFUNCTION.
31080  M00S18079.cpumtr  +++|*                (X6) = *FST*.
31081  M00S18080.cpumtr  +++|*                (X7) = BUFFER INDEX TO VALIDATE.

Seq #  *Modification Id* Act 
----------------------------+
31082  M01S01226.251l664 +++|*                (B6) = EXIT ADDRESS.
31083  M00S18081.cpumtr  +++|*

Seq #  *Modification Id* Act 
----------------------------+
31084  M01S18082.251l664 ---|*         EXIT   (X6) = 1/,1/B,10/,36/,12/ BI
31085  M01S18083.251l664 ---|*                B = 1, BUFFER BUSY.
31086  M01S18084.251l664 ---|*                BI = 0, BUFFER NOT FOUND OR CANNOT INTERLOCK.

Seq #  *Modification Id* Act 
----------------------------+
31087  M02S01227.283l840 ---|*         EXIT   (X6) = 1/0, 1/B, 1/E, 45/0, 12/BI

Seq #  *Modification Id* Act 
----------------------------+
31088  M01S00361.283l840 +++|*         EXIT   (X6) = 1/0, 1/B, 1/E, 1/I, 44/0, 12/BI

Seq #  *Modification Id* Act 
----------------------------+
31089  M01S01228.251l664 +++|*                       B = 1 IF BUFFER BUSY.
31090  M01S01229.251l664 +++|*                       E = 1 IF I/O ERROR.

Seq #  *Modification Id* Act 
----------------------------+
31091  M01S00362.283l840 +++|*                       I = 1 IF INACCESSIBLE SHARED DEVICE.

Seq #  *Modification Id* Act 
----------------------------+
31092  M01S01230.251l664 +++|*                       BI = BUFFER ORDINAL.
31093  M01S01231.251l664 +++|*                          = 0 IF BUFFER NOT FOUND OR CANNOT BE
31094  M01S01232.251l664 +++|*                            INTERLOCKED.
31095  M00S18085.cpumtr  +++|*                (B6) = RETURN ADDRESS.

Seq #  *Modification Id* Act 
----------------------------+
31096  M01S00012.cpum243 +++|*                (FCBM) = ORDINAL OF BUFFER WITH ERROR.
31097  M00S18086.cpumtr  +++|*

Seq #  *Modification Id* Act 
----------------------------+
31098  M01S18087.241l630 ---|*         USES   A - 1, 2, 3, 6.

Seq #  *Modification Id* Act 
----------------------------+
31099  M02S00285.251l664 ---|*         USES   A - 1, 2, 3, 6, 7.

Seq #  *Modification Id* Act 
----------------------------+
31100  M01S18088.251l664 ---|*                B - 6.

Seq #  *Modification Id* Act 
----------------------------+
31101  M01S01233.251l664 +++|*         USES   A - 1, 2, 3, 4, 6, 7.
31102  M01S01234.251l664 +++|*                B - 3.
31103  M00S18089.cpumtr  +++|*                X - ALL.
31104  M00S18090.cpumtr  +++|
31105  M00S18091.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31106  M01S18092.251l664 ---| INB      SA3    INBA        FST MASK
31107  M01S18093.251l664 ---|          BX1    X7          GET *FST* INFORMATION FROM CONTROL BUFFER
31108  M01S18094.251l664 ---|          LX1    CBTLS

Seq #  *Modification Id* Act 
----------------------------+
31109  M02S00001.251l664 ---|          TA4    X1+PAD1,CBT CHECK STATUS
31110  M02S00002.251l664 ---|          MX0    3
31111  M02S00003.251l664 ---|          BX0    X0*X4

Seq #  *Modification Id* Act 
----------------------------+
31112  M01S18095.251l664 ---|          TA4    X1+FSTC,CBT

Seq #  *Modification Id* Act 
----------------------------+
31113  M02S00004.251l664 ---|          NZ     X0,INB8     IF ERROR STATUS PRESENT

Seq #  *Modification Id* Act 
----------------------------+
31114  M01S18096.251l664 ---|          BX4    X6-X4       COMPARE *FST* WITH *CBT*
31115  M01S18097.251l664 ---|          BX4    X4*X3
31116  M01S18098.251l664 ---|          SX0    B1          PRESET TO INCREMENT INTERLOCK SUCCESSFUL
31117  M01S18099.251l664 ---|          BX6    X7          SET BUFFER NUMBER FOR RESPONSE
31118  M01S18100.251l664 ---|          NZ     X4,INB8     IF NO MATCH
31119  M01S18101.251l664 ---|          SA3    INLB
31120  M01S18102.251l664 ---|          BX3    X3-X6
31121  M01S18103.251l664 ---|          ZR     X3,INB7     IF CORRECT BUFFER INTERLOCKED
31122  M01S18104.251l664 ---|          TA3    X1+LSLK,CBT READ ACCESS COUNT
31123  M01S18105.251l664 ---|          NZ     X2,INB4     IF WRITE OR REWRITE
31124  M01S18106.251l664 ---|          ERRNZ  BMRD        *BMRD* MUST BE ZERO
31125  M01S18107.251l664 ---|          NG     X3,INB7     IF READ WITH WRITE INTERLOCK SET
31126  M01S18108.251l664 ---|          TA2    X1+IOLK,CBT READ ACCESS FLAGS WORD
31127  M01S18109.251l664 ---|          SX4    B1          INCREMENT ACCESS COUNT
31128  M01S18110.251l664 ---|          LX4    48
31129  M01S18111.251l664 ---|          BX5    X2
31130  M01S18112.251l664 ---|          IX3    X3+X4
31131  M01S18113.251l664 ---|          BX4    X5
31132  M01S18114.251l664 ---|          LX4    59-57
31133  M01S18115.251l664 ---|          NG     X5,INB3     IF I/O ACTIVE
31134  M01S18116.251l664 ---|          NG     X4,INB5     IF BUFFER CONTAINS WRITE DATA
31135  M01S18117.251l664 ---| INB2     BX7    X3
31136  M01S18118.251l664 ---|          SA7    A3

Seq #  *Modification Id* Act 
----------------------------+
31137  M02S01235.283l840 ---| INB      BX1    X7

Seq #  *Modification Id* Act 
----------------------------+
31138  M01S00363.283l840 +++| INB      BSS    0           ENTRY
31139  M01S00364.283l840 +++|          BX1    X7

Seq #  *Modification Id* Act 
----------------------------+
31140  M01S00013.cpum243 +++|          BX7    X7-X7       CLEAR BUFFER ORDINAL
31141  M01S00014.cpum243 +++|          SA7    FCBM
31142  M01S00015.cpum243 +++|          BX7    X1

Seq #  *Modification Id* Act 
----------------------------+
31143  M01S01236.251l664 +++|          LX1    CBTLS
31144  M01S01237.251l664 +++|          TA4    X1+HSLK,CBT
31145  M01S01238.251l664 +++|          SA3    INBA
31146  M01S01239.251l664 +++|          SB3    X2          SUBFUNCTION
31147  M01S01240.251l664 +++|          SX0    B1
31148  M01S01241.251l664 +++|          SA2    A4-B1
31149  M01S01242.251l664 +++|          ERRNZ  HSLK-IOLK-1 CODE DEPENDS ON VALUE
31150  M01S01243.251l664 +++|          SA1    A2-B1
31151  M01S01244.251l664 +++|          ERRNZ  IOLK-FSTC-1 CODE DEPENDS ON VALUE
31152  M01S01245.251l664 +++|          BX1    X6-X1
31153  M01S01246.251l664 +++|          BX1    X3*X1
31154  M01S01247.251l664 +++|          SA3    INLB
31155  M01S01248.251l664 +++|          NZ     X1,INB8     IF FST/CBT MISMATCH
31156  M01S01249.251l664 +++|          BX3    X3-X7
31157  M01S01250.251l664 +++|          BX6    X7          SAVE BUFFER ORDINAL FOR REPLY
31158  M01S01251.251l664 +++|          ZR     X3,INB7     IF INTERLOCK SET

Seq #  *Modification Id* Act 
----------------------------+
31159  M02S01252.cpum181 ---|          NG     X4,INB9     IF I/O ERROR
31160  M02S01253.cpum181 ---|          SA3    A4+B1
31161  M02S01254.cpum181 ---|          ERRNZ  LSLK-HSLK-1 CODE DEPENDS ON VALUE

Seq #  *Modification Id* Act 
----------------------------+
31162  M01S00001.cpum181 +++|          SA3    A4-HSLK+LSLK

Seq #  *Modification Id* Act 
----------------------------+
31163  M01S01255.251l664 +++|          BX5    X2
31164  M01S01256.251l664 +++|          LX2    59-57

Seq #  *Modification Id* Act 
----------------------------+
31165  M02S01257.cpum181 ---|          NZ     B3,INB4     IF WRITE/REWRITE

Seq #  *Modification Id* Act 
----------------------------+
31166  M01S00002.cpum181 +++|          PL     X4,INB1     IF NO I/O ERROR

Seq #  *Modification Id* Act 
----------------------------+
31167  M02S00003.283l840 ---|          PL     X2,INB9     IF READ BUFFER

Seq #  *Modification Id* Act 
----------------------------+
31168  M01S00365.283l840 +++|          PL     X2,INB9     IF NO WRITE DATA IN BUFFER

Seq #  *Modification Id* Act 
----------------------------+
31169  M01S00004.cpum181 +++| INB1     NZ     B3,INB4     IF WRITE/REWRITE

Seq #  *Modification Id* Act 
----------------------------+
31170  M01S01258.251l664 +++|          ERRNZ  BMRD        CODE DEPENDS ON VALUE

Seq #  *Modification Id* Act 
----------------------------+
31171  M02S01259.cpum181 ---|          SX1    B1

Seq #  *Modification Id* Act 
----------------------------+
31172  M01S00005.cpum181 +++|          SX1    B1+

Seq #  *Modification Id* Act 
----------------------------+
31173  M01S01260.251l664 +++|          NG     X3,INB7     IF WRITE INTERLOCK IS SET
31174  M01S01261.251l664 +++|          LX1    48
31175  M01S01262.251l664 +++|          IX7    X3+X1       INCREMENT ACCESS COUNT
31176  M01S01263.251l664 +++|          NG     X5,INB3     IF I/O ACTIVE
31177  M01S01264.251l664 +++|          NG     X2,INB5     IF BUFFER CONTAINS WRITE DATA
31178  M01S01265.251l664 +++| INB2     SA7    A3
31179  M00S18119.cpumtr  +++|          EQ     INB6        COUNT STATUS AND RETURN
31180  M00S18120.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31181  M01S18121.251l664 ---| INB3     PL     X4,INB7     IF READ BUFFER BEING FILLED

Seq #  *Modification Id* Act 
----------------------------+
31182  M01S01266.251l664 +++| INB3     PL     X2,INB7     IF READ BUFFER BEING FILLED
31183  M00S18122.cpumtr  +++|          EQ     INB2        ALLOW READ OF WRITE DATA
31184  M00S18123.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31185  M01S18124.251l664 ---| INB4     MX4    12
31186  M01S18125.251l664 ---|          BX5    X4*X3       GET ACCESS COUNT
31187  M01S18126.251l664 ---|          NZ     X5,INB7     IF ACCESS COUNT NOT ZERO
31188  M01S18127.251l664 ---|          TA2    X1+IOLK,CBT
31189  M01S18128.251l664 ---|          BX3    -X4*X3
31190  M01S18129.251l664 ---|          BX5    X2

Seq #  *Modification Id* Act 
----------------------------+
31191  M01S01267.251l664 +++| INB4     MX1    12
31192  M01S01268.251l664 +++|          BX1    X1*X3       GET ACCESS COUNT
31193  M00S18130.cpumtr  +++|          NG     X5,INB7     IF I/O INTERLOCK SET

Seq #  *Modification Id* Act 
----------------------------+
31194  M01S18131.251l664 ---|          LX5    59-57
31195  M01S18132.251l664 ---|          MX4    1
31196  M01S18133.251l664 ---|          PL     X5,INB5     IF WRITE DATA ACCESS FLAG NOT SET
31197  M01S18134.251l664 ---|          BX7    X3+X4       SET WRITE INTERLOCK
31198  M01S18135.251l664 ---|          SA7    A3

Seq #  *Modification Id* Act 
----------------------------+
31199  M01S01269.251l664 +++|          NZ     X1,INB7     IF ACCESS COUNT NOT ZERO
31200  M01S01270.251l664 +++|          PL     X2,INB4.2   IF WRITE DATA ACCESS FLAG CLEAR
31201  M01S01271.251l664 +++| INB4.1   MX1    1
31202  M01S01272.251l664 +++|          BX7    X3+X1       SET WRITE INTERLOCK
31203  M01S01273.251l664 +++|          SA7    A3+
31204  M00S18136.cpumtr  +++|          EQ     INB6        COUNT STATUS AND RETURN
31205  M00S18137.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31206  M01S18138.251l664 ---| INB5     BX6    X6-X6       CLEAR CONTROL BUFFER INDEX RESPONSE
31207  M01S18139.251l664 ---|          SX0    B0          DO NOT COUNT ACCESS
31208  M01S18140.251l664 ---| INB6     TA3    X1+HSLK,CBT
31209  M01S18141.251l664 ---|          MX4    -12
31210  M01S18142.251l664 ---|          SA5    A5          RESTORE PP OUTPUT REGISTER
31211  M01S18143.251l664 ---|          BX3    -X4*X3

Seq #  *Modification Id* Act 
----------------------------+
31212  M01S01274.251l664 +++| INB4.2   TX1    A5-1,-SP
31213  M01S01275.251l664 +++|          ZR     X1,INB5     IF PSEUDO PP CALL
31214  M01S01276.251l664 +++|          SA1    A5+B1
31215  M01S01277.251l664 +++|          LX1    59-6
31216  M01S01278.251l664 +++|          NG     X1,INB4.1   IF *1MV* RECALL AFTER FLUSH
31217  M01S01279.251l664 +++| INB5     SX6    B0+         SET REPLY STATUS
31218  M01S01280.251l664 +++|          SX0    B0+         DON-T COUNT ACCESS ATTEMPT
31219  M01S01281.251l664 +++| INB6     MX1    -12
31220  M01S01282.251l664 +++|          BX3    -X1*X4
31221  M00S18144.cpumtr  +++|          LX3    PUTLS
31222  M00S18145.cpumtr  +++|          TA1    X3+INST,PUT
31223  M00S18146.cpumtr  +++|          IX7    X1+X0
31224  M00S18147.cpumtr  +++|          SA7    A1          UPDATE BUFFER VALIDATE STATISTICS

Seq #  *Modification Id* Act 
----------------------------+
31225  M01S01283.251l664 +++| INB6.1   SA5    A5          RESTORE PP OUTPUT REGISTER
31226  M00S18148.cpumtr  +++|          JP     B6          RETURN
31227  M00S18149.cpumtr  +++|
31228  M00S18150.cpumtr  +++| INB7     LX0    58-0
31229  M00S18151.cpumtr  +++|          BX6    X6+X0       SET BUFFER BUSY

Seq #  *Modification Id* Act 
----------------------------+
31230  M01S18152.251l664 ---|          SA5    A5+         RESTORE PP OUTPUT REGISTER
31231  M01S18153.251l664 ---|          JP     B6          EXIT

Seq #  *Modification Id* Act 
----------------------------+
31232  M01S01284.251l664 +++|          EQ     INB6.1      EXIT
31233  M00S18154.cpumtr  +++|
31234  M00S18155.cpumtr  +++| INB8     LX0    36          COUNT REJECT
31235  M00S18156.cpumtr  +++|          BX6    X6-X6
31236  M00S18157.cpumtr  +++|          EQ     INB6        EXIT WITH BUFFER NOT FOUND

Seq #  *Modification Id* Act 
----------------------------+
31237  M01S01285.251l664 +++|

Seq #  *Modification Id* Act 
----------------------------+
31238  M02S01286.cpum181 ---| INB9     NG     X2,INB7     IF I/O INTERLOCK IS SET

Seq #  *Modification Id* Act 
----------------------------+
31239  M01S00006.cpum181 +++| INB9     NG     X5,INB7     IF I/O INTERLOCK IS SET

Seq #  *Modification Id* Act 
----------------------------+
31240  M01S01287.251l664 +++|          LX0    57-0
31241  M01S01288.251l664 +++|          BX6    X0          SET I/O ERROR STATUS

Seq #  *Modification Id* Act 
----------------------------+
31242  M02S01289.cpum243 ---|          SA7    FCBI        SAVE BUFFER ORDINAL FOR CALLER

Seq #  *Modification Id* Act 
----------------------------+
31243  M01S00016.cpum243 +++|          SA7    FCBM        SAVE BUFFER ORDINAL FOR CALLER

Seq #  *Modification Id* Act 
----------------------------+
31244  M01S01290.251l664 +++|          EQ     INB6.1      EXIT
31245  M00S18158.cpumtr  +++|
31246  M00S18159.cpumtr  +++|
31247  M00S18160.cpumtr  +++| INBA     DATA   07770000777777400000B  *FST* COMPARISON MASK

Seq #  *Modification Id* Act 
----------------------------+
31248  M01S18161.283l840 ---| RDB      SPACE  4,15
31249  M01S18162.283l840 ---|**        RDB - READ BUFFER.

Seq #  *Modification Id* Act 
----------------------------+
31250  M01S00366.283l840 +++| RDB      SPACE  4,35
31251  M01S00367.283l840 +++|**        RDB - INTERLOCK BUFFER IN READ MODE OR INITIATE READ.
31252  M00S18163.cpumtr  +++|*

Seq #  *Modification Id* Act 
----------------------------+
31253  M01S18164.283l840 ---|*         ENTRY  INPUT REQUEST DECODED BY LBM MAIN ROUTINE.

Seq #  *Modification Id* Act 
----------------------------+
31254  M01S00368.283l840 +++|*         ENTRY  (BCNT) = COUNT OF BUFFERS TO ALLOCATE IF REQUESTED
31255  M01S00369.283l840 +++|*                         BUFFER IS READ FROM DISK.
31256  M00S18165.cpumtr  +++|*

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

Seq #  *Modification Id* Act 
----------------------------+
31258  M01S00370.283l840 +++|*         EXIT   TO *LBMX* IF BUFFER FOUND AND INTERLOCKED.
31259  M01S00371.283l840 +++|*                TO *SBB* IF BUFFER FOUND BUT CANNOT BE INTERLOCKED,
31260  M01S00372.283l840 +++|*                  DATA READ IN PROGRESS AND RECALL CONTROL ALREADY SET
31261  M01S00373.283l840 +++|*                  ON BUFFER, OR BUFFER CANNOT BE ALLOCATED.
31262  M01S00374.283l840 +++|*                TO *SRR* IF READ INITIATED OR IF DATA READ ALREADY IN
31263  M01S00375.283l840 +++|*                  PROGRESS AND RECALL CONTROL IS NOT ALREADY SET ON
31264  M01S00376.283l840 +++|*                  THE BUFFER.
31265  M01S00377.283l840 +++|*                READ-AHEAD ON ADDITIONAL CONSECUTIVE BUFFERS INITIATED
31266  M01S00378.283l840 +++|*                  AS NEEDED IF TO RECALL ON READ OF REQUESTED BUFFER.
31267  M00S18167.cpumtr  +++|*

Seq #  *Modification Id* Act 
----------------------------+
31268  M01S18168.251l664 ---|*         USES   A - 1, 2, 3, 6, 7.
31269  M01S18169.251l664 ---|*                B - 4, 5, 6.
31270  M01S18170.251l664 ---|*                X - 1, 2, 3, 4, 5, 6, 7.

Seq #  *Modification Id* Act 
----------------------------+
31271  M01S01291.251l664 +++|*         USES   A - 1, 2, 3, 6, 7.

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

Seq #  *Modification Id* Act 
----------------------------+
31273  M01S00185.251l670 +++|*                B - 6.

Seq #  *Modification Id* Act 
----------------------------+
31274  M01S01293.251l664 +++|*                X - ALL.
31275  M00S18171.cpumtr  +++|*

Seq #  *Modification Id* Act 
----------------------------+
31276  M01S18172.241l630 ---|*         CALLS  ANB, CHA, CLP, DCC, LCC, SBB, SNS, SPC, SRC, SRR.

Seq #  *Modification Id* Act 
----------------------------+
31277  M02S00286.cpum243 ---|*         CALLS  ANB, CHA, DCC, LCC, SBB, SNS, SRC, SRR.

Seq #  *Modification Id* Act 
----------------------------+
31278  M01S00017.cpum243 +++|*         CALLS  ANB, CSD, CHA, DCC, LCC, SBB, SNS, SRC, SRR.

Seq #  *Modification Id* Act 
----------------------------+
31279  M01S00379.283l840 +++|*
31280  M01S00380.283l840 +++|*         IF THE BUFFER INDICATED BY *LTRK* AND *LSEC* IS FOUND AND CAN
31281  M01S00381.283l840 +++|*         BE INTERLOCKED IN READ MODE, NORMAL STATUS WILL BE RETURNED.
31282  M01S00382.283l840 +++|*         BUFFER BUSY STATUS WILL BE RETURNED IF THE BUFFER IS FOUND
31283  M01S00383.283l840 +++|*         BUT INTERLOCKED IN WRITE MODE, IF A READ IS IN PROGRESS AND
31284  M01S00384.283l840 +++|*         RECALL CONTROL IS ALREADY SET, OR IF THE BUFFER IS NOT FOUND
31285  M01S00385.283l840 +++|*         AND CANNOT BE ALLOCATED.  IN NONE OF THESE CASES WILL AN
31286  M01S00386.283l840 +++|*         ATTEMPT BE MADE TO ALLOCATE ADDITIONAL BUFFERS.  IF A READ
31287  M01S00387.283l840 +++|*         BUFFER IS ALLOCATED OR IF A READ IS ALREADY IN PROGRESS AND
31288  M01S00388.283l840 +++|*         RECALL CONTROL IS NOT ALREADY SET ON THE BUFFER, RECALL
31289  M01S00389.283l840 +++|*         CONTROL WILL BE SET AND RECALL STATUS WILL RETURNED. ALSO,
31290  M01S00390.283l840 +++|*         ADDITIONAL CONSECUTIVE BUFFERS WILL BE ALLOCATED, IF
31291  M01S00391.283l840 +++|*         POSSIBLE, ACCORDING TO THE VALUE OF *BCNT*.
31292  M00S18173.cpumtr  +++|
31293  M00S18174.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31294  M01S18175.283l840 ---| RDB      SX7    B0          CLEAR PUSH STACK

Seq #  *Modification Id* Act 
----------------------------+
31295  M01S00392.283l840 +++| RDB      BSS    0           ENTRY
31296  M01S00393.283l840 +++|          SX7    B0          SET BUFFER NOT ALLOCATED
31297  M00S18176.cpumtr  +++|          SA3    BCNT        SET BUFFER COUNT TO ALLOCATE

Seq #  *Modification Id* Act 
----------------------------+
31298  M01S18177.251l670 ---|          SB4    X3

Seq #  *Modification Id* Act 
----------------------------+
31299  M01S00186.251l670 +++|          BX6    -X3
31300  M01S00187.251l670 +++|          SA6    RBCT
31301  M00S18178.cpumtr  +++|          TX6    DRDB        SET READ AS CURRENT LIST
31302  M00S18179.cpumtr  +++|          SA6    CLST

Seq #  *Modification Id* Act 
----------------------------+
31303  M01S00394.283l840 +++|
31304  M01S00395.283l840 +++|*         FIND NEXT BUFFER.
31305  M01S00396.283l840 +++|

Seq #  *Modification Id* Act 
----------------------------+
31306  M01S18180.241l630 ---|          SB6    RDB2        RETURN ADDRESS FOR *CLP*
31307  M01S18181.241l630 ---|          EQ     CLP         CONVERT LOGICAL TO PHYSICAL
31308  M01S18182.241l630 ---|
31309  M00S18183.cpumtr  +++| RDB2     SB6    RDB3        *CHA* RETURN ADDRESS

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

Seq #  *Modification Id* Act 
----------------------------+
31311  M01S00397.283l840 +++|          TEQ    (/BUFIO/CSD,BIOMMF,/BUFIO/CHA)  CHECK BUFFER STATUS
31312  M00S18185.cpumtr  +++|
31313  M00S18186.cpumtr  +++| RDB3     ZR     X2,RDB14    IF FIRST ACCESS TO HASH ENTRY

Seq #  *Modification Id* Act 
----------------------------+
31314  M01S18187.283l840 ---|          NG     X2,RDB11    IF HASH TABLE IS FULL

Seq #  *Modification Id* Act 
----------------------------+
31315  M01S00398.283l840 +++|          NG     X2,RDB11    IF BUFFER CANNOT BE ALLOCATED
31316  M00S18188.cpumtr  +++|          ZR     X0,RDB14    IF BUFFER NOT FOUND

Seq #  *Modification Id* Act 
----------------------------+
31317  M01S18189.251l670 ---|          NZ     X7,RDB17.1  IF BUFFERS HAVE BEEN ALLOCATED

Seq #  *Modification Id* Act 
----------------------------+
31318  M02S00188.cpum151 ---|          NZ     X7,RDB18    IF BUFFERS ALLOCATED

Seq #  *Modification Id* Act 
----------------------------+
31319  M02S18190.cpum151 ---|          BX6    X0          SAVE BUFFER INDEX FOR RESPONSE

Seq #  *Modification Id* Act 
----------------------------+
31320  M02S01294.cpum151 ---|          SX6    X0+         SAVE BUFFER ORDINAL FOR RESPONSE

Seq #  *Modification Id* Act 
----------------------------+
31321  M01S00001.cpum151 +++|          ZR     X7,RDB4     IF NO BUFFERS ALLOCATED
31322  M01S00002.cpum151 +++|          SB6    RDB19
31323  M01S00003.cpum151 +++|          EQ     CAT         CHECK ALLOCATION TRIGGER
31324  M01S00004.cpum151 +++|
31325  M01S00005.cpum151 +++| RDB4     SX6    X0+         SAVE BUFFER ORDINAL FOR RESPONSE
31326  M00S18191.cpumtr  +++|          SA6    FCBI
31327  M00S18192.cpumtr  +++|          SA6    INLB        SET CONTROL BUFFER INTERLOCK
31328  M00S18193.cpumtr  +++|          LX6    CBTLS

Seq #  *Modification Id* Act 
----------------------------+
31329  M01S18194.251l664 ---|          TA1    X6,CBT      CHECK STATUS
31330  M01S18195.251l664 ---|          LX1    59-58
31331  M01S18196.251l664 ---|          PL     X1,RDB4     IF *DISK NOT READY* NOT SET
31332  M01S18197.251l664 ---|          TA1    X6+IOLK,CBT
31333  M01S18198.251l664 ---|          NG     X1,SBB      IF I/O INTERLOCK SET

Seq #  *Modification Id* Act 
----------------------------+
31334  M02S00001.251l664 ---|          BX6    X0

Seq #  *Modification Id* Act 
----------------------------+
31335  M01S18199.251l664 ---|          TA6    IORQ
31336  M01S18200.251l664 ---|          XJ
31337  M01S18201.251l664 ---|
31338  M01S18202.251l664 ---|          SX6    B0+         CLEAR I/O ACTIVITY
31339  M01S18203.251l664 ---|          EQ     RDB10       CHECK RECALL CONTROL
31340  M01S18204.251l664 ---|
31341  M01S18205.251l664 ---| RDB4     TA2    X6+IOLK,CBT READ ACCESS FLAGS WORD

Seq #  *Modification Id* Act 
----------------------------+
31342  M01S01295.251l664 +++|          TA2    X6+IOLK,CBT READ ACCESS FLAGS WORD
31343  M00S18206.cpumtr  +++|          TA3    X6+LSLK,CBT READ ACCESS WORD COUNT
31344  M00S18207.cpumtr  +++|          NG     X2,RDB6     IF I/O INTERLOCK SET
31345  M00S18208.cpumtr  +++|          LX2    59-57
31346  M00S18209.cpumtr  +++|          BX6    X0

Seq #  *Modification Id* Act 
----------------------------+
31347  M01S18210.283l840 ---|          NG     X3,SBB      IF WRITE MODE BUFFER
31348  M01S18211.283l840 ---|          PL     X2,RDB8     IF NO FLUSH NEEDED

Seq #  *Modification Id* Act 
----------------------------+
31349  M01S00399.283l840 +++|          NG     X3,SBB      IF BUFFER INTERLOCKED IN WRITE MODE
31350  M01S00400.283l840 +++|          PL     X2,RDB8     IF NO WRITE DATA PRESENT
31351  M00S18212.cpumtr  +++|          TA6    IORQ        FLUSH WRITE DATA
31352  M00S18213.cpumtr  +++|          XJ
31353  M00S18214.cpumtr  +++|

Seq #  *Modification Id* Act 
----------------------------+
31354  M01S18215.251l664 ---|          EQ     RDB7        DISABLE HARDWARE STATUS RETURN

Seq #  *Modification Id* Act 
----------------------------+
31355  M01S01296.251l664 +++|          EQ     RDB8        DELINK BUFFER
31356  M00S18216.cpumtr  +++|
31357  M00S18217.cpumtr  +++| RDB6     LX2    59-57

Seq #  *Modification Id* Act 
----------------------------+
31358  M01S18218.283l840 ---|          PL     X2,RDB10    IF WRITE ACCESS NOT SET

Seq #  *Modification Id* Act 
----------------------------+
31359  M01S00401.283l840 +++|          PL     X2,RDB10    IF READ IN PROGRESS

Seq #  *Modification Id* Act 
----------------------------+
31360  M01S18219.251l664 ---| RDB7     SX6    B1+         DISABLE HARDWARE STATUS RETURN

Proceed to Part 25