Deck QDUMP Part 002

17 Modifications

Listing Sections

Deck QDUMP Start
Deck QDUMP Part 1 (Line 1595)
Deck QDUMP Part 2 (Line 3313)

Source

Seq #  *Modification Id* Act 
----------------------------+
03313  M00S02770.qdump   +++| MC07     DATA   C* TRACK LIMIT.                 *
03314  M00S02771.qdump   +++|
03315  M00S02772.qdump   +++|**        *QFM* ERROR MESSAGES.
03316  M00S02773.qdump   +++|
03317  M00S02774.qdump   +++| MQ00     DATA   C/ *QFM* ERROR.                 /
03318  M00S02775.qdump   +++| MQ01     DATA   C* FILE NOT FOUND.              *
03319  M00S02776.qdump   +++| MQ02     DATA   C* FILE ALREADY INTERLOCKED.    *

Line S00013 Modification History
`M01` (Added by)	`ns2576`

Seq #  *Modification Id* Act 
----------------------------+
03320  M01S00013.ns2576  +++| MQ03     DATA   C* DEVICE UNAVAILABLE.          *

Line S02777 Modification History
`M01` (Removed by)	`271l716`

Seq #  *Modification Id* Act 
----------------------------+
03321  M01S02777.271l716 ---| MQ04     DATA   C* FNT/QFT FULL.                *

Line S00034 Modification History
`M01` (Added by)	`271l716`

Seq #  *Modification Id* Act 
----------------------------+
03322  M01S00034.271l716 +++| MQ04     DATA   C* QFT/LOCAL FNT FULL.          *
03323  M00S02778.qdump   +++|          TITLE  COMMON DECKS.
03324  M00S02779.qdump   +++|*         COMMON DECKS.
03325  M00S02780.qdump   +++|
03326  M00S02781.qdump   +++|*CALL     COMCCDD
03327  M00S02782.qdump   +++|*CALL     COMCCIO
03328  M00S02783.qdump   +++|*CALL     COMCCOD
03329  M00S02784.qdump   +++|*CALL     COMCCPM
03330  M00S02785.qdump   +++|*CALL     COMCEDT
03331  M00S02786.qdump   +++|*CALL     COMCFQO
03332  M00S02787.qdump   +++|*CALL     COMCIQP
03333  M00S02788.qdump   +++|*CALL     COMCLFM
03334  M00S02789.qdump   +++|*CALL     COMCMVE
03335  M00S02790.qdump   +++|*CALL     COMCQFM
03336  M00S02791.qdump   +++|*CALL     COMCQFP
03337  M00S02792.qdump   +++|*CALL     COMCRDW

Line S00292 Modification History
`M01` (Added by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
03338  M01S00292.ns22000 +++|*CALL     COMCSCB
03339  M00S02793.qdump   +++|*CALL     COMCSFN

Line S00041 Modification History
`M01` (Added by)	`ns21000`

Seq #  *Modification Id* Act 
----------------------------+
03340  M01S00041.ns21000 +++|*CALL     COMCSFM
03341  M00S02794.qdump   +++|*CALL     COMCSYS

Line S00293 Modification History
`M01` (Added by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
03342  M01S00293.ns22000 +++|*CALL     COMCVLC
03343  M00S02795.qdump   +++|*CALL     COMCVQF
03344  M00S02796.qdump   +++| WRIF$    EQU    1
03345  M00S02797.qdump   +++|*CALL     COMCWTC
03346  M00S02798.qdump   +++|*CALL     COMCWTW
03347  M00S02799.qdump   +++|*CALL     COMCZTB
03348  M00S02800.qdump   +++|          TITLE  BUFFERS.
03349  M00S02801.qdump   +++|          USE    LITERALS
03350  M00S02802.qdump   +++|
03351  M00S02803.qdump   +++|*         BUFFERS.
03352  M00S02804.qdump   +++|

Line S02805 Modification History
`M01` (Removed by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
03353  M01S02805.ns22000 ---| BLOCK    BSSZ   7           *DSP* CALL BLOCK

Line S00294 Modification History
`M01` (Added by)	`ns22000`

Seq #  *Modification Id* Act 
----------------------------+
03354  M01S00294.ns22000 +++| BLOCK    BSSZ   EPBL        *DSP* CALL BLOCK
03355  M00S02806.qdump   +++| IQFE     BSSZ   QFEWL       INACTIVE QUEUED FILE ENTRY BUFFER
03356  M00S02807.qdump   +++| TACF     BSS    0           TABLE OF ACTIVE FAMILIES (UNUSED)
03357  M00S02808.qdump   +++| EBUF     VFD    24/1000B,36/5  END OF VOLUME CONTROL WORD BUFFER
03358  M00S02809.qdump   +++|          VFD    60/310000B
03359  M00S02810.qdump   +++|          BSSZ   2
03360  M00S02811.qdump   +++| WBUF     EQU    *           WORKING BUFFER
03361  M00S02812.qdump   +++| TBUF     EQU    WBUF+WBUFL  TEMPORARY IQFT ENTRY BUFFER
03362  M00S02813.qdump   +++| OBUF     EQU    TBUF+BUFL   OUTPUT FILE BUFFER
03363  M00S02814.qdump   +++| QBUF     EQU    OBUF+BUFL   QUEUE FILE BUFFER
03364  M00S02815.qdump   +++| DBUF     EQU    QBUF+QBUFL  DESTINATION QUEUE FILE BUFFER

Line S02816 Modification History
`M01` (Removed by)	`ns21000`

Seq #  *Modification Id* Act 
----------------------------+
03365  M01S02816.ns21000 ---| SBUF     EQU    DBUF+DBUFL  SYSTEM SECTOR BUFFER

Line S00042 Modification History
`M01` (Added by)	`ns21000`

Seq #  *Modification Id* Act 
----------------------------+
03366  M01S00042.ns21000 +++| SBUF     EQU    DBUF+DBUFL  SYSTEM INFORMATION BUFFER
03367  M00S02817.qdump   +++|
03368  M00S02818.qdump   +++|*         READ FNT OR QFT INTO FIELD LENGTH STARTING AT *RBUF*.
03369  M00S02819.qdump   +++|
03370  M00S02820.qdump   +++| RBUF     EQU    SBUF+SBUFL   FNT/QFT BUFFER
03371  M00S02821.qdump   +++|
03372  M00S02822.qdump   +++|*         THE LENGTH OF *IBUF* MAY BE EXPANDED TO READ THE ENTIRE
03373  M00S02823.qdump   +++|*         FNT OR QFT IF NECESSARY.
03374  M00S02824.qdump   +++|
03375  M00S02825.qdump   +++| IBUF     EQU    RBUF        OLD IQFT FILE BUFFER

Line S02826 Modification History
`M01` (Removed by)	`qdump3`

Seq #  *Modification Id* Act 
----------------------------+
03376  M01S02826.qdump3  ---| BUFFL    EQU    IBUF+IBUFL  END OF BUFFERS

Line S00001 Modification History
`M01` (Added by)	`qdump3`
`M02` (Removed by)	`ns2340`

Seq #  *Modification Id* Act 
----------------------------+
03377  M02S00001.ns2340  ---| BUFFL    EQU    IBUF+IBUFL+10B  END OF BUFFERS

Line S00002 Modification History
`M01` (Added by)	`ns2340`

Seq #  *Modification Id* Act 
----------------------------+
03378  M01S00002.ns2340  +++| BUFFL    EQU    IBUF+IBUFL+4  END OF BUFFERS
03379  M00S02827.qdump   +++| PRS      TITLE  PRESET.
03380  M00S02828.qdump   +++|**        PRS - PRESET.
03381  M00S02829.qdump   +++|*
03382  M00S02830.qdump   +++|*         PRESET ADJUSTS FIELD LENGTH AND SETS UP A
03383  M00S02831.qdump   +++|*         CONTROL WORD TO READ THE QFT.
03384  M00S02832.qdump   +++|*
03385  M00S02833.qdump   +++|*         ENTRY  (QFTA) = *QFTP* WORD IN CMR.
03386  M00S02834.qdump   +++|*
03387  M00S02835.qdump   +++|*         EXIT   (QFTS) = LENGTH OF QFT.
03388  M00S02836.qdump   +++|*                (RQTA) = *RSB* CONTROL WORD FOR QFT READ.
03389  M00S02837.qdump   +++|*
03390  M00S02838.qdump   +++|*         USES   X - 0, 1, 2, 3, 4, 6, 7.
03391  M00S02839.qdump   +++|*                A - 2, 6, 7.
03392  M00S02840.qdump   +++|*
03393  M00S02841.qdump   +++|*         MACROS MEMORY.
03394  M00S02842.qdump   +++|
03395  M00S02843.qdump   +++|
03396  M00S02844.qdump   +++| PRS      SUBR               ENTRY/EXIT
03397  M00S02845.qdump   +++|          MEMORY CM,,R,BUFFL
03398  M00S02846.qdump   +++|
03399  M00S02847.qdump   +++|*         SET QFT FWA AND LENGTH.
03400  M00S02848.qdump   +++|
03401  M00S02849.qdump   +++|          SA2    QFTA        *QFTP* WORD
03402  M00S02850.qdump   +++|          MX0    -24         GET FWA OF QFT
03403  M00S02851.qdump   +++|          LX2    24
03404  M00S02852.qdump   +++|          BX7    -X0*X2
03405  M00S02853.qdump   +++|          LX2    12          GET MAXIMUM NUMBER OF QFT ENTRIES
03406  M00S02854.qdump   +++|          MX0    -12
03407  M00S02855.qdump   +++|          BX2    -X0*X2
03408  M00S02856.qdump   +++|          SX3    QFTE
03409  M00S02857.qdump   +++|          IX6    X2*X3       NUMBER OF ENTRIES * ENTRY LENGTH
03410  M00S02858.qdump   +++|          SA6    QFTS        QFT LENGTH
03411  M00S02859.qdump   +++|
03412  M00S02860.qdump   +++|*         SET UP *RSB* CONTROL WORD TO READ QFT.
03413  M00S02861.qdump   +++|
03414  M00S02862.qdump   +++|          SX4    100B        WORD COUNT
03415  M00S02863.qdump   +++|          LX4    18
03416  M00S02864.qdump   +++|          BX7    X4+X7       ADD ON QFT FWA
03417  M00S02865.qdump   +++|          SX1    RBUF        BUFFER ADDRESS
03418  M00S02866.qdump   +++|          LX7    18
03419  M00S02867.qdump   +++|          BX7    X7+X1
03420  M00S02868.qdump   +++|          SA7    RQTA
03421  M00S02869.qdump   +++|          EQ     PRSX        RETURN
03422  M00S02870.qdump   +++|          SPACE  4,10
03423  M00S02871.qdump   +++|          ERRPL  *-RFL       IF DEFAULT FIELD LENGTH TOO SMALL
03424  M00S02872.qdump   +++|          SPACE  4
03425  M00S02873.qdump   +++|          END    QDUMP