cdc:nos2.source:opl.opl871:deck:qload
Deck QLOAD
Library Member Format: MODIFY
Listing Sections
- Deck QLOAD Start
- Deck QLOAD Part 1 (Line 1498)
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M00S00001.qload +++| IDENT QLOAD1,FWA,QLOAD,01,00 00002 M00S00002.qload +++| ABS 00003 M00S00003.qload +++| SST 00004 M00S00004.qload +++| SYSCOM B1 00005 M00S00005.qload +++| VR1$ SET 1 *COMSSSE* CONTAINS VERSION 1 EQUIVALENCES 00006 M00S00006.qload +++|*COMMENT QLOAD - QUEUE LOAD PROCESSOR.
| Line S00007 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00007 M01S00007.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1976.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00008 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00009 M00S00008.qload +++| TITLE QLOAD - QUEUE LOAD PROCESSOR. 00010 M00S00009.qload +++| SPACE 4 00011 M00S00010.qload +++|*** QLOAD - QUEUE LOAD PROCESSOR. 00012 M00S00011.qload +++|* 00013 M00S00012.qload +++|* S. L. BETH 76/02/23. 00014 M00S00013.qload +++| SPACE 4 00015 M00S00014.qload +++|*** *QLOAD* WILL PROCESS DUMP TAPES GENERATED BY *QDUMP* OR 00016 M00S00015.qload +++|* TAPES PRODUCED BY OTHER UTILITIES USING THE SAME FORMAT. 00017 M00S00016.qload +++|* QUEUES WILL BE SELECTIVELY LOADED UNDER THE GUIDANCE OF 00018 M00S00017.qload +++|* PARAMETER INPUT. *QLOAD* MAY ALSO BE USED TO LIST THE 00019 M00S00018.qload +++|* CONTENTS OF A DUMP TAPE WITHOUT LOADING ANY FILES. 00020 M00S00019.qload +++| SPACE 4
| Line S00020 Modification History | |
|---|---|
M01 (Removed by) | ns2127 |
Seq # *Modification Id* Act ----------------------------+ 00021 M01S00020.ns2127 ---|*** *QLOAD* MAY BE CALLED THROUGH *QFSP* OF BY CONTROL STATEMENT.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2127 |
Seq # *Modification Id* Act ----------------------------+ 00022 M01S00001.ns2127 +++|*** *QLOAD* MAY BE CALLED THROUGH *QFSP* OR BY CONTROL STATEMENT. 00023 M00S00021.qload +++|* THE FOLLOWING PARAMETERS ARE VALID. 00024 M00S00022.qload +++|* 00025 M00S00023.qload +++|* MI = MACHINE IDENTIFICATION. 00026 M00S00024.qload +++|* DF = DESTINATION FAMILY NAME (MUST BE ENTERED). 00027 M00S00025.qload +++|* FOR ACTIVE LOADS *DF* MAY BE SET TO *ALL*. 00028 M00S00026.qload +++|* FOR INACTIVE LOADS *DF* HAS TO BE A SPECIFIC FAMILY. 00029 M00S00027.qload +++|* DD = DESTINATION DEVICE NUMBER (REQUIRED IF *DF* NOT *ALL*). 00030 M00S00028.qload +++|* FU = FAMILY NAME FOR USER INDEX. 00031 M00S00029.qload +++|* UI = USER INDEX RANGE (0 - 377777B). 00032 M00S00030.qload +++|* DA = DATE RANGE (751112-751118) OR ALL (DA=ALL). 00033 M00S00031.qload +++|* FS = FILE SIZE RANGE IN PRUS/10B (0 - 777777B). 00034 M00S00032.qload +++|* JSN = JOB SEQUENCE NUMBER, UP TO FIVE MAY BE ENTERED.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00035 M01S00001.ns21000 +++|* LD = LOGICAL IDENTIFIER (3 ALPHANUMERIC CHARACTERS). 00036 M00S00033.qload +++|* ID = RANGE OF FILE ID-S TO PROCESS.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00037 M01S00001.ns22000 +++|* LA = LOWER SECURITY ACCESS LEVEL (1-7 CHARACTERS). 00038 M01S00002.ns22000 +++|* UA = UPPER SECURITY ACCESS LEVEL (1-7 CHARACTERS). 00039 M00S00034.qload +++|* I = ALTERNATE DIRECTIVE INPUT FILE. THIS IS A CONTROL 00040 M00S00035.qload +++|* STATEMENT PARAMETER SPECIFYING WHAT FILE SHOULD 00041 M00S00036.qload +++|* BE READ FOR INPUT DIRECTIVES. THESE DIRECTIVES 00042 M00S00037.qload +++|* CONSIST OF ANY VALID K-DISPLAY INPUT OR COMMANDS. 00043 M00S00038.qload +++|* THESE DIRECTIVES WILL BE PROCESSED AFTER THE 00044 M00S00039.qload +++|* CONTROL STATEMENT DIRECTIVES BUT BEFORE ANY 00045 M00S00040.qload +++|* K-DISPLAY INPUT IS ACCEPTED. 00046 M00S00041.qload +++|* L = OUTPUT FILE NAME. 00047 M00S00042.qload +++|* FN = LOAD FILE NAME. 00048 M00S00043.qload +++|* FC = FORMS CODE FOR OUTPUT FILES. 00049 M00S00044.qload +++|* TF = FAMILY FOR REMOTE BATCH TERMINAL. 00050 M00S00045.qload +++|* TUI = USER INDEX FOR REMOTE BATCH TERMINAL. 00051 M00S00046.qload +++|* TUI = XXXXXX-YYYYYY MEANS TO PROCESS ALL INDEXES IN 00052 M00S00047.qload +++|* THE RANGE XXXXXX TO YYYYYY. YYYYYY IS OPTIONAL. 00053 M00S00048.qload +++|* (0 - 377777B ALLOWED.) 00054 M00S00049.qload +++|* DS = DEVICE SELECTION CRITERIA FOR OUTPUT FILES. 00055 M00S00050.qload +++|* (DS=DV-EX) SELECTION BASED ON DEVICE CODES AND ON 00056 M00S00051.qload +++|* EXTERNAL CHARACTERISTICS. 00057 M00S00052.qload +++|* (DS=DV) SELECTION BASED ON DEVICE CODES ONLY. 00058 M00S00053.qload +++|* NF = NUMBER OF MEDIA FILES TO SKIP. 00059 M00S00054.qload +++|* SC = NUMBER OF QUEUED FILES TO SKIP. 00060 M00S00055.qload +++|* OP = OPTION, INACTIVE OR ACTIVE.
| Line S00056 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00061 M01S00056.ns22000 ---|* OT=DT, ORIGIN AND DISPOSITION TYPE SELECTION. 00062 M01S00057.ns22000 ---|* *OT* MAY BE ANY OF THE FOLLOWING.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00063 M01S00003.ns22000 +++|* DS=DT, FILE DESTINATION AND DISPOSTION TYPE SELECTION. 00064 M01S00004.ns22000 +++|* *DS* MAY BE ANY OF THE FOLLOWING. 00065 M00S00058.qload +++|* BC - SELECT LOCAL BATCH FILES BY DISPOSITION TYPE. 00066 M00S00059.qload +++|* RB - SELECT REMOTE BATCH FILES BY DISPOSITION TYPE.
| Line S00060 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00067 M01S00060.ns22000 ---|* SY - SELECT SYSTEM ORIGIN FILES BY DISPOSITION TYPE. 00068 M00S00061.qload ---|* *DT* MAY BE ANY OF THE FOLLOWING. 00069 M00S00062.qload ---|* IN - INPUT. 00070 M00S00063.qload ---|* PL - PLOT. 00071 M00S00064.qload ---|* PH - PUNCH. 00072 M00S00065.qload ---|* PR - ANY PRINTER. 00073 M00S00066.qload ---|* P2 - 512 PRINTER. 00074 M00S00067.qload ---|* LR - 580-12 PRINTER. 00075 M00S00068.qload ---|* LS - 580-16 PRINTER. 00076 M00S00069.qload ---|* LT - 580-20 PRINTER.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00077 M01S00001.241l630 +++|* LX - 5870 NON-IMPACT PRINTER. 00078 M01S00002.241l630 +++|* LY - 5970 NON-IMPACT PRINTER. 00079 M00S00070.qload +++|* PRINT - ALL PRINT TYPES. 00080 M00S00071.qload +++|* WT - WAIT QUEUE. 00081 M00S00072.qload +++|* ALL - ALL DISPOSITION TYPES. 00082 M00S00073.qload +++|* NONE - NO DISPOSITION TYPES ALLOWED. 00083 M00S00074.qload +++|* SF - INSTALLATION DEFINED TYPE. 00084 M00S00075.qload +++|* PO=X, PROCESSING OPTION. 00085 M00S00076.qload +++|* X MAY BE ANY COMBINATION OF THE FOLLOWING.
| Line S00077 Modification History | |
|---|---|
M01 (Removed by) | qload3 |
Seq # *Modification Id* Act ----------------------------+ 00086 M01S00077.qload3 ---|* E - ERRORED FILE PROCESSING. 00087 M01S00078.qload3 ---|* F - FAMILY ORDINAL TABLE PROCESSING. 00088 M01S00079.qload3 ---|* N - NO K-DISPLAY. 00089 M01S00080.qload3 ---|* R - REWIND LOAD FILE.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | qload3 |
Seq # *Modification Id* Act ----------------------------+ 00090 M01S00001.qload3 +++|* N - NO K-DISPLAY OPTION. 00091 M01S00002.qload3 +++|* R - REWIND LOAD FILE FLAG. 00092 M01S00003.qload3 +++|* E - ERRORED FILES PROCESSING FLAG. 00093 M01S00004.qload3 +++|* F - FAMILY ORDINAL TABLE PROCESSING FLAG. 00094 M01S00005.qload3 +++|* K - FORCE K-DISPLAY ON ERROR RETURN. 00095 M01S00006.qload3 +++|* L - LID TABLE PROCESSING FLAG.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2330 |
Seq # *Modification Id* Act ----------------------------+ 00096 M01S00001.ns2330 +++|* I - IF SPECIFIED, INACTIVE INPUT QUEUE FILES WILL BE 00097 M01S00002.ns2330 +++|* ACTIVATED WHEN THE OWNER FAMILY IS NOT PRESENT.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2490 |
Seq # *Modification Id* Act ----------------------------+ 00098 M01S00001.ns2490 +++|* U - IF SPECIFIED, UNCONDITIONALLY LOAD FILES WITHIN 00099 M01S00002.ns2490 +++|* SECURITY RESTRAINTS AND SYSTEM FILE INTEGRITY. 00100 M00S00081.qload +++|* 00101 M00S00082.qload +++|* DEFAULT VALUES. 00102 M00S00083.qload +++|* 00103 M00S00084.qload +++|* MI = CURRENT MACHINE VALUE. 00104 M00S00085.qload +++|* DF = ALL. 00105 M00S00086.qload +++|* DD = ALL. 00106 M00S00087.qload +++|* FU = 0. 00107 M00S00088.qload +++|* UI = 0 - 377777B. 00108 M00S00089.qload +++|* DA = LAST FIVE DAYS. 00109 M00S00090.qload +++|* FS = 0 - 777777B.
| Line S00091 Modification History | |
|---|---|
M01 (Removed by) | qload3 |
Seq # *Modification Id* Act ----------------------------+ 00110 M01S00091.qload3 ---|* JN = 0. 00111 M01S00092.qload3 ---|* ID = 0 - 77.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00112 M01S00002.ns21000 +++|* JSN = NOT SPECIFIED. 00113 M01S00003.ns21000 +++|* LD = NOT SPECIFIED.
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | qload3 |
Seq # *Modification Id* Act ----------------------------+ 00114 M01S00007.qload3 +++|* ID = 0 - 77.
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00115 M01S00005.ns22000 +++|* LA = NOT SPECIFIED. 00116 M01S00006.ns22000 +++|* UA = NOT SPECIFIED. 00117 M00S00093.qload +++|* I = NONE. 00118 M00S00094.qload +++|* L = OUTPUT. 00119 M00S00095.qload +++|* FN = QFILES. 00120 M00S00096.qload +++|* FC = NOT SPECIFIED. 00121 M00S00097.qload +++|* TID = 0. 00122 M00S00098.qload +++|* DS = NOT SPECIFIED. 00123 M00S00099.qload +++|* NF = 0. 00124 M00S00100.qload +++|* SC = 0. 00125 M00S00101.qload +++|* OP = A.
| Line S00102 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00126 M01S00102.ns22000 ---|* OT = ALL.
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00127 M01S00007.ns22000 +++|* DR = ALL.
| Line S00103 Modification History | |
|---|---|
M01 (Removed by) | qload3 |
Seq # *Modification Id* Act ----------------------------+ 00128 M01S00103.qload3 ---|* FT = ALL. 00129 M01S00104.qload3 ---|* R = NOT SELECTED. 00130 M01S00105.qload3 ---|* E = NOT SELECTED.
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | qload3 |
Seq # *Modification Id* Act ----------------------------+ 00131 M01S00008.qload3 +++|* DT = ALL. 00132 M01S00009.qload3 +++|* PO = NONE SELECTED. 00133 M00S00106.qload +++| SPACE 4 00134 M00S00107.qload +++|*** OPERATOR/DAYFILE MESSAGES. 00135 M00S00108.qload +++|* 00136 M00S00109.qload +++|* * ACTIVE LOAD NOT ALLOWED.* THE DEVICE SELECTED FOR 00137 M00S00110.qload +++|* THE ACTIVE LOAD IS REMOVABLE AND THE LOAD IS 00138 M00S00111.qload +++|* NOT ALLOWED. SELECT ANOTHER DEVICE AND RETRY THE LOAD. 00139 M00S00112.qload +++|* 00140 M00S00113.qload +++|* * CANNOT ATTACH *IQFT* FILE.* AN ATTEMPT TO ACCESS THE *IQFT* 00141 M00S00114.qload +++|* FILE ON THE DESTINATION DEVICE FAILED. CHECK FOR 00142 M00S00115.qload +++|* OTHER UTILITIES ACCESSING THE FILE. WHEN THE FILE 00143 M00S00116.qload +++|* IS FREE RETRY THE QLOAD OPERATION. 00144 M00S00117.qload +++|* 00145 M00S00118.qload +++|* * DESTINATION DEVICE ERROR.* AN UNRECOVERABLE ERROR OCCURED 00146 M00S00119.qload +++|* WHEN WRITING TO THE DESTINATION DEVICE. CHECK THE 00147 M00S00120.qload +++|* OUTPUT FILE FOR THE FILES THAT WERE PROCESSED. 00148 M00S00121.qload +++|* 00149 M00S00122.qload +++|* * DESTINATION DEVICE REQUIRED.* FOR AN INACTIVE LOAD THE 00150 M00S00123.qload +++|* (FAMILY AND DEVICE NUMBER) OR THE PACKNAM OF 00151 M00S00124.qload +++|* THE DESTINATION DEVICE MUST BE SPECIFIED.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
M02 (Removed by) | qload9 |
Seq # *Modification Id* Act ----------------------------+ 00152 M02S00001.qload9 ---|* 00153 M02S00002.qload9 ---|* * DSP RETURNED ERROR XXB.* 00154 M02S00003.qload9 ---|* *DSP* RETURNED ERROR CODE *XX*. CHECK OUTPUT TO 00155 M02S00004.qload9 ---|* DETERMINE WHICH FILES WERE NOT LOADED. 00156 M00S00125.qload ---|* 00157 M00S00126.qload ---|* * ERROR FILE LIMIT.* THE NUMBER OF ERROR FILES CREATED HAS 00158 M00S00127.qload ---|* EXCEEDED THE UPPER LIMIT OR AN URECOVERABLE ERROR 00159 M00S00128.qload ---|* OCCURED WHILE ATEMPTING TO CREATE THE ERROR FILE. 00160 M00S00129.qload ---|* CHECK THE OUTPUT FOR FILES PROCESSED. 00161 M00S00130.qload ---|* 00162 M00S00131.qload ---|* * FILE NAME CONFLICT.* THE NAMES OF THE OUTPUT, LOAD OR 00163 M00S00132.qload ---|* *IQFT* FILE CONFLICT. CHANGE THE NAME OF THE LOAD 00164 M00S00133.qload ---|* OR OUTPUT FILE AND RETRY THE OPERATION.
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00165 M01S00008.ns22000 +++|* 00166 M01S00009.ns22000 +++|* * FILE NOT ALLOWED ON EQUIPMENT.* 00167 M01S00010.ns22000 +++|* THE REQUESTED EQUIPMENT DID NOT HAVE THE REQUIRED 00168 M01S00011.ns22000 +++|* ACCESS LEVEL FOR THE QUEUED FILE. 00169 M00S00134.qload +++|* 00170 M00S00135.qload +++|* * FOT FULL - FILES IGNORED.* - SOME OF THE QUEUED FILES 00171 M00S00136.qload +++|* WERE NOT PROCESSED BECAUSE THERE WAS NO FOT ENTRY FOR 00172 M00S00137.qload +++|* THE CREATION AND/OR THE DESTINATION FAMILY AND THE 00173 M00S00138.qload +++|* FOT WAS FULL (MESSAGE ISSUED BY *COMCVQF*).
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00174 M01S00004.ns21000 +++|*
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00175 M01S00001.271l716 +++|* * INACTIVE LOAD NOT ALLOWED.* THE DEVICE SELECTED FOR 00176 M01S00002.271l716 +++|* THE INACTIVE LOAD IS REMOVABLE AND THE LOAD IS NOT 00177 M01S00003.271l716 +++|* ALLOWED. SELECT ANOTHER DEVICE AND RETRY THE LOAD. 00178 M01S00004.271l716 +++|* 00179 M01S00005.271l716 +++|* * IQFT NOT FOUND.* NO IQFT FILE WAS FOUND ON THE SELECTED 00180 M01S00006.271l716 +++|* DEVICE. THE DEVICE SHOULD BE INITIALIZED DUE TO THE 00181 M01S00007.271l716 +++|* INDETERMINATE STATE THAT IT IS IN. 00182 M01S00008.271l716 +++|* 00183 M01S00009.271l716 +++|* * LDLIST OPERATION COMPLETE.* INFORMATIVE MESSAGE. 00184 M01S00010.271l716 +++|*
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00185 M02S00005.v23l617 ---|* * LID TABLE FULL - FILES IGNORED.* SOME OF THE QUEUED FILES
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00186 M01S00001.v23l617 +++|* * LID NOT ADDED - FILES IGNORED.* SOME OF THE QUEUED FILES
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00187 M01S00006.ns21000 +++|* WERE NOT PROCESSED BECAUSE THERE WAS NO LID TABLE 00188 M01S00007.ns21000 +++|* ENTRY FOR THE LID ASSOCIATED WITH THE FILES AND THE
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00189 M02S00008.v23l617 ---|* LID COULD NOT BE ADDED BECAUSE THE LID TABLE WAS 00190 M02S00009.v23l617 ---|* FULL (MESSAGE ISSUED BY *COMCVQF*).
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00191 M01S00002.v23l617 +++|* LID COULD NOT BE ADDED BECAUSE ALL LID SLOTS FOR THE
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00192 M02S00003.271l716 ---|* HOST PID WERE ALREADY OCCUPIED BY OTHER LIDS.
| Line S00139 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00193 M01S00139.271l716 ---|* 00194 M01S00140.271l716 ---|* * LDLIST OPERATION COMPLETE.* INFORMATIVE MESSAGE.
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00195 M01S00011.271l716 +++|* HOST PID WERE ALREADY OCCUPIED BY OTHER LIDS 00196 M01S00012.271l716 +++|* (MESSAGE ISSUED BY *COMCVQF*).
| Line S00141 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00197 M01S00141.ns21000 ---|* 00198 M01S00142.ns21000 ---|* * *LFM* ERROR ON ERRNNN FILE.* DURING THE FILE RENAME , 00199 M01S00143.ns21000 ---|* LOCK AND COMMON SEQUENCE WHILE SAVING THE ERROR FILE 00200 M01S00144.ns21000 ---|* AN *LFM* ERROR OCCURED. RETRY THE LOAD OPERATION. 00201 M00S00145.qload ---|* 00202 M00S00146.qload ---|* * LOAD FILE MISPOSITIONED.* A FILE POSITION FUNCTION 00203 M00S00147.qload ---|* OR FILE READ INDICATED AN ATTEMPT TO POSITION 00204 M00S00148.qload ---|* BEYOND *EOI* OR THE CONTROL WORD READ WAS NOT 00205 M00S00149.qload ---|* THE EXPECTED CONTROL WORD. REWIND THE LOAD FILE 00206 M00S00150.qload ---|* AND RETRY THE OPERATION. 00207 M00S00151.qload ---|* 00208 M00S00152.qload ---|* * LOAD FILE POSITION LOST.* DURING THE WRITE ERROR RECOVERY 00209 M00S00153.qload ---|* SEQUENCE THE POSITION ON THE LOAD FILE WAS LOST. CHECK 00210 M00S00154.qload ---|* THE OUTPUT FILE FOR THE LIST OF FILES THAT WERE LOADED. 00211 M00S00155.qload ---|*
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00212 M01S00013.271l716 +++|* * LOAD RECORD FORMAT IN ERROR.* 00213 M01S00014.271l716 +++|* THE FILE DATA MAY NOT BE INTACT, SINCE A LOAD RECORD 00214 M01S00015.271l716 +++|* FORMAT ERROR WAS ENCOUNTERED WHEN THE FILE WAS LOADED. 00215 M01S00016.271l716 +++|* THE FILE IS SKIPPED, UNLESS ERROR PROCESSING IS 00216 M01S00017.271l716 +++|* SELECTED. 00217 M01S00018.271l716 +++|* 00218 M01S00019.271l716 +++|* * MASS STORAGE ERROR DURING DUMP.* 00219 M01S00020.271l716 +++|* THE FILE DATA MAY NOT BE INTACT, SINCE A MASS STORAGE 00220 M01S00021.271l716 +++|* ERROR WAS ENCOUNTERED WHEN THE FILE WAS DUMPED. 00221 M01S00022.271l716 +++|* THE FILE IS SKIPPED, UNLESS ERROR PROCESSING IS 00222 M01S00023.271l716 +++|* SELECTED. 00223 M01S00024.271l716 +++|* 00224 M00S00156.qload +++|* * NO OUTPUT FILE PRESENT.* THE OUT COMMAND WAS ENTERED
| Line S00157 Modification History | |
|---|---|
M01 (Removed by) | qload3 |
Seq # *Modification Id* Act ----------------------------+ 00225 M01S00157.qload3 ---|* ANY *QLOAD* COULD NOT FIND AND OUTPUT FILE TO RELEASE.
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | qload3 |
Seq # *Modification Id* Act ----------------------------+ 00226 M01S00010.qload3 +++|* AND *QLOAD* COULD NOT FIND AN OUTPUT FILE TO RELEASE. 00227 M00S00158.qload +++|* 00228 M00S00159.qload +++|* * OUTPUT FILE RELEASED.* INFORMATIVE MESSAGE. 00229 M00S00160.qload +++|* 00230 M00S00161.qload +++|* * PREMATURE *EOF* ENCOUNTERED.* WHILE PROCESSING THE LOAD 00231 M00S00162.qload +++|* FILE AN *EOF* WAS ENCOUNTERED BEFORE IT WAS EXPECTED. 00232 M00S00163.qload +++|* NOTIFY ANALYST TO INVESTIGATE THE FORMAT OF THE 00233 M00S00164.qload +++|* LOAD TAPE. 00234 M00S00165.qload +++|* 00235 M00S00166.qload +++|* * QFT LIMIT ON LOAD.* THE CALCULATED QFT THRESHOLD HAS 00236 M00S00167.qload +++|* BEEN REACHED. CONSULT LISTING TO DETERMINE WHICH 00237 M00S00168.qload +++|* FILES WERE NOT LOADED. 00238 M00S00169.qload +++|* 00239 M00S00170.qload +++|* * QFT FULL DETECTED BY QFM.* *QFM* RETURNED QFT FULL 00240 M00S00171.qload +++|* STATUS WHEN CALLED TO ASSIGN A FILE TO MASS 00241 M00S00172.qload +++|* STORAGE. CHECK THE OUTPUT TO DETERMINE WHICH FILES 00242 M00S00173.qload +++|* WERE NOT PROCESSED.
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00243 M01S00010.ns21000 +++|* 00244 M01S00011.ns21000 +++|* * *QFM* ERROR ON ERRNNN FILE.* *QFM* RETURNED AN ERROR 00245 M01S00012.ns21000 +++|* (OTHER THAN DUPLICATE FILE NAME) WHEN CALLED TO 00246 M01S00013.ns21000 +++|* CONVERT THE FILE TO A COMMON FILE AFTER AN ERROR. 00247 M01S00014.ns21000 +++|* CHECK THE OUTPUT TO DETERMINE WHICH FILES WERE 00248 M01S00015.ns21000 +++|* PROCESSED. 00249 M00S00174.qload +++|* 00250 M00S00175.qload +++|* * QLOAD ABORTED.* THE OPERATOR DROPPED THE JOB OR THE 00251 M00S00176.qload +++|* JOB WAS ABORTED FOR A SYSTEM ERROR. IF NOT 00252 M00S00177.qload +++|* OPERATOR DROP CHECK DAYFILE FOR CAUSE. 00253 M00S00178.qload +++|* 00254 M00S00179.qload +++|* * QLOAD OPERATION COMPLETE.* INFORMATIVE MESSAGE. 00255 M00S00180.qload +++|* 00256 M00S00181.qload +++|* * QLOAD TERMINATED.* QLOAD HAD ABORTED AND THE ABORT 00257 M00S00182.qload +++|* PROCESSING WAS TERMINATED BY THE OPERATOR OR DUE 00258 M00S00183.qload +++|* TO A SYSTEM ERROR. CHECK THE DAYFILE FOR CAUSE. 00259 M00S00184.qload +++|* 00260 M00S00185.qload +++|* * QUEUE FILE ASSIGN ERROR.* AN ATTEMPT TO FORCE A DEVICE 00261 M00S00186.qload +++|* ASSIGNMENT FOR THE QUEUE FILE BEING LOADED RESULTED 00262 M00S00187.qload +++|* IN THE DEVICE BEING ASSIGNED TO THE WRONG EQUIPMENT.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2099 |
Seq # *Modification Id* Act ----------------------------+ 00263 M01S00001.ns2099 +++|*
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2099 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00264 M02S00002.271l716 ---|* * IQFT NOT FOUND.* NO IQFT FILE WAS FOUND ON THE SELECTED 00265 M02S00003.271l716 ---|* DEVICE. THE DEVICE SHOULD BE INITIALIZED DUE TO THE 00266 M02S00004.271l716 ---|* INDETERMINATE STATE THAT IT IS IN.
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00267 M01S00025.271l716 +++|* * READ PARITY ERROR ON LOAD FILE.* 00268 M01S00026.271l716 +++|* THE FILE DATA MAY NOT BE INTACT, SINCE A READ PARITY 00269 M01S00027.271l716 +++|* ERROR WAS ENCOUNTERED WHEN THE FILE WAS LOADED. THE 00270 M01S00028.271l716 +++|* FILE IS SKIPPED, UNLESS ERROR PROCESSING IS SELECTED.
| Line S00188 Modification History | |
|---|---|
M01 (Removed by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 00271 M01S00188.qload1 ---|* 00272 M01S00189.qload1 ---|* * UNKNOWN VER.1 SYSTEM SECTOR TYPE.* AN ATTEMPT WAS MADE 00273 M01S00190.qload1 ---|* TO LOAD A VERSION ONE QUEUE FILE THAT WAS NOT INPUT, 00274 M01S00191.qload1 ---|* PRINT, OR PUNCH. 00275 M01S00192.qload1 ---|* 00276 M01S00193.qload1 ---|* * UNKNOWN VER.1 QUEUE PRIORITY. * AN ATTEMPT WAS MADE 00277 M01S00194.qload1 ---|* TO LOAD A VERSION ONE INPUT FILE WITH AN UNKNOWN 00278 M01S00195.qload1 ---|* PRIORITY. 00279 M00S00196.qload ---| SPACE 4 00280 M00S00197.qload ---|** MESSAGES ISSUED TO DAYFILE ONLY. 00281 M00S00198.qload ---|* 00282 M00S00199.qload ---|* 00283 M00S00200.qload ---|* * QLOAD - NNNN FILES IGNORED.* 00284 M00S00201.qload ---|* 00285 M00S00202.qload ---|* * QLOAD - NNNN ACTIVE FILES LOADED.* 00286 M00S00203.qload ---|* 00287 M00S00204.qload ---|* * QLOAD - NNNN INACTIVE FILES LOADED.* 00288 M00S00205.qload ---|* 00289 M00S00206.qload ---|* * QLOAD - NNNN FILES LISTED.* 00290 M00S00207.qload ---|* 00291 M00S00208.qload ---|* * QLOAD - NNNN ERRXXX FILES CREATED.* 00292 M00S00209.qload ---|* 00293 M00S00210.qload ---|* *** PROCESSING DUMP FILE. *** 00294 M00S00211.qload ---|* DUMPNAM DATE,TIME. 00295 M00S00212.qload ---|* 00296 M00S00213.qload ---|* THE TWO LINES IDENTIFYING THE DUMP TAPE BEING PROCCESSED 00297 M00S00214.qload ---|* WILL BE ISSUED WHEN THE DUMP HEADER FIELD IS ENCOUNTERED. 00298 M00S00215.qload ---|* THE FILE POSITIONING REQUESTS MAY POSITION THE FILE BEYOND 00299 M00S00216.qload ---|* THIS POINT IN WHICH CASE THE MESSAGE WILL NOT BE ISSUED. 00300 M00S00217.qload ---| SPACE 4 00301 M00S00218.qload ---|** COMMON DECKS (DEFINITIONS). 00302 M00S00219.qload ---| 00303 M00S00220.qload ---| 00304 M00S00221.qload ---|*CALL COMCMAC 00305 M00S00222.qload ---|*CALL COMCCMD 00306 M00S00223.qload ---| LIST X 00307 M00S00224.qload ---|*CALL COMSIOQ 00308 M00S00225.qload ---|*CALL COMSJIO 00309 M00S00226.qload ---|*CALL COMSQFS
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00310 M01S00016.ns21000 +++|*CALL COMSSFM 00311 M00S00227.qload +++| LIST -X
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00312 M01S00012.ns22000 +++|*CALL COMSMLS
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00313 M01S00004.v23l617 +++|*CALL COMSMSC
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2217 |
Seq # *Modification Id* Act ----------------------------+ 00314 M02S00013.ns2217 ---|*CALL COMSSCD 00315 M00S00228.qload ---|*CALL COMSSSE 00316 M00S00229.qload ---|*CALL COMSSSJ 00317 M00S00230.qload ---| QUAL COMS1DS
| Line S00231 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00318 M01S00231.v23l617 ---|*CALL COMS1DS 00319 M00S00232.qload ---| QUAL * 00320 M00S00233.qload ---|*CALL COMSDSP
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2217 |
Seq # *Modification Id* Act ----------------------------+ 00321 M01S00001.ns2217 +++| SCLASS SPACE 4,15 00322 M01S00002.ns2217 +++|** SCLASS - DEFINE SERVICE CLASS TABLE. 00323 M01S00003.ns2217 +++|* 00324 M01S00004.ns2217 +++|* SCLASS NM,MN,DF,ST,TX 00325 M01S00005.ns2217 +++|* 00326 M01S00006.ns2217 +++|* ENTRY *NM* = SERVICE CLASS NAME. 00327 M01S00007.ns2217 +++|* *MN* = TWO CHARACTER MNEMONIC. 00328 M01S00008.ns2217 +++|* *DF* = DAYFILE MESSAGE CHARACTER. 00329 M01S00009.ns2217 +++|* *ST* = SHORT TEXT FOR *QFTLIST*. 00330 M01S00010.ns2217 +++|* *TX* = TEXT OF SERVICE CLASS NAME FOR BANNER PAGE. 00331 M01S00011.ns2217 +++|* 00332 M01S00012.ns2217 +++|* NOTE - THE CALL TO *COMSSCD* MUST FOLLOW THE DEFINITION OF 00333 M01S00013.ns2217 +++|* THIS MACRO. 00334 M01S00014.ns2217 +++| 00335 M01S00015.ns2217 +++| 00336 M01S00016.ns2217 +++| PURGMAC SCLASS 00337 M01S00017.ns2217 +++| 00338 M01S00018.ns2217 +++| SCLASS MACRO NM,MN,DF,ST,TX 00339 M01S00019.ns2217 +++| .SCL RMT 00340 M01S00020.ns2217 +++| NM VFD 48/0,12/2R_MN TX 00341 M01S00021.ns2217 +++| .SCL RMT 00342 M01S00022.ns2217 +++| SCLASS ENDM 00343 M01S00023.ns2217 +++| 00344 M01S00024.ns2217 +++| 00345 M01S00025.ns2217 +++| SCL$ EQU 0 ONLY PROCESS CLASSES WITH JCB-S 00346 M01S00026.ns2217 +++|*CALL COMSSCD 00347 M00S00234.qload +++| EJECT 00348 M00S00235.qload +++| TITLE QLOAD - CONSTANTS, COUNTERS, FETS, TABLES. 00349 M00S00236.qload +++|* CONSTANTS. 00350 M00S00237.qload +++| 00351 M00S00238.qload +++| 00352 M00S00239.qload +++| BUFL EQU 1001B OUTPUT BUFFER LENGTH 00353 M00S00240.qload +++| IBUFL EQU 1001B *IQFT* BUFFER LENGTH 00354 M00S00241.qload +++| SBUFL EQU 2041B SCRATCH BUFFER LENGTH
| Line S00242 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00355 M01S00242.ns21000 ---| SSBFL EQU 100B SYSTEM SECTOR BUFFER LENGTH
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00356 M01S00017.ns21000 +++| SSBFL EQU 200B SYSTEM INFORMATION BUFFER LENGTH
| Line S00243 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00357 M01S00243.274l797 ---| TBUFL EQU 4011B TAPE BUFFER LENGTH
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00358 M01S00001.274l797 +++| TBUFL EQU 20041B TAPE BUFFER LENGTH 00359 M00S00244.qload +++| WBUFL EQU 102B LENGTH OF WORKING BUFFER
| Line S00245 Modification History | |
|---|---|
M01 (Removed by) | ns2127 |
Seq # *Modification Id* Act ----------------------------+ 00360 M01S00245.ns2127 ---| FRDC EQU 20B *DSP* DISPOSITION CODE FLAG 00361 M00S00246.qload ---| TACF EQU FOTA TABLE OF ACTIVE CREATION FAMILIES (*VIE*)
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00362 M01S00014.ns22000 +++| LINE EQU TPPA+PPLN LINE NUMBER 00363 M01S00015.ns22000 +++| PDFE EQU TPPA+PPPD PRINT DENSITY FORMAT EFFECTOR 00364 M00S00247.qload +++| SPACE 4 00365 M00S00248.qload +++|* INDICATORS AND COUNTERS. 00366 M00S00249.qload +++| 00367 M00S00250.qload +++| 00368 M00S00251.qload +++| ORG OVLA 00369 M00S00252.qload +++| FWA BSS 0 00370 M00S00253.qload +++| ABTE CON 0 ABORT AT END OF LIST FLAG 00371 M00S00254.qload +++| ABTI CON 0 ABORT PROCESSING, 0 = SKIP FILE 00372 M01S00016.ns22000 +++| ALEF CON 0 ACCESS LEVEL ERROR FLAG 00373 M00S00255.qload +++| DEVN CON 0 FAMILY/DEVICE NUMBER 00374 M00S00256.qload +++| DSPC CON 0 FILE DISPOSITION CODE 00375 M00S00257.qload +++| DWIQ CON 0 NON ZERO IF DATA WRITTEN ON *IQFT* FILE 00376 M00S00258.qload +++| EOR CON 0 NON ZERO IF *EOR* ENCOUNTERED 00377 M00S00259.qload +++| ERRF CON 0 NON ZERO IF ERROR IN CURRENT FILE 00378 M00S00260.qload +++| ERTP CON 0 FILE ERROR TYPE 00379 M00S00261.qload +++| FILE CON 0 QUEUE FILE COUNT
| Line S00262 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00380 M01S00262.ns22000 ---| LINE CON 0 LINE NUMBER FOR OUTPUT 00381 M00S00263.qload ---| LIST CON 0 NON ZERO IF LIST OPTION 00382 M00S00264.qload ---| TRMM CON 0 ADDRESS OF TERMINATION MESSAGE 00383 M00S00265.qload ---| QLIM CON 0 QFT LIMIT FOR ACTIVE LOAD 00384 M01S00266.ns22000 ---| QUTP CON 0 QUEUE TYPE 00385 M00S00267.qload ---| 00386 M00S00268.qload ---|* CONTROL WORD POINTERS AND COPY CONTROLS. 00387 M00S00269.qload ---| 00388 M00S00270.qload ---| ASSF CON 0 INDICATES THE FILE IS ASSIGNED TO DISK 00389 M00S00271.qload ---| CQCW CON 0 CURRENT QUEUE CONTROL WORD 00390 M00S00272.qload ---| CTCW CON 0 CURRENT TAPE CONTROL WORD 00391 M00S00273.qload ---| CTLO CON 0 BUFFER LOCATION OF CURRENT CONTROL WORD 00392 M00S00274.qload ---| LEVL CON 0 RECORD LEVEL NUMBER 00393 M00S00275.qload ---| NTCW CON 0 WORDS TO NEXT TAPE CONTROL WORD 00394 M00S00276.qload ---| NQCW CON 0 WORD TO NEXT QUEUE CONTROL WORD 00395 M00S00277.qload ---| WDSX CON 0 WORDS IN TRANSFER BUFFER 00396 M00S00278.qload ---| SPACE 4 00397 M00S00279.qload ---|* FILE DISPOSITION COUNTS AND ERROR FILE COUNT. 00398 M00S00280.qload ---| 00399 M00S00281.qload ---| 00400 M00S00282.qload ---| FLDS BSSZ 4 00401 M00S00283.qload ---| EFCT CON 0 ERROR FILE COUNT 00402 M00S00284.qload ---| FLDSL EQU *-FLDS 00403 M00S00285.qload ---| SPACE 4 00404 M00S00286.qload ---|* IQFT ENTRY FOR CURRENT LOAD FILE. 00405 M00S00287.qload ---| 00406 M00S00288.qload ---| 00407 M00S00289.qload ---| IQFE BSS QFEWL 00408 M00S00290.qload ---| OLDN BSS 1 OLD QUEUE FILE NAME 00409 M00S00291.qload ---| SPACE 4 00410 M00S00292.qload ---|* ROUTE PARAMETER BLOCK. 00411 M00S00293.qload ---| 00412 M00S00294.qload ---| 00413 M01S00295.ns22000 ---| ROTB BSS 6 00414 M01S00296.ns22000 ---| ROTBL EQU *-ROTB
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2127 |
Seq # *Modification Id* Act ----------------------------+ 00415 M02S00017.ns2127 ---| ROTB BSS EPBL
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2127 |
Seq # *Modification Id* Act ----------------------------+ 00416 M01S00002.ns2127 +++| ROTB BSSZ EPBL 00417 M00S00297.qload +++| SPACE 4 00418 M00S00298.qload +++|* FETS. 00419 M00S00299.qload +++| 00420 M00S00300.qload +++| 00421 M00S00301.qload +++| IQ BSS 0 00422 M00S00302.qload +++| NIQ BSS 0 IQFT FILE 00423 M00S00303.qload +++| "RFIQ" RFILEB IBUF,IBUFL,EPR,(FET=8) 00424 M00S00304.qload +++| 00425 M00S00305.qload +++| 00426 M00S00306.qload +++| O BSS 0 OUTPUT FILE 00427 M00S00307.qload +++| OUTPUT FILEB OBUF,BUFL,(FET=7) 00428 M00S00308.qload +++| 00429 M00S00309.qload +++| 00430 M00S00310.qload +++| S BSS 0 SCRATCH FILE 00431 M00S00311.qload +++| "RFSC" FILEB SBUF,SBUFL,EPR,(FET=8) 00432 M00S00312.qload +++| 00433 M00S00313.qload +++| 00434 M00S00314.qload +++| T BSS 0 LOAD FILE 00435 M00S00315.qload +++| TAPE FILEB TBUF,TBUFL,EPR,LBL 00436 M00S00316.qload +++| BSS 1 00437 M00S00317.qload +++| 00438 M00S00318.qload +++| 00439 M00S00319.qload +++| Q BSS 0 *FET* FOR *QFM* CALLS 00440 M00S00320.qload +++| QCALLS FILEB IQFE,QFEWL+1,(FET=8) 00441 M00S00321.qload +++|
| Line S00322 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00442 M01S00322.ns21000 ---| C BSS 0 SYSTEM SECTOR FOR *CQFF* *QFM* FUNCTION
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00443 M01S00018.ns21000 +++| C BSS 0 SYSTEM INFORMATION (SYSTEM/EOI SECTORS) 00444 M00S00323.qload +++| CFILE FILEB SSBF,SSBFL+1,(FET=8) 00445 M00S00324.qload +++| SPACE 4 00446 M00S00325.qload +++|** TRANSFER TABLES. 00447 M00S00326.qload +++|* 00448 M00S00327.qload +++|* THE FOLLOWING TABLES ARE USED BY ROUTINE *PTT* (CALLED BY 00449 M00S00328.qload +++|* *RSS*) TO TRANSFER NOS VERSION ONE SYSTEM SECTOR FIELDS TO 00450 M00S00329.qload +++|* THEIR PROPER PLACE IN A NOS VERSION TWO SYSTEM SECTOR. THE 00451 M00S00330.qload +++|* THREE TABLES ARE *INTB* WHICH CONTAINS INPUT DEPENDENT 00452 M00S00331.qload +++|* SYSTEM SECTOR TRANSFER DATA, *OTTB*, WHICH CONTAINS 00453 M00S00332.qload +++|* OUTPUT DEPENDENT SYSTEM SECTOR TRANSFER DATA, AND *IOTB* 00454 M00S00333.qload +++|* WHICH CONTAINS TRANSFER DATA THAT IS FOR BOTH INPUT AND 00455 M00S00334.qload +++|* OUTPUT SYSTEM SECTORS. TABLES END WITH A ZERO WORD. 00456 M00S00335.qload +++|* 00457 M00S00336.qload +++|*T 12/0, 12/DFM, 12/DAD, 12/SFM, 12/SAD.
Figure
00458 M00S00337.qload +++|* 00459 M00S00338.qload +++|* DFM = DESTINATION FIELD MASK, NUMBER OF BITS IN FIELD. 00460 M00S00339.qload +++|* DAD = DESTINATION ADDRESS FROM *COMSSSE*. 00461 M00S00340.qload +++|* SFM = SOURCE FIELD MASK, NUMBER OF BITS IN FIELD. 00462 M00S00341.qload +++|* SAD = SOURCE ADDRESS FROM *COMSSSE*. 00463 M00S00342.qload +++| 00464 M00S00343.qload +++| OTTB VFD 12/0,12/24,12/RASS,12/24,12//NOSV1/RASS 00465 M00S00344.qload +++| VFD 12/0,12/12,12/LCSS,12/12,12//NOSV1/LCSS 00466 M00S00345.qload +++| VFD 12/0,12/12,12/RCSS,12/12,12//NOSV1/RCSS 00467 M00S00346.qload +++| VFD 12/0,12/24,12/RTSS,12/24,12//NOSV1/RTSS 00468 M00S00347.qload +++| VFD 12/0,12/12,12/SCSS,12/12,12//NOSV1/SCSS 00469 M00S00348.qload +++| VFD 12/0,12/12,12/RBSS,12/12,12//NOSV1/RBSS 00470 M00S00349.qload +++| VFD 12/0,12/12,12/IOSS+19,12/12,12//NOSV1/FCSS 00471 M00S00350.qload +++| VFD 60/0 00472 M00S00351.qload +++| 00473 M00S00352.qload +++| INTB VFD 12/0,12/12,12/JCSS,12/12,12//NOSV1/JCSS 00474 M00S00353.qload +++| VFD 12/0,12/12,12/JESS,12/12,12//NOSV1/JESS 00475 M00S00354.qload +++| VFD 12/0,12/24,12/CRSS,12/24,12//NOSV1/CRSS 00476 M00S00355.qload +++| VFD 12/0,12/48,12/TNSS,12/48,12//NOSV1/TNSS 00477 M00S00356.qload +++| VFD 60/0 00478 M00S00357.qload +++| 00479 M00S00358.qload +++| IOTB VFD 12/0,12/12,12/EQSS,12/12,12//NOSV1/EQSS 00480 M00S00359.qload +++| VFD 12/0,12/12,12/FTSS,12/12,12//NOSV1/FTSS 00481 M00S00360.qload +++| VFD 12/0,12/12,12/NSSS,12/12,12//NOSV1/NSSS 00482 M00S00361.qload +++| VFD 12/0,12/60,12/DTSS,12/60,12//NOSV1/DTSS 00483 M00S00362.qload +++| VFD 12/0,12/12,12/FGSS,12/12,12//NOSV1/FRSS+4 00484 M00S00363.qload +++| VFD 12/0,12/12,12/RMSS,12/12,12//NOSV1/QFSS 00485 M00S00364.qload +++| VFD 12/0,12/12,12/CMSS,12/12,12//NOSV1/MISS 00486 M00S00365.qload +++| VFD 12/0,12/60,12/DASS,12/60,12//NOSV1/DASS 00487 M00S00366.qload +++| VFD 12/0,12/48,12/FDSS,12/48,12//NOSV1/FDSS 00488 M00S00367.qload +++| VFD 12/0,12/60,12/ACSS,12/60,12//NOSV1/ACSS 00489 M00S00368.qload +++| VFD 12/0,12/60,12/OASS,12/60,12//NOSV1/ACSS 00490 M00S00369.qload +++| VFD 12/0,12/12,12/DCSS,12/12,12//NOSV1/DVSS 00491 M00S00370.qload +++| VFD 12/0,12/36,12/CDSS+2,12/36,12//NOSV1/CDSS+2 00492 M00S00371.qload +++| VFD 12/0,12/60,12/JNSS,12/60,12//NOSV1/JNSS 00493 M00S00372.qload +++| VFD 12/0,12/48,12/FMSS,12/48,12//NOSV1/FMSS 00494 M00S00373.qload +++| VFD 12/0,12/48,12/FOSS,12/48,12//NOSV1/FMSS 00495 M00S00374.qload +++| VFD 12/0,12/12,12/IOSS+5,12/12,12//NOSV1/EQSS 00496 M00S00375.qload +++| VFD 12/0,12/12,12/IOSS+6,12/12,12//NOSV1/FTSS 00497 M00S00376.qload +++| VFD 12/0,12/24,12/IOSS+16,12/24,12//NOSV1/DISS 00498 M00S00377.qload +++| VFD 12/0,12/12,12/IOSS+17,12/12,12//NOSV1/DISS+1 00499 M00S00378.qload +++| VFD 60/0 00500 M00S00379.qload +++| TITLE MAIN LOOP. 00501 M00S00380.qload +++|** QLOAD - MAIN LOOP. 00502 M00S00381.qload +++|* 00503 M00S00382.qload +++|* ENTRY PARAMETERS PROCESSED BY *QFSP*. 00504 M00S00383.qload +++|* 00505 M00S00384.qload +++|* EXIT (X2) = K-DISPLAY CONTROL. 00506 M00S00385.qload +++|* (X5) = TERMINATING MESSAGE. 00507 M00S00386.qload +++| 00508 M00S00387.qload +++| 00509 M00S00388.qload +++| QLOAD SUBR ENTRY/EXIT 00510 M00S00389.qload +++| RJ PRS PRESET FILES 00511 M00S00390.qload +++| NZ B7,ERR IF ERROR IN PARAMETERS 00512 M00S00391.qload +++| SA5 TARA+ARFC SET FUNCTION 00513 M00S00392.qload +++| SX5 X5-3 CHECK FOR OUT 00514 M00S00393.qload +++| ZR X5,OUT IF OUT REQUEST 00515 M00S00394.qload +++| RJ PLF POSITION LOAD FILE 00516 M00S00395.qload +++| NZ B7,ERR IF PROCESSING ERROR
| Line S00396 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00517 M01S00396.ns22000 ---| QDL1 RJ GNF GET NEXT LOAD FILE
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00518 M01S00018.ns22000 +++| QDL1 SX6 B0+ CLEAR ACCESS LEVEL ERROR FLAG 00519 M01S00019.ns22000 +++| SA6 ALEF 00520 M01S00020.ns22000 +++| RJ GNF GET NEXT LOAD FILE 00521 M00S00397.qload +++| NZ B7,ERR IF PROCESSING ERROR 00522 M00S00398.qload +++| MI X1,QDL4 IF *EOF* ENCOUNTERED
| Line S00399 Modification History | |
|---|---|
M01 (Removed by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 00523 M01S00399.qload1 ---| NG X4,QDL2 IF 5.5 (RHF) FILE TO BE SKIPPED
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 00524 M01S00001.qload1 +++| NZ X4,QDL2 IF VERSION ONE FILE TO SKIP 00525 M00S00400.qload +++| RJ BIE BUILD *IQFT* ENTRY 00526 M00S00401.qload +++| RJ CFS CHECK FILE SELECTION 00527 M00S00402.qload +++| SA4 ERRF CHECK FOR ERROR SKIP 00528 M00S00403.qload +++| IX6 X1+X4 00529 M00S00404.qload +++| NZ X6,QDL2 IF SKIP OR LIST 00530 M00S00405.qload +++| 00531 M00S00406.qload +++|* LOAD THE QUEUE FILE. 00532 M00S00407.qload +++| 00533 M00S00408.qload +++| RJ CPY COPY THE FILE
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00534 M01S00021.ns22000 +++| SA1 ALEF 00535 M01S00022.ns22000 +++| NZ X1,QDL1.1 IF ACCESS LEVEL ERROR 00536 M00S00409.qload +++| NZ B7,ERR IF ERROR IN COPY 00537 M00S00410.qload +++| RJ DSP DISPOSE THE FILE 00538 M00S00411.qload +++| RJ WIQ WRITE *IQFT* ENTRY 00539 M00S00412.qload +++| EQ QDL3 WRITE OUTPUT DATA 00540 M00S00413.qload +++| 00541 M00S00414.qload +++|* SKIP QUEUED FILE. 00542 M00S00415.qload +++| 00543 M01S00023.ns22000 +++| QDL1.1 SX1 X1-1 00544 M01S00024.ns22000 +++| NZ X1,QDL3 IF NO SKIP NEEDED 00545 M00S00416.qload +++| QDL2 RJ SQF SKIP QUEUED FILE 00546 M00S00417.qload +++| NZ B7,ERR IF PROCESSING ERROR 00547 M00S00418.qload +++| QDL3 RJ WOL WRITE OUTPUT LINE 00548 M00S00419.qload +++| EQ QDL1 LOOP 00549 M00S00420.qload +++| 00550 M00S00421.qload +++| QDL4 RJ CIQ CLOSE *IQFT* FILE 00551 M00S00422.qload +++| RJ ISM ISSUE FILES PROCESSED MESSAGE 00552 M00S00423.qload +++| SA1 ABTE 00553 M00S00424.qload +++| NZ X1,TRM IF ABORT AT END OF LIST SET
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | qload4 |
Seq # *Modification Id* Act ----------------------------+ 00554 M02S00019.qload4 ---| WRITER O FLUSH OUTPUT BUFFER 00555 M00S00425.qload ---| SA5 TRMM LOAD ADDRESS OF TERMINATION MESSAGE 00556 M00S00426.qload ---| MESSAGE X5 00557 M00S00427.qload ---| BX2 X2-X2 SET PRIMARY RIGHT SCREEN 00558 M00S00428.qload ---| JP QLOADX RETURN TO *QFSP* 00559 M00S00429.qload ---| SPACE 4 00560 M00S00430.qload ---|** ABORT PROCESSING. 00561 M00S00431.qload ---| 00562 M00S00432.qload ---| 00563 M00S00433.qload ---| ABT RJ CIQ CLOSE THE *IQFT* FILE 00564 M00S00434.qload ---| RECALL S 00565 M00S00435.qload ---| RETURN S 00566 M00S00436.qload ---| SX6 MES2 * QLOAD ABORTED.* 00567 M00S00437.qload ---| SA6 TRMM 00568 M00S00438.qload ---| MESSAGE X6 00569 M00S00439.qload ---| SX7 LSDP SET TO LIST REMAINING FILES 00570 M00S00440.qload ---| SA7 DSPC 00571 M00S00441.qload ---| SA7 LIST 00572 M00S00442.qload ---| SA1 TARA+ARFC 00573 M00S00443.qload ---| PL X1,ABT1 IF K-DISPLAY SELECTED 00574 M00S00444.qload ---| SX6 B1+ SET ABORT AT END OF LIST 00575 M00S00445.qload ---| SA6 ABTE 00576 M00S00446.qload ---| ABT1 EREXIT TRM SET NEW ABORT ADDRESS 00577 M00S00447.qload ---| SA5 ABTI CHECK ABORT PROCESSING 00578 M00S00448.qload ---| ZR X5,QDL2 IF FILE TO BE SKIPPED 00579 M00S00449.qload ---| BX7 X7-X7 CLEAR ABORT PROCESSING 00580 M00S00450.qload ---| SA7 A5 00581 M00S00451.qload ---| JP QDL3 LIST REMAINING FILES 00582 M00S00452.qload ---| SPACE 4 00583 M00S00453.qload ---|** TERMINATE PROCESSING. 00584 M00S00454.qload ---| 00585 M00S00455.qload ---| 00586 M00S00456.qload ---| TRM SA1 PRSA CHECK FOR *FL* ASSIGNED 00587 M00S00457.qload ---| ZR X1,TRM1 IF *FL* NOT ASSIGNED 00588 M00S00458.qload ---| WRITER O FLUSH OUTPUT FILE 00589 M00S00459.qload ---| TRM1 SX5 MES19 * QLOAD TERMINATED.* 00590 M00S00460.qload ---| MESSAGE X5 00591 M00S00461.qload ---| ABORT TERMINATE THE LOAD 00592 M00S00462.qload ---| SPACE 4 00593 M00S00463.qload ---|** ERROR PROCESSING. 00594 M00S00464.qload ---| 00595 M00S00465.qload ---| 00596 M00S00466.qload ---| ERR RJ CIQ CLOSE THE *IQFT* FILE 00597 M00S00467.qload ---| RETURN S 00598 M00S00468.qload ---| SA1 PRSA CHECK FOR *FL* ASSIGNED 00599 M00S00469.qload ---| ZR X1,ERR1 IF *FL* NOT ASSIGNED 00600 M00S00470.qload ---| RJ ISM ISSUE FILES PROCESSED MESSAGES
| Line S00471 Modification History | |
|---|---|
M01 (Removed by) | qload4 |
Seq # *Modification Id* Act ----------------------------+ 00601 M01S00471.qload4 ---| WRITER O FLUSH THE OUTPUT FILE 00602 M00S00472.qload ---| ERR1 SX5 B7 ISSUE MESSAGE 00603 M00S00473.qload ---| MESSAGE X5
| Line S00474 Modification History | |
|---|---|
M01 (Removed by) | qload10 |
Seq # *Modification Id* Act ----------------------------+ 00604 M01S00474.qload10 ---| BX2 X2-X2
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | qload10 |
Seq # *Modification Id* Act ----------------------------+ 00605 M01S00001.qload10 +++| SA1 TARA+ARFC 00606 M01S00002.qload10 +++| PL X1,ERR2 IF K-DISPLAY SELECTED
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | qload10 |
M02 (Removed by) | qload12 |
Seq # *Modification Id* Act ----------------------------+ 00607 M02S00003.qload12 ---| ABORT
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | qload12 |
Seq # *Modification Id* Act ----------------------------+ 00608 M01S00001.qload12 +++| SB2 FLDSL 00609 M01S00002.qload12 +++| ERR1.1 SA1 B2+FLDS CHECK FOR FILES PROCESSED 00610 M01S00003.qload12 +++| NZ X1,ERR1.2 IF FILES PROCESSED 00611 M01S00004.qload12 +++| SB2 B2-B1 00612 M01S00005.qload12 +++| PL B2,ERR1.1 IF NOT END OF FILE COUNTS 00613 M01S00006.qload12 +++| EQ ERR2 DO NOT ABORT IF NO FILES WERE PROCESSED 00614 M01S00007.qload12 +++| 00615 M01S00008.qload12 +++| ERR1.2 ABORT
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | qload10 |
Seq # *Modification Id* Act ----------------------------+ 00616 M01S00004.qload10 +++| 00617 M01S00005.qload10 +++| ERR2 BX2 X2-X2 00618 M00S00475.qload +++| JP QLOADX RETURN 00619 M00S00476.qload +++| SPACE 4 00620 M00S00477.qload +++|** PROCESS OUT COMMAND. 00621 M00S00478.qload +++| 00622 M00S00479.qload +++| 00623 M00S00480.qload +++| OUT STATUS O CHECK IF OUTPUT PRESENT 00624 M00S00481.qload +++| SA5 O 00625 M00S00482.qload +++| MX0 -18 00626 M00S00483.qload +++| BX6 -X0*X5 00627 M00S00484.qload +++| AX6 1 00628 M00S00485.qload +++| NZ X6,OUT1 IF FILE PRESENT 00629 M00S00486.qload +++| SX5 MES17 * NO OUTPUT FILE PRESENT.* 00630 M00S00487.qload +++| EQ OUT2 00631 M00S00488.qload +++| 00632 M00S00489.qload +++| OUT1 SA2 O GET FILE NAME 00633 M00S00490.qload +++| MX0 42 00634 M00S00491.qload +++| BX6 X0*X2 00635 M00S00492.qload +++| SA6 ROTB *DSP* PARAMETER BLOCK 00636 M00S00493.qload +++| SA2 OUTA 00637 M00S00494.qload +++| BX6 X2 00638 M00S00495.qload +++| SA6 A6+B1 00639 M00S00496.qload +++| ROUTE ROTB,RECALL 00640 M00S00497.qload +++| SX5 MES4 * OUTPUT FILE RELEASED.* 00641 M00S00498.qload +++| OUT2 MESSAGE X5 00642 M00S00499.qload +++| BX2 X2-X2 00643 M00S00500.qload +++| JP QLOADX RETURN 00644 M00S00501.qload +++| 00645 M00S00502.qload +++| 00646 M00S00503.qload +++| OUTA VFD 24/0,12/2HPR,6/0,18/FRDC 00647 M00S00504.qload +++| TITLE FIRST LEVEL SUBROUTINES. 00648 M00S00505.qload +++| BIE SPACE 4,20 00649 M00S00506.qload +++|** BIE - BUILD *IQFT* ENTRY. 00650 M00S00507.qload +++|* 00651 M00S00508.qload +++|* ENTRY (ROTB) = ROUTE BLOCK. 00652 M00S00509.qload +++|* (SSBF) = SYSTEM SECTOR FOR FILE IF IT EXISTS. 00653 M00S00510.qload +++|* 00654 M00S00511.qload +++|* EXIT (IQFE) = *IQFT* ENTRY. 00655 M00S00512.qload +++|* (OLDN) = OLD JSN FOR THE FILE. 00656 M00S00513.qload +++|* JSN SET AS FILENAME IN FET-S.
| Line S00514 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00657 M01S00514.ns22000 ---|* (QUTP) = QUEUE TYPE. 00658 M00S00515.qload ---|* 00659 M00S00516.qload ---|* USES X - 0, 5, 6, 7. 00660 M00S00517.qload ---|* A - 5, 6, 7. 00661 M00S00518.qload ---|* B - 6. 00662 M00S00519.qload ---|* 00663 M00S00520.qload ---|* CALLS CRB, GSF. 00664 M00S00521.qload ---| 00665 M00S00522.qload ---| 00666 M00S00523.qload ---| BIE2 RJ CRB CONVERT ROUTE BLOCK TO AN *IQFT* ENTRY 00667 M00S00524.qload ---| 00668 M00S00525.qload ---| BIE SUBR ENTRY/EXIT 00669 M00S00526.qload ---| SA5 SSBF CHECK IF SYSTEM SECTOR PRESENT 00670 M00S00527.qload ---| ZR X5,BIE2 IF NO SYSTEM SECTOR 00671 M00S00528.qload ---| SB2 QFTE*5-1*5 SET NUMBER OF WORDS TO MOVE 00672 M00S00529.qload ---| SB3 QFTE-1 00673 M00S00530.qload ---| BIE1 SX5 IOSS+B2 SET QFT ENTRY 00674 M00S00531.qload ---| RJ GSF GET SYSTEM SECTOR FIELD 00675 M00S00532.qload ---| SA6 IQFE+B3 00676 M00S00533.qload ---| SB2 B2-5 00677 M00S00534.qload ---| SB3 B3-B1 00678 M00S00535.qload ---| PL B3,BIE1 IF MORE TO MOVE 00679 M00S00536.qload ---| MX0 24 00680 M00S00537.qload ---| BX7 X0*X6 00681 M00S00538.qload ---| SA7 OLDN SAVE OLD JSN 00682 M00S00539.qload ---| SX5 B1 00683 M00S00540.qload ---| SA7 Q SET NAME FOR *QFM* CALL 00684 M00S00541.qload ---| BX7 X7+X5 00685 M00S00542.qload ---| SA7 S SET FILE NAME INTO FET 00686 M01S00543.ns22000 ---| MX0 -3 00687 M01S00544.ns22000 ---| AX6 9 00688 M01S00545.ns22000 ---| BX7 -X0*X6 00689 M01S00546.ns22000 ---| SA7 QUTP SAVE QUEUE TYPE 00690 M00S00547.qload ---| SX5 FLSS GET FILE LENGTH 00691 M00S00548.qload ---| RJ GSF 00692 M00S00549.qload ---| MX0 24 00693 M00S00550.qload ---| BX6 X0*X6 00694 M00S00551.qload ---| SA6 IQFE+8 00695 M00S00552.qload ---| SX5 DTSS GET DATE AND TIME 00696 M00S00553.qload ---| RJ GSF 00697 M00S00554.qload ---| SA5 IQFE+8 00698 M00S00555.qload ---| MX0 -36 00699 M00S00556.qload ---| BX6 -X0*X6 00700 M00S00557.qload ---| BX6 X5+X6 00701 M00S00558.qload ---| SA6 A5 00702 M00S00559.qload ---| SX5 FMSS GET FAMILY NAME 00703 M00S00560.qload ---| RJ GSF 00704 M00S00561.qload ---| MX0 42 00705 M00S00562.qload ---| BX6 X0*X6 00706 M00S00563.qload ---| SA6 IQFE+9 00707 M00S00564.qload ---| SX5 CMSS GET CREATION MACHINE ID 00708 M00S00565.qload ---| RJ GSF 00709 M00S00566.qload ---| SA5 IQFE+9 00710 M00S00567.qload ---| MX0 12 00711 M00S00568.qload ---| BX6 X0*X6 00712 M00S00569.qload ---| LX6 12 00713 M00S00570.qload ---| BX6 X5+X6 00714 M00S00571.qload ---| SA6 A5 00715 M00S00572.qload ---| MX0 42 00716 M00S00573.qload ---| SX5 FDSS GET DESTINATION FAMILY NAME 00717 M00S00574.qload ---| RJ GSF GET SYSTEM SECTOR FIELD 00718 M00S00575.qload ---| MX0 60 00719 M00S00576.qload ---| SA6 IQFE+10 00720 M00S00577.qload ---| SX5 ACSS GET CREATION UN/UI 00721 M00S00578.qload ---| RJ GSF 00722 M00S00579.qload ---| SA6 IQFE+11 00723 M00S00580.qload ---| MX0 42 00724 M00S00581.qload ---| SX5 FOSS GET OWNER FAMILY NAME 00725 M00S00582.qload ---| RJ GSF 00726 M00S00583.qload ---| SA6 IQFE+12 00727 M00S00584.qload ---| JP BIEX RETURN 00728 M00S00585.qload ---| CIQ SPACE 4,20 00729 M00S00586.qload ---|** CIQ - CLOSE THE *IQFT* FILE. 00730 M00S00587.qload ---|* 00731 M00S00588.qload ---|* ENTRY (DWIQ) = 0 IF NO DATA WRITTEN TO THE *IQFT* FILE. 00732 M00S00589.qload ---|* 00733 M00S00590.qload ---|* USES A - 5, 6. 00734 M00S00591.qload ---|* X - 3, 5, 6. 00735 M00S00592.qload ---|* 00736 M00S00593.qload ---|* CALLS RAF. 00737 M00S00594.qload ---| 00738 M00S00595.qload ---| 00739 M00S00596.qload ---| CIQ SUBR ENTRY/EXIT 00740 M00S00597.qload ---| SA5 DWIQ CHECK FOR FILE WRITTEN 00741 M00S00598.qload ---| ZR X5,CIQ1 IF NO DATA WRITTEN 00742 M00S00599.qload ---| BX6 X6-X6 CLEAR DATA WRITTEN FLAG 00743 M00S00600.qload ---| SA6 A5 00744 M00S00601.qload ---| WRITER NIQ,R FLUSH THE BUFFER 00745 M00S00602.qload ---| CIQ1 SX3 NIQ RELEASE THE *IQFT* FILE 00746 M00S00603.qload ---| RJ RAF 00747 M00S00604.qload ---| JP CIQX RETURN 00748 M00S00605.qload ---| CFS SPACE 4,20 00749 M00S00606.qload ---|** CFS - CHECK FILE SELECTION. 00750 M00S00607.qload ---|* 00751 M00S00608.qload ---|* ENTRY (IQFE - IQFE+QFEWL) = IQFT ENTRY. 00752 M00S00609.qload ---|* (LIST) .NE. 0, IF LISTING FILES. 00753 M00S00610.qload ---|* 00754 M00S00611.qload ---|* EXIT (X1) = 0, IF NO ERRORS. 00755 M00S00612.qload ---|* 00756 M00S00613.qload ---|* ERROR (DSPC) = *IGDP* IF FILE IGNORED. 00757 M00S00614.qload ---|*
| Line S00615 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00758 M01S00615.ns21000 ---|* USES X - 1, 6. 00759 M01S00616.ns21000 ---|* A - 1, 6.
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00760 M02S00020.ns22000 ---|* USES X - 1, 3, 4, 6. 00761 M02S00021.ns22000 ---|* A - 1, 3, 6.
| Line S00617 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00762 M01S00617.ns22000 ---|*
| Line S00618 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
M02 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00763 M02S00618.ns22000 ---|* CALLS VIE.
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00764 M02S00022.ns22000 ---|* CALLS CLD, VIE.
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00765 M01S00025.ns22000 +++|* USES X - 1, 2, 3, 4, 6. 00766 M01S00026.ns22000 +++|* A - 1, 2, 3, 6. 00767 M01S00027.ns22000 +++|* B - 2. 00768 M01S00028.ns22000 +++|* 00769 M01S00029.ns22000 +++|* CALLS CAF, CLD, VIE. 00770 M00S00619.qload +++| 00771 M00S00620.qload +++| 00772 M00S00621.qload +++| CFS SUBR ENTRY/EXIT 00773 M00S00622.qload +++| SA1 LIST 00774 M00S00623.qload +++| NZ X1,CFSX IF LISTING FILES
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00775 M01S00023.ns21000 +++| SA3 IQFE+2 CHECK LOGICAL IDENTIFIER 00776 M01S00024.ns21000 +++| SX4 B1+ SET CHECK FOR LID IN TABLE 00777 M01S00025.ns21000 +++| RJ CLD 00778 M01S00026.ns21000 +++| NZ X3,CFS1 IF NO MATCH
| Line S00030 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00779 M01S00030.ns22000 +++| SB2 B1+ FORCE CHECK OF ORIGIN TYPE ACCESS LIMITS 00780 M01S00031.ns22000 +++| SA2 TARA+ARLA GET ACCESS LEVEL LIMITS 00781 M01S00032.ns22000 +++| SA1 TARA+ARUA 00782 M01S00033.ns22000 +++| SA3 IQFE+INSQ SET ADDRESS OF QFT ENTRY 00783 M01S00034.ns22000 +++| RJ CAF CHECK ACCESS LEVEL OF FILE 00784 M01S00035.ns22000 +++| NZ X1,CFS1 IF FILE NOT SELECTED 00785 M00S00624.qload +++| SA1 TARA+AROP SET ACTIVATE/INACTIVATE REQUEST 00786 M00S00625.qload +++| BX6 X1 00787 M00S00626.qload +++| RJ VIE VALIDATE IQFT ENTRY 00788 M00S00627.qload +++| ZR X1,CFSX IF FILE SELECTED
| Line S00628 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00789 M01S00628.ns21000 ---| SX6 IGDP SET FILE IGNORED
| Line S00027 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00790 M01S00027.ns21000 +++| CFS1 SX6 IGDP SET FILE IGNORED 00791 M00S00629.qload +++| SA6 DSPC 00792 M00S00630.qload +++| SX1 B1+ INDICATE ERROR 00793 M00S00631.qload +++| EQ CFSX RETURN 00794 M00S00632.qload +++| CPY SPACE 4,20 00795 M00S00633.qload +++|** CPY - COPY FILE. 00796 M00S00634.qload +++|* 00797 M00S00635.qload +++|* ENTRY (CQCW) = CURRENT QUEUE CONTROL WORD. 00798 M00S00636.qload +++|* (NTCW) = WORDS TO NEXT TAPE CONTROL WORD. 00799 M00S00637.qload +++|* (NQCW) = WORDS TO NEXT QUEUE CONTROL WORD. 00800 M00S00638.qload +++|* (SSBF) = SYSTEM SECTOR. 00801 M00S00639.qload +++|* (ROTB) = ROUTE BLOCK. 00802 M00S00640.qload +++|* 00803 M00S00641.qload +++|* EXIT (B7) = 0 IF FILE TO BE LOADED. 00804 M00S00642.qload +++|* (B7) = ERROR MESSAGE ADDRESS IF ERROR OCCURED. 00805 M00S00643.qload +++|* (ERRF) = 0 IF NO ERROR IN FILE. 00806 M00S00644.qload +++|* 00807 M00S00645.qload +++|* USES A - 1, 2, 3, 4, 5, 6, 7. 00808 M00S00646.qload +++|* B - 5, 6, 7. 00809 M00S00647.qload +++|* X - ALL. 00810 M00S00648.qload +++|* 00811 M00S00649.qload +++|* CALLS ASF, PCW, GCW, CWE, AQF. 00812 M00S00650.qload +++| 00813 M00S00651.qload +++| 00814 M00S00652.qload +++| CPY SUBR ENTRY/EXIT 00815 M00S00653.qload +++| SA1 C+1 REWIND FET 00816 M00S00654.qload +++| SX6 X1 00817 M00S00655.qload +++| SX7 B0 CLEAR WORD COUNT 00818 M00S00656.qload +++| SA6 A1+1 00819 M00S00657.qload +++| SA5 CQCW CHECK CURRENT CONTROL WORD 00820 M00S00658.qload +++| SA7 ASSF CLEAR FILE ASSIGNED TO MASS STORAGE 00821 M00S00659.qload +++| SA6 A6+1 00822 M00S00660.qload +++| SA7 WDSX 00823 M00S00661.qload +++| NZ X5,CPY1 IF WORKING ON CURRENT WORD 00824 M00S00662.qload +++| RJ GCW GET NEXT CONTROL WORD 00825 M00S00663.qload +++| CPY1 SA1 WDSX CHECK WORDS IN BUFFER 00826 M00S00664.qload +++| SA2 NTCW LOAD BLOCK SIZE 00827 M00S00665.qload +++| SA3 NQCW FIELD SIZE 00828 M00S00666.qload +++| SX4 64 00829 M00S00667.qload +++| IX5 X4-X1 WORDS NEEDED TO FILL COPY BLOCK 00830 M00S00668.qload +++| IX6 X2-X5 COMPARE BLOCK SIZE 00831 M00S00669.qload +++| IX7 X3-X5 COMPARE FIELD SIZE 00832 M00S00670.qload +++| MI X6,CPY4 IF SHORT MEDIA DATA BLOCK 00833 M00S00671.qload +++| MI X7,CPY6 IF SHORT FIELD 00834 M00S00672.qload +++| 00835 M00S00673.qload +++|* COPY DATA. 00836 M00S00674.qload +++| 00837 M00S00675.qload +++| SA6 A2 UPDATE COUNTS 00838 M00S00676.qload +++| SA7 A3 00839 M00S00677.qload +++| BX6 X4 SET WORDS IN BLOCK 00840 M00S00678.qload +++| SA6 A1 00841 M00S00679.qload +++| READW T,WBUF+1+X1,X5 FILL COPY BLOCK 00842 M00S00680.qload +++| SA1 NQCW CHECK FOR POSSIBLE *EOR* FIELD 00843 M00S00681.qload +++| SX7 B0+ CLEAR LEVEL NUMBER 00844 M00S00682.qload +++| SA7 LEVL 00845 M00S00683.qload +++| NZ X1,CPY2 IF NOT POSSIBLE *EOR* FIELD 00846 M00S00684.qload +++| SA1 CQCW CHECK IF *EOR* BLOCK 00847 M00S00685.qload +++| SA2 EOR CHECK IF LAST BLOCK 00848 M00S00686.qload +++| SA3 NTCW 00849 M00S00687.qload +++| MX0 -3 00850 M00S00688.qload +++| AX1 9 00851 M00S00689.qload +++| NZ X3,CPY1.1 IF DATA REMAINING IN RECORD 00852 M00S00690.qload +++| NZ X2,CPY5 IF *EOR* MEDIA BLOCK 00853 M00S00691.qload +++| CPY1.1 BX7 -X0*X1 00854 M00S00692.qload +++| NZ X7,CPY7 IF *EOR* OR *EOF* FIELD 00855 M00S00693.qload +++| CPY2 SA1 ASSF CHECK IF FILE ASSIGNED 00856 M00S00694.qload +++| NZ X1,CPY3 IF FILE ASSIGNED 00857 M00S00695.qload +++| RJ ASF ASSIGN FILE TO DISK 00858 M00S00696.qload +++| NZ B7,CPYX IF FILE NOT ASSIGNED 00859 M00S00697.qload +++| CPY3 SB5 B1 INDICATE NOT AT END OF RECORD 00860 M00S00698.qload +++| RJ CWE CHECK WRITE ERRORS 00861 M00S00699.qload +++| NZ B7,CPYX IF UNRECOVERABLE ERROR 00862 M00S00700.qload +++| NZ B6,CPY1 IF WRITE ERROR RECOPY FILE 00863 M00S00701.qload +++| SA1 WDSX SET UP CONTROL WORDS 00864 M00S00702.qload +++| SX2 5 00865 M00S00703.qload +++| SX3 64 00866 M00S00704.qload +++| IX6 X1*X2 00867 M00S00705.qload +++| LX3 36 00868 M00S00706.qload +++| BX6 X3+X6 00869 M00S00707.qload +++| BX7 X7-X7 CLEAR WORD COUNT 00870 M00S00708.qload +++| SA2 LEVL 00871 M00S00709.qload +++| SA6 WBUF 00872 M00S00710.qload +++| SA7 A1 00873 M00S00711.qload +++| BX6 X2 00874 M00S00712.qload +++| SA6 WBUF+1+X1 SET LEVEL NUMBER 00875 M00S00713.qload +++| WRITEW S,WBUF,X1+2 WRITE DATA 00876 M00S00714.qload +++| EQ CPY1 LOOP 00877 M00S00715.qload +++| 00878 M00S00716.qload +++|* PROCESS SHORT MEDIA DATA BLOCK. 00879 M00S00717.qload +++| 00880 M00S00718.qload +++| CPY4 IX7 X3-X2 FIELD - BLOCK LENGTH 00881 M00S00719.qload +++| MI X7,CPY6 IF FIELD IS SHORTER 00882 M00S00720.qload +++| BX6 X6-X6 UPDATE COUNTS 00883 M00S00721.qload +++| SA6 A2 00884 M00S00722.qload +++| SA7 A3 WORDS REMAINING IN FIELD 00885 M00S00723.qload +++| IX6 X1+X2 INCREMENT BUFFER WORD COUNT 00886 M00S00724.qload +++| SA6 A1 00887 M00S00725.qload +++| ZR X2,CPY5 IF END OF MEDIA BLOCK 00888 M00S00726.qload +++| READW T,WBUF+1+X1,X2 READ TO END OF BLOCK 00889 M00S00727.qload +++| CPY5 READO T SKIP TRAILING CONTROL WORD 00890 M00S00728.qload +++| SA4 EOR 00891 M00S00729.qload +++| NZ X4,CPY11 IF *EOR* BLOCK 00892 M00S00730.qload +++| RJ PCW PROCESS NEXT BLOCK 00893 M00S00731.qload +++| PL X1,CPY1 IF NOT *EOF* 00894 M00S00732.qload +++| SB7 MES20 * PREMATURE *EOF* ENCOUNTERED.* 00895 M00S00733.qload +++| EQ CPYX RETURN 00896 M00S00734.qload +++| 00897 M00S00735.qload +++|* PROCESS SHORT FIELD. 00898 M00S00736.qload +++| 00899 M00S00737.qload +++| CPY6 IX6 X2-X3 BLOCK - FIELD LENGTH 00900 M00S00738.qload +++| MI X6,CPY4 IF BLOCK SHORTER 00901 M00S00739.qload +++| SA6 A2 UPDATE COUNTS - WORDS IN BLOCK 00902 M00S00740.qload +++| IX7 X1+X3 00903 M00S00741.qload +++| SA7 A1 WORDS IN BUFFER 00904 M00S00742.qload +++| ZR X3,CPY7 IF END OF FIELD 00905 M00S00743.qload +++| READW T,WBUF+1+X1,X3 READ TO END OF FIELD 00906 M00S00744.qload +++| CPY7 SA1 CQCW CHECK IF EOR BLOCK 00907 M00S00745.qload +++| MX0 -3 00908 M00S00746.qload +++| AX1 9 00909 M00S00747.qload +++| BX7 -X0*X1 00910 M00S00748.qload +++| SX6 17B 00911 M00S00749.qload +++| SX7 X7-1 00912 M00S00750.qload +++| MI X7,CPY9 IF NOT *EOR* 00913 M00S00751.qload +++| NZ X7,CPY8 IF *EOF* 00914 M00S00752.qload +++| 00915 M00S00753.qload +++|* GET LEVEL NUMBER. 00916 M00S00754.qload +++| 00917 M00S00755.qload +++| SA1 WDSX 00918 M00S00756.qload +++| SA2 WBUF+1-1+X1 LAST WORD READ IS LEVEL NUMBER 00919 M00S00757.qload +++| SX7 X1-1 DECREMENT WORD COUNT 00920 M00S00758.qload +++| BX6 X2 00921 M00S00759.qload +++| SA7 A1 00922 M00S00760.qload +++| CPY8 LX6 -12 SET LEVEL NUMBER 00923 M00S00761.qload +++| SA6 LEVL 00924 M00S00762.qload +++| RJ GCW GET NEXT CONTROL WORD 00925 M00S00763.qload +++| SB7 B6-2 00926 M00S00764.qload +++| ZR B6,CPY2 IF DATA BLOCK 00927 M00S00765.qload +++| ZR B7,CPY2 IF DAYFILE 00928 M00S00766.qload +++| EQ CPY10 POSSIBLE ERROR ON DUMP 00929 M00S00767.qload +++| 00930 M00S00768.qload +++| CPY9 RJ GCW GET NEXT CONTROL WORD 00931 M00S00769.qload +++| SB7 B6-2 00932 M00S00770.qload +++| ZR B6,CPY1 IF DATA 00933 M00S00771.qload +++| ZR B7,CPY1 IF DAYFILE 00934 M00S00772.qload +++| NE B7,B1,CPY10 IF NOT *NOS* FIELD 00935 M00S00773.qload +++| NE B5,B1,CPY10 IF NOT END OF VOLUME 00936 M00S00774.qload +++| READO T SKIP TRAILING CONTROL WORD 00937 M00S00775.qload +++| RJ PCW PROCESS NEXT BLOCK 00938 M00S00776.qload +++| PL X1,CPY9 IF NOT *EOF* 00939 M00S00777.qload +++| SB7 MES20 * PREMATURE *EOF* ENCOUNTERED.* 00940 M00S00778.qload +++| EQ CPYX RETURN 00941 M00S00779.qload +++| 00942 M00S00780.qload +++|* CHECK FOR ERROR WHEN FILE DUMPED. 00943 M00S00781.qload +++|
| Line S00782 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00944 M01S00782.241l630 ---| CPY10 SX7 MSER
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00945 M01S00003.241l630 +++| CPY10 SX7 DMER 00946 M00S00783.qload +++| SB6 B6-7 00947 M00S00784.qload +++| ZR B6,CPY16 IF ERROR WHEN DUMPED 00948 M00S00785.qload +++|
| Line S00786 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00949 M01S00786.ns22000 ---|* PRCESS END OF LOAD FILE.
| Line S00036 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00950 M01S00036.ns22000 +++|* PROCESS END OF LOAD FILE. 00951 M00S00787.qload +++| 00952 M00S00788.qload +++| CPY11 SA1 ASSF CHECK IF FILE ASSIGNED 00953 M00S00789.qload +++| NZ X1,CPY12 IF FILE ASSIGNED 00954 M00S00790.qload +++| RJ ASF ASSIGN FILE TO CORRECT DEVICE
| Line S00791 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00955 M01S00791.ns22000 ---| NZ B7,CPYX IF ERROR IN ASSIGN
| Line S00037 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00956 M01S00037.ns22000 +++| SA1 ALEF 00957 M01S00038.ns22000 +++| ZR X1,CPY10.1 IF NOT ACCESS LEVEL ERROR 00958 M01S00039.ns22000 +++| SX6 X1+1 INDICATE NO SKIP NEEDED 00959 M01S00040.ns22000 +++| SA6 A1 00960 M01S00041.ns22000 +++| CPY10.1 NZ B7,CPYX IF ERROR IN ASSIGN 00961 M00S00792.qload +++| CPY12 SA1 WDSX DECREMENT WORD COUNT 00962 M00S00793.qload +++| SX6 17B 00963 M00S00794.qload +++| NZ X1,CPY13 IF NOT EMPTY FIELD 00964 M00S00795.qload +++| SX1 X1+1 00965 M00S00796.qload +++| CPY13 SA2 WBUF+1-1+X1 LAST WORD READ IS LEVEL NUMBER 00966 M00S00797.qload +++| SX3 5 00967 M00S00798.qload +++| SA4 CQCW CHECK FIELD TYPE 00968 M00S00799.qload +++| MX0 -3 00969 M00S00800.qload +++| AX4 9 00970 M00S00801.qload +++| SX1 X1-1 00971 M00S00802.qload +++| IX3 X3*X1 BYTE COUNT 00972 M00S00803.qload +++| BX4 -X0*X4 QUEUE FIELD TYPE 00973 M00S00804.qload +++| SX7 64 PRU SIZE 00974 M00S00805.qload +++| SX4 X4-1 00975 M00S00806.qload +++| LX7 36 00976 M00S00807.qload +++| BX7 X7+X3 CONTROL WORD 00977 M00S00808.qload +++| SA7 WBUF 00978 M00S00809.qload +++| MI X4,CPY15 IF NOT *EOR* 00979 M00S00810.qload +++| NZ X4,CPY14 IF *EOF* FIELD 00980 M00S00811.qload +++| BX6 X2 00981 M00S00812.qload +++| CPY14 LX6 -12 00982 M00S00813.qload +++| SA6 A2 00983 M00S00814.qload +++| CPY15 WRITEW S,WBUF,X1+2 WRITE LAST BLOCK OF DATA 00984 M00S00815.qload +++| SA1 NTCW 00985 M00S00816.qload +++| SA2 NQCW 00986 M00S00817.qload +++| IX3 X1+X2 00987 M00S00818.qload +++| SX7 FMER SET ERROR CODE 00988 M00S00819.qload +++| ZR X3,CPY17 IF ALL WORD COUNTS ARE ZERO 00989 M00S00820.qload +++| 00990 M00S00821.qload +++|* CHECK ERROR PROCESSING SELECTION. 00991 M00S00822.qload +++| 00992 M00S00823.qload +++| CPY16 SA7 ERTP SET ERROR TYPE 00993 M00S00824.qload +++| RJ SQF POSITION TO END OF QUEUE FILE 00994 M00S00825.qload +++| SA2 TARA+ARFC CHECK ERROR PROCESSING 00995 M00S00826.qload +++| LX2 59-57 00996 M00S00827.qload +++| MI X2,CPY17 IF ERROR PROCESSING SELECTED 00997 M00S00828.qload +++| SA7 ERRF SET TO IGNORE FILE 00998 M00S00829.qload +++| SB7 B0 CLEAR ERROR INDICATION 00999 M00S00830.qload +++| JP CPYX RETURN 01000 M00S00831.qload +++| 01001 M00S00832.qload +++| CPY17 WRITECW S,R FLUSH THE WRITE BUFFER 01002 M00S00833.qload +++| SB5 B0 INDICATE AT END OF RECORD 01003 M00S00834.qload +++| RJ CWE CHECK FOR WRITE ERROR 01004 M00S00835.qload +++| NZ B7,CPYX IF UNRECOVERABLE ERROR 01005 M00S00836.qload +++| NZ B6,CPY1 IF RECOPY REQUIRED 01006 M00S00837.qload +++| JP CPYX RETURN 01007 M00S00838.qload +++| DSP SPACE 4,20 01008 M00S00839.qload +++|** DSP - DISPOSE THE QUEUE FILE. 01009 M00S00840.qload +++|* 01010 M00S00841.qload +++|* ENTRY (ROTB) = ROUTE BLOCK FOR THE FILE. 01011 M00S00842.qload +++|* (IQFE) = *IQFT* ENTRY FOR THE FILE. 01012 M00S00843.qload +++|* (ERRF) = 0 IF FILE NOT TO BE IGNORED. 01013 M00S00844.qload +++|* (QLIM) = QFT LIMIT. 01014 M00S00845.qload +++|* 01015 M00S00846.qload +++|* EXIT FILE DISPOSED TO THE PROPER QUEUE. 01016 M00S00847.qload +++|* (DSPC) = FILE DISPOSITION CODE. 01017 M00S00848.qload +++|*
| Line S00849 Modification History | |
|---|---|
M01 (Removed by) | qload8 |
Seq # *Modification Id* Act ----------------------------+ 01018 M01S00849.qload8 ---|* USES A - 1, 4, 5, 6, 7. 01019 M01S00850.qload8 ---|* X - 0, 1, 4, 5, 6, 7.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | qload8 |
Seq # *Modification Id* Act ----------------------------+ 01020 M01S00001.qload8 +++|* USES X - 0, 1, 2, 3, 4, 5, 6, 7. 01021 M01S00002.qload8 +++|* A - 1, 2, 4, 5, 6, 7. 01022 M00S00851.qload +++|*
| Line S00852 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01023 M01S00852.ns21000 ---|* MACROS QCALL, RETURN, ROUTE.
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01024 M01S00028.ns21000 +++|* MACROS QCALL, RETURN, REWIND, ROUTE. 01025 M00S00853.qload +++| 01026 M00S00854.qload +++| 01027 M00S00855.qload +++| DSP4 SA1 Q+1 SET UP *FET* FOR *QFM* CALL 01028 M00S00856.qload +++| SX6 X1+QFEWL 01029 M00S00857.qload +++| SX7 X1+ 01030 M00S00858.qload +++| SA6 A1+B1 01031 M00S00859.qload +++| SA7 A6+B1 01032 M00S00860.qload +++| SA1 Q SET FET COMPLETE 01033 M00S00861.qload +++| SX6 B1+ 01034 M00S00862.qload +++| BX6 X1+X6 01035 M00S00863.qload +++| SA6 A1 01036 M00S00864.qload +++| QCALL RIQF,Q RELEASE TO THE INACTIVE QUEUE 01037 M00S00865.qload +++| SX6 INDP SET DISPOSITION *INACTIVE* 01038 M00S00866.qload +++| SA6 DSPC 01039 M00S00867.qload +++| DSP5 SX7 B0+ CLEAR ALTERNATE ABORT PROCESSING 01040 M00S00868.qload +++| SA7 ABTI 01041 M00S00869.qload +++| 01042 M00S00870.qload +++| DSP SUBR ENTRY/EXIT
| Line S00871 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01043 M01S00871.ns21000 ---| SA4 QLIM DECREMENT QFT LIMIT
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01044 M01S00029.ns21000 +++| SA4 GNFC CHECK FOR EOI SECTOR TO WRITE 01045 M01S00030.ns21000 +++| NZ X4,DSP0 IF NO EOI TO WRITE
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | qload7 |
Seq # *Modification Id* Act ----------------------------+ 01046 M01S00001.qload7 +++| SA4 C+1 SET FET POSITION TO EOI DATA 01047 M01S00002.qload7 +++| SX7 X4+200B 01048 M01S00003.qload7 +++| SX6 X4+100B 01049 M01S00004.qload7 +++| SA7 C+2 01050 M01S00005.qload7 +++| SA6 C+3
| Line S00031 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01051 M01S00031.ns21000 +++| QCALL QWEF,C WRITE EOI SECTOR 01052 M01S00032.ns21000 +++| DSP0 SA4 QLIM DECREMENT QFT LIMIT 01053 M00S00872.qload +++| SA5 ERRF CHECK FILE ERROR FLAG 01054 M00S00873.qload +++| SX7 IGDP SET FILE *IGNORED* 01055 M00S00874.qload +++| SX6 X4-1 01056 M00S00875.qload +++| SA7 ABTI SET ALTERNATE ABORT PROCESSING 01057 M00S00876.qload +++| ZR X5,DSP2 IF FILE NOT IGNORED 01058 M00S00877.qload +++| DSP1 SA7 DSPC 01059 M00S00878.qload +++| RETURN S,R RELEASE THE FILE SPACE 01060 M00S00879.qload +++| EQ DSP5 RETURN 01061 M00S00880.qload +++| 01062 M00S00881.qload +++|* PROCESS ACTIVE QUEUE FILE. 01063 M00S00882.qload +++| 01064 M00S00883.qload +++| DSP2 SA5 TARA+AROP CHECK THE LOAD OPTION 01065 M00S00884.qload +++| ZR X5,DSP4 IF INACTIVE LOAD 01066 M00S00885.qload +++| NG X6,DSP3 IF QFT LIMIT REACHED 01067 M00S00886.qload +++| SA4 ROTB CLEAR COMPLETION BIT 01068 M00S00887.qload +++| SA6 QLIM SET NEW QFT LIMIT
| Line S00888 Modification History | |
|---|---|
M01 (Removed by) | qload8 |
Seq # *Modification Id* Act ----------------------------+ 01069 M01S00888.qload8 ---| SA5 A4+B1 CLEAR CENTRAL SITE AND DEFERRED ROUTE BITS
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | qload8 |
Seq # *Modification Id* Act ----------------------------+ 01070 M01S00003.qload8 +++| SX7 B0+ PRESET PRIORITY TO ZERO 01071 M01S00004.qload8 +++| SA5 A4+1 CLEAR CENTRAL SITE AND DEFERRED ROUTE BITS 01072 M01S00005.qload8 +++| SA7 ROTB+3 01073 M00S00889.qload +++| MX0 59 01074 M00S00890.qload +++| BX7 X0*X4 01075 M01S00006.qload8 +++| SA2 IQFE+ENTQ CHECK FOR ZERO PRIORITY FILE 01076 M01S00007.qload8 +++| MX4 -24 01077 M01S00008.qload8 +++| BX2 -X4*X2 01078 M01S00009.qload8 +++| ZR X2,DSP2.0 IF ZERO PRIORITY FILE 01079 M00S00891.qload +++| LX5 -9 CLEAR PRIORITY FLAG 01080 M00S00892.qload +++| BX5 X0*X5 01081 M00S00893.qload +++| LX5 9
| Line S00894 Modification History | |
|---|---|
M01 (Removed by) | qload8 |
Seq # *Modification Id* Act ----------------------------+ 01082 M01S00894.qload8 ---| MX0 58
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | qload8 |
Seq # *Modification Id* Act ----------------------------+ 01083 M01S00010.qload8 +++| DSP2.0 MX0 58 01084 M00S00895.qload +++| BX6 X0*X5
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
Seq # *Modification Id* Act ----------------------------+ 01085 M01S00005.ns2137 +++| SX1 FREP SELECT ERROR PROCESSING 01086 M01S00006.ns2137 +++| BX6 X1+X6 01087 M00S00896.qload +++| SA6 A5 01088 M00S00897.qload +++| SA7 A4
| Line S00042 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01089 M01S00042.ns22000 +++| SA1 A4+7 01090 M01S00043.ns22000 +++| SX6 EFSP SET SUBSYSTEM PROCESSING BIT 01091 M01S00044.ns22000 +++| BX6 X1+X6 01092 M01S00045.ns22000 +++| SA6 A1
| Line S00033 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01093 M01S00033.ns21000 +++| REWIND S,R REPOSITION FILE TO *BOI* 01094 M00S00898.qload +++| ROUTE ROTB,RECALL RELEASE TO ACTIVE QUEUE
| Line S00899 Modification History | |
|---|---|
M01 (Removed by) | ns2137 |
Seq # *Modification Id* Act ----------------------------+ 01095 M01S00899.ns2137 ---| SX6 ACDP SET DISPOSITION *ACTIVE*
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
Seq # *Modification Id* Act ----------------------------+ 01096 M01S00007.ns2137 +++| SA1 ROTB CHECK FOR ERROR 01097 M01S00008.ns2137 +++| MX0 -6 01098 M01S00009.ns2137 +++| AX1 12 01099 M01S00010.ns2137 +++| BX2 -X0*X1 01100 M01S00011.ns2137 +++| ZR X2,DSP2.3 IF NO ERROR 01101 M01S00012.ns2137 +++| SX3 X2-/ERR/EC11 CHECK ERROR RETURNED
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
M02 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 01102 M02S00013.251l664 ---| SX4 X2-/ERR/EC44
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
Seq # *Modification Id* Act ----------------------------+ 01103 M01S00014.ns2137 +++| ZR X3,DSP2.2 IF UNDEFINED SERVICE CLASS 01104 M01S00015.ns2137 +++| SX3 X2-/ERR/EC45
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
M02 (Removed by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 01105 M02S00016.251l664 ---| ZR X4,DSP2.2 IF INVALID SERVICE CLASS 01106 M02S00017.251l664 ---| ZR X3,DSP2.2 IF INVALID CREATOR FAMILY/USER
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 01107 M01S00001.251l664 +++| ZR X3,DSP2.2 IF INCORRECT SERVICE CLASS
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
M02 (Removed by) | qload9 |
Seq # *Modification Id* Act ----------------------------+ 01108 M02S00018.qload9 ---| 01109 M02S00019.qload9 ---|* RETURN ERROR CODE TO DAYFILE. 01110 M02S00020.qload9 ---| 01111 M02S00021.qload9 ---| DSP2.1 BX1 X2 01112 M02S00022.qload9 ---| RJ COD CONVERT OCTAL NUMBER TO DISPLAY CODE 01113 M02S00023.qload9 ---| SA1 MES25+2 ADD TO MESSAGE 01114 M02S00024.qload9 ---| MX0 12 01115 M02S00025.qload9 ---| BX6 X0*X4 01116 M02S00026.qload9 ---| BX1 -X0*X1 01117 M02S00027.qload9 ---| BX6 X1+X6 01118 M02S00028.qload9 ---| SA6 A1+ 01119 M02S00029.qload9 ---| SX6 MES25 * DSP RETURNED ERROR XXB.* 01120 M02S00030.qload9 ---| EQ DSP3.1 SKIP REMAINING FILES
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | qload9 |
Seq # *Modification Id* Act ----------------------------+ 01121 M01S00001.qload9 +++| DSP2.1 SX7 IGDP SET FILE IGNORED 01122 M01S00002.qload9 +++| EQ DSP1 RETURN CURRENT FILE
| Line S00031 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
Seq # *Modification Id* Act ----------------------------+ 01123 M01S00031.ns2137 +++| 01124 M01S00032.ns2137 +++|* RETRY ROUTING OF FILE. 01125 M01S00033.ns2137 +++| 01126 M01S00034.ns2137 +++| DSP2.2 BX6 X0*X1 RESET FILE NAME IN BLOCK 01127 M01S00035.ns2137 +++| LX6 12 01128 M01S00036.ns2137 +++| SA6 A1 01129 M01S00037.ns2137 +++| SA1 A1+B1 CLEAR SERVICE CLASS FLAG 01130 M01S00038.ns2137 +++| MX0 59 01131 M01S00039.ns2137 +++| LX1 -20 01132 M01S00040.ns2137 +++| BX6 X0*X1 01133 M01S00041.ns2137 +++| LX6 20 01134 M01S00042.ns2137 +++| SA6 A1+ 01135 M01S00043.ns2137 +++| SX7 EFSP+EFSC FORCE ORIGIN DEFAULT SERVICE CLASS 01136 M01S00044.ns2137 +++| SA7 ROTB+7 01137 M01S00045.ns2137 +++| ROUTE ROTB,RECALL RETRY FILE ROUTING 01138 M01S00046.ns2137 +++| SA1 ROTB CHECK FOR ERROR 01139 M01S00047.ns2137 +++| AX1 12 01140 M01S00048.ns2137 +++| MX0 -6 01141 M01S00049.ns2137 +++| BX2 -X0*X1 01142 M01S00050.ns2137 +++| NZ X2,DSP2.1 IF ERROR 01143 M01S00051.ns2137 +++| DSP2.3 SX6 ACDP SET DISPOSITION *ACTIVE* 01144 M00S00900.qload +++| SA6 DSPC 01145 M00S00901.qload +++| EQ DSP5 RETURN 01146 M00S00902.qload +++| 01147 M00S00903.qload +++| DSP3 SX6 MES11 * QFT LIMIT ON LOAD.*
| Line S00904 Modification History | |
|---|---|
M01 (Removed by) | ns2137 |
Seq # *Modification Id* Act ----------------------------+ 01148 M01S00904.ns2137 ---| SA6 TRMM
| Line S00052 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
Seq # *Modification Id* Act ----------------------------+ 01149 M01S00052.ns2137 +++| DSP3.1 SA6 TRMM 01150 M00S00905.qload +++| SX7 LSDP LIST REMAINING FILES 01151 M00S00906.qload +++| SA7 LIST 01152 M00S00907.qload +++| EQ DSP1 RETURN CURRENT FILE 01153 M00S00908.qload +++| GNF SPACE 4,20 01154 M00S00909.qload +++|** GNF - GET NEXT QUEUED FILE. 01155 M00S00910.qload +++|* 01156 M00S00911.qload +++|* ENTRY LOAD FILE POSITIONED TO THE START OF A QUEUED FILE. 01157 M00S00912.qload +++|* 01158 M00S00913.qload +++|* EXIT ROUTE BLOCK COPIED TO *ROTB*. 01159 M00S00914.qload +++|* SYSTEM SECTOR COPIED TO *SSBF*. 01160 M00S00915.qload +++|* (CQCW) = CURRENT QUEUE CONTROL WORD. 01161 M00S00916.qload +++|* (NQCW) = WORDS TO NEXT CONTROL WORD. 01162 M00S00917.qload +++|* (B7) = ADDRESS OF ERROR MESSAGE. 01163 M00S00918.qload +++|* (B7) = 0 IF NO ERRORS. 01164 M00S00919.qload +++|* (X1) = NEGATIVE IF *EOF* ENCOUNTERED.
| Line S00920 Modification History | |
|---|---|
M01 (Removed by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 01165 M01S00920.qload1 ---|* (X4) = NEGATIVE, IF 5.5 (RHF) FILE TO BE SKIPPED.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 01166 M01S00002.qload1 +++|* (X4) = NONZERO, IF VERSION ONE FILE TO SKIP. 01167 M00S00921.qload +++|* 01168 M00S00922.qload +++|* USES X - 1, 3, 4, 6. 01169 M00S00923.qload +++|* A - 3, 6. 01170 M00S00924.qload +++|* B - 2, 4, 6, 7. 01171 M00S00925.qload +++|*
| Line S00926 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01172 M01S00926.ns21000 ---|* CALLS GCW, PCW, RSF, RSS.
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01173 M01S00034.ns21000 +++|* CALLS GCW, PCW, RES, RSF, RSS. 01174 M00S00927.qload +++|* 01175 M00S00928.qload +++|* MACROS MESSAGE, READO, SKIPFF. 01176 M00S00929.qload +++| 01177 M00S00930.qload +++| 01178 M00S00931.qload +++| GNF10 SB7 MES3 * LOAD FILE MISPOSITIONED.* 01179 M00S00932.qload +++| 01180 M00S00933.qload +++| GNF SUBR ENTRY/EXIT 01181 M00S00934.qload +++| GNF1 RJ PCW PROCESS CONTROL WORD 01182 M00S00935.qload +++| MI X1,GNFX IF *EOF* ENCOUNTERED 01183 M00S00936.qload +++| RJ GCW GET NEXT QUEUE CONTROL WORD 01184 M00S00937.qload +++| GNF2 SX4 B6-1 01185 M00S00938.qload +++| NZ X4,GNF8 IF NOT ROUTE BLOCK 01186 M00S00939.qload +++| SB4 ROTB COPY ROUTE BLOCK
| Line S00940 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01187 M01S00940.ns22000 ---| SX3 ROTBL
| Line S00046 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2127 |
Seq # *Modification Id* Act ----------------------------+ 01188 M02S00046.ns2127 ---| SX3 EPBL
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2127 |
Seq # *Modification Id* Act ----------------------------+ 01189 M01S00003.ns2127 +++| SA3 NQCW 01190 M00S00941.qload +++| RJ RSF 01191 M00S00942.qload +++| NZ B7,GNFX IF ERROR ENCOUNTERED 01192 M00S00943.qload +++| JP B6+GNF3 PROCESS CONTROL BYTE 01193 M00S00944.qload +++| 01194 M00S00945.qload +++| GNF3 BSS 0 01195 M00S00946.qload +++| LOC 0 01196 M00S00947.qload +++| EQ GNF6 IF DATA FIELD 01197 M00S00948.qload +++|+ EQ GNF10 IF ROUTE BLOCK 01198 M00S00949.qload +++|+ EQ GNF6 IF DAYFILE 01199 M00S00950.qload +++|+ EQ GNF4 IF *NOS* SYSTEM FIELD 01200 M00S00951.qload +++|+ EQ GNF5 IF *NOS/BE* FIELD 01201 M00S00952.qload +++|+ EQ GNF5 IF SCOPE 2 FIELD 01202 M00S00953.qload +++|+ EQ GNF8 IF DUMP HEADER FIELD 01203 M00S00954.qload +++|+ EQ GNF10 IF ERROR BLOCK 01204 M00S00955.qload +++| LOC *O 01205 M00S00956.qload +++| 01206 M00S00957.qload +++| GNF4 EQ B5,B1,GNF9 IF END OF VOLUME
| Line S00958 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01207 M01S00958.ns21000 ---| SB4 SSBF COPY SYSTEM SECTOR 01208 M01S00959.ns21000 ---| SX3 SSBFL
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01209 M01S00035.ns21000 +++| SB4 SSBF COPY SYSTEM INFORMATION 01210 M01S00036.ns21000 +++| SA3 NQCW GET NUMBER OF WORDS TO COPY 01211 M01S00037.ns21000 +++| SX6 X3-SSBFL SAVE LENGTH OF SYSTEM INFORMATION 01212 M01S00038.ns21000 +++| SA6 GNFC 01213 M00S00960.qload +++| RJ RSF 01214 M00S00961.qload +++| NZ B7,GNFX IF ERROR ENCOUNTERED
| Line S00962 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01215 M01S00962.ns21000 ---| NG X1,GNFX IF *EOF* ENCOUNTERED 01216 M00S00963.qload ---| SA3 SSBF GET SYSTEM SECTOR TYPE 01217 M00S00964.qload ---| MX6 -6 01218 M00S00965.qload ---| AX3 6 01219 M00S00966.qload ---| BX6 -X6*X3
| Line S00967 Modification History | |
|---|---|
M01 (Removed by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 01220 M01S00967.qload1 ---| BX4 X4-X4
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | qload1 |
M02 (Removed by) | qload4 |
Seq # *Modification Id* Act ----------------------------+ 01221 M02S00003.qload4 ---| SX4 B0 CLEAR VERSION ONE FILE TO SKIP
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | qload4 |
Seq # *Modification Id* Act ----------------------------+ 01222 M01S00001.qload4 +++| BX4 X4-X4 CLEAR VERSION ONE FILE TO SKIP 01223 M00S00968.qload +++| SX3 X6-ROFT 01224 M00S00969.qload +++| PL X3,GNFX IF VERSION TWO SYSTEM SECTOR
| Line S00970 Modification History | |
|---|---|
M01 (Removed by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 01225 M01S00970.qload1 ---| SX3 X6-5 HARDCODED VERSION ONE VALUE, *S1FT* 01226 M01S00971.qload1 ---| SX4 -1 SET 5.5 (RHF) FILE TO BE SKIPPED 01227 M01S00972.qload1 ---| ZR X3,GNFX IF RHF FILE 01228 M00S00973.qload ---| RJ RSS REFORMAT VERSION ONE SYSTEM SECTOR 01229 M01S00974.qload1 ---| SX1 B0 SET *EOF* NOT ENCOUNTERED 01230 M01S00975.qload1 ---| SX4 B0 CLEAR * 5.5 (RHF) FILE TO BE SKIPPED *
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | qload1 |
M02 (Removed by) | qload2 |
Seq # *Modification Id* Act ----------------------------+ 01231 M02S00004.qload2 ---| SX1 B0+ CLEAR *EOF* ENCOUNTERED
| Line S00039 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01232 M01S00039.ns21000 +++| NZ X4,GNFX IF VERSION ONE FILE TO BE SKIPPED 01233 M01S00040.ns21000 +++| SA3 GNFC CHECK FOR EOI SECTOR TO REFORMAT 01234 M01S00041.ns21000 +++| NZ X3,GNFX IF NO EOI TO REFORMAT 01235 M01S00042.ns21000 +++| RJ RES REFORMAT EOI SECTOR
| Line S00043 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | qload4 |
Seq # *Modification Id* Act ----------------------------+ 01236 M02S00043.qload4 ---| SB7 B0+ CLEAR ERROR ENCOUNTERED 01237 M02S00044.qload4 ---| BX1 X1-X1 CLEAR *EOF* ENCOUNTERED 01238 M02S00045.qload4 ---| BX4 X4-X4 CLEAR VERSION ONE FILE TO SKIP
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | qload2 |
M02 (Removed by) | qload4 |
Seq # *Modification Id* Act ----------------------------+ 01239 M02S00001.qload4 ---| BX1 X1-X1 CLEAR *EOF* ENCOUNTERED 01240 M02S00002.qload4 ---| SB7 B0 CLEAR ERROR ENCOUNTERED 01241 M00S00976.qload ---| EQ GNFX RETURN 01242 M00S00977.qload ---| 01243 M00S00978.qload ---| GNF5 SA3 T SET LEVEL 17 INTO FET 01244 M00S00979.qload ---| MX6 4 01245 M00S00980.qload ---| LX6 18 01246 M00S00981.qload ---| BX3 -X6*X3 01247 M00S00982.qload ---| BX6 X6+X3 01248 M00S00983.qload ---| SA6 A3 01249 M00S00984.qload ---| SKIPFF A3,1,R SKIP TO *EOF* 01250 M00S00985.qload ---| SA3 T 01251 M00S00986.qload ---| LX3 59-9 01252 M00S00987.qload ---| MX1 1 SET *EOF* ENCOUNTERED 01253 M00S00988.qload ---| NG X3,GNF10 IF *EOI* ENCOUNTERED
| Line S00989 Modification History | |
|---|---|
M01 (Removed by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 01254 M01S00989.qload1 ---| SX4 B0+ CLEAR * 5.5 (RHF) FILE TO BE SKIPPED *
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | qload1 |
M02 (Removed by) | qload4 |
Seq # *Modification Id* Act ----------------------------+ 01255 M02S00005.qload4 ---| SX4 B0+ CLEAR VERSION ONE FILE TO SKIP 01256 M00S00990.qload ---| EQ GNFX RETURN 01257 M00S00991.qload ---| 01258 M00S00992.qload ---| GNF6 BX6 X6-X6 CLEAR *SSBF* 01259 M00S00993.qload ---| SB7 B0 CLEAR ERROR STATUS 01260 M00S00994.qload ---| SB2 SSBF+SSBFL-1 01261 M00S00995.qload ---| SA6 SSBF 01262 M00S00996.qload ---| GNF7 SA6 A6+B1 01263 M00S00997.qload ---| SB6 A6-B2 01264 M00S00998.qload ---| MI B6,GNF7 IF NOT END OF BUFFER
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | qload4 |
Seq # *Modification Id* Act ----------------------------+ 01265 M01S00002.qload4 +++| BX4 X4-X4 CLEAR VERSION ONE FILE TO SKIP
| Line S00999 Modification History | |
|---|---|
M01 (Removed by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 01266 M01S00999.qload1 ---| SX4 B0 CLEAR * 5.5 (RHF) FILE TO BE SKIPPED * 01267 M00S01000.qload ---| EQ GNFX RETURN 01268 M00S01001.qload ---| 01269 M00S01002.qload ---| GNF8 SB2 B6-3 CHECK IF *NOS* FIELD 01270 M00S01003.qload ---| SB6 B6-6 CHECK IF HEADER FIELD 01271 M00S01004.qload ---| SB4 GNFB COPY HEADER FIELD TO MESSAGE AREA 01272 M00S01005.qload ---| ZR B2,GNF4 IF *NOS* FIELD 01273 M00S01006.qload ---| NZ B6,GNF10 IF NOT HEADER FIELD 01274 M00S01007.qload ---| SX3 4 01275 M00S01008.qload ---| RJ RSF READ SKIP FIELD 01276 M00S01009.qload ---| MESSAGE GNFA *** PROCESSING DUMP FILE. *** 01277 M00S01010.qload ---| MESSAGE GNFB *DUMPNAM DATE, TIME.* 01278 M00S01011.qload ---| NZ B7,GNFX IF ERROR ENCOUNTERED 01279 M00S01012.qload ---| EQ GNF2 PROCESS NEXT RECORD 01280 M00S01013.qload ---| 01281 M00S01014.qload ---|* PROCEED TO NEXT REEL. 01282 M00S01015.qload ---| 01283 M00S01016.qload ---| GNF9 READO T SKIP TRAILING CONTROL WORD 01284 M00S01017.qload ---| EQ GNF1 PROCESS NEXT BLOCK 01285 M00S01018.qload ---| 01286 M00S01019.qload ---| GNFA DATA C$*** PROCESSING DUMP FILE. ***$ 01287 M00S01020.qload ---| GNFB BSS 5
| Line S00046 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01288 M01S00046.ns21000 +++| GNFC BSS 1 EOI PRESENT FLAG 01289 M00S01021.qload +++| ISM SPACE 4,20 01290 M00S01022.qload +++|** ISM - ISSUE FILES LOADED MESSAGE. 01291 M00S01023.qload +++|* 01292 M00S01024.qload +++|* ENTRY (FLDS) = FILE DISPOSITION COUNTS. 01293 M00S01025.qload +++|* (EFCT) = ERROR FILE COUNT. 01294 M00S01026.qload +++|* 01295 M00S01027.qload +++|* EXIT OUTPUT FILE FLUSHED. 01296 M00S01028.qload +++|* 01297 M00S01029.qload +++|* USES A - 1, 2, 6. 01298 M00S01030.qload +++|* B - 3, 6. 01299 M00S01031.qload +++|* X - 0, 1, 2, 6. 01300 M00S01032.qload +++|* 01301 M00S01033.qload +++|* CALLS CDD. 01302 M00S01034.qload +++| 01303 M00S01035.qload +++| 01304 M00S01036.qload +++| ISM SUBR ENTRY/EXIT 01305 M00S01037.qload +++| SB6 B0+ CLEAR MESSAGE INDEX 01306 M00S01038.qload +++| IMS1 SA1 FLDS+B6 GET DISPOSITION COUNT 01307 M00S01039.qload +++| SB6 B6+B1 INCREMENT INDEX 01308 M00S01040.qload +++| SB3 B6-FLDSL-1 01309 M00S01041.qload +++| ZR B3,IMS2 IF END OF MESSAGES 01310 M00S01042.qload +++| ZR X1,IMS1 IF EMPTY COUNT 01311 M00S01043.qload +++| RJ CDD CONVERT COUNT TO DECIMAL DISPLAY CODE 01312 M00S01044.qload +++| SA2 IMSA-1+B6 MERGE COUNT WITH MESSAGE 01313 M00S01045.qload +++| SA1 X2+B1 01314 M00S01046.qload +++| MX0 -24 01315 M00S01047.qload +++| BX6 -X0*X6 01316 M00S01048.qload +++| LX0 -24 01317 M00S01049.qload +++| BX1 X0*X1 01318 M00S01050.qload +++| LX6 -24 01319 M00S01051.qload +++| BX6 X6+X1 01320 M00S01052.qload +++| SA6 A1 01321 M00S01053.qload +++| MESSAGE X2 01322 M00S01054.qload +++| EQ IMS1 LOOP TO END OF MESSAGES 01323 M00S01055.qload +++| 01324 M00S01056.qload +++| IMS2 WRITER O,R FLUSH OUTPUT FILE 01325 M00S01057.qload +++| JP ISMX RETURN 01326 M00S01058.qload +++| 01327 M00S01059.qload +++|* THE FOLLOWING TABLES ARE ORDER DEPENDENT. 01328 M00S01060.qload +++| 01329 M00S01061.qload +++| IMSA CON IMSB 01330 M00S01062.qload +++| CON IMSC 01331 M00S01063.qload +++| CON IMSD 01332 M00S01064.qload +++| CON IMSE 01333 M00S01065.qload +++| CON IMSF 01334 M00S01066.qload +++| 01335 M00S01067.qload +++| IMSB DATA C* QLOAD - NNNN FILES IGNORED.* 01336 M00S01068.qload +++| IMSC DATA C* QLOAD - NNNN ACTIVE FILES LOADED.* 01337 M00S01069.qload +++| IMSD DATA C* QLOAD - NNNN INACTIVE FILES LOADED.* 01338 M00S01070.qload +++| IMSE DATA C* QLOAD - NNNN FILES LISTED.* 01339 M00S01071.qload +++| IMSF DATA C* QLOAD - NNNN ERRXXX FILES CREATED.* 01340 M00S01072.qload +++| PLF SPACE 4,15 01341 M00S01073.qload +++|** PLF - POSITION LOAD FILE. 01342 M00S01074.qload +++|* 01343 M00S01075.qload +++|* ENTRY LOAD FILE ASSIGNED TO JOB. 01344 M00S01076.qload +++|* 01345 M00S01077.qload +++|* EXIT LOAD FILE POSITION TO SELECTED POSITION. 01346 M00S01078.qload +++|* (B7) = ERROR MESSAGE ADDRESS. 01347 M00S01079.qload +++|* (B7) = 0 IF NO ERROR OCURRED. 01348 M00S01080.qload +++|* 01349 M00S01081.qload +++|* USES A - 4, 5, 6. 01350 M00S01082.qload +++|* B - 7. 01351 M00S01083.qload +++|* X - 0, 4, 5, 6. 01352 M00S01084.qload +++| 01353 M00S01085.qload +++| 01354 M00S01086.qload +++| PLF4 SB7 MES3 * LOAD FILE MISPOSITIONED.* 01355 M00S01087.qload +++| 01356 M00S01088.qload +++| PLF SUBR ENTRY/EXIT 01357 M00S01089.qload +++| SA5 TARA+ARFC CHECK FOR REWIND 01358 M00S01090.qload +++| LX5 59-58 01359 M00S01091.qload +++| PL X5,PLF1 IF REWIND NOT SELECTED 01360 M00S01092.qload +++| REWIND T,R 01361 M00S01093.qload +++| PLF1 SA5 TARA+ARNF CHECK FILE SKIP COUNT 01362 M00S01094.qload +++| ZR X5,PLF2 IF NO FILE COUNT 01363 M00S01095.qload +++| SA4 T SET LEVEL NUMBER 01364 M00S01096.qload +++| MX0 4 01365 M00S01097.qload +++| LX0 18 01366 M00S01098.qload +++| BX6 X4+X0 01367 M00S01099.qload +++| SA6 A4 01368 M00S01100.qload +++| SKIPFF A4,X5,R SKIP FILE COUNT 01369 M00S01101.qload +++| SA5 T CHECK RESPONSE 01370 M00S01102.qload +++| LX5 59-9 01371 M00S01103.qload +++| MI X5,PLF4 IF INCORRECT POSITION 01372 M00S01104.qload +++| PLF2 SA5 TARA+ARSC CHECK SECTOR COUNT 01373 M00S01105.qload +++| SA4 T CLEAR LEVEL NUMBER 01374 M00S01106.qload +++| ZR X5,PLF3 IF SKIP COUNT NOT SPECIFIED 01375 M00S01107.qload +++| MX0 4 01376 M00S01108.qload +++| SX5 X5+B1 SKIP HEADER RECORD 01377 M00S01109.qload +++| LX0 18 01378 M00S01110.qload +++| BX6 -X0*X4 01379 M00S01111.qload +++| SA6 A4 01380 M00S01112.qload +++| SKIPF A4,X5,R SKIP RECORD COUNT 01381 M00S01113.qload +++| SA5 T CHECK RESPONSE 01382 M00S01114.qload +++| BX6 X5 01383 M00S01115.qload +++| LX5 59-9 01384 M00S01116.qload +++| MI X5,PLF4 IF *EOI* 01385 M00S01117.qload +++| PLF3 READCW T,17B INITIALIZE READ 01386 M00S01118.qload +++| SB7 B0 CLEAR ERROR 01387 M00S01119.qload +++| JP PLFX RETURN 01388 M00S01120.qload +++| PRS SPACE 2,20 01389 M00S01121.qload +++|** PRS - PRESET FILES AND CONTROL. 01390 M00S01122.qload +++|* 01391 M00S01123.qload +++|* ENTRY PARAMETERS PROCESSED BY *QFSP*. 01392 M00S01124.qload +++|* 01393 M00S01125.qload +++|* EXIT CONTROL BLOCKS CLEARED. 01394 M00S01126.qload +++|* FILES INTIALIZED. 01395 M00S01127.qload +++|* CONTROL FLAGS PRESET. 01396 M00S01128.qload +++|* (B7) = ERROR MESSAGE ADDRESS. 01397 M00S01129.qload +++|* (B7) = 0 IF NO ERROR. 01398 M00S01130.qload +++|* 01399 M00S01131.qload +++|* USES X - 1, 2, 3, 4, 5, 6, 7. 01400 M00S01132.qload +++|* A - 1, 2, 3, 5, 6, 7. 01401 M00S01133.qload +++|* B - 5, 6, 7. 01402 M00S01134.qload +++|* 01403 M00S01135.qload +++|* CALLS PIQ, SFN, SQL. 01404 M00S01136.qload +++|*
| Line S01137 Modification History | |
|---|---|
M01 (Removed by) | qload3 |
Seq # *Modification Id* Act ----------------------------+ 01405 M01S01137.qload3 ---|* MACROS CLOCK, DATE, EREXIT, MEMORY, WRITE.
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | qload3 |
Seq # *Modification Id* Act ----------------------------+ 01406 M01S00011.qload3 +++|* MACROS CLOCK, DATE, EREXIT, MEMORY, SETFS, WRITE. 01407 M00S01138.qload +++| 01408 M00S01139.qload +++|
| Line S01140 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01409 M01S01140.ns21000 ---| PRS9 SA2 X3+TEQA CHECK FOR REMOVABLE DEVICE 01410 M01S01141.ns21000 ---| ZR X3,PRS10 IF EQUIPMENT NOT SPECIFIED 01411 M01S01142.ns21000 ---| LX2 59-1 01412 M01S01143.ns21000 ---| SB7 MES6 * ACTIVE LOAD NOT ALLOWED.* 01413 M01S01144.ns21000 ---| MI X2,PRSX IF REMOVABLE DEVICE 01414 M01S01145.ns21000 ---| PRS10 RJ SQL SET QFT LIMIT 01415 M01S01146.ns21000 ---| BX6 X6-X6 CLEAR FOT FULL FLAG 01416 M01S01147.ns21000 ---| SA6 FOTF 01417 M01S01148.ns21000 ---| SB7 B0 CLEAR ERROR INDICATOR
| Line S00047 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01418 M01S00047.ns21000 +++| PRS5 SA2 X3+TEQA CHECK FOR REMOVABLE DEVICE 01419 M01S00048.ns21000 +++| ZR X3,PRS6 IF EQUIPMENT NOT SPECIFIED 01420 M01S00049.ns21000 +++| LX2 59-1 01421 M01S00050.ns21000 +++| SB7 MES6 * ACTIVE LOAD NOT ALLOWED.* 01422 M01S00051.ns21000 +++| NG X2,PRSX IF REMOVABLE DEVICE 01423 M01S00052.ns21000 +++| PRS6 RJ SQL SET QFT LIMIT 01424 M01S00053.ns21000 +++| SB7 B0+ CLEAR ERROR INDICATOR 01425 M01S00054.ns21000 +++| SX6 B0+ CLEAR FOT AND LID TABLE FULL FLAGS 01426 M01S00055.ns21000 +++| SA6 FOTF 01427 M01S00056.ns21000 +++| SA6 LTFL 01428 M00S01149.qload +++| 01429 M00S01150.qload +++| PRS SUBR ENTRY/EXIT
| Line S00047 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01430 M01S00047.ns22000 +++| SX7 99999 01431 M01S00048.ns22000 +++| SA7 LINE FORCE PAGE EJECT 01432 M01S00049.ns22000 +++| SX6 B1 01433 M00S01151.qload +++| BX7 X7-X7 CLEAR CONTROL BLOCK 01434 M00S01152.qload +++| SA7 FWA
| Line S01153 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01435 M01S01153.ns22000 ---| SB6 ROTB+ROTBL-1
| Line S00050 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01436 M01S00050.ns22000 +++| SB6 ROTB+EPBL-1 01437 M01S00051.ns22000 +++| SA6 PDFE+1 ENABLE PRINT DENSITY CONTROL 01438 M00S01154.qload +++| PRS1 SA7 A7+B1 01439 M00S01155.qload +++| SB5 A7-B6 01440 M00S01156.qload +++| MI B5,PRS1 IF NOT END OF BLOCK
| Line S01157 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01441 M01S01157.ns21000 ---| SA7 SSBF CLEAR SYSTEM SECTOR BLOCK
| Line S00057 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01442 M01S00057.ns21000 +++| SA7 SSBF CLEAR SYSTEM INFORMATION BUFFER 01443 M00S01158.qload +++| SB6 SSBF+SSBFL-1 01444 M00S01159.qload +++| PRS2 SA7 A7+B1 01445 M00S01160.qload +++| SB5 A7-B6 01446 M00S01161.qload +++| MI B5,PRS2 IF NOT END OF BLOCK
| Line S01162 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01447 M01S01162.ns22000 ---| MX7 1 INITIALIZE HEADER ROUTINE 01448 M01S01163.ns22000 ---| SX6 B1 RESET PAGE COUNT 01449 M00S01164.qload ---| SA1 T+1 CLEAR ERROR PROCESSING BIT 01450 M01S01165.ns22000 ---| SA7 LINE 01451 M01S01166.ns22000 ---| SA6 WPHA
| Line S00052 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01452 M01S00052.ns22000 +++| SA6 WPHA RESET PAGE COUNT 01453 M00S01167.qload +++| LX6 44 01454 M00S01168.qload +++| BX6 -X6*X1 01455 M00S01169.qload +++| SA5 TARA+ARFC SET LIST CONTROL 01456 M00S01170.qload +++| SA6 T+1 01457 M00S01171.qload +++| SX6 MES1 * QLOAD OPERATION COMPLETE.* 01458 M00S01172.qload +++| SX7 X5 01459 M00S01173.qload +++| SA7 LIST 01460 M00S01174.qload +++| ZR X7,PRS3 IF *QLOAD* 01461 M00S01175.qload +++| SX7 LSDP SET LIST DISPOSITION 01462 M00S01176.qload +++| SX6 MES5 * LDLIST OPERATION COMPLETE.* 01463 M00S01177.qload +++| SA7 DSPC 01464 M00S01178.qload +++| PRS3 SA6 TRMM SET TERMINATION MESSAGE 01465 M00S01179.qload +++| EREXIT ABT SET ERROR EXIT ADDRESS 01466 M00S01180.qload +++| 01467 M00S01181.qload +++|* SET OUTPUT FILE NAME. 01468 M00S01182.qload +++| 01469 M00S01183.qload +++| SA1 TARA+ARLL GET FILE NAME 01470 M00S01184.qload +++| SX6 B1 CLEAR BUSY STATUS 01471 M00S01185.qload +++| BX6 X6+X1 01472 M00S01186.qload +++| SA6 O 01473 M00S01187.qload +++| WRITE O,* PRESET WRITE FUNCTION
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | qload3 |
Seq # *Modification Id* Act ----------------------------+ 01474 M01S00012.qload3 +++| SETFS O,0 PRESERVE OUTPUT FILE 01475 M00S01188.qload +++| SA5 TARA+ARFC CHECK IF *OUT* REQUEST 01476 M00S01189.qload +++| SB7 B0 01477 M00S01190.qload +++| SX5 X5-3 01478 M00S01191.qload +++| ZR X5,PRSX IF *OUT* REQUEST 01479 M00S01192.qload +++| 01480 M00S01193.qload +++|* PROCESS LOAD FILE AND CHECK FILE NAMES. 01481 M00S01194.qload +++| 01482 M00S01195.qload +++| SA3 NIQ COMPARE FILE NAMES 01483 M00S01196.qload +++| SA5 TARA+ARFN SET LOAD FILE NAME 01484 M00S01197.qload +++| MX0 42 01485 M00S01198.qload +++| SX4 B1 CLEAR BUSY STATUS 01486 M00S01199.qload +++| BX1 X6-X5 01487 M00S01200.qload +++| BX2 X6-X3 01488 M00S01201.qload +++| BX3 X5-X3 01489 M00S01202.qload +++| BX6 X4+X5 01490 M00S01203.qload +++| BX1 X0*X1 01491 M00S01204.qload +++| BX2 X0*X2 01492 M00S01205.qload +++| BX3 X0*X3 01493 M00S01206.qload +++| SA6 T 01494 M00S01207.qload +++| SB7 MES9 * FILE NAME CONFLICT.* 01495 M00S01208.qload +++| ZR X1,PRSX IF OUTPUT AND LOAD MATCH 01496 M00S01209.qload +++| ZR X2,PRSX IF OUTPUT AND *IQFT* MATCH 01497 M00S01210.qload +++| ZR X3,PRSX IF LOAD AND *IQFT* MATCH
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/qload.txt · Last modified: by 127.0.0.1