Action unknown: copypageplugin__copy
cdc:nos2.source:opl.opl871:deck:qdump
Deck QDUMP
Library Member Format: MODIFY
Listing Sections
- Deck QDUMP Start
- Deck QDUMP Part 1 (Line 1595)
- Deck QDUMP Part 2 (Line 3313)
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M00S00001.qdump +++| IDENT QDUMP1,OVLA,QDUMP,01,00 00002 M00S00002.qdump +++| ABS 00003 M00S00003.qdump +++| SST 00004 M00S00004.qdump +++| SYSCOM B1 00005 M00S00005.qdump +++|*COMMENT QDUMP - QUEUE DUMP PROCESSOR.
| Line S00006 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00006 M01S00006.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1975.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00007 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00008 M00S00007.qdump +++| TITLE QDUMP - QUEUE DUMP PROCESSOR. 00009 M00S00008.qdump +++| SPACE 4 00010 M00S00009.qdump +++|*** QDUMP - QUEUE DUMP PROCESSOR. 00011 M00S00010.qdump +++|* A. J. BEEKMAN. 76/03/11. 00012 M00S00011.qdump +++| SPACE 4 00013 M00S00012.qdump +++|*** *QDUMP* IS A UTILITY PROGRAM THAT DUMPS SELECTED QUEUE 00014 M00S00013.qdump +++|* FILES FROM A SINGLE DEVICE, A FAMILY, OR ALL DEVICES TO 00015 M00S00014.qdump +++|* A SPECIFIED DUMP FILE, EITHER MAGNETIC TAPE OR MASS 00016 M00S00015.qdump +++|* STORAGE, AND PROVIDES A LIST OF ALL FILES DUMPED WITH 00017 M00S00016.qdump +++|* INFORMATION RELATIVE TO EACH. 00018 M00S00017.qdump +++| SPACE 4 00019 M00S00018.qdump +++|*** *QDUMP* MAY BE CALLED FROM THE CONSOLE BY THE QUEUED FILE
| Line S00019 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00020 M01S00019.v23l617 ---|* SUPERVISOR PROGRAM (X.QFSP.) OR BY CONTROL STATEMENT. AFTER
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00021 M01S00001.v23l617 +++|* SUPERVISOR PROGRAM (X.QFSP.) OR BY COMMAND. AFTER 00022 M00S00020.qdump +++|* DUMPING QUEUED FILES, THE FILES THAT HAVE BEEN DUMPED MAY 00023 M00S00021.qdump +++|* BE PURGED USING THE QUEUE UTILITY *QREC* WITH THE SAME *K* 00024 M00S00022.qdump +++|* DISPLAY SELECTION PARAMETER VALUES. TO PURGE INACTIVE FILES, 00025 M00S00023.qdump +++|* USE THE *PI* (PURGE AND IGNORE) OPTION. TO PURGE ACTIVE 00026 M00S00024.qdump +++|* FILES, USE THE *DI* (DEACTIVATE AND IGNORE) OPTION, FOLLOWED
| Line S00025 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00027 M01S00025.v23l617 ---|* BY THE *PI* OPTION. THE CONTROL STATEMENT FORMAT FOR
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00028 M01S00002.v23l617 +++|* BY THE *PI* OPTION. THE COMMAND FORMAT FOR 00029 M00S00026.qdump +++|* *QDUMP* IS - 00030 M00S00027.qdump +++|* 00031 M00S00028.qdump +++|* QDUMP(P1=A1,P2=A2,...,PN=AN) 00032 M00S00029.qdump +++|* 00033 M00S00030.qdump +++|* WHERE P1 - PN ARE ANY OF THE FOLLOWING VALID PARAMETERS - 00034 M00S00031.qdump +++|* 00035 M00S00032.qdump +++|* MI = MACHINE ID. 00036 M00S00033.qdump +++|* 00037 M00S00034.qdump +++|* FM = FAMILY NAME TO DUMP FROM. 00038 M00S00035.qdump +++|* 00039 M00S00036.qdump +++|* DN = DEVICE NUMBER (FAMILY MUST BE SPECIFIED FIRST). 00040 M00S00037.qdump +++|* 00041 M00S00038.qdump +++|* THE FM AND DN PARAMETERS ARE USED TO DESCRIBE THE 00042 M00S00039.qdump +++|* FAMILY AND DEVICE OR SET OF FAMILIES OR DEVICES FROM 00043 M00S00040.qdump +++|* WHICH THE QUEUED FILES SHOULD BE DUMPED. FM MAY BE 00044 M00S00041.qdump +++|* *ALL*, IN WHICH CASE DN MUST ALSO BE *ALL*. 00045 M00S00042.qdump +++|* 00046 M00S00043.qdump +++|* FU = FAMILY NAME FOR USER INDEX. 00047 M00S00044.qdump +++|* 00048 M00S00045.qdump +++|* UI = USER INDEX RANGE (0 - 377777B). 00049 M00S00046.qdump +++|* 00050 M00S00047.qdump +++|* THE FU AND UI PARAMETERS DESCRIBE THE FAMILY AND USER 00051 M00S00048.qdump +++|* INDICIES OF THE QUEUED FILES WHICH ARE TO BE DUMPED. 00052 M00S00049.qdump +++|* 00053 M00S00050.qdump +++|* DA = DUMP DATE RANGE. FORM IS YYMMDD WHERE YY IS THE 00054 M00S00051.qdump +++|* YEAR, MM THE MONTH, AND DD THE DAY. IT CAN ALSO BE 00055 M00S00052.qdump +++|* SPECIFIED AS ALL (DA=ALL) WHICH WILL SELECT ALL DATES. 00056 M00S00053.qdump +++|* 00057 M00S00054.qdump +++|* FS = FILE SIZE RANGE IN PRUS (0-777777B). 00058 M00S00055.qdump +++|* IF 777777B IS SPECIFIED, ALL SIZES LARGER ARE INCLUDED. 00059 M00S00056.qdump +++|* 00060 M00S00057.qdump +++|* JSN = JOB SEQUENCE NUMBERS OF FILES TO DUMP. UP TO 5 00061 M00S00058.qdump +++|* ALLOWED. IF PREVIOUSLY ENTERED, THE JSN WILL BE 00062 M00S00059.qdump +++|* CLEARED. 00063 M00S00060.qdump +++|* 00064 M00S00061.qdump +++|* ID = ID RANGE OF BATCH AND SYSTEM ORIGIN FILES TO DUMP 00065 M00S00062.qdump +++|* (0 - 77B).
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00066 M01S00001.ns22000 +++|* 00067 M01S00002.ns22000 +++|* LA = LOWER SECURITY ACCESS LEVEL (1-7 CHARACTERS). 00068 M01S00003.ns22000 +++|* 00069 M01S00004.ns22000 +++|* UA = UPPER SECURITY ACCESS LEVEL (1-7 CHARACTERS). 00070 M00S00063.qdump +++|* 00071 M00S00064.qdump +++|* TUI= DESTINATION TUI OF REMOTE BATCH ORIGIN FILES TO DUMP. 00072 M00S00065.qdump +++|* TUI=0 IMPLIES DUMP ALL REMOTE BATCH FILES. 00073 M00S00066.qdump +++|* 00074 M00S00067.qdump +++|* TF = DESTINATION FAMILY FOR TERMINAL FOR SELECTING FILES 00075 M00S00068.qdump +++|* IN THE REMOTE BATCH QUEUE. 00076 M00S00069.qdump +++|* 00077 M00S00070.qdump +++|* FC = FORMS CODE. MAY BE A SINGLE ENTRY (FC=F1), A LIST 00078 M00S00071.qdump +++|* (FC=F1/F2/F3), OR A RANGE (FC=F1-F2) WHERE F1 IS 2 00079 M00S00072.qdump +++|* CHARACTERS, ALL OR NULL (SPECIFIED BY **). 00080 M00S00073.qdump +++|*
| Line S00074 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00081 M01S00074.v23l617 ---|* I = ALTERNATE DIRECTIVE INPUT FILE. THIS IS A CONTROL 00082 M01S00075.v23l617 ---|* STATEMENT PARAMETER SPECIFYING WHAT FILE SHOULD
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00083 M01S00003.v23l617 +++|* I = ALTERNATE DIRECTIVE INPUT FILE. THIS IS A 00084 M01S00004.v23l617 +++|* COMMAND PARAMETER SPECIFYING WHAT FILE SHOULD 00085 M00S00076.qdump +++|* BE READ FOR INPUT DIRECTIVES. THESE DIRECTIVES 00086 M00S00077.qdump +++|* CONSIST OF ANY LEGAL K-DISPLAY INPUT OR COMMANDS. 00087 M00S00078.qdump +++|* THESE DIRECTIVES WILL BE PROCESSED AFTER THE
| Line S00079 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00088 M01S00079.v23l617 ---|* CONTROL STATEMENT DIRECTIVES BUT BEFORE ANY
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00089 M01S00005.v23l617 +++|* COMMAND DIRECTIVES BUT BEFORE ANY 00090 M00S00080.qdump +++|* K-DISPLAY INPUT IS ACCEPTED. 00091 M00S00081.qdump +++|* 00092 M00S00082.qdump +++|* L = FILE NAME TO RECEIVE OUTPUT. 00093 M00S00083.qdump +++|* 00094 M00S00084.qdump +++|* FN = FILE NAME OF DUMP FILE. 00095 M00S00085.qdump +++|* 00096 M00S00086.qdump +++|* NF = NUMBER OF MEDIA FILES TO SKIP. 00097 M00S00087.qdump +++|* 00098 M00S00088.qdump +++|* TP = TYPE OF FILES TO DUMP. (A - ACTIVE, I - INACTIVE, 00099 M00S00089.qdump +++|* ALL). 00100 M00S00090.qdump +++|*
| Line S00091 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00101 M01S00091.ns22000 ---|* OT = DT. SELECT ORIGIN TYPE BY DISPOSITION TYPE. MAY BE 00102 M01S00092.ns22000 ---|* ENTERED MORE THAN ONCE. OPTION WILL BE CLEARED
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00103 M01S00005.ns22000 +++|* DS = DT. SELECT FILE DESTINATION BY DISPOSITION TYPE. 00104 M01S00006.ns22000 +++|* MAY BE ENTERED MORE THAN ONCE. OPTION WILL BE CLEARED 00105 M00S00093.qdump +++|* IF PREVIOUSLY SELECTED.
| Line S00094 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00106 M01S00094.ns22000 ---|* OT MAY BE - 00107 M01S00095.ns22000 ---|* BC - BATCH ORIGIN. 00108 M01S00096.ns22000 ---|* RB - REMOTE BATCH ORIGIN. 00109 M01S00097.ns22000 ---|* SY - SYSTEM ORIGIN.
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00110 M01S00007.ns22000 +++|* DS MAY BE - 00111 M01S00008.ns22000 +++|* BC - BATCH. 00112 M01S00009.ns22000 +++|* RB - REMOTE BATCH. 00113 M00S00098.qdump +++|* DT MAY BE - 00114 M00S00099.qdump +++|* SF - SPECIAL INSTALLATION DEFINED QUEUE FILES. 00115 M00S00100.qdump +++|* IN - INPUT. 00116 M00S00101.qdump +++|* PU - PUNCH. 00117 M00S00102.qdump +++|* PL - PLOT. 00118 M00S00103.qdump +++|* PR - PRINT (ANY PRINTER). 00119 M00S00104.qdump +++|* P2 - PRINT (512 PRINTER). 00120 M00S00105.qdump +++|* LR - PRINT (580-12 PRINTER). 00121 M00S00106.qdump +++|* LS - PRINT (580-16 PRINTER). 00122 M00S00107.qdump +++|* LT - PRINT (580-20 PRINTER).
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00123 M01S00001.241l630 +++|* LX - PRINT (5870 NIP). 00124 M01S00002.241l630 +++|* LY - PRINT (5970 NIP). 00125 M00S00108.qdump +++|* WT - WAIT. 00126 M00S00109.qdump +++|* PRINT - ALL PRINT TYPES. 00127 M00S00110.qdump +++|* ALL - ALL TYPES. 00128 M00S00111.qdump +++|* NONE - NO TYPES. 00129 M00S00112.qdump +++|* 00130 M00S00113.qdump +++|* PO = PROCESSING OPTIONS WHERE OPTIONS ARE DEFINED AS 00131 M00S00114.qdump +++|* THE FOLLOWING -
| Line S00115 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00132 M01S00115.v23l617 ---|* N - IF SPECIFIED, ONLY CONTROL STATEMENT DIRECTIVES
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00133 M01S00006.v23l617 +++|* N - IF SPECIFIED, ONLY COMMAND DIRECTIVES 00134 M00S00116.qdump +++|* WILL BE PROCESSED. K-DISPLAY IS AVAILABLE 00135 M00S00117.qdump +++|* FOR MONITORING THE UTILITY PROGRESS, BUT NO 00136 M00S00118.qdump +++|* K-DISPLAY INPUT IS ALLOWED. THE N PARAMETER 00137 M00S00119.qdump +++|* IS IMPLIED ON ALL NON-SYSTEM ORIGIN JOBS. 00138 M00S00120.qdump +++|* E - IF SPECIFIED, ERRORED FILE PROCESSING STATUS 00139 M00S00121.qdump +++|* WILL BE TOGGLED. 00140 M00S00122.qdump +++|* F - IF SPECIFIED, ON ACTIVATE REQUESTS ENTRIES WILL 00141 M00S00123.qdump +++|* BE MADE IN THE FOT FOR THE INACTIVE FAMILIES 00142 M00S00124.qdump +++|* AND THE FILES WILL BE QUEUED. DEFAULT IS TO 00143 M00S00125.qdump +++|* IGNORE THOSE FILES. 00144 M00S00126.qdump +++|* R - IF SPECIFIED, THE DUMP FILE WILL BE 00145 M00S00127.qdump +++|* REWOUND WHEN THE *GO* COMMAND IS ENTERED. 00146 M00S00128.qdump +++|* 00147 M00S00129.qdump +++|* DEFAULT VALUES DEFINED IN *QFSP*. 00148 M00S00130.qdump +++|* 00149 M00S00131.qdump +++|* 00150 M00S00132.qdump +++|* *K* DISPLAY COMMANDS AVAILABLE TO *QDUMP* ARE - 00151 M00S00133.qdump +++|* 00152 M00S00134.qdump +++|* GO. - PROCEED WITH PROCESSING. 00153 M00S00135.qdump +++|* STOP. - TERMINATE INPUT, END RUN. 00154 M00S00136.qdump +++|* RESET. - RESET PARAMETERS TO DEFAULT VALUES. 00155 M00S00137.qdump +++|* OUT. - RELEASE FILE SPECIFIED BY L PARAMETER TO PRINTER. 00156 M00S00138.qdump +++|* REWIND. - REWIND DUMP FILE WHEN *GO* COMMAND ENTERED. 00157 M00S00139.qdump +++|* ERROR. - TOGGLE STATUS OF ERRORED FILE PROCESSING. IF 00158 M00S00140.qdump +++|* SET, ERRORED FILES WILL BE DUMPED. DEFAULT IS SET. 00159 M00S00141.qdump +++|* FAMILY. - IF SPECIFIED, ON ACTIVATE REQUESTS ENTRIES 00160 M00S00142.qdump +++|* WILL BE MADE IN THE FOT FOR THE INACTIVE FAMILIES 00161 M00S00143.qdump +++|* AND THE FILES WILL BE QUEUED. DEFAULT IS TO 00162 M00S00144.qdump +++|* IGNORE THOSE FILES. 00163 M00S00145.qdump +++| SPACE 4 00164 M00S00146.qdump +++|** ENTRY CONDITIONS. 00165 M00S00147.qdump +++|* 00166 M00S00148.qdump +++|* *QDUMP* IS ENTERED VIA RETURN JUMP FROM *QFSP*. 00167 M00S00149.qdump +++|* 00168 M00S00150.qdump +++|* *TARA* = FWA OF THE PARAMETER TABLE.
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00169 M01S00010.ns22000 +++|* *TDAA* = FWA OF DEVICE ACCESS LEVEL TABLE. 00170 M00S00151.qdump +++|* *TEQA* = FWA OF THE MASS STORAGE EQUIPMENT TABLE. 00171 M00S00152.qdump +++|* *QFTA* = *QFTP* WORD FROM CENTRAL MEMORY RESIDENT. 00172 M00S00153.qdump +++|* *FOTA* = FAMILY ORDINAL TABLE. 00173 M00S00154.qdump +++| SPACE 4 00174 M00S00155.qdump +++|*** DAYFILE MESSAGES. 00175 M00S00156.qdump +++|* 00176 M00S00157.qdump +++|* THE FOLLOWING MESSAGES ARE ISSUED TO THE DAYFILE AND 00177 M00S00158.qdump +++|* THE *K* DISPLAY UNLESS NOTED OTHERWISE. 00178 M00S00159.qdump +++|*
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00179 M01S00011.ns22000 +++|* 00180 M01S00012.ns22000 +++|* * ACCESS LEVEL LIMITS OUT OF RANGE.* AS NO ACCESS LEVELS 00181 M01S00013.ns22000 +++|* WERE SELECTED WITH THE *LA* AND *UA* PARAMETERS, THE SYSTEM 00182 M01S00014.ns22000 +++|* LIMITS WERE USED. MASS STORAGE DEVICES WERE FOUND WHICH 00183 M01S00015.ns22000 +++|* HAVE ACCESS LEVELS OUTSIDE THE SYSTEM LIMITS. 00184 M01S00016.ns22000 +++|* USE THE *LA* AND *UA* PARAMETERS TO IGNORE THESE DEVICES 00185 M01S00017.ns22000 +++|* AND RETRY. 00186 M00S00160.qdump +++|* 00187 M00S00161.qdump +++|* * BAD DUMP FILE.* = THE SPECIFIED DUMP FILE CANNOT BE 00188 M00S00162.qdump +++|* WRITTEN TO. REQUEST ANOTHER DUMP FILE. 00189 M00S00163.qdump +++|* 00190 M00S00164.qdump +++|* * ERRORED FILE PARTIALLY DUMPED - FILENAM.* = AFTER 00191 M00S00165.qdump +++|* ENCOUNTERING AN UNRECOVERABLE READ ERROR ON FILE FILENAM WITH 00192 M00S00166.qdump +++|* ERRORED FILE DUMPING NOT SET, THE BACKSPACE ON THE DUMP FILE 00193 M00S00167.qdump +++|* HIT BEGINNING OF TAPE REEL, LEAVING FILE FILENAM PARTIALLY 00194 M00S00168.qdump +++|* DUMPED ON THE PREVIOUS REEL. THIS FILE WILL NOT BE LOADED 00195 M00S00169.qdump +++|* IF ERRORED FILE LOADING IS NOT SET. 00196 M00S00170.qdump +++|* 00197 M00S00171.qdump +++|* * FILE NAME CONFLICT - FILE XXXXXXX.* = THE SPECIFIED 00198 M00S00172.qdump +++|* OUTPUT OR DUMP FILE NAME CONFLICTS WITH A NAME ALREADY 00199 M00S00173.qdump +++|* IN USE. CHANGE THE FILE NAME AND RETRY. 00200 M00S00174.qdump +++|*
| Line S00175 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00201 M01S00175.ns22000 ---|* * JSN EQNN TRACK TTTT LENGTH ERROR.* = THE QUEUE
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00202 M01S00018.ns22000 +++|* * JSN EQNNNN TRACK TTTT LENGTH ERROR.* = THE QUEUE 00203 M00S00176.qdump +++|* FILE ON THE SPECIFIED EQUIPMENT AND TRACK WAS 00204 M00S00177.qdump +++|* DETECTED AS HAVING A LENGTH ERROR AT RECOVERY TIME. 00205 M00S00178.qdump +++|* CONTACT AN ANALYST AND BRING THIS TO HIS ATTENTION. 00206 M00S00179.qdump +++|* (DAYFILE ONLY). 00207 M00S00180.qdump +++|*
| Line S00181 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00208 M01S00181.v23l617 ---|* * ILLEGAL DUMP REQUESTED.* = DEVICE SPECIFIED IS NOT MASS
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00209 M01S00007.v23l617 +++|* * INCORRECT DUMP REQUESTED.* = DEVICE SPECIFIED IS NOT MASS 00210 M00S00182.qdump +++|* STORAGE. 00211 M00S00183.qdump +++|* ENTER THE CORRECT PARAMETERS AND RETRY OPERATION. 00212 M00S00184.qdump +++|* 00213 M00S00185.qdump +++|* * IQFT FILE ERROR DN XX FAMILY AAAAAAA.* = AN ERROR HAS 00214 M00S00186.qdump +++|* BEEN ENCOUNTERED ATTACHING OR READING THE IQFT. THE 00215 M00S00187.qdump +++|* MESSAGE FOLLOWING THIS MESSAGE IN THE DAYFILE DESCRIBES 00216 M00S00188.qdump +++|* THE ERROR. (DAYFILE ONLY). 00217 M00S00189.qdump +++|* 00218 M00S00190.qdump +++|* * QDUMP ABORTED.* = AN ERROR HAS BEEN DETECTED WHICH 00219 M00S00191.qdump +++|* IS NOT PROCESSED BY QDUMP ERROR PROCESSING. ATTEMPTS 00220 M00S00192.qdump +++|* HAVE BEEN MADE TO REMEDY THE SITUATION, BUT DISCRETION 00221 M00S00193.qdump +++|* SHOULD BE USED IN CONTINUED USE OF QDUMP. IN ANY 00222 M00S00194.qdump +++|* CASE, AN ANALYST SHOULD BE CONTACTED. CHECK THE 00223 M00S00195.qdump +++|* DAYFILE FOR THE ERROR THAT CAUSED THE ABORT. 00224 M00S00196.qdump +++|* 00225 M00S00197.qdump +++|* * QUEUE STATUS INDEFINITE.* = QDUMP HAS NOT BEEN ABLE TO 00226 M00S00198.qdump +++|* FINISH THE CLEAN UP AFTER AN ERROR OR AN ERROR EXIT. THE 00227 M00S00199.qdump +++|* STATUS OF IQFTS AND QUEUED FILES IS UNKNOWN. A LEVEL 00228 M00S00200.qdump +++|* ZERO DEADSTART IS RECOMMENDED TO CLEAN UP THE IQFT FILES. 00229 M00S00201.qdump +++|* 00230 M00S00202.qdump +++|* * QUEUES UNRECOVERABLE THIS DEVICE.* = THE IQFT FILE 00231 M00S00203.qdump +++|* ON THE SPECIFIED DEVICE CANNOT BE READ PROPERLY. AN 00232 M00S00204.qdump +++|* ANALYST SHOULD BE CONTACTED. (DAYFILE ONLY). 00233 M00S00205.qdump +++|*
| Line S00206 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00234 M01S00206.271l716 ---|* * TAPE ERROR - X.GO./X.DROP.* = THE DUMP HAS ENCOUNTERED 00235 M01S00207.271l716 ---|* A WRITE ERROR ON TAPE. ENTER X.GO. TO CONTINUE, OR 00236 M01S00208.271l716 ---|* X.DROP. TO END THE DUMP. (LINE 2 OF CONTROL POINT AREA
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00237 M01S00001.271l716 +++|* * TAPE ERROR - GO,JSN./DROP,JSN.* = THE DUMP HAS ENCOUNTERED 00238 M01S00002.271l716 +++|* A WRITE ERROR ON TAPE. ENTER GO,JSN. TO CONTINUE, OR 00239 M01S00003.271l716 +++|* DROP,JSN. TO END THE DUMP. (LINE 2 OF CONTROL POINT AREA 00240 M00S00209.qdump +++|* ONLY). 00241 M00S00210.qdump +++|* 00242 M00S00211.qdump +++|* * XXXX FILES IGNORED DNYY FM AAAAAAA.* = NUMBER OF 00243 M00S00212.qdump +++|* QUEUED FILE IGNORED THIS DEVICE ON THIS OPERATION. 00244 M00S00213.qdump +++|* 00245 M00S00214.qdump +++|* * XXXX FILES DUMPED(A) DNYY FM AAAAAAA.* = NUMBER OF 00246 M00S00215.qdump +++|* ACTIVE QUEUED FILES DUMPED AND LEFT ACTIVE THIS DEVICE. 00247 M00S00216.qdump +++|* 00248 M00S00217.qdump +++|* * XXXX FILES DUMPED(I) DNYY FM AAAAAAA.* = NUMBER OF 00249 M00S00218.qdump +++|* INACTIVE QUEUED FILES DUMPED AND LEFT INACTIVE THIS 00250 M00S00219.qdump +++|* DEVICE.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00251 M01S00004.271l716 +++|* 00252 M01S00005.271l716 +++|* 00253 M01S00006.271l716 +++|* THE FOLLOWING DAYFILE MESSAGES ARE ISSUED WHEN *CIO* 00254 M01S00007.271l716 +++|* ERRORS ARE DETECTED. 00255 M01S00008.271l716 +++|* 00256 M01S00009.271l716 +++|* / *CIO* ERROR./ 00257 M01S00010.271l716 +++|* * ADDRESS ERROR.* 00258 M01S00011.271l716 +++|* * DEVICE STATUS ERROR.* 00259 M01S00012.271l716 +++|* * 6681 FUNCTION REJECT ERROR.* 00260 M01S00013.271l716 +++|* * DEVICE RESERVED.* 00261 M01S00014.271l716 +++|* * DEVICE NOT READY.* 00262 M01S00015.271l716 +++|* * TRACK LIMIT.* 00263 M01S00016.271l716 +++|* 00264 M01S00017.271l716 +++|* 00265 M01S00018.271l716 +++|* THE FOLLOWING DAYFILE MESSAGES ARE ISSUED WHEN *QFM* 00266 M01S00019.271l716 +++|* ERRORS ARE DETECTED. 00267 M01S00020.271l716 +++|* 00268 M01S00021.271l716 +++|* / *QFM* ERROR./ 00269 M01S00022.271l716 +++|* * FILE NOT FOUND.* 00270 M01S00023.271l716 +++|* * FILE ALREADY INTERLOCKED.* 00271 M01S00024.271l716 +++|* * DEVICE UNAVAILABLE.* 00272 M01S00025.271l716 +++|* * QFT/LOCAL FNT FULL.* 00273 M00S00220.qdump +++| SPACE 4 00274 M00S00221.qdump +++|*** *K* DISPLAY OPERATOR MESSAGES. 00275 M00S00222.qdump +++|* 00276 M00S00223.qdump +++|* * NO OUTPUT FILE EXISTS.* = NO OUTPUT FILE HAS BEEN 00277 M00S00224.qdump +++|* CREATED PREVIOUS TO ENTERING THE *OUT* COMMAND. 00278 M00S00225.qdump +++|* 00279 M00S00226.qdump +++|* * OUTPUT FILE RELEASED.* = OUTPUT FILE RELEASED TO PRINTER. 00280 M00S00227.qdump +++|* 00281 M00S00228.qdump +++|* * QDUMP COMPLETE.* = THE SPECIFIED OPERATION HAS BEEN 00282 M00S00229.qdump +++|* COMPLETED.
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00283 M01S00026.271l716 +++| SPACE 4,10 00284 M01S00027.271l716 +++|*** OUTPUT FILE ERROR MESSAGES. 00285 M01S00028.271l716 +++|* 00286 M01S00029.271l716 +++|* *DUPLICATE FILE NAME - FILE IGNORED* 00287 M01S00030.271l716 +++|* *READ ERROR - FILE DUMPED* 00288 M01S00031.271l716 +++|* *READ ERROR - FILE IGNORED* 00289 M01S00032.271l716 +++|* *SYSTEM SECTOR ERROR - FILE IGNORED* 00290 M01S00033.271l716 +++|* *TRACK LIMIT - FILE IGNORED* 00291 M00S00230.qdump +++| SPACE 4 00292 M00S00231.qdump +++|* COMMON DECKS. 00293 M00S00232.qdump +++| 00294 M00S00233.qdump +++|*CALL COMCMAC
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00295 M01S00001.ns21000 +++|*CALL COMCCMD 00296 M00S00234.qdump +++|*CALL COMSACC 00297 M00S00235.qdump +++|*CALL COMSJIO
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00298 M01S00019.ns22000 +++|*CALL COMSDSP 00299 M00S00236.qdump +++| LIST X 00300 M00S00237.qdump +++|*CALL COMSIOQ 00301 M00S00238.qdump +++|*CALL COMSQFS
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00302 M01S00002.ns21000 +++|*CALL COMSSFM 00303 M00S00239.qdump +++| LIST -X
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00304 M01S00020.ns22000 +++|*CALL COMSMLS
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2217 |
Seq # *Modification Id* Act ----------------------------+ 00305 M02S00021.ns2217 ---|*CALL COMSSCD 00306 M00S00240.qdump +++|*CALL COMSSSE 00307 M00S00241.qdump +++|*CALL COMSSSJ
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2217 |
Seq # *Modification Id* Act ----------------------------+ 00308 M01S00001.ns2217 +++| SCLASS SPACE 4,15 00309 M01S00002.ns2217 +++|** SCLASS - DEFINE SERVICE CLASS TABLE. 00310 M01S00003.ns2217 +++|* 00311 M01S00004.ns2217 +++|* SCLASS NM,MN,DF,ST,TX 00312 M01S00005.ns2217 +++|* 00313 M01S00006.ns2217 +++|* ENTRY *NM* = SERVICE CLASS NAME. 00314 M01S00007.ns2217 +++|* *MN* = TWO CHARACTER MNEMONIC. 00315 M01S00008.ns2217 +++|* *DF* = DAYFILE MESSAGE CHARACTER. 00316 M01S00009.ns2217 +++|* *ST* = SHORT TEXT FOR *QFTLIST*. 00317 M01S00010.ns2217 +++|* *TX* = TEXT OF SERVICE CLASS NAME FOR BANNER PAGE. 00318 M01S00011.ns2217 +++|* 00319 M01S00012.ns2217 +++|* NOTE - THE CALL TO *COMSSCD* MUST FOLLOW THE DEFINITION OF 00320 M01S00013.ns2217 +++|* THIS MACRO. 00321 M01S00014.ns2217 +++| 00322 M01S00015.ns2217 +++| 00323 M01S00016.ns2217 +++| PURGMAC SCLASS 00324 M01S00017.ns2217 +++| 00325 M01S00018.ns2217 +++| SCLASS MACRO NM,MN,DF,ST,TX 00326 M01S00019.ns2217 +++| .SCL RMT 00327 M01S00020.ns2217 +++| NM VFD 12/0,12/2R_MN,36/0 TX 00328 M01S00021.ns2217 +++| .SCL RMT 00329 M01S00022.ns2217 +++| SCLASS ENDM 00330 M01S00023.ns2217 +++| 00331 M01S00024.ns2217 +++| 00332 M01S00025.ns2217 +++| SCL$ EQU 0 ONLY PROCESS CLASSES WITH JCB-S 00333 M01S00026.ns2217 +++|*CALL COMSSCD 00334 M00S00242.qdump +++| TITLE ASSEMBLY CONSTANTS. 00335 M00S00243.qdump +++|**** ASSEMBLY CONSTANTS. 00336 M00S00244.qdump +++| 00337 M00S00245.qdump +++| BUFL EQU 1001B FET CIRCULAR BUFFER LENGTH 00338 M00S00246.qdump +++| QBUFL EQU 2041B QUEUED FILE BUFFER LENGTH
| Line S00247 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00339 M01S00247.ns21000 ---| SBUFL EQU 101B SYSTEM SECTOR BUFFER LENGTH
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00340 M01S00003.ns21000 +++| SBUFL EQU 201B SYSTEM INFORMATION BUFFER
| Line S00248 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00341 M01S00248.274l797 ---| DBUFL EQU 4011B DUMP FILE BUFFER LENGTH
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00342 M01S00001.274l797 +++| DBUFL EQU 20041B DUMP FILE BUFFER LENGTH 00343 M00S00249.qdump +++| EBUFL EQU 4 END OF VOLUME BUFFER LENGTH 00344 M00S00250.qdump +++| IBUFL EQU 1001B IQFT BUFFER LENGTH
| Line S00251 Modification History | |
|---|---|
M01 (Removed by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 00345 M01S00251.qdump4 ---| WBUFL EQU 1110B WORKING BUFFER LENGTH
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 00346 M01S00001.qdump4 +++| WBUFL EQU 10110B WORKING BUFFER LENGTH 00347 M00S00252.qdump +++| DBLL EQU 1000B DUMP BLOCK LENGTH 00348 M00S00253.qdump +++| EOFC EQU 2000B EOF CONTROL WORD CODE 00349 M00S00254.qdump +++| EORC EQU 1000B EOR CONTROL WORD CODE 00350 M00S00255.qdump +++| FNEL EQU 2 FNT ENTRY LENGTH
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00351 M01S00022.ns22000 +++| LNUM EQU TPPA+PPLN LINE NUMBER 00352 M01S00023.ns22000 +++| PDFE EQU TPPA+PPPD PRINT DENSITY FORMAT EFFECTOR 00353 M00S00256.qdump +++|****
| Line S00257 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00354 M01S00257.ns22000 ---| SPACE 4,10 00355 M01S00258.ns22000 ---|* *DSP* FLAG BIT EQUIVALENCES. 00356 M01S00259.ns22000 ---| 00357 M01S00260.ns22000 ---| 00358 M01S00261.ns22000 ---| FRDC EQU 20B DISPOSITION CODE 00359 M00S00262.qdump +++| TITLE RESERVED LOCATIONS AND FETS. 00360 M00S00263.qdump +++|* RESERVED LOCATIONS. 00361 M00S00264.qdump +++| 00362 M00S00265.qdump +++| ORG OVLA 00363 M00S00266.qdump +++| 00364 M00S00267.qdump +++| QNUM CON 1 QUEUE FILE NUMBER 00365 M00S00268.qdump +++| PNUM CON 1 PAGE NUMBER
| Line S00269 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00366 M01S00269.ns22000 ---| LNUM CON LINP LINE NUMBER 00367 M00S00270.qdump +++| LIST CON 0 OUTPUT PRESENT FLAG 00368 M00S00271.qdump +++| RECF CON 0 LIST ANOTHER RECORD FLAG
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 00369 M01S00002.qdump4 +++| DBLS CON 0 DUMP BLOCK LOGICAL SIZE 00370 M01S00003.qdump4 +++| DBSL CON 0 DUMP BUFFER SEGMENT LIMIT 00371 M00S00272.qdump +++| DFBS CON 0 DUMP FILE BLOCK SIZE 00372 M00S00273.qdump +++| DSPB CON 0 TYPE OF FILES TO DUMP 00373 M00S00274.qdump +++| DPCT CON 0 COUNT OF QUEUE FILES DUMPED 00374 M00S00275.qdump +++| IGCT CON 0 COUNT OF QUEUE FILES IGNORED 00375 M00S00276.qdump +++| QCWI CON 0 QDUMP CONTROL WORD BUFFER INDEX
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00376 M01S00024.ns22000 +++| ALFG CON 0 ACCESS LEVELS SPECIFIED FLAG 00377 M00S00277.qdump +++| MSFG CON -1 MASS STORAGE DUMP FILE FLAG 00378 M00S00278.qdump +++| SPACE 4 00379 M00S00279.qdump +++|* FETS. 00380 M00S00280.qdump +++| 00381 M00S00281.qdump +++| O BSS 0 OUTPUT FILE 00382 M00S00282.qdump +++| OUTPUT FILEB OBUF,BUFL,(FET=7) 00383 M00S00283.qdump +++| 00384 M00S00284.qdump +++| Q BSS 0 QUEUE FILE 00385 M00S00285.qdump +++| QNAME FILEB QBUF,QBUFL,EPR,(FET=13) 00386 M00S00286.qdump +++|
| Line S00287 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00387 M01S00287.ns21000 ---| S BSS 0 SYSTEM SECTOR 00388 M01S00288.ns21000 ---| SS FILEB SBUF,SBUFL,EPR,(FET=8)
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00389 M01S00004.ns21000 +++| S BSS 0 SYSTEM AND EOI SECTORS 00390 M01S00005.ns21000 +++| SSEOI FILEB SBUF,SBUFL,EPR,(FET=8) 00391 M00S00289.qdump +++| 00392 M00S00290.qdump +++| D BSS 0 DUMP FILE 00393 M00S00291.qdump +++| QFILES FILEB DBUF,DBUFL,EPR,LBL 00394 M00S00292.qdump +++| 00395 M00S00293.qdump +++| DE BSS 0 END OF VOLUME CONTROL WORDS 00396 M00S00294.qdump +++| EQFILES FILEB EBUF,EBUFL 00397 M00S00295.qdump +++| 00398 M00S00296.qdump +++| IQ BSS 0 OLD IQFT FILE 00399 M00S00297.qdump +++| "RFIQ" FILEB IBUF,IBUFL,EPR,(FET=8) 00400 M00S00298.qdump +++| 00401 M00S00299.qdump +++| T BSS 0 TEMPORARY IQFT ENTRY BUFFER 00402 M00S00300.qdump +++| TEMP FILEB TBUF,BUFL,EPR,(FET=9) 00403 M00S00301.qdump +++| QDUMP TITLE MAIN ROUTINE. 00404 M00S00302.qdump +++|** QDUMP - MAIN ROUTINE. 00405 M00S00303.qdump +++|* 00406 M00S00304.qdump +++|* CALL PRESET IF NECESSARY, DETERMINE WHETHER *GO* OR 00407 M00S00305.qdump +++|* *OUT* HAS BEEN SPECIFIED, CALL THE ROUTINES TO PROCESS 00408 M00S00306.qdump +++|* THE FUNCTION, THEN CLEAN UP FOR THE RETURN TO *QFSP*. 00409 M00S00307.qdump +++|* 00410 M00S00308.qdump +++|* ENTRY (QFTS) = 0 IF INITIAL CALL TO *QDUMP* FROM *QFSP*. 00411 M00S00309.qdump +++|* .NE. 0 ON ALL FOLLOWING CALLS. 00412 M00S00310.qdump +++|* 00413 M00S00311.qdump +++|* USES X - ALL. 00414 M00S00312.qdump +++|* A - 1, 2, 4, 6, 7. 00415 M00S00313.qdump +++|* B - 1. 00416 M00S00314.qdump +++|*
| Line S00315 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00417 M01S00315.ns22000 ---|* CALLS CID, DQF, OFN, OUT, PRS, RAF, WDH.
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00418 M01S00025.ns22000 +++|* CALLS CAL, CID, OFN, OUT, PRS, RAF, WDH. 00419 M00S00316.qdump +++|* 00420 M00S00317.qdump +++|* MACROS ABORT, MEMORY, RETURN, SETFS, WRITER. 00421 M00S00318.qdump +++| 00422 M00S00319.qdump +++| 00423 M00S00320.qdump +++| QDUMP SUBR ENTRY/EXIT 00424 M00S00321.qdump +++| SB1 1 00425 M00S00322.qdump +++| SA1 QFTS QFT LENGTH 00426 M00S00323.qdump +++| SX6 B0+ PRESET FLAGS 00427 M00S00324.qdump +++| SA6 RECF 00428 M00S00325.qdump +++| SA6 DQFB 00429 M00S00326.qdump +++| SA6 ERRA 00430 M00S00327.qdump +++| NZ X1,QDU1 IF PRESET UNNECESSARY 00431 M00S00328.qdump +++| RJ PRS PRESET 00432 M00S00329.qdump +++| QDU1 RJ OFN SET OUTPUT FILE NAMES 00433 M00S00330.qdump +++| NZ X5,QDU3 IF FILE NAME CONFLICT 00434 M00S00331.qdump +++| 00435 M00S00332.qdump +++|* DETERMINE FUNCTION. 00436 M00S00333.qdump +++| 00437 M00S00334.qdump +++| SA2 TARA+ARFC CHECK FUNCTION 00438 M00S00335.qdump +++| MX0 -12 00439 M00S00336.qdump +++| BX3 -X0*X2 00440 M00S00337.qdump +++| ZR X3,QDU2 IF *GO* COMMAND 00441 M00S00338.qdump +++| 00442 M00S00339.qdump +++|* PROCESS *OUT* COMMAND. 00443 M00S00340.qdump +++| 00444 M00S00341.qdump +++| RJ OUT DISPOSE OUTPUT FILE 00445 M00S00342.qdump +++| BX2 X2-X2 SET NO *K* DISPLAY BUFFER 00446 M00S00343.qdump +++| EQ QDUMPX RETURN 00447 M00S00344.qdump +++| 00448 M00S00345.qdump +++|* PROCESS *GO* COMMAND. 00449 M00S00346.qdump +++| 00450 M00S00347.qdump +++| QDU2 SA1 TARA+ARTP SET TYPE OF FILES TO DUMP 00451 M00S00348.qdump +++| MX0 -12 00452 M00S00349.qdump +++| BX6 -X0*X1 00453 M00S00350.qdump +++| SA6 DSPB
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00454 M01S00026.ns22000 +++| RJ CAL CHECK ACCESS LEVLES 00455 M01S00027.ns22000 +++| NZ X5,QDU3 IF ERROR
| Line S00351 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00456 M01S00351.v23l617 ---| RJ CID CHECK FOR ILLEGAL DEVICES
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00457 M01S00008.v23l617 +++| RJ CID CHECK FOR INCORRECT DEVICES 00458 M00S00352.qdump +++| NZ X5,QDU3 IF ERROR 00459 M00S00353.qdump +++| RJ WDH WRITE DUMP FILE HEADER 00460 M00S00354.qdump +++| NZ X5,QDU3 IF ERROR 00461 M00S00355.qdump +++| RJ DQF DUMP QUEUED FILES 00462 M00S00356.qdump +++| NZ X5,QDU3 IF ERROR 00463 M00S00357.qdump +++| SX5 MES1 *QDUMP COMPLETE.* 00464 M00S00358.qdump +++| 00465 M00S00359.qdump +++|* RETURN LOCAL FILES. 00466 M00S00360.qdump +++| 00467 M00S00361.qdump +++| QDU3 RETURN Q,R 00468 M00S00362.qdump +++| RETURN S,R 00469 M00S00363.qdump +++| SETFS O,0 00470 M00S00364.qdump +++| SA1 RECF 00471 M00S00365.qdump +++| ZR X1,QDU4 IF NO NEW OUTPUT RECORD 00472 M00S00366.qdump +++| WRITER O FLUSH BUFFER 00473 M00S00367.qdump +++| 00474 M00S00368.qdump +++|* RESET FIELD LENGTH. 00475 M00S00369.qdump +++|
| Line S00370 Modification History | |
|---|---|
M01 (Removed by) | ns2340 |
Seq # *Modification Id* Act ----------------------------+ 00476 M01S00370.ns2340 ---| QDU4 SX7 BUFFL RESET POINTERS
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2340 |
Seq # *Modification Id* Act ----------------------------+ 00477 M01S00001.ns2340 +++| QDU4 SX7 IBUF+IBUFL RESET POINTERS 00478 M00S00371.qdump +++| SA4 IQ+4 RESET *LIMIT* 00479 M00S00372.qdump +++| MX0 42 00480 M00S00373.qdump +++| BX6 X0*X4 00481 M00S00374.qdump +++| BX7 X6+X7 00482 M00S00375.qdump +++| SA7 A4+ 00483 M00S00376.qdump +++| SX0 X5 SAVE MESSAGE ADDRESS 00484 M00S00377.qdump +++| MEMORY CM,,R,BUFFL RESET ORIGINAL FIELD LENGTH 00485 M00S00378.qdump +++| 00486 M00S00379.qdump +++|* EXIT TO *QFSP*. 00487 M00S00380.qdump +++| 00488 M00S00381.qdump +++| SX3 IQ RETURN ATTACHED IQFT FILE 00489 M00S00382.qdump +++| RJ RAF 00490 M00S00383.qdump +++| SA1 ERRB 00491 M00S00384.qdump +++| NZ X1,QDU5 IF *PO=N* SPECIFIED AND ABORT SET 00492 M00S00385.qdump +++| SX5 X0 00493 M00S00386.qdump +++| BX2 X2-X2 SET NO *K* DISPLAY BUFFER 00494 M00S00387.qdump +++| EQ QDUMPX RETURN 00495 M00S00388.qdump +++| 00496 M00S00389.qdump +++| QDU5 ABORT 00497 M00S00390.qdump +++| TITLE PRIMARY SUBROUTINES.
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00498 M01S00028.ns22000 +++| CAL SPACE 4,25 00499 M01S00029.ns22000 +++|** CAL - CHECK ACCESS LEVELS. 00500 M01S00030.ns22000 +++|* 00501 M01S00031.ns22000 +++|* IF NO ACCESS LEVELS WERE SELECTED, THE LOWEST AND HIGHEST 00502 M01S00032.ns22000 +++|* ACCESS LEVELS OF ALL MASS STORAGE DEVICES ARE USED. IF 00503 M01S00033.ns22000 +++|* THESE LIMITS ARE NOT WITHIN THE SYSTEM LIMITS, AN ERROR 00504 M01S00034.ns22000 +++|* IS RETURNED. 00505 M01S00035.ns22000 +++|* 00506 M01S00036.ns22000 +++|* ENTRY (DVLA) = LOWER ACCESS LEVEL LIMIT OF ALL MASS 00507 M01S00037.ns22000 +++|* STORAGE DEVICES. 00508 M01S00038.ns22000 +++|* (DVUA) = UPPER ACCESS LEVEL LIMIT OF ALL MASS 00509 M01S00039.ns22000 +++|* STORAGE DEVICES. 00510 M01S00040.ns22000 +++|* 00511 M01S00041.ns22000 +++|* EXIT (ALFG) = -1, IF ACCESS LEVELS FROM ARGUMENT TABLE 00512 M01S00042.ns22000 +++|* TO BE USED. 00513 M01S00043.ns22000 +++|* (X5) = 0. 00514 M01S00044.ns22000 +++|* 00515 M01S00045.ns22000 +++|* ERROR (X5) = K-DISPLAY MESSAGE ADDRESS. 00516 M01S00046.ns22000 +++|*
| Line S00047 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2314 |
Seq # *Modification Id* Act ----------------------------+ 00517 M02S00047.ns2314 ---|* USES X - 0, 1, 3, 5, 6, 7.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2314 |
Seq # *Modification Id* Act ----------------------------+ 00518 M01S00001.ns2314 +++|* USES X - 0, 1, 2, 3, 5, 6, 7.
| Line S00048 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00519 M01S00048.ns22000 +++|* A - 1, 2, 3, 6. 00520 M01S00049.ns22000 +++|* 00521 M01S00050.ns22000 +++|* CALLS GAD. 00522 M01S00051.ns22000 +++|* 00523 M01S00052.ns22000 +++|* MACROS MESSAGE. 00524 M01S00053.ns22000 +++| 00525 M01S00054.ns22000 +++| 00526 M01S00055.ns22000 +++| CAL3 SX6 -B1 USE ACCESS LEVELS FROM ARGUMENT TABLE 00527 M01S00056.ns22000 +++| SA6 ALFG 00528 M01S00057.ns22000 +++| CAL4 BX5 X5-X5 SET NO ERROR 00529 M01S00058.ns22000 +++| 00530 M01S00059.ns22000 +++| CAL SUBR ENTRY/EXIT 00531 M01S00060.ns22000 +++| SA1 TARA+ARLA 00532 M01S00061.ns22000 +++| PL X1,CAL3 IF ACCESS LEVELS SELECTED 00533 M01S00062.ns22000 +++| SA2 SECA GET SYSTEM ACCESS LEVELS 00534 M01S00063.ns22000 +++| MX0 -3 00535 M01S00064.ns22000 +++| LX2 12 00536 M01S00065.ns22000 +++| BX1 -X0*X2 00537 M01S00066.ns22000 +++| ZR X1,CAL4 IF UNSECURE SYSTEM 00538 M01S00067.ns22000 +++| SA3 TARA+ARFM 00539 M01S00068.ns22000 +++| ZR X3,CAL1 IF NO FAMILY NAME SELECTED 00540 M01S00069.ns22000 +++| RJ GAD GET ACCESS LEVELS FOR DEVICES 00541 M01S00070.ns22000 +++| CAL1 LX2 6
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | qdump1 |
Seq # *Modification Id* Act ----------------------------+ 00542 M01S00001.qdump1 +++| MX0 -3
| Line S00071 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00543 M01S00071.ns22000 +++| BX7 -X0*X2 GET LOWER SYSTEM LIMIT 00544 M01S00072.ns22000 +++| LX2 6 00545 M01S00073.ns22000 +++| BX6 -X0*X2 GET UPPER SYSTEM LIMIT 00546 M01S00074.ns22000 +++| SA1 DVLA GET DEVICE ACCESS LIMITS 00547 M01S00075.ns22000 +++| SA2 DVUA 00548 M01S00076.ns22000 +++| IX1 X1-X7 00549 M01S00077.ns22000 +++| IX2 X6-X2 00550 M01S00078.ns22000 +++| NG X1,CAL2 IF LOWER LIMIT OUTSIDE SYSTEM LIMITS 00551 M01S00079.ns22000 +++| PL X2,CAL4 IF UPPER LIMIT WITHIN SYSTEM LIMITS 00552 M01S00080.ns22000 +++| CAL2 SX5 MES12 SET ERROR 00553 M01S00081.ns22000 +++| MESSAGE X5 * ACCESS LEVEL LIMITS OUT OF RANGE.*
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2314 |
Seq # *Modification Id* Act ----------------------------+ 00554 M01S00002.ns2314 +++| SA1 TARA+ARFC 00555 M01S00003.ns2314 +++| PL X1,CALX IF *PO=N* NOT SPECIFIED 00556 M01S00004.ns2314 +++| SX6 B1+ SET ABORT FLAG 00557 M01S00005.ns2314 +++| SX5 MES2 * QDUMP ABORTED.* 00558 M01S00006.ns2314 +++| SA6 ERRB 00559 M01S00007.ns2314 +++| MESSAGE X5
| Line S00082 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00560 M01S00082.ns22000 +++| EQ CALX RETURN 00561 M00S00391.qdump +++| CID SPACE 4,20
| Line S00392 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00562 M01S00392.v23l617 ---|** CID - CHECK FOR ILLEGAL DEVICES.
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00563 M01S00009.v23l617 +++|** CID - CHECK FOR INCORRECT DEVICES. 00564 M00S00393.qdump +++|*
| Line S00394 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00565 M01S00394.v23l617 ---|* THE ERROR MESSAGE *ILLEGAL DUMP REQUESTED* IS ISSUED
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00566 M01S00010.v23l617 +++|* THE ERROR MESSAGE *INCORRECT DUMP REQUESTED* IS ISSUED 00567 M00S00395.qdump +++|* IF THE DEVICE SPECIFIED IS NOT MASS STORAGE. 00568 M00S00396.qdump +++|* 00569 M00S00397.qdump +++|* EXIT (X5) = *K* DISPLAY MESSAGE ADDRESS IF ERROR. 00570 M00S00398.qdump +++|* = 0 IF NO ERROR.
| Line S00399 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00571 M01S00399.ns22000 ---|* (CEQP) = EQUIPMENT NUMBER.
| Line S00083 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00572 M01S00083.ns22000 +++|* (CEQP) = EST ORDINAL. 00573 M00S00400.qdump +++|* 00574 M00S00401.qdump +++|* USES X - 5, 6. 00575 M00S00402.qdump +++|* A - 6. 00576 M00S00403.qdump +++|* 00577 M00S00404.qdump +++|* CALLS DND. 00578 M00S00405.qdump +++|* 00579 M00S00406.qdump +++|* MACROS MESSAGE. 00580 M00S00407.qdump +++| 00581 M00S00408.qdump +++|
| Line S00409 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00582 M01S00409.v23l617 ---| CID1 SX5 MES3 *ILLEGAL DUMP REQUESTED.*
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00583 M01S00011.v23l617 +++| CID1 SX5 MES3 *INCORRECT DUMP REQUESTED.* 00584 M00S00410.qdump +++| MESSAGE X5 00585 M00S00411.qdump +++| 00586 M00S00412.qdump +++| CID SUBR ENTRY/EXIT 00587 M00S00413.qdump +++| 00588 M00S00414.qdump +++|* DETERMINE FIRST EQUIPMENT TO DUMP FROM. 00589 M00S00415.qdump +++|
| Line S00416 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00590 M01S00416.ns22000 ---| SX6 -1 PRESET EQUIPMENT NUMBER
| Line S00084 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00591 M01S00084.ns22000 +++| SX6 NOPE-1 INITIALIZE EST ORDINAL FOR SEARCH 00592 M00S00417.qdump +++| SA6 CEQP 00593 M00S00418.qdump +++| RJ DND DETERMINE FIRST EQUIPMENT 00594 M00S00419.qdump +++| ZR X4,CID1 IF DEVICE NOT IN TABLE (NON-MASS STORAGE) 00595 M00S00420.qdump +++| BX5 X5-X5 00596 M00S00421.qdump +++| EQ CIDX RETURN 00597 M00S00422.qdump +++| DQF SPACE 4,20 00598 M00S00423.qdump +++|** DQF - DUMP QUEUED FILES. 00599 M00S00424.qdump +++|* 00600 M00S00425.qdump +++|* PRESET OUTPUT AND CALL ROUTINES TO PROCESS THE DUMPING 00601 M00S00426.qdump +++|* OF THE QUEUED FILES, PROCESSING THE FILES ONE DEVICE 00602 M00S00427.qdump +++|* AT A TIME, THEN CLOSE THE DUMP SESSION WITH AN EOF. 00603 M00S00428.qdump +++|* 00604 M00S00429.qdump +++|* ENTRY (DSPB) = 0, DUMP INACTIVE QUEUE FILES. 00605 M00S00430.qdump +++|* = 1, DUMP ACTIVE QUEUE FILES. 00606 M00S00431.qdump +++|* = 2, DUMP ALL QUEUE FILES. 00607 M00S00432.qdump +++|* (DFBS) = DUMP FILE BLOCK SIZE. 00608 M00S00433.qdump +++|* 00609 M00S00434.qdump +++|* EXIT (X5) = 0 IF NO ERROR. 00610 M00S00435.qdump +++|* = *K* DISPLAY MESSAGE ADDRESS IF ERROR. 00611 M00S00436.qdump +++|* 00612 M00S00437.qdump +++|* USES X - 0, 1, 3, 5, 6, 7. 00613 M00S00438.qdump +++|* A - 0, 1, 3, 6, 7. 00614 M00S00439.qdump +++|* B - 6. 00615 M00S00440.qdump +++|* 00616 M00S00441.qdump +++|* CALLS CER, DND, EPR, IDM, PQF. 00617 M00S00442.qdump +++|* 00618 M00S00443.qdump +++|* MACROS CLOCK, DATE, EREXIT, MEMORY, WRITE, WRITECW, WRITEW. 00619 M00S00444.qdump +++| 00620 M00S00445.qdump +++| 00621 M00S00446.qdump +++| DQF2 NZ X4,DQF1 IF NOT END OF DEVICES 00622 M00S00447.qdump +++| 00623 M00S00448.qdump +++|* CLOSE OUTPUT FILE. 00624 M00S00449.qdump +++| 00625 M00S00450.qdump +++| DQF3 SA1 DFBS SET EOF CONTROL WORDS IN BUFFER 00626 M00S00451.qdump +++| LX1 36 00627 M00S00452.qdump +++| BX6 X1 00628 M00S00453.qdump +++| SA6 DQFA 00629 M00S00454.qdump +++| SX6 B1+ SET NO QUEUED FILE ATTACHED FLAG 00630 M00S00455.qdump +++| SA6 DQFB 00631 M00S00456.qdump +++| SA0 D 00632 M00S00457.qdump +++| WRITEW A0,DQFA,2 00633 M00S00458.qdump +++| RJ CER CHECK FOR ERROR 00634 M00S00459.qdump +++| NZ X5,DQF5 IF ERROR 00635 M00S00460.qdump +++| DQF4 SA0 D FLUSH BUFFER 00636 M00S00461.qdump +++| WRITECW A0,R 00637 M00S00462.qdump +++| RJ CER CHECK FOR ERROR 00638 M00S00463.qdump +++| ZR X5,DQFX IF NO ERROR 00639 M00S00464.qdump +++| DQF5 SX7 X5-11B 00640 M00S00465.qdump +++| NZ X7,DQF6 IF NOT SPECIAL MASS STORAGE ERROR 00641 M00S00466.qdump +++| SA3 A0+6 GET ERROR CODE 00642 M00S00467.qdump +++| MX0 -9 00643 M00S00468.qdump +++| BX5 -X0*X3 00644 M00S00469.qdump +++| SX5 X5+11B BIAS ERROR CODE 00645 M00S00470.qdump +++| DQF6 SB6 TCEP SET ERROR TABLE ADDRESS 00646 M00S00471.qdump +++| RJ EPR PROCESS ERROR 00647 M00S00472.qdump +++| ZR X5,DQF4 IF RECOVERED FROM WRITE PARITY ERROR 00648 M00S00473.qdump +++| 00649 M00S00474.qdump +++| DQF SUBR ENTRY/EXIT 00650 M00S00475.qdump +++| 00651 M00S00476.qdump +++|* SET UP OUTPUT HEADER AND PARAMETERS. 00652 M00S00477.qdump +++| 00653 M00S00478.qdump +++| DATE BOHA1 SET DATE IN HEADER 00654 M00S00479.qdump +++| CLOCK BOHA2 SET TIME IN HEADER 00655 M00S00480.qdump +++| WRITE O,* PRESET WRITE FUNCTION 00656 M00S00481.qdump +++| SX6 B1+ SET QUEUE FILE AND PAGE NUMBERS 00657 M00S00482.qdump +++| SA6 QNUM 00658 M00S00483.qdump +++| SA6 PNUM
| Line S00484 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00659 M01S00484.ns22000 ---| SX7 LINP SET LINE NUMBER TO END OF PAGE
| Line S00085 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00660 M01S00085.ns22000 +++| SA6 PDFE+1 SET PRINT DENSITY FORMAT CONTROL FLAG 00661 M01S00086.ns22000 +++| SX7 99999 FORCE PAGE EJECT 00662 M00S00485.qdump +++| SA7 LNUM 00663 M00S00486.qdump +++| 00664 M00S00487.qdump +++|* PROCESS DUMPING OF QUEUE FILES. 00665 M00S00488.qdump +++| 00666 M00S00489.qdump +++| SX6 B0 PRESET NUMBER OF FILES DUMPED AND IGNORED 00667 M00S00490.qdump +++| SA6 DPCT 00668 M00S00491.qdump +++| SX0 B0 SET INITIAL CALL FOR ACTIVE FILES 00669 M00S00492.qdump +++| SA6 IGCT 00670 M00S00493.qdump +++| DQF1 EREXIT ERR SET ERROR EXIT 00671 M00S00494.qdump +++| RJ PQF PROCESS QUEUE FILES 00672 M00S00495.qdump +++| SA0 X5 SAVE ERROR 00673 M00S00496.qdump +++| EREXIT 0 CLEAR ERROR EXIT 00674 M00S00497.qdump +++| RJ IDM ISSUE DAYFILE MESSAGES 00675 M00S00498.qdump +++| SX5 A0+ 00676 M00S00499.qdump +++| NZ X5,DQFX IF ERROR 00677 M00S00500.qdump +++| 00678 M00S00501.qdump +++|* CHECK FOR MORE DEVICES TO PROCESS. 00679 M00S00502.qdump +++| 00680 M00S00503.qdump +++| RJ DND DETERMINE NEXT DEVICE 00681 M00S00504.qdump +++| SA1 DSPB 00682 M00S00505.qdump +++| ZR X1,DQF2 IF DUMPING INACTIVE FILES 00683 M00S00506.qdump +++| SB6 RBUF+QFTE SET QFT BUFFER ADDRESS 00684 M00S00507.qdump +++| SX0 B1+ SET NON-INITIAL CALL 00685 M00S00508.qdump +++| NZ X4,DQF1 IF NOT END OF DEVICES 00686 M00S00509.qdump +++| SA1 DSPB 00687 M00S00510.qdump +++| SX5 X1-1 00688 M00S00511.qdump +++| ZR X5,DQF3 IF DUMP ONLY ACTIVE FILES 00689 M00S00512.qdump +++| 00690 M00S00513.qdump +++|* SET UP FOR INACTIVE FILE DUMP. 00691 M00S00514.qdump +++| 00692 M00S00515.qdump +++| BX6 X6-X6 SET INACTIVE FILE DUMP 00693 M00S00516.qdump +++| SA6 A1 00694 M00S00517.qdump +++| MEMORY CM,,R,BUFFL RESET FIELD LENGTH
| Line S00518 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00695 M01S00518.ns22000 ---| SX6 -1 DETERMINE FIRST EQUIPMENT
| Line S00087 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00696 M01S00087.ns22000 +++| SX6 NOPE-1 INITIALIZE EST ORDINAL FOR SEARCH 00697 M00S00519.qdump +++| SA6 CEQP 00698 M00S00520.qdump +++| RJ DND 00699 M00S00521.qdump +++| EQ DQF1 PROCESS INACTIVE QUEUE FILES 00700 M00S00522.qdump +++| 00701 M00S00523.qdump +++| DQFA VFD 24/0,36/0 EOF CONTROL WORDS 00702 M00S00524.qdump +++| VFD 12/17B,48/0 00703 M00S00525.qdump +++| DQFB CON 0 QUEUED FILE ATTACHED FLAG 00704 M00S00526.qdump +++| OFN SPACE 4,20 00705 M00S00527.qdump +++|** OFN - SET OUTPUT AND DUMP FILE NAMES. 00706 M00S00528.qdump +++|* 00707 M00S00529.qdump +++|* SET UP THE OUTPUT AND DUMP FILE FETS. ISSUE AN ERROR 00708 M00S00530.qdump +++|* MESSAGE IF EITHER FILE NAME SPECIFIED IS QNAME, SS, 00709 M00S00531.qdump +++|* IQF, TEMP OR ANY OTHER NAME CURRENTLY EXISTING IN 00710 M00S00532.qdump +++|* ANOTHER FET. 00711 M00S00533.qdump +++|* 00712 M00S00534.qdump +++|* EXIT (LIST) = 0 IF OUTPUT FILE NAME CHANGED. 00713 M00S00535.qdump +++|* (X5) = 0 IF NO FILE NAME CONFLICT. 00714 M00S00536.qdump +++|* = ADDRESS OF *K* DISPLAY MESSAGE IF CONFLICT. 00715 M00S00537.qdump +++|*
| Line S00538 Modification History | |
|---|---|
M01 (Removed by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 00716 M01S00538.qdump4 ---|* USES A - 0, 1, 2, 3, 6, 7. 00717 M01S00539.qdump4 ---|* X - ALL.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 00718 M01S00004.qdump4 +++|* USES X - ALL. 00719 M01S00005.qdump4 +++|* A - 0, 1, 2, 3, 6, 7. 00720 M00S00540.qdump +++|* 00721 M00S00541.qdump +++|* CALLS SFN.
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 00722 M01S00006.qdump4 +++|* 00723 M01S00007.qdump4 +++|* MACROS MESSAGE, RECALL. 00724 M00S00542.qdump +++| 00725 M00S00543.qdump +++| 00726 M00S00544.qdump +++|* ISSUE MESSAGE. 00727 M00S00545.qdump +++| 00728 M00S00546.qdump +++| OFN5 BX1 X3 SPACE FILL FILE NAME 00729 M00S00547.qdump +++| RJ SFN 00730 M00S00548.qdump +++| LX6 18 SET FILE NAME IN MESSAGE 00731 M00S00549.qdump +++| MX0 -18 00732 M00S00550.qdump +++| SA1 MES4+2 00733 M00S00551.qdump +++| BX7 -X0*X6 00734 M00S00552.qdump +++| BX1 X0*X1 00735 M00S00553.qdump +++| BX7 X7+X1 00736 M00S00554.qdump +++| SA7 A1 00737 M00S00555.qdump +++| SA2 A1+B1 00738 M00S00556.qdump +++| MX0 24 00739 M00S00557.qdump +++| BX6 X0*X6 00740 M00S00558.qdump +++| BX2 -X0*X2 00741 M00S00559.qdump +++| BX7 X6+X2 00742 M00S00560.qdump +++| SA7 A2 00743 M00S00561.qdump +++| SX5 MES4 *FILE NAME CONFLICT - FILE XXXXXXX.* 00744 M00S00562.qdump +++| MESSAGE X5 00745 M00S00563.qdump +++| 00746 M00S00564.qdump +++| OFN SUBR ENTRY/EXIT 00747 M00S00565.qdump +++| RECALL D 00748 M00S00566.qdump +++| 00749 M00S00567.qdump +++|* CHECK OUTPUT FILE NAME FOR CONFLICTS. 00750 M00S00568.qdump +++| 00751 M00S00569.qdump +++| SA0 O OUTPUT FILE 00752 M00S00570.qdump +++| SA1 A0 00753 M00S00571.qdump +++| SX5 B1 SET FLAG 00754 M00S00572.qdump +++| SA2 D DUMP FILE 00755 M00S00573.qdump +++| SA3 TARA+ARLL SPECIFIED OUTPUT FILE NAME 00756 M00S00574.qdump +++| 00757 M00S00575.qdump +++|* COMPARE CURRENT AND SPECIFIED NAMES. 00758 M00S00576.qdump +++| 00759 M00S00577.qdump +++| OFN1 MX0 42 00760 M00S00578.qdump +++| BX2 X2-X3 00761 M00S00579.qdump +++| BX4 X1-X3 00762 M00S00580.qdump +++| BX2 X0*X2 00763 M00S00581.qdump +++| BX1 X0*X4 00764 M00S00582.qdump +++| ZR X2,OFN5 IF FILE NAME CONFLICT 00765 M00S00583.qdump +++| BX6 X6-X6 INITIALIZE LIST FLAG FOR OUTPUT FILE 00766 M00S00584.qdump +++| ZR X1,OFN4 IF NO FILE NAME CHANGE 00767 M00S00585.qdump +++| ZR X5,OFN2 IF DUMP FILE BEING CHECKED 00768 M00S00586.qdump +++| SA6 LIST 00769 M00S00587.qdump +++| 00770 M00S00588.qdump +++|* CHECK FOR FILE NAME CONFLICTS. 00771 M00S00589.qdump +++| 00772 M00S00590.qdump +++| OFN2 SA1 IQ OLD IQFT FILE 00773 M00S00591.qdump +++| SA2 T TEMPORARY FILE 00774 M00S00592.qdump +++| OFN3 BX1 X0*X1 00775 M00S00593.qdump +++| BX2 X0*X2 00776 M00S00594.qdump +++| BX1 X1-X3 00777 M00S00595.qdump +++| BX2 X2-X3 00778 M00S00596.qdump +++| ZR X1,OFN5 IF FILE NAME CONFLICT 00779 M00S00597.qdump +++| ZR X2,OFN5 IF CONFLICT 00780 M00S00598.qdump +++| NZ X6,OFN4 IF ALL NAMES CHECKED 00781 M00S00599.qdump +++| SA1 S SYSTEM SECTOR 00782 M00S00600.qdump +++| SA2 Q QUEUE FILE 00783 M00S00601.qdump +++| SX6 B1+ 00784 M00S00602.qdump +++| EQ OFN3 00785 M00S00603.qdump +++| 00786 M00S00604.qdump +++|* SET FILE NAME IN FET. 00787 M00S00605.qdump +++| 00788 M00S00606.qdump +++| OFN4 SX1 3 00789 M00S00607.qdump +++| BX6 X3+X1 00790 M00S00608.qdump +++| SA6 A0 00791 M00S00609.qdump +++| SA6 DE SET END OF VOLUME CONTROL WORD FET 00792 M00S00610.qdump +++| ZR X5,OFNX IF BOTH NAMES CHECKED 00793 M00S00611.qdump +++| 00794 M00S00612.qdump +++|* CHECK DUMP FILE NAME FOR CONFLICTS. 00795 M00S00613.qdump +++| 00796 M00S00614.qdump +++| SA0 D DUMP FILE 00797 M00S00615.qdump +++| SA1 A0 00798 M00S00616.qdump +++| BX5 X5-X5 CLEAR FLAG 00799 M00S00617.qdump +++| SA2 O OUTPUT FILE 00800 M00S00618.qdump +++| SA3 TARA+ARFN SPECIFIED DUMP FILE NAME 00801 M00S00619.qdump +++| EQ OFN1 00802 M00S00620.qdump +++| OUT SPACE 4,20 00803 M00S00621.qdump +++|** OUT - RELEASE OUTPUT FILE TO PRINTER. 00804 M00S00622.qdump +++|* 00805 M00S00623.qdump +++|* RELEASE THE OUTPUT FILE, IF ONE EXISTS, TO THE PRINTER 00806 M00S00624.qdump +++|* AND ISSUE AN INFORMATIVE MESSAGE AS TO WHETHER OR NOT 00807 M00S00625.qdump +++|* ONE WAS RELEASED. 00808 M00S00626.qdump +++|* 00809 M00S00627.qdump +++|* ENTRY (LIST) .NE. 0 IF OUTPUT FILE WRITTEN. 00810 M00S00628.qdump +++|* 00811 M00S00629.qdump +++|* EXIT (LIST) = 0. 00812 M00S00630.qdump +++|* (X5) = *K* DISPLAY MESSAGE ADDRESS. 00813 M00S00631.qdump +++|*
| Line S00632 Modification History | |
|---|---|
M01 (Removed by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 00814 M01S00632.qdump4 ---|* USES A - 2, 6. 00815 M01S00633.qdump4 ---|* X - 2, 5, 6.
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 00816 M01S00008.qdump4 +++|* USES X - 2, 5, 6. 00817 M01S00009.qdump4 +++|* A - 2, 6. 00818 M00S00634.qdump +++|* 00819 M00S00635.qdump +++|* CALLS CBL. 00820 M00S00636.qdump +++|* 00821 M00S00637.qdump +++|* MACROS ROUTE. 00822 M00S00638.qdump +++| 00823 M00S00639.qdump +++| 00824 M00S00640.qdump +++| OUT1 SX5 MES6 *NO OUTPUT FILE EXISTS.* 00825 M00S00641.qdump +++| 00826 M00S00642.qdump +++| OUT SUBR ENTRY/EXIT 00827 M00S00643.qdump +++| SA2 LIST CHECK IF OUTPUT EXISTS 00828 M00S00644.qdump +++| ZR X2,OUT1 IF NO OUTPUT FILE 00829 M00S00645.qdump +++| 00830 M00S00646.qdump +++|* RELEASE OUTPUT FILE. 00831 M00S00647.qdump +++| 00832 M00S00648.qdump +++| RJ CBL CLEAR ROUTE BLOCK 00833 M00S00649.qdump +++| SA2 O SET UP *DSP* PARAMETER BLOCK 00834 M00S00650.qdump +++| MX6 42 00835 M00S00651.qdump +++| BX6 X6*X2 00836 M00S00652.qdump +++| SA6 BLOCK 00837 M00S00653.qdump +++| SA2 OUTA SET FLAGS 00838 M00S00654.qdump +++| BX6 X2 00839 M00S00655.qdump +++| SA6 A6+B1 00840 M00S00656.qdump +++| ROUTE BLOCK,RECALL 00841 M00S00657.qdump +++| BX6 X6-X6 CLEAR OUTPUT FLAG 00842 M00S00658.qdump +++| SA6 LIST 00843 M00S00659.qdump +++| SX5 MES7 *OUTPUT FILE RELEASED.* 00844 M00S00660.qdump +++| EQ OUTX 00845 M00S00661.qdump +++| 00846 M00S00662.qdump +++| 00847 M00S00663.qdump +++| OUTA VFD 24/0,12/2HPR,6/0,18/FRDC 00848 M00S00664.qdump +++| WDH SPACE 4,20 00849 M00S00665.qdump +++|** WDH - WRITE DUMP FILE HEADER BLOCK. 00850 M00S00666.qdump +++|* 00851 M00S00667.qdump +++|* REWIND THE ATTACHED DUMP FILE IF SPECIFIED THEN SKIP 00852 M00S00668.qdump +++|* THE NUMBER OF FILES SPECIFIED, AND WRITE A FOUR WORD 00853 M00S00669.qdump +++|* DUMP HEADER TO THE DUMP FILE CONTAINING THE DATE, 00854 M00S00670.qdump +++|* TIME, AND DUMP FILE DESCRIPTION. 00855 M00S00671.qdump +++|* 00856 M00S00672.qdump +++|* EXIT (X5) = 0 IF NO ERROR. 00857 M00S00673.qdump +++|* .NE. 0 IF ERROR WRITING HEADER TO DUMP FILE. 00858 M00S00674.qdump +++|* (DFBS) = DUMP FILE BLOCK SIZE. 00859 M00S00675.qdump +++|* (ERRB) .NE. 0 IF *PO=N* SPECIFIED AND ERROR 00860 M00S00676.qdump +++|* ENCOUNTERED. 00861 M00S00677.qdump +++|* (MSFG) = 0, IF MASS STORAGE DUMP FILE. 00862 M00S00678.qdump +++|* DUMP FILE POSITIONED. 00863 M00S00679.qdump +++|* 00864 M00S00680.qdump +++|* USES X - 0, 1, 2, 5, 6, 7. 00865 M00S00681.qdump +++|* A - 0, 1, 2, 6, 7. 00866 M00S00682.qdump +++|* 00867 M00S00683.qdump +++|* CALLS BEC, CER, SFN, WBD. 00868 M00S00684.qdump +++|* 00869 M00S00685.qdump +++|* MACROS CLOCK, DATE, MESSAGE, OPEN, REWIND, SETFS, SKIPFF, 00870 M00S00686.qdump +++|* WRITECW. 00871 M00S00687.qdump +++| 00872 M00S00688.qdump +++| 00873 M00S00689.qdump +++| WDH SUBR ENTRY/EXIT 00874 M00S00690.qdump +++| SA1 TARA+ARFC 00875 M00S00691.qdump +++| LX1 59-58 00876 M00S00692.qdump +++| PL X1,WDH1 IF NO REWIND SPECIFIED 00877 M00S00693.qdump +++| REWIND D,R 00878 M00S00694.qdump +++| WDH1 SA1 TARA+ARNF 00879 M00S00695.qdump +++| ZR X1,WDH2 IF NO FILES TO SKIP 00880 M00S00696.qdump +++| SA2 D 00881 M00S00697.qdump +++| SX3 17B SET LEVEL *17B* IN FET 00882 M00S00698.qdump +++| LX3 14 00883 M00S00699.qdump +++| MX0 -4 00884 M00S00700.qdump +++| LX0 14 00885 M00S00701.qdump +++| BX2 X0*X2 00886 M00S00702.qdump +++| BX6 X3+X2 00887 M00S00703.qdump +++| SA6 A2 00888 M00S00704.qdump +++| SKIPFF D,X1,R 00889 M00S00705.qdump +++| WDH2 SETFS D,0 00890 M00S00706.qdump +++| OPEN X2,ALTERNR,R 00891 M00S00707.qdump +++| WRITECW X2,* PRESET WRITE FUNCTION 00892 M00S00708.qdump +++|
| Line S00709 Modification History | |
|---|---|
M01 (Removed by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 00893 M01S00709.qdump4 ---|* SET MASS STORAGE FILE.
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 00894 M01S00010.qdump4 +++|* BUILD HEADER BLOCK DATA. 00895 M00S00710.qdump +++|
| Line S00711 Modification History | |
|---|---|
M01 (Removed by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 00896 M01S00711.qdump4 ---| SA1 D+1 00897 M01S00712.qdump4 ---| NG X1,WDH3 IF NOT ALLOCATABLE DEVICE 00898 M01S00713.qdump4 ---| SX6 B0+ SET MASS STORAGE DUMP FILE FLAG 00899 M01S00714.qdump4 ---| SA6 MSFG 00900 M01S00715.qdump4 ---| 00901 M01S00716.qdump4 ---|* BUILD HEADER BLOCK DATA. 00902 M01S00717.qdump4 ---| 00903 M01S00718.qdump4 ---| WDH3 SA1 D SET DUMP FILE NAME IN DUMP CONTROL WORD
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 00904 M01S00011.qdump4 +++| SA1 D SET DUMP FILE NAME IN DUMP CONTROL WORD 00905 M00S00719.qdump +++| MX0 42 00906 M00S00720.qdump +++| BX1 X0*X1 00907 M00S00721.qdump +++| SA2 WDHA 00908 M00S00722.qdump +++| BX7 X1+X2 BUILD HEADER BLOCK 00909 M00S00723.qdump +++| SA7 WBUF+1 00910 M00S00724.qdump +++| RJ SFN SPACE FILL NAME 00911 M00S00725.qdump +++| SA6 A7+B1 00912 M00S00726.qdump +++| SA2 WDHB BLANK FILL NEXT WORD 00913 M00S00727.qdump +++| BX6 X2 00914 M00S00728.qdump +++| SA6 A6+B1 00915 M00S00729.qdump +++| DATE WBUF+4 00916 M00S00730.qdump +++| CLOCK WBUF+5 00917 M00S00731.qdump +++| 00918 M00S00732.qdump +++|* BUILD CONTROL WORDS. 00919 M00S00733.qdump +++| 00920 M00S00734.qdump +++| SA1 D+4 BUILD EXTERNAL CONTROL WORD 00921 M00S00735.qdump +++| AX1 18 00922 M00S00736.qdump +++| SX6 X1 SET BLOCK SIZE OF DUMP FILE 00923 M00S00737.qdump +++| SA6 DFBS 00924 M00S00738.qdump +++| SX1 5
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 00925 M01S00012.qdump4 +++| SA2 D+1 00926 M01S00013.qdump4 +++| NG X2,WDH3 IF NOT ALLOCATABLE DEVICE 00927 M01S00014.qdump4 +++| SX6 B0+ SET MASS STORAGE DUMP FILE FLAG 00928 M01S00015.qdump4 +++| SA6 MSFG 00929 M01S00016.qdump4 +++| SX6 DBLL 00930 M01S00017.qdump4 +++| WDH3 SA6 DBLS DUMP BLOCK LOGICAL SIZE 00931 M00S00739.qdump +++| RJ BEC 00932 M00S00740.qdump +++| 00933 M00S00741.qdump +++|* WRITE HEADER BLOCK TO DUMP FILE. 00934 M00S00742.qdump +++| 00935 M00S00743.qdump +++| RJ WBD WRITE BLOCK 00936 M00S00744.qdump +++| SA0 D
| Line S00745 Modification History | |
|---|---|
M01 (Removed by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 00937 M01S00745.qdump4 ---| WRITECW D,R
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 00938 M01S00018.qdump4 +++| WRITECW A0,R 00939 M00S00746.qdump +++| RJ CER CHECK FOR ERROR 00940 M00S00747.qdump +++| ZR X5,WDHX IF NO ERROR 00941 M00S00748.qdump +++| SX5 MES8 *BAD DUMP FILE.* 00942 M00S00749.qdump +++| MESSAGE X5 00943 M00S00750.qdump +++| SA1 TARA+ARFC 00944 M00S00751.qdump +++| PL X1,WDHX IF *PO=N* NOT SPECIFIED 00945 M00S00752.qdump +++| SA6 ERRB SET ABORT FLAG 00946 M00S00753.qdump +++| SX5 MES2 *QDUMP ABORTED.* 00947 M00S00754.qdump +++| MESSAGE X5 00948 M00S00755.qdump +++| EQ WDHX 00949 M00S00756.qdump +++| 00950 M00S00757.qdump +++| WDHA VFD 42/0,3/6,6/0,9/4 DUMP HEADER CONTROL WORD 00951 M00S00758.qdump +++| WDHB DATA 10H 00952 M00S00759.qdump +++| AQF TITLE SECONDARY SUBROUTINES.
| Line S00760 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00953 M01S00760.ns21000 ---|** AQF - ATTACH QUEUE FILE AND READ SYSTEM SECTOR.
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00954 M01S00006.ns21000 +++|** AQF - ATTACH QUEUE FILE AND READ SYSTEM INFORMATION. 00955 M00S00761.qdump +++|* 00956 M00S00762.qdump +++|* SEARCH THE IQFT BUFFER UNTIL THE NEXT ENTRY THAT MEETS 00957 M00S00763.qdump +++|* THE REQUIREMENTS SPECIFIED IN THE FET IS FOUND, THEN 00958 M00S00764.qdump +++|* ATTACH THAT FILE TO THE CONTROL POINT, ISSUE A *READ* ON
| Line S00765 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00959 M01S00765.ns21000 ---|* THE FILE AND ALSO READ THE SYSTEM SECTOR FOR THE FILE.
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00960 M01S00007.ns21000 +++|* THE FILE AND READ ITS SYSTEM AND EOI SECTORS. 00961 M00S00766.qdump +++|* 00962 M00S00767.qdump +++|* ENTRY (X5) = FUNCTION TO ATTACH FILE. 00963 M00S00768.qdump +++|* 00964 M00S00769.qdump +++|* EXIT (X5) = 0 IF NO ERROR. 00965 M00S00770.qdump +++|* .LT. 0, SKIP FILE. 00966 M00S00771.qdump +++|* .GT. 0, *K* DISPLAY MESSAGE ADDRESS. 00967 M00S00772.qdump +++|* (X6) .NE. 0 IF END OF BUFFER. 00968 M00S00773.qdump +++|* (AQFA) .NE. 0 IF READ MASS STORAGE ERROR. 00969 M00S00774.qdump +++|* 00970 M00S00775.qdump +++|* USES X - 0, 1, 2, 3, 5, 6, 7. 00971 M00S00776.qdump +++|* A - 0, 1, 2, 3, 5, 6, 7. 00972 M00S00777.qdump +++|* B - 6. 00973 M00S00778.qdump +++|* 00974 M00S00779.qdump +++|* CALLS CER, EPR. 00975 M00S00780.qdump +++|* 00976 M00S00781.qdump +++|* MACROS QCALL, READCW, REWIND. 00977 M00S00782.qdump +++| 00978 M00S00783.qdump +++| 00979 M00S00784.qdump +++| AQF SUBR ENTRY/EXIT 00980 M00S00785.qdump +++| BX6 X6-X6 CLEAR FLAGS 00981 M00S00786.qdump +++| SA6 AQFA 00982 M00S00787.qdump +++| SA6 A6+B1 00983 M00S00788.qdump +++| REWIND Q,R 00984 M00S00789.qdump +++| REWIND S,R 00985 M00S00790.qdump +++| 00986 M00S00791.qdump +++|* ATTACH QUEUE FILE. 00987 M00S00792.qdump +++| 00988 M00S00793.qdump +++| SA0 T ATTACH FILE 00989 M00S00794.qdump +++| QCALL X5,T 00990 M00S00795.qdump +++| RJ CER CHECK FOR ERROR 00991 M00S00796.qdump +++| NZ X5,AQF2 IF ERROR 00992 M00S00797.qdump +++| SA1 T+3 ADVANCE *OUT* POINTER 00993 M00S00798.qdump +++| SA2 A1-B1 00994 M00S00799.qdump +++| IX2 X2-X1 *IN* - *OUT* 00995 M00S00800.qdump +++| SX6 B1+ SET FLAG FOR NO ATTACH 00996 M00S00801.qdump +++| SA6 AQFB 00997 M00S00802.qdump +++| ZR X2,AQFX IF END OF BUFFER 00998 M00S00803.qdump +++| SX7 X1+QFEWL 00999 M00S00804.qdump +++| SA7 A1 01000 M00S00805.qdump +++| MX0 24 01001 M00S00806.qdump +++| SA2 X1+ INSERT QUEUE FILE NAME IN FETS 01002 M00S00807.qdump +++| BX6 X0*X2 01003 M00S00808.qdump +++| MX0 -18 01004 M00S00809.qdump +++| SA3 Q 01005 M00S00810.qdump +++| BX3 -X0*X3 01006 M00S00811.qdump +++| BX7 X6+X3 01007 M00S00812.qdump +++| SA5 S 01008 M00S00813.qdump +++| BX5 -X0*X5 01009 M00S00814.qdump +++| SA7 A3 01010 M00S00815.qdump +++| BX7 X6+X5 01011 M00S00816.qdump +++| SA7 A5 01012 M00S00817.qdump +++|
| Line S00818 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01013 M01S00818.ns21000 ---|* READ SYSTEM SECTOR.
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01014 M01S00008.ns21000 +++|* READ SYSTEM INFORMATION. 01015 M00S00819.qdump +++| 01016 M00S00820.qdump +++| SA0 S
| Line S00821 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01017 M01S00821.ns21000 ---| QCALL QRSF,S
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01018 M01S00009.ns21000 +++| QCALL QRSF,S READ SYSTEM SECTOR 01019 M00S00822.qdump +++| RJ CER CHECK FOR ERROR 01020 M00S00823.qdump +++| NZ X5,AQF2 IF ERROR
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01021 M01S00010.ns21000 +++| QCALL QREF,S READ EOI SECTOR 01022 M00S00824.qdump +++| AQF1 READCW Q READ QUEUE FILE 01023 M00S00825.qdump +++| BX6 X6-X6 CLEAR END OF BUFFER 01024 M00S00826.qdump +++| EQ AQFX RETURN 01025 M00S00827.qdump +++| 01026 M00S00828.qdump +++|* PROCESS *QFM* ERROR. 01027 M00S00829.qdump +++| 01028 M00S00830.qdump +++| AQF2 SB6 TQEP SET ERROR TABLE ADDRESS 01029 M00S00831.qdump +++| RJ EPR PROCESS ERROR 01030 M00S00832.qdump +++| NZ X5,AQFX IF ERROR 01031 M00S00833.qdump +++| SA7 AQFA SAVE READ ERROR MESSAGE ADDRESS 01032 M00S00834.qdump +++| SA7 CPFA 01033 M00S00835.qdump +++| EQ AQF1 RENAME OLD QUEUE FILE 01034 M00S00836.qdump +++| 01035 M00S00837.qdump +++| AQFA CON 0 READ ERROR FLAG 01036 M00S00838.qdump +++| AQFB CON 1 ATTACHING FLAG 01037 M00S00839.qdump +++| BEC SPACE 4,20 01038 M00S00840.qdump +++|** BEC - BUILD EXTERNAL CONTROL WORD. 01039 M00S00841.qdump +++|* 01040 M00S00842.qdump +++|* BUILD THE CONTROL WORD TO BE USED BY *WRITECW*. 01041 M00S00843.qdump +++|* 01042 M00S00844.qdump +++|* ENTRY (DFBS) = SIZE OF DUMP FILE BLOCK. 01043 M00S00845.qdump +++|* (X1) = NUMBER OF WORDS IN BUFFER. 01044 M00S00846.qdump +++|* 01045 M00S00847.qdump +++|* EXIT (X1) = (X5) = NUMBER OF WORDS IN BUFFER. 01046 M00S00848.qdump +++|*
| Line S00849 Modification History | |
|---|---|
M01 (Removed by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 01047 M01S00849.qdump4 ---|* USES A - 2, 7. 01048 M01S00850.qdump4 ---|* X - 2, 3, 5, 6, 7.
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 01049 M01S00019.qdump4 +++|* USES X - 2, 3, 5, 6, 7. 01050 M01S00020.qdump4 +++|* A - 2, 7. 01051 M00S00851.qdump +++| 01052 M00S00852.qdump +++| 01053 M00S00853.qdump +++| BEC SUBR ENTRY/EXIT 01054 M00S00854.qdump +++| SA2 DFBS BUILD EXTERNAL CONTROL WORD 01055 M00S00855.qdump +++| LX2 36 01056 M00S00856.qdump +++| SX5 X1 01057 M00S00857.qdump +++| SX3 5 CALCULATE BYTE COUNT 01058 M00S00858.qdump +++| IX6 X3*X1 01059 M00S00859.qdump +++| BX7 X2+X6 01060 M00S00860.qdump +++| SA7 WBUF 01061 M00S00861.qdump +++| EQ BECX 01062 M00S00862.qdump +++| BOF SPACE 4,30 01063 M00S00863.qdump +++|** BOF - BUILD OUTPUT FILE. 01064 M00S00864.qdump +++|* 01065 M00S00865.qdump +++|* WRITE ONE ENTRY TO THE OUTPUT FILE AND CALL THE ROUTINE 01066 M00S00866.qdump +++|* TO WRITE PAGE HEADERS WHEN NECESSARY. 01067 M00S00867.qdump +++|* 01068 M00S00868.qdump +++|* ENTRY (X7) = ERROR CODE ADDRESS. 01069 M00S00869.qdump +++|* (LNUM) = CURRENT LINE NUMBER. 01070 M00S00870.qdump +++|* (PNUM) = CURRENT PAGE NUMBER. 01071 M00S00871.qdump +++|* (QNUM) = CURRENT QUEUE FILE NUMBER. 01072 M00S00872.qdump +++|* (CEQP) = CURRENT EQUIPMENT. 01073 M00S00873.qdump +++|* (DSPB) = 0, DUMP INACTIVE QUEUE FILES. 01074 M00S00874.qdump +++|* = 1, DUMP ACTIVE QUEUE FILES. 01075 M00S00875.qdump +++|* = 2, DUMP ALL QUEUE FILES. 01076 M00S00876.qdump +++|* 01077 M00S00877.qdump +++|* EXIT (LNUM) = NEXT LINE NUMBER. 01078 M00S00878.qdump +++|* (PNUM) = NEXT PAGE NUMBER. 01079 M00S00879.qdump +++|* (QNUM) = NEXT QUEUE FILE NUMBER. 01080 M00S00880.qdump +++|*
| Line S00881 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01081 M01S00881.ns22000 ---|* USES X - 1, 2, 3, 6, 7.
| Line S00088 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01082 M01S00088.ns22000 +++|* X - 1, 2, 3, 5, 6, 7. 01083 M00S00882.qdump +++|* A - 1, 2, 3, 6, 7. 01084 M00S00883.qdump +++|* B - 7. 01085 M00S00884.qdump +++|* 01086 M00S00885.qdump +++|* CALLS BOH, FQO. 01087 M00S00886.qdump +++|* 01088 M00S00887.qdump +++|* MACROS WRITEC, WRITEW. 01089 M00S00888.qdump +++| 01090 M00S00889.qdump +++| 01091 M00S00890.qdump +++| BOF SUBR ENTRY/EXIT 01092 M00S00891.qdump +++| SA7 BOFA SAVE ERROR CODE ADDRESS 01093 M00S00892.qdump +++| SA1 LNUM LINE NUMBER
| Line S00893 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01094 M01S00893.ns22000 ---| SX7 X1-LINP 01095 M01S00894.ns22000 ---| NZ X7,BOF1 IF NOT END OF PAGE
| Line S00089 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01096 M01S00089.ns22000 +++| SA2 A1+B1 01097 M01S00090.ns22000 +++| IX7 X1-X2 01098 M01S00091.ns22000 +++| NG X7,BOF1 IF NOT END OF PAGE 01099 M00S00895.qdump +++| 01100 M00S00896.qdump +++|* WRITE HEADER AND SET RECORD FLAGS. 01101 M00S00897.qdump +++| 01102 M00S00898.qdump +++| RJ BOH BUILD OUTPUT PAGE HEADER 01103 M00S00899.qdump +++| SA2 PNUM CHECK PAGE NUMBER 01104 M00S00900.qdump +++| SX6 X2-2 01105 M00S00901.qdump +++| NZ X6,BOF1 IF NOT FIRST PAGE 01106 M00S00902.qdump +++| SA3 LIST INCREMENT OUTPUT FLAG 01107 M00S00903.qdump +++| SX7 X3+B1 01108 M00S00904.qdump +++| SA7 A3 01109 M00S00905.qdump +++| SA7 RECF SET CURRENT RECORD FLAG 01110 M00S00906.qdump +++| 01111 M00S00907.qdump +++|* WRITE ONE LINE TO OUTPUT FILE. 01112 M00S00908.qdump +++| 01113 M00S00909.qdump +++| BOF1 SA3 CEQP CURRENT EQUIPMENT 01114 M00S00910.qdump +++| SB7 TEQA+X3 ADDRESS OF FAMILY/DEVICE 01115 M00S00911.qdump +++| SA1 QNUM INCREMENT QUEUE NUMBER 01116 M00S00912.qdump +++| SX6 X1+B1 01117 M00S00913.qdump +++| SA6 A1 01118 M00S00914.qdump +++| SA2 T+3 IQFT ENTRY ADDRESS
| Line S00915 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01119 M01S00915.ns22000 ---| SX2 X2-QFEWL
| Line S00092 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01120 M01S00092.ns22000 +++| SX5 X2-QFEWL 01121 M00S00916.qdump +++| SA3 DSPB DISPOSITION FIELD ENTRY 01122 M00S00917.qdump +++| SA3 BOFG+X3 01123 M00S00918.qdump +++| RJ FQO FORMAT OUTPUT LINE 01124 M00S00919.qdump +++| WRITEW O,B3,B2-1 01125 M00S00920.qdump +++| 01126 M00S00921.qdump +++|* WRITE ERROR CODE TO OUTPUT. 01127 M00S00922.qdump +++| 01128 M00S00923.qdump +++| SA3 BOFA ERROR CODE ADDRESS 01129 M00S00924.qdump +++| WRITEC O,X3 01130 M00S00925.qdump +++| SA2 LNUM INCREMENT LINE NUMBER 01131 M00S00926.qdump +++| SX7 X2+B1 01132 M00S00927.qdump +++| SA7 A2 01133 M00S00928.qdump +++| EQ BOFX RETURN 01134 M00S00929.qdump +++| 01135 M00S00930.qdump +++| BOFA CON 0 ERROR CODE ADDRESS 01136 M00S00931.qdump +++| BOFB DATA C*READ ERROR - FILE IGNORED* 01137 M00S00932.qdump +++| BOFC DATA C*READ ERROR - FILE DUMPED* 01138 M00S00933.qdump +++| BOFD DATA C*SYSTEM SECTOR ERROR - FILE IGNORED* 01139 M00S00934.qdump +++| BOFE DATA C*TRACK LIMIT - FILE IGNORED* 01140 M00S00935.qdump +++| BOFF DATA C*DUPLICATE FILE NAME - FILE IGNORED* 01141 M00S00936.qdump +++| BOFG DATA H*INACTIVE * 01142 M00S00937.qdump +++| DATA H*ACTIVE * 01143 M00S00938.qdump +++| DATA H*ACTIVE * 01144 M00S00939.qdump +++| BLANK DATA C* * 01145 M00S00940.qdump +++| BOH SPACE 4,20 01146 M00S00941.qdump +++|** BOH - BUILD OUTPUT FILE PAGE HEADER. 01147 M00S00942.qdump +++|* 01148 M00S00943.qdump +++|* BUILD THE HEADER LINES FOR EACH PAGE AND WRITE THESE 01149 M00S00944.qdump +++|* LINES TO OUTPUT. 01150 M00S00945.qdump +++|* 01151 M00S00946.qdump +++|* ENTRY (PNUM) = PAGE NUMBER.
| Line S00093 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01152 M01S00093.ns22000 +++|* (PDFE+1) = SET IF PRINT DENSITY FORMAT EFFECTOR 01153 M01S00094.ns22000 +++|* NOT YET WRITTEN. 01154 M00S00947.qdump +++|* 01155 M00S00948.qdump +++|* EXIT (PNUM) = NEXT PAGE NUMBER. 01156 M00S00949.qdump +++|* (LNUM) = LINE NUMBER FOLLOWING HEADER. 01157 M00S00950.qdump +++|* 01158 M00S00951.qdump +++|* USES X - 0, 1, 6, 7. 01159 M00S00952.qdump +++|* A - 1, 6, 7. 01160 M00S00953.qdump +++|* 01161 M00S00954.qdump +++|* CALLS CDD. 01162 M00S00955.qdump +++|* 01163 M00S00956.qdump +++|* MACROS RECALL, WRITEW. 01164 M00S00957.qdump +++| 01165 M00S00958.qdump +++| 01166 M00S00959.qdump +++| BOH SUBR ENTRY/EXIT 01167 M00S00960.qdump +++| 01168 M00S00961.qdump +++|* SET PAGE NUMBER IN HEADER. 01169 M00S00962.qdump +++| 01170 M00S00963.qdump +++| SA1 PNUM INCREMENT PAGE NUMBER 01171 M00S00964.qdump +++| SX6 X1+B1 01172 M00S00965.qdump +++| SA6 A1 01173 M00S00966.qdump +++| RJ CDD CONVERT NUMBER 01174 M00S00967.qdump +++| MX0 36 SET IN HEADER 01175 M00S00968.qdump +++| SA1 BOHA3 01176 M00S00969.qdump +++| BX1 X0*X1 01177 M00S00970.qdump +++| BX6 -X0*X6 01178 M00S00971.qdump +++| BX7 X1+X6 01179 M00S00972.qdump +++| SA7 A1+ 01180 M00S00973.qdump +++| RECALL O
| Line S00095 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01181 M01S00095.ns22000 +++| SA1 PDFE+1 GET PRINT DENSITY FORMAT CONTROL FLAG 01182 M01S00096.ns22000 +++| BX7 X7-X7 01183 M01S00097.ns22000 +++| SA7 A1 01184 M01S00098.ns22000 +++| WRITEW O,A1-B1,X1 CONDITIONALLY WRITE FORMAT EFFECTOR 01185 M00S00974.qdump +++| 01186 M00S00975.qdump +++|* WRITE HEADER TO OUTPUT. 01187 M00S00976.qdump +++| 01188 M00S00977.qdump +++| WRITEW O,BOHA,BOHAL 01189 M00S00978.qdump +++| WRITEW O,BOHB,BOHBL 01190 M00S00979.qdump +++| WRITEW O,BOHC,BOHCL 01191 M00S00980.qdump +++| SX7 8 SET LINE NUMBER 01192 M00S00981.qdump +++| SA7 LNUM 01193 M00S00982.qdump +++| EQ BOHX RETURN 01194 M00S00983.qdump +++| 01195 M00S00984.qdump +++| BOHA DATA C*1 QDUMP PROCESSOR. YY/MM/DD. HH 01196 M00S00985.qdump +++|,.MM.SS. PAGE * 01197 M00S00986.qdump +++| BOHA1 EQU *-4 DATE 01198 M00S00987.qdump +++| BOHA2 EQU *-3 TIME 01199 M00S00988.qdump +++| BOHA3 EQU *-2 PAGE 01200 M00S00989.qdump +++| BOHAL EQU *-BOHA 01201 M00S00990.qdump +++| 01202 M00S00991.qdump +++| BOHB DATA H*0* CARRIAGE CONTROL 01203 M00S00992.qdump +++| DATA H/ *** DUMPED/ 01204 M00S00993.qdump +++| DATA C/ QUEUE FILE DISPOSITION ***/ 01205 M00S00994.qdump +++| BOHBL EQU *-BOHB 01206 M00S00995.qdump +++| 01207 M00S00996.qdump +++| BOHC DATA H*0* CARRIAGE CONTROL
| Line S00997 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01208 M01S00997.ns22000 ---| DATA C* 01209 M01S00998.ns22000 ---|,LENGTH*
| Line S00099 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01210 M01S00099.ns22000 +++| DATA C* LENGTH 01211 M01S00100.ns22000 +++|,ACCESS* 01212 M00S00999.qdump +++| DATA H* * CARRIAGE CONTROL
| Line S01000 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01213 M01S01000.ns22000 ---| DATA C* NO. JSN MID FAMILY DN DT OT DATE 01214 M01S01001.ns22000 ---|,(PRUS) DISPOSITION ERRORS*
| Line S00101 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01215 M02S00101.241l630 ---| DATA C* NO. JSNS MID FAMILY DN DT DS DATE (PRUS)
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 01216 M01S00003.241l630 +++| DATA C* NUM JSNS MID FAMILY DN DT DS DATE (PRUS)
| Line S00102 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01217 M01S00102.ns22000 +++|,LEVEL DISPOSITION ERRORS* 01218 M00S01002.qdump +++| DATA C* * 01219 M00S01003.qdump +++| BOHCL EQU *-BOHC 01220 M00S01004.qdump +++| BUP SPACE 4,10 01221 M00S01005.qdump +++|** BUP - BACK UP *IN* POINTER TO BEGINNING OF CURRENT FILE. 01222 M00S01006.qdump +++|* 01223 M00S01007.qdump +++|* SET THE *IN* POINTER TO THE BEGINNING OF THE LAST RECORD 01224 M00S01008.qdump +++|* IN THE CIRCULAR BUFFER AND BACKSPACE TO THE START OF 01225 M00S01009.qdump +++|* THE CURRENT QUEUED FILE ON THE DUMP FILE IF NECESSARY. 01226 M00S01010.qdump +++|* 01227 M00S01011.qdump +++|* ENTRY (DFBS) = DUMP FILE BLOCK SIZE. 01228 M00S01012.qdump +++|* (RBCW) = ROUTE BLOCK CONTROL WORD. 01229 M00S01013.qdump +++|* (ERCW) = READ ERROR CONTROL WORD. 01230 M00S01014.qdump +++|*
| Line S01015 Modification History | |
|---|---|
M01 (Removed by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 01231 M01S01015.qdump4 ---|* USES A - 1, 2, 3, 4, 6, 7. 01232 M01S01016.qdump4 ---|* X - 0, 1, 2, 3, 4, 6, 7.
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 01233 M01S00021.qdump4 +++|* USES X - 0, 1, 2, 3, 4, 6, 7. 01234 M01S00022.qdump4 +++|* A - 1, 2, 3, 4, 6, 7. 01235 M00S01017.qdump +++|* 01236 M00S01018.qdump +++|* CALLS BEC, WBD.
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 01237 M01S00023.qdump4 +++|* 01238 M01S00024.qdump4 +++|* MACROS BKSP, MESSAGE. 01239 M00S01019.qdump +++| 01240 M00S01020.qdump +++| 01241 M00S01021.qdump +++| BUP SUBR ENTRY/EXIT 01242 M00S01022.qdump +++| SA2 D+2 *IN* 01243 M00S01023.qdump +++| SA3 A2+B1 *OUT* 01244 M00S01024.qdump +++| SA4 A3+B1 *LIMIT* 01245 M00S01025.qdump +++| SX4 X4+ 01246 M00S01026.qdump +++| SX6 X3 SET LAST RECORD POINTER TO *OUT* 01247 M00S01027.qdump +++| IX7 X2-X3 CHECK FOR NO DATA IN BUFFER 01248 M00S01028.qdump +++| SA6 BUPA 01249 M00S01029.qdump +++| SX3 WBUF+1 01250 M00S01030.qdump +++| ZR X7,BUP4 IF *IN* .EQ. *OUT* 01251 M00S01031.qdump +++| SX3 X6+ RESET *OUT* 01252 M00S01032.qdump +++| 01253 M00S01033.qdump +++|* GET NEXT CONTROL WORD ADDRESS. 01254 M00S01034.qdump +++| 01255 M00S01035.qdump +++| BUP1 SA1 X3+ CONTROL WORD 01256 M00S01036.qdump +++| SX6 5 01257 M00S01037.qdump +++| SX7 X1+4 ROUND UP 01258 M00S01038.qdump +++| IX6 X7/X6 WORDS IN BLOCK 01259 M00S01039.qdump +++| IX7 X3+X6 CALCULATE ADDRESS OF NEXT CONTROL WORD 01260 M00S01040.qdump +++| SX7 X7+2 01261 M00S01041.qdump +++| IX1 X7-X4 01262 M00S01042.qdump +++| NG X1,BUP2 IF NOT AT *LIMIT* 01263 M00S01043.qdump +++| IX7 X4-X3 CALCULATE AFTER WRAP-AROUND 01264 M00S01044.qdump +++| IX7 X6-X7 01265 M00S01045.qdump +++| SA1 D+1 *FIRST* 01266 M00S01046.qdump +++| SX1 X1 01267 M00S01047.qdump +++| IX7 X7+X1 01268 M00S01048.qdump +++| SX7 X7+2 01269 M00S01049.qdump +++| BUP2 SA1 DFBS DUMP FILE BLOCK SIZE 01270 M00S01050.qdump +++| IX6 X6-X1 01271 M00S01051.qdump +++| PL X6,BUP3 IF NOT EOR 01272 M00S01052.qdump +++| SA7 BUPA SAVE ADDRESS OF NEXT RECORD 01273 M00S01053.qdump +++| 01274 M00S01054.qdump +++|* SET *IN* POINTER. 01275 M00S01055.qdump +++| 01276 M00S01056.qdump +++| BUP3 SX3 X7 RESET ADDRESS 01277 M00S01057.qdump +++| IX6 X2-X7 01278 M00S01058.qdump +++| NZ X6,BUP1 IF ADDRESS .NE. *IN* 01279 M00S01059.qdump +++| SA1 BUPA 01280 M00S01060.qdump +++| IX7 X2-X1 01281 M00S01061.qdump +++| ZR X7,BUPX IF *IN* = ADDRESS OF NEXT RECORD 01282 M00S01062.qdump +++| SX7 X1 SET *IN* = ADDRESS OF LAST RECORD 01283 M00S01063.qdump +++| SA7 A2 01284 M00S01064.qdump +++| 01285 M00S01065.qdump +++|* BACKSPACE DUMP FILE IF NOT AT BEGINNING OF FILE. 01286 M00S01066.qdump +++| 01287 M00S01067.qdump +++| SA3 A3 *OUT* 01288 M00S01068.qdump +++| IX6 X3-X1 01289 M00S01069.qdump +++| NZ X6,BUPX IF EOR FOUND 01290 M00S01070.qdump +++| SX3 X3+B1 CHECK FOR BEGINNING OF QUEUED FILE 01291 M00S01071.qdump +++| IX7 X3-X4 01292 M00S01072.qdump +++| NZ X7,BUP4 IF NOT AT *LIMIT* 01293 M00S01073.qdump +++| SA3 D+1 *FIRST* 01294 M00S01074.qdump +++| BUP4 SA1 X3 CHECK FOR ROUTE BLOCK CONTROL WORD 01295 M00S01075.qdump +++| SA4 RBCW 01296 M00S01076.qdump +++| BX7 X4-X1 01297 M00S01077.qdump +++| ZR X7,BUPX IF AT BEGINNING OF FILE 01298 M00S01078.qdump +++| BKSP D,R 01299 M00S01079.qdump +++| SA1 D CHECK IF BACKSPACE COMPLETE 01300 M00S01080.qdump +++| SX0 77BS3 01301 M00S01081.qdump +++| BX6 X0*X1 01302 M00S01082.qdump +++| SX6 X6-50B 01303 M00S01083.qdump +++| SX1 B1 SET WORDS IN BUFFER 01304 M00S01084.qdump +++| NZ X6,BUPX IF NOT REWIND STATUS 01305 M00S01085.qdump +++| 01306 M00S01086.qdump +++|* END ERRORED FILE AND ISSUE MESSAGE. 01307 M00S01087.qdump +++| 01308 M00S01088.qdump +++| SA2 ERCW WRITE ERROR CONTROL WORD TO DUMP FILE 01309 M00S01089.qdump +++| BX6 X2 01310 M00S01090.qdump +++| SA6 WBUF+1 01311 M00S01091.qdump +++| RJ BEC BUILD EXTERNAL CONTROL WORD 01312 M00S01092.qdump +++| RJ WBD WRITE EOR BLOCK 01313 M00S01093.qdump +++| SA1 RBCW SET FILE NAME IN MESSAGE 01314 M00S01094.qdump +++| MX0 42 01315 M00S01095.qdump +++| BX7 X0*X1 01316 M00S01096.qdump +++| LX7 -18 01317 M00S01097.qdump +++| SA2 MES11+3 01318 M00S01098.qdump +++| MX0 18 01319 M00S01099.qdump +++| BX6 X0*X2 01320 M00S01100.qdump +++| BX7 X6+X7 01321 M00S01101.qdump +++| SA7 A2+ 01322 M00S01102.qdump +++| MESSAGE MES11 01323 M00S01103.qdump +++| EQ BUPX 01324 M00S01104.qdump +++| 01325 M00S01105.qdump +++| BUPA CON 0 ADDRESS OF NEXT RECORD 01326 M00S01106.qdump +++| CDI SPACE 4,20 01327 M00S01107.qdump +++|** CDI - CHECK CURRENT DEVICE IQFT. 01328 M00S01108.qdump +++|* 01329 M00S01109.qdump +++|* COUNT THE ENTRIES IN THE REMAINDER OF THE CURRENT DEVICE 01330 M00S01110.qdump +++|* IQFT. IF TRACK LIMIT HAS BEEN REACHED, THE ENTRIES ARE 01331 M00S01111.qdump +++|* VERIFIED AND THOSE MEETING SPECIFICATIONS ARE NOTED 01332 M00S01112.qdump +++|* ON THE OUTPUT FILE. 01333 M00S01113.qdump +++|* 01334 M00S01114.qdump +++|* ENTRY (IGCT) = COUNT OF FILES IGNORED ON DEVICE. 01335 M00S01115.qdump +++|* (CDIA) .NE. 0 IF TRACK LIMIT REACHED.
| Line S01116 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01336 M01S01116.ns22000 ---|* (CEQP) = CURRENT EQUIPMENT NUMBER.
| Line S00103 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01337 M01S00103.ns22000 +++|* (CEQP) = CURRENT EST ORDINAL. 01338 M00S01117.qdump +++|* 01339 M00S01118.qdump +++|* EXIT (IGCT) = UPDATED COUNT OF IGNORED FILES. 01340 M00S01119.qdump +++|* (X5) = 0 IF NO ERROR. 01341 M00S01120.qdump +++|* = *K* DISPLAY MESSAGE ADDRESS IF ERROR. 01342 M00S01121.qdump +++|* 01343 M00S01122.qdump +++|* USES X - 0, 1, 2, 5, 6, 7. 01344 M00S01123.qdump +++|* A - 1, 2, 7. 01345 M00S01124.qdump +++|* 01346 M00S01125.qdump +++|* CALLS BOF, VIE. 01347 M00S01126.qdump +++|* 01348 M00S01127.qdump +++|* MACROS READW, WRITEW. 01349 M00S01128.qdump +++| 01350 M00S01129.qdump +++| 01351 M00S01130.qdump +++| CDI SUBR ENTRY/EXIT 01352 M00S01131.qdump +++| 01353 M00S01132.qdump +++|* READ REMAINDER OF OLD IQFT. 01354 M00S01133.qdump +++| 01355 M00S01134.qdump +++| CDI1 BX5 X5-X5 CLEAR ERROR STATUS 01356 M00S01135.qdump +++| READW IQ,IQFE,QFEWL 01357 M00S01136.qdump +++| NZ X5,CDIX IF MASS STORAGE ERROR 01358 M00S01137.qdump +++| NZ X1,CDIX IF EOF/EOI 01359 M00S01138.qdump +++| 01360 M00S01139.qdump +++|* BUILD OUTPUT FILE IF TRACK LIMIT REACHED. 01361 M00S01140.qdump +++| 01362 M00S01141.qdump +++| SA2 CDIA 01363 M00S01142.qdump +++| ZR X2,CDI2 IF TRACK LIMIT NOT REACHED 01364 M00S01143.qdump +++| SA1 IQFE+8 01365 M00S01144.qdump +++| NG X1,CDI2 IF LENGTH ERROR 01366 M00S01145.qdump +++| BX6 X6-X6 01367 M00S01146.qdump +++| RJ VIE VERIFY IQFT ENTRY 01368 M00S01147.qdump +++| NZ X1,CDI2 IF NO MATCH 01369 M00S01148.qdump +++| SX7 TBUF REWIND POINTERS 01370 M00S01149.qdump +++| SA7 T+2 01371 M00S01150.qdump +++| SA7 T+3 01372 M00S01151.qdump +++| SA2 CEQP SET CURRENT EQUIPMENT IN ENTRY 01373 M00S01152.qdump +++| LX2 48 01374 M00S01153.qdump +++| MX0 12 01375 M00S01154.qdump +++| SA1 IQFE+1
| Line S01155 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01376 M01S01155.ns22000 ---| BX6 -X0*X1 CLEAR OLD EQUIPMENT NUMBER
| Line S00104 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01377 M01S00104.ns22000 +++| BX6 -X0*X1 CLEAR OLD EST ORDINAL 01378 M00S01156.qdump +++| BX7 X6+X2 01379 M00S01157.qdump +++| SA7 A1 01380 M00S01158.qdump +++| WRITEW T,IQFE,QFEWL MOVE ENTRY TO BUFFER 01381 M00S01159.qdump +++| SA2 T+2 SET *OUT* = *IN* 01382 M00S01160.qdump +++| SX7 X2 01383 M00S01161.qdump +++| SA7 A2+B1 01384 M00S01162.qdump +++| SX7 BOFE *TRACK LIMIT - FILE IGNORED* 01385 M00S01163.qdump +++| RJ BOF 01386 M00S01164.qdump +++| 01387 M00S01165.qdump +++|* BUILD NEW IQFT. 01388 M00S01166.qdump +++| 01389 M00S01167.qdump +++| CDI2 SA2 IGCT INCREMENT COUNT 01390 M00S01168.qdump +++| SX7 X2+B1 01391 M00S01169.qdump +++| SA7 A2 01392 M00S01170.qdump +++| EQ CDI1 READ NEXT ENTRY 01393 M00S01171.qdump +++| 01394 M00S01172.qdump +++| CDIA CON 0 TRACK LIMIT FLAG 01395 M00S01173.qdump +++| CPF SPACE 4,20 01396 M00S01174.qdump +++|** CPF - COPY QUEUED FILE AND ASSOCIATED DATA TO DUMP FILE. 01397 M00S01175.qdump +++|*
| Line S01176 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01398 M01S01176.ns21000 ---|* CALL ROUTINES TO FORMAT AND COPY THE ROUTE BLOCK AND 01399 M01S01177.ns21000 ---|* COPY THE QUEUED FILE AND SYSTEM SECTOR TO THE DUMP 01400 M01S01178.ns21000 ---|* FILE USING CONTROL WORDS.
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01401 M01S00011.ns21000 +++|* CALL ROUTINES TO FORMAT AND COPY THE ROUTE BLOCK, SYSTEM 01402 M01S00012.ns21000 +++|* INFORMATION (SYSTEM AND EOI SECTORS) AND THE DATA FOR THE 01403 M01S00013.ns21000 +++|* QUEUED FILE TO THE DUMP FILE ALONG WITH THE CORRESPONDING 01404 M01S00014.ns21000 +++|* CONTROL WORDS. 01405 M00S01179.qdump +++|* 01406 M00S01180.qdump +++|* ENTRY (AQFA) .NE. 0 IF PREVIOUS READ ERROR. 01407 M00S01181.qdump +++|* 01408 M00S01182.qdump +++|* EXIT (X5) = 0 IF NO ERROR. 01409 M00S01183.qdump +++|* .LT. 0, SKIP CURRENT FILE. 01410 M00S01184.qdump +++|* .GT. 0, *K* DISPLAY MESSAGE ADDRESS. 01411 M00S01185.qdump +++|*
| Line S01186 Modification History | |
|---|---|
M01 (Removed by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 01412 M01S01186.qdump4 ---|* USES A - 1, 2, 7. 01413 M01S01187.qdump4 ---|* X - 0, 1, 2, 5, 6, 7.
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 01414 M01S00025.qdump4 +++|* USES X - 0, 1, 2, 5, 6, 7. 01415 M01S00026.qdump4 +++|* A - 1, 2, 7. 01416 M00S01188.qdump +++|*
| Line S01189 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01417 M01S01189.ns21000 ---|* CALLS BUP, CSS, DFD, FRB.
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01418 M01S00015.ns21000 +++|* CALLS BUP, CSI, DFD, FRB. 01419 M00S01190.qdump +++| 01420 M00S01191.qdump +++| 01421 M00S01192.qdump +++| CPF SUBR ENTRY/EXIT 01422 M00S01193.qdump +++| 01423 M00S01194.qdump +++|* SET QUEUED FILE NAME IN CONTROL WORDS. 01424 M00S01195.qdump +++| 01425 M00S01196.qdump +++| SA2 T+3 SET FILE NAME 01426 M00S01197.qdump +++| SA2 X2-QFEWL 01427 M00S01198.qdump +++| MX0 24 01428 M00S01199.qdump +++| BX6 X0*X2 01429 M00S01200.qdump +++| SX2 B0+ SET INDEX 01430 M00S01201.qdump +++| CPF1 SA1 TQCW+X2 INSERT NAME IN CONTROL WORD 01431 M00S01202.qdump +++| BX1 -X0*X1 01432 M00S01203.qdump +++| BX7 X6+X1 01433 M00S01204.qdump +++| SA7 A1 01434 M00S01205.qdump +++| SX2 X2+B1 INCREMENT INDEX 01435 M00S01206.qdump +++| SX5 X2-TQCWL 01436 M00S01207.qdump +++| NZ X5,CPF1 IF NOT ALL CONTROL WORDS 01437 M00S01208.qdump +++| SA1 AQFA 01438 M00S01209.qdump +++| NZ X1,CPF2 IF PREVIOUS READ ERROR 01439 M00S01210.qdump +++| SX7 BLANK SAVE NO ERROR CODE ADDRESS 01440 M00S01211.qdump +++| SA7 CPFA 01441 M00S01212.qdump +++| 01442 M00S01213.qdump +++|* COPY DATA TO DUMP FILE. 01443 M00S01214.qdump +++| 01444 M00S01215.qdump +++| CPF2 SX0 B0+ INITIALIZE NUMBER OF WORDS IN BUFFER
| Line S00027 Modification History | |
|---|---|
M01 (Added by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 01445 M01S00027.qdump4 +++| SX7 DBLL SET INITIAL BUFFER SEGMENT LIMIT 01446 M01S00028.qdump4 +++| SA7 DBSL 01447 M00S01216.qdump +++| RJ FRB FORM ROUTE BLOCK
| Line S01217 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01448 M01S01217.ns21000 ---| RJ CSS COPY SYSTEM SECTOR
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01449 M01S00016.ns21000 +++| RJ CSI COPY SYSTEM INFORMATION 01450 M00S01218.qdump +++| RJ DFD DUMP QUEUED FILE DATA 01451 M00S01219.qdump +++| PL X5,CPFX IF NOT SKIP FILE 01452 M00S01220.qdump +++| RJ BUP BACK UP *IN* POINTER 01453 M00S01221.qdump +++| EQ CPFX 01454 M00S01222.qdump +++| 01455 M00S01223.qdump +++| CPFA CON 0 ERROR CODE ADDRESS 01456 M00S01224.qdump +++| TQCW SPACE 4 01457 M00S01225.qdump +++|** TQCW - TABLE OF QDUMP CONTROL WORDS. 01458 M00S01226.qdump +++| 01459 M00S01227.qdump +++| TQCW BSS 0 TABLE OF QDUMP CONTROL WORDS.
| Line S01228 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01460 M01S01228.ns22000 ---| RBCW VFD 42/0,3/1,3/0,3/0,9/6 ROUTE BLOCK
| Line S00105 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01461 M01S00105.ns22000 +++| RBCW VFD 42/0,3/1,3/0,3/0,9/EPBL ROUTE BLOCK
| Line S01229 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01462 M01S01229.ns21000 ---| SYCW VFD 42/0,3/3,3/0,3/0,9/100B SYSTEM SECTOR
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01463 M01S00017.ns21000 +++| SYCW VFD 42/0,3/3,3/0,3/0,9/200B SYSTEM INFORMATION 01464 M00S01230.qdump +++| DACW VFD 42/0,3/0,3/0,3/0,9/0 DATA 01465 M00S01231.qdump +++| ERCW VFD 42/0,3/7,3/0,3/0,9/0 DUMP ERRORS 01466 M00S01232.qdump +++| TQCWL EQU *-TQCW 01467 M00S01233.qdump +++| CQD SPACE 4,20 01468 M00S01234.qdump +++|** CQD - COPY QUEUE FILES TO DUMP FILE. 01469 M00S01235.qdump +++|* 01470 M00S01236.qdump +++|* CALL ROUTINES TO PHYSICALLY DUMP THE FILES SPECIFIED 01471 M00S01237.qdump +++|* IN A BUFFER OF IQFT ENTRIES TO THE DUMP FILE. 01472 M00S01238.qdump +++|* 01473 M00S01239.qdump +++|* ENTRY (DSPB) = 0, DUMP INACTIVE QUEUE FILES. 01474 M00S01240.qdump +++|* = 1, DUMP ACTIVE QUEUE FILES. 01475 M00S01241.qdump +++|* = 2, DUMP ALL QUEUE FILES. 01476 M00S01242.qdump +++|* (DPCT) = COUNT OF FILES DUMPED ON THIS DEVICE. 01477 M00S01243.qdump +++|* (PQFA) .NE. 0 IF MORE FILES TO PROCESS. 01478 M00S01244.qdump +++|* 01479 M00S01245.qdump +++|* EXIT (X5) = 0 IF NO ERROR. 01480 M00S01246.qdump +++|* = *K* DISPLAY MESSAGE ADDRESS IF ERROR. 01481 M00S01247.qdump +++|* 01482 M00S01248.qdump +++|* USES X - 1, 2, 3, 5, 6, 7. 01483 M00S01249.qdump +++|* A - 1, 2, 3, 5, 6. 01484 M00S01250.qdump +++|* B - 6. 01485 M00S01251.qdump +++|* 01486 M00S01252.qdump +++|* CALLS AQF, BOF, CDI, CPF, EPR, RTF, SPF. 01487 M00S01253.qdump +++| 01488 M00S01254.qdump +++| 01489 M00S01255.qdump +++| CQD SUBR ENTRY/EXIT 01490 M00S01256.qdump +++| SX5 AIQF SET ATTACH INACTIVE FILES 01491 M00S01257.qdump +++| SA1 DSPB 01492 M00S01258.qdump +++| ZR X1,CQD2 IF DUMP INACTIVE 01493 M00S01259.qdump +++| SA1 T SET *QFM* PARAMETERS IN FET 01494 M00S01260.qdump +++| RJ SPF 01495 M00S01261.qdump +++| CQD1 SX5 AQFF SET ATTACH ACTIVE FILES 01496 M00S01262.qdump +++| 01497 M00S01263.qdump +++|* ATTACH QUEUE FILES THAT MEET ALL SPECIFICATIONS. 01498 M00S01264.qdump +++| 01499 M00S01265.qdump +++| CQD2 RJ AQF ATTACH FILE 01500 M00S01266.qdump +++| NG X5,CQD4 IF SKIP FILE 01501 M00S01267.qdump +++| NZ X5,CQD6 IF ERROR 01502 M00S01268.qdump +++| NZ X6,CQD5 IF END OF BUFFER 01503 M00S01269.qdump +++| 01504 M00S01270.qdump +++|* MOVE QUEUE FILE TO DUMP FILE. 01505 M00S01271.qdump +++| 01506 M00S01272.qdump +++| RJ CPF COPY FILE TO DUMP FILE 01507 M00S01273.qdump +++| NG X5,CQD4 IF SKIP FILE 01508 M00S01274.qdump +++| NZ X5,CQD6 IF ERROR 01509 M00S01275.qdump +++| RJ RTF RETURN FILE 01510 M00S01276.qdump +++| ZR X5,CQD3 IF NO ERROR 01511 M00S01277.qdump +++| SB6 TQEP SET ERROR TABLE ADDRESS 01512 M00S01278.qdump +++| RJ EPR PROCESS ERROR 01513 M00S01279.qdump +++| SA1 DSPB 01514 M00S01280.qdump +++| NZ X1,CQD3 IF DUMPING ACTIVE 01515 M00S01281.qdump +++| SA1 IGCT DECREMENT IGNORED COUNT 01516 M00S01282.qdump +++| SX6 X1-1 01517 M00S01283.qdump +++| SA6 A1 01518 M00S01284.qdump +++| 01519 M00S01285.qdump +++|* BUILD OUTPUT FILE. 01520 M00S01286.qdump +++| 01521 M00S01287.qdump +++| CQD3 SA1 DPCT INCREMENT DUMPED COUNT 01522 M00S01288.qdump +++| SX6 X1+B1 01523 M00S01289.qdump +++| SA6 A1 01524 M00S01290.qdump +++| SA1 CPFA SET ERROR CODE ADDRESS 01525 M00S01291.qdump +++| SX7 X1 01526 M00S01292.qdump +++| BX6 X5 SAVE ERROR STATUS 01527 M00S01293.qdump +++| SA6 CQDA 01528 M00S01294.qdump +++| RJ BOF BUILD OUTPUT FILE 01529 M00S01295.qdump +++| SA5 CQDA 01530 M00S01296.qdump +++| NG X5,CQD4 IF SKIP FILE 01531 M00S01297.qdump +++| NZ X5,CQD6 IF RETURN ERROR 01532 M00S01298.qdump +++| CQD4 SA1 DSPB 01533 M00S01299.qdump +++| NZ X1,CQD1 IF DUMP ACTIVE 01534 M00S01300.qdump +++| 01535 M00S01301.qdump +++|* CHECK FOR END OF FILES. 01536 M00S01302.qdump +++| 01537 M00S01303.qdump +++| CQD5 SX5 B0+ CLEAR ERROR FLAG 01538 M00S01304.qdump +++| SA3 PQFA 01539 M00S01305.qdump +++| NZ X3,CQDX IF MORE FILES TO PROCESS 01540 M00S01306.qdump +++| CQD6 SA1 DSPB 01541 M00S01307.qdump +++| NZ X1,CQDX IF DUMP ACTIVE 01542 M00S01308.qdump +++| 01543 M00S01309.qdump +++|* COUNT REMAINING FILES. 01544 M00S01310.qdump +++| 01545 M00S01311.qdump +++| SA2 PQFA 01546 M00S01312.qdump +++| ZR X2,CQDX IF ALL ENTRIES PROCESSED 01547 M00S01313.qdump +++| RJ CDI CHECK CURRENT IQFT 01548 M00S01314.qdump +++| EQ CQDX RETURN 01549 M00S01315.qdump +++| 01550 M00S01316.qdump +++| CQDA CON 0 RETURN QUEUED FILE ERROR STATUS
| Line S01317 Modification History | |
|---|---|
M01 (Removed by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 01551 M01S01317.qdump4 ---| CSS SPACE 4,20
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | qdump4 |
Seq # *Modification Id* Act ----------------------------+ 01552 M01S00029.qdump4 +++| CSI SPACE 4,20
| Line S01318 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01553 M01S01318.ns21000 ---|** CSS - COPY SYSTEM SECTOR TO DUMP FILE. 01554 M01S01319.ns21000 ---|* 01555 M01S01320.ns21000 ---|* COPY THE SYSTEM SECTOR FROM *SBUF* TO THE DUMP FILE.
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01556 M01S00018.ns21000 +++|** CSI - COPY SYSTEM INFORMATION TO DUMP FILE. 01557 M01S00019.ns21000 +++|* 01558 M01S00020.ns21000 +++|* COPY THE SYSTEM AND EOI SECTORS, ALONG WITH THE SYSTEM 01559 M01S00021.ns21000 +++|* INFORMATION CONTROL WORD, TO THE DUMP FILE. 01560 M00S01321.qdump +++|* 01561 M00S01322.qdump +++|* ENTRY (X0) = NUMBER OF WORDS CURRENTLY IN BUFFER.
| Line S01323 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01562 M01S01323.ns21000 ---|* (SYCW) = SYSTEM SECTOR CONTROL WORD.
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01563 M01S00022.ns21000 +++|* (SYCW) = SYSTEM INFORMATION CONTROL WORD. 01564 M00S01324.qdump +++|* 01565 M00S01325.qdump +++|* EXIT (X0) = NUMBER OF WORDS IN BUFFER. 01566 M00S01326.qdump +++|* 01567 M00S01327.qdump +++|* USES X - 0, 2, 5, 6, 7. 01568 M00S01328.qdump +++|* A - 2, 5, 6, 7. 01569 M00S01329.qdump +++|* 01570 M00S01330.qdump +++|* MACROS MOVE. 01571 M00S01331.qdump +++| 01572 M00S01332.qdump +++|
| Line S01333 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01573 M01S01333.ns21000 ---| CSS SUBR ENTRY/EXIT
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01574 M01S00023.ns21000 +++| CSI SUBR ENTRY/EXIT 01575 M00S01334.qdump +++| SX6 X0+B1 INDEX OF CONTROL WORD 01576 M00S01335.qdump +++| SX0 X6 01577 M00S01336.qdump +++| SA6 QCWI
| Line S01337 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01578 M01S01337.ns21000 ---| MOVE 100B,SBUF,WBUF+1+X0 01579 M01S01338.ns21000 ---| SA5 SYCW SYSTEM SECTOR CONTROL WORD 01580 M01S01339.ns21000 ---| SX0 X0+100B INCREMENT BUFFER WORD COUNT
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01581 M01S00024.ns21000 +++| MOVE SBUFL-1,SBUF,WBUF+1+X0 01582 M01S00025.ns21000 +++| SA5 SYCW GET SYSTEM INFORMATION CONTROL WORD 01583 M01S00026.ns21000 +++| SX0 X0+SBUFL-1 UPDATE BUFFER WORD COUNT 01584 M00S01340.qdump +++| SA2 QCWI INDEX FOR CONTROL WORD 01585 M00S01341.qdump +++| BX7 X5 01586 M00S01342.qdump +++| SA7 WBUF+X2
| Line S01343 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01587 M01S01343.ns21000 ---| EQ CSSX RETURN
| Line S00027 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01588 M01S00027.ns21000 +++| EQ CSIX RETURN 01589 M00S01344.qdump +++| CUF SPACE 4,20 01590 M00S01345.qdump +++|** CUF - CLEAN UP CURRENT FILE AFTER ERROR. 01591 M00S01346.qdump +++|* 01592 M00S01347.qdump +++|* INSURE THAT THE CURRENT FILE AND IQFT ENTRY, IF 01593 M00S01348.qdump +++|* NECESSARY, ARE REPLACED ON THE SOURCE DEVICE AFTER 01594 M00S01349.qdump +++|* AN ERROR HAS OCCURED.
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/qdump.txt · Last modified: by 127.0.0.1