cdc:nos2.source:opl.opl871:deck:qload
Deck QLOAD
25 Modifications
Listing Sections
- Deck QLOAD Start
- Deck QLOAD Part 1 (Line 1440)
- Deck QLOAD Part 2 (Line 3094)
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M01S00001.qload +++| IDENT QLOAD1,FWA,QLOAD,01,00 00002 M01S00002.qload +++| ABS 00003 M01S00003.qload +++| SST 00004 M01S00004.qload +++| SYSCOM B1 00005 M01S00005.qload +++| VR1$ SET 1 *COMSSSE* CONTAINS VERSION 1 EQUIVALENCES 00006 M01S00006.qload +++|*COMMENT QLOAD - QUEUE LOAD PROCESSOR.
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00007 M02S00007.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1976. 00008 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00009 M01S00008.qload +++| TITLE QLOAD - QUEUE LOAD PROCESSOR. 00010 M01S00009.qload +++| SPACE 4 00011 M01S00010.qload +++|*** QLOAD - QUEUE LOAD PROCESSOR. 00012 M01S00011.qload +++|* 00013 M01S00012.qload +++|* S. L. BETH 76/02/23. 00014 M01S00013.qload +++| SPACE 4 00015 M01S00014.qload +++|*** *QLOAD* WILL PROCESS DUMP TAPES GENERATED BY *QDUMP* OR 00016 M01S00015.qload +++|* TAPES PRODUCED BY OTHER UTILITIES USING THE SAME FORMAT. 00017 M01S00016.qload +++|* QUEUES WILL BE SELECTIVELY LOADED UNDER THE GUIDANCE OF 00018 M01S00017.qload +++|* PARAMETER INPUT. *QLOAD* MAY ALSO BE USED TO LIST THE 00019 M01S00018.qload +++|* CONTENTS OF A DUMP TAPE WITHOUT LOADING ANY FILES. 00020 M01S00019.qload +++| SPACE 4
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns2127 |
Seq # *Modification Id* Act ----------------------------+ 00021 M02S00020.ns2127 ---|*** *QLOAD* MAY BE CALLED THROUGH *QFSP* OF BY CONTROL STATEMENT. 00022 M01S00001.ns2127 +++|*** *QLOAD* MAY BE CALLED THROUGH *QFSP* OR BY CONTROL STATEMENT. 00023 M01S00021.qload +++|* THE FOLLOWING PARAMETERS ARE VALID. 00024 M01S00022.qload +++|* 00025 M01S00023.qload +++|* MI = MACHINE IDENTIFICATION. 00026 M01S00024.qload +++|* DF = DESTINATION FAMILY NAME (MUST BE ENTERED). 00027 M01S00025.qload +++|* FOR ACTIVE LOADS *DF* MAY BE SET TO *ALL*. 00028 M01S00026.qload +++|* FOR INACTIVE LOADS *DF* HAS TO BE A SPECIFIC FAMILY. 00029 M01S00027.qload +++|* DD = DESTINATION DEVICE NUMBER (REQUIRED IF *DF* NOT *ALL*). 00030 M01S00028.qload +++|* FU = FAMILY NAME FOR USER INDEX. 00031 M01S00029.qload +++|* UI = USER INDEX RANGE (0 - 377777B). 00032 M01S00030.qload +++|* DA = DATE RANGE (751112-751118) OR ALL (DA=ALL). 00033 M01S00031.qload +++|* FS = FILE SIZE RANGE IN PRUS/10B (0 - 777777B). 00034 M01S00032.qload +++|* JSN = JOB SEQUENCE NUMBER, UP TO FIVE MAY BE ENTERED. 00035 M01S00001.ns21000 +++|* LD = LOGICAL IDENTIFIER (3 ALPHANUMERIC CHARACTERS). 00036 M01S00033.qload +++|* ID = RANGE OF FILE ID-S TO PROCESS. 00037 M01S00001.ns22000 +++|* LA = LOWER SECURITY ACCESS LEVEL (1-7 CHARACTERS). 00038 M01S00002.ns22000 +++|* UA = UPPER SECURITY ACCESS LEVEL (1-7 CHARACTERS). 00039 M01S00034.qload +++|* I = ALTERNATE DIRECTIVE INPUT FILE. THIS IS A CONTROL 00040 M01S00035.qload +++|* STATEMENT PARAMETER SPECIFYING WHAT FILE SHOULD 00041 M01S00036.qload +++|* BE READ FOR INPUT DIRECTIVES. THESE DIRECTIVES 00042 M01S00037.qload +++|* CONSIST OF ANY VALID K-DISPLAY INPUT OR COMMANDS. 00043 M01S00038.qload +++|* THESE DIRECTIVES WILL BE PROCESSED AFTER THE 00044 M01S00039.qload +++|* CONTROL STATEMENT DIRECTIVES BUT BEFORE ANY 00045 M01S00040.qload +++|* K-DISPLAY INPUT IS ACCEPTED. 00046 M01S00041.qload +++|* L = OUTPUT FILE NAME. 00047 M01S00042.qload +++|* FN = LOAD FILE NAME. 00048 M01S00043.qload +++|* FC = FORMS CODE FOR OUTPUT FILES. 00049 M01S00044.qload +++|* TF = FAMILY FOR REMOTE BATCH TERMINAL. 00050 M01S00045.qload +++|* TUI = USER INDEX FOR REMOTE BATCH TERMINAL. 00051 M01S00046.qload +++|* TUI = XXXXXX-YYYYYY MEANS TO PROCESS ALL INDEXES IN 00052 M01S00047.qload +++|* THE RANGE XXXXXX TO YYYYYY. YYYYYY IS OPTIONAL. 00053 M01S00048.qload +++|* (0 - 377777B ALLOWED.) 00054 M01S00049.qload +++|* DS = DEVICE SELECTION CRITERIA FOR OUTPUT FILES. 00055 M01S00050.qload +++|* (DS=DV-EX) SELECTION BASED ON DEVICE CODES AND ON 00056 M01S00051.qload +++|* EXTERNAL CHARACTERISTICS. 00057 M01S00052.qload +++|* (DS=DV) SELECTION BASED ON DEVICE CODES ONLY. 00058 M01S00053.qload +++|* NF = NUMBER OF MEDIA FILES TO SKIP. 00059 M01S00054.qload +++|* SC = NUMBER OF QUEUED FILES TO SKIP. 00060 M01S00055.qload +++|* OP = OPTION, INACTIVE OR ACTIVE.
| Line S00056 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00061 M02S00056.ns22000 ---|* OT=DT, ORIGIN AND DISPOSITION TYPE SELECTION.
| Line S00057 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00062 M02S00057.ns22000 ---|* *OT* MAY BE ANY OF THE FOLLOWING. 00063 M01S00003.ns22000 +++|* DS=DT, FILE DESTINATION AND DISPOSTION TYPE SELECTION. 00064 M01S00004.ns22000 +++|* *DS* MAY BE ANY OF THE FOLLOWING. 00065 M01S00058.qload +++|* BC - SELECT LOCAL BATCH FILES BY DISPOSITION TYPE. 00066 M01S00059.qload +++|* RB - SELECT REMOTE BATCH FILES BY DISPOSITION TYPE.
| Line S00060 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00067 M02S00060.ns22000 ---|* SY - SELECT SYSTEM ORIGIN FILES BY DISPOSITION TYPE. 00068 M01S00061.qload +++|* *DT* MAY BE ANY OF THE FOLLOWING. 00069 M01S00062.qload +++|* IN - INPUT. 00070 M01S00063.qload +++|* PL - PLOT. 00071 M01S00064.qload +++|* PH - PUNCH. 00072 M01S00065.qload +++|* PR - ANY PRINTER. 00073 M01S00066.qload +++|* P2 - 512 PRINTER. 00074 M01S00067.qload +++|* LR - 580-12 PRINTER. 00075 M01S00068.qload +++|* LS - 580-16 PRINTER. 00076 M01S00069.qload +++|* LT - 580-20 PRINTER. 00077 M01S00001.241l630 +++|* LX - 5870 NON-IMPACT PRINTER. 00078 M01S00002.241l630 +++|* LY - 5970 NON-IMPACT PRINTER. 00079 M01S00070.qload +++|* PRINT - ALL PRINT TYPES. 00080 M01S00071.qload +++|* WT - WAIT QUEUE. 00081 M01S00072.qload +++|* ALL - ALL DISPOSITION TYPES. 00082 M01S00073.qload +++|* NONE - NO DISPOSITION TYPES ALLOWED. 00083 M01S00074.qload +++|* SF - INSTALLATION DEFINED TYPE. 00084 M01S00075.qload +++|* PO=X, PROCESSING OPTION. 00085 M01S00076.qload +++|* X MAY BE ANY COMBINATION OF THE FOLLOWING.
| Line S00077 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload3 |
Seq # *Modification Id* Act ----------------------------+ 00086 M02S00077.qload3 ---|* E - ERRORED FILE PROCESSING.
| Line S00078 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload3 |
Seq # *Modification Id* Act ----------------------------+ 00087 M02S00078.qload3 ---|* F - FAMILY ORDINAL TABLE PROCESSING.
| Line S00079 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload3 |
Seq # *Modification Id* Act ----------------------------+ 00088 M02S00079.qload3 ---|* N - NO K-DISPLAY.
| Line S00080 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload3 |
Seq # *Modification Id* Act ----------------------------+ 00089 M02S00080.qload3 ---|* R - REWIND LOAD FILE. 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. 00096 M01S00001.ns2330 +++|* I - IF SPECIFIED, INACTIVE INPUT QUEUE FILES WILL BE 00097 M01S00002.ns2330 +++|* ACTIVATED WHEN THE OWNER FAMILY IS NOT PRESENT. 00098 M01S00001.ns2490 +++|* U - IF SPECIFIED, UNCONDITIONALLY LOAD FILES WITHIN 00099 M01S00002.ns2490 +++|* SECURITY RESTRAINTS AND SYSTEM FILE INTEGRITY. 00100 M01S00081.qload +++|* 00101 M01S00082.qload +++|* DEFAULT VALUES. 00102 M01S00083.qload +++|* 00103 M01S00084.qload +++|* MI = CURRENT MACHINE VALUE. 00104 M01S00085.qload +++|* DF = ALL. 00105 M01S00086.qload +++|* DD = ALL. 00106 M01S00087.qload +++|* FU = 0. 00107 M01S00088.qload +++|* UI = 0 - 377777B. 00108 M01S00089.qload +++|* DA = LAST FIVE DAYS. 00109 M01S00090.qload +++|* FS = 0 - 777777B.
| Line S00091 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload3 |
Seq # *Modification Id* Act ----------------------------+ 00110 M02S00091.qload3 ---|* JN = 0.
| Line S00092 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload3 |
Seq # *Modification Id* Act ----------------------------+ 00111 M02S00092.qload3 ---|* ID = 0 - 77. 00112 M01S00002.ns21000 +++|* JSN = NOT SPECIFIED. 00113 M01S00003.ns21000 +++|* LD = NOT SPECIFIED. 00114 M01S00007.qload3 +++|* ID = 0 - 77. 00115 M01S00005.ns22000 +++|* LA = NOT SPECIFIED. 00116 M01S00006.ns22000 +++|* UA = NOT SPECIFIED. 00117 M01S00093.qload +++|* I = NONE. 00118 M01S00094.qload +++|* L = OUTPUT. 00119 M01S00095.qload +++|* FN = QFILES. 00120 M01S00096.qload +++|* FC = NOT SPECIFIED. 00121 M01S00097.qload +++|* TID = 0. 00122 M01S00098.qload +++|* DS = NOT SPECIFIED. 00123 M01S00099.qload +++|* NF = 0. 00124 M01S00100.qload +++|* SC = 0. 00125 M01S00101.qload +++|* OP = A.
| Line S00102 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00126 M02S00102.ns22000 ---|* OT = ALL. 00127 M01S00007.ns22000 +++|* DR = ALL.
| Line S00103 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload3 |
Seq # *Modification Id* Act ----------------------------+ 00128 M02S00103.qload3 ---|* FT = ALL.
| Line S00104 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload3 |
Seq # *Modification Id* Act ----------------------------+ 00129 M02S00104.qload3 ---|* R = NOT SELECTED.
| Line S00105 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload3 |
Seq # *Modification Id* Act ----------------------------+ 00130 M02S00105.qload3 ---|* E = NOT SELECTED. 00131 M01S00008.qload3 +++|* DT = ALL. 00132 M01S00009.qload3 +++|* PO = NONE SELECTED. 00133 M01S00106.qload +++| SPACE 4 00134 M01S00107.qload +++|*** OPERATOR/DAYFILE MESSAGES. 00135 M01S00108.qload +++|* 00136 M01S00109.qload +++|* * ACTIVE LOAD NOT ALLOWED.* THE DEVICE SELECTED FOR 00137 M01S00110.qload +++|* THE ACTIVE LOAD IS REMOVABLE AND THE LOAD IS 00138 M01S00111.qload +++|* NOT ALLOWED. SELECT ANOTHER DEVICE AND RETRY THE LOAD. 00139 M01S00112.qload +++|* 00140 M01S00113.qload +++|* * CANNOT ATTACH *IQFT* FILE.* AN ATTEMPT TO ACCESS THE *IQFT* 00141 M01S00114.qload +++|* FILE ON THE DESTINATION DEVICE FAILED. CHECK FOR 00142 M01S00115.qload +++|* OTHER UTILITIES ACCESSING THE FILE. WHEN THE FILE 00143 M01S00116.qload +++|* IS FREE RETRY THE QLOAD OPERATION. 00144 M01S00117.qload +++|* 00145 M01S00118.qload +++|* * DESTINATION DEVICE ERROR.* AN UNRECOVERABLE ERROR OCCURED 00146 M01S00119.qload +++|* WHEN WRITING TO THE DESTINATION DEVICE. CHECK THE 00147 M01S00120.qload +++|* OUTPUT FILE FOR THE FILES THAT WERE PROCESSED. 00148 M01S00121.qload +++|* 00149 M01S00122.qload +++|* * DESTINATION DEVICE REQUIRED.* FOR AN INACTIVE LOAD THE 00150 M01S00123.qload +++|* (FAMILY AND DEVICE NUMBER) OR THE PACKNAM OF 00151 M01S00124.qload +++|* THE DESTINATION DEVICE MUST BE SPECIFIED.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
M02 (Updated by) | qload9 |
Seq # *Modification Id* Act ----------------------------+ 00152 M02S00001.qload9 ---|*
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
M02 (Updated by) | qload9 |
Seq # *Modification Id* Act ----------------------------+ 00153 M02S00002.qload9 ---|* * DSP RETURNED ERROR XXB.*
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
M02 (Updated by) | qload9 |
Seq # *Modification Id* Act ----------------------------+ 00154 M02S00003.qload9 ---|* *DSP* RETURNED ERROR CODE *XX*. CHECK OUTPUT TO
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
M02 (Updated by) | qload9 |
Seq # *Modification Id* Act ----------------------------+ 00155 M02S00004.qload9 ---|* DETERMINE WHICH FILES WERE NOT LOADED. 00156 M01S00125.qload +++|* 00157 M01S00126.qload +++|* * ERROR FILE LIMIT.* THE NUMBER OF ERROR FILES CREATED HAS 00158 M01S00127.qload +++|* EXCEEDED THE UPPER LIMIT OR AN URECOVERABLE ERROR 00159 M01S00128.qload +++|* OCCURED WHILE ATEMPTING TO CREATE THE ERROR FILE. 00160 M01S00129.qload +++|* CHECK THE OUTPUT FOR FILES PROCESSED. 00161 M01S00130.qload +++|* 00162 M01S00131.qload +++|* * FILE NAME CONFLICT.* THE NAMES OF THE OUTPUT, LOAD OR 00163 M01S00132.qload +++|* *IQFT* FILE CONFLICT. CHANGE THE NAME OF THE LOAD 00164 M01S00133.qload +++|* OR OUTPUT FILE AND RETRY THE OPERATION. 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 M01S00134.qload +++|* 00170 M01S00135.qload +++|* * FOT FULL - FILES IGNORED.* - SOME OF THE QUEUED FILES 00171 M01S00136.qload +++|* WERE NOT PROCESSED BECAUSE THERE WAS NO FOT ENTRY FOR 00172 M01S00137.qload +++|* THE CREATION AND/OR THE DESTINATION FAMILY AND THE 00173 M01S00138.qload +++|* FOT WAS FULL (MESSAGE ISSUED BY *COMCVQF*). 00174 M01S00004.ns21000 +++|* 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 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00185 M02S00005.v23l617 ---|* * LID TABLE FULL - FILES IGNORED.* SOME OF THE QUEUED FILES 00186 M01S00001.v23l617 +++|* * LID NOT ADDED - FILES IGNORED.* SOME OF THE QUEUED FILES 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 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00189 M02S00008.v23l617 ---|* LID COULD NOT BE ADDED BECAUSE THE LID TABLE WAS
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00190 M02S00009.v23l617 ---|* FULL (MESSAGE ISSUED BY *COMCVQF*). 00191 M01S00002.v23l617 +++|* LID COULD NOT BE ADDED BECAUSE ALL LID SLOTS FOR THE
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00192 M02S00003.271l716 ---|* HOST PID WERE ALREADY OCCUPIED BY OTHER LIDS.
| Line S00139 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00193 M02S00139.271l716 ---|*
| Line S00140 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00194 M02S00140.271l716 ---|* * LDLIST OPERATION COMPLETE.* INFORMATIVE MESSAGE. 00195 M01S00011.271l716 +++|* HOST PID WERE ALREADY OCCUPIED BY OTHER LIDS 00196 M01S00012.271l716 +++|* (MESSAGE ISSUED BY *COMCVQF*).
| Line S00141 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00197 M02S00141.ns21000 ---|*
| Line S00142 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00198 M02S00142.ns21000 ---|* * *LFM* ERROR ON ERRNNN FILE.* DURING THE FILE RENAME ,
| Line S00143 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00199 M02S00143.ns21000 ---|* LOCK AND COMMON SEQUENCE WHILE SAVING THE ERROR FILE
| Line S00144 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00200 M02S00144.ns21000 ---|* AN *LFM* ERROR OCCURED. RETRY THE LOAD OPERATION. 00201 M01S00145.qload +++|* 00202 M01S00146.qload +++|* * LOAD FILE MISPOSITIONED.* A FILE POSITION FUNCTION 00203 M01S00147.qload +++|* OR FILE READ INDICATED AN ATTEMPT TO POSITION 00204 M01S00148.qload +++|* BEYOND *EOI* OR THE CONTROL WORD READ WAS NOT 00205 M01S00149.qload +++|* THE EXPECTED CONTROL WORD. REWIND THE LOAD FILE 00206 M01S00150.qload +++|* AND RETRY THE OPERATION. 00207 M01S00151.qload +++|* 00208 M01S00152.qload +++|* * LOAD FILE POSITION LOST.* DURING THE WRITE ERROR RECOVERY 00209 M01S00153.qload +++|* SEQUENCE THE POSITION ON THE LOAD FILE WAS LOST. CHECK 00210 M01S00154.qload +++|* THE OUTPUT FILE FOR THE LIST OF FILES THAT WERE LOADED. 00211 M01S00155.qload +++|* 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 M01S00156.qload +++|* * NO OUTPUT FILE PRESENT.* THE OUT COMMAND WAS ENTERED
| Line S00157 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload3 |
Seq # *Modification Id* Act ----------------------------+ 00225 M02S00157.qload3 ---|* ANY *QLOAD* COULD NOT FIND AND OUTPUT FILE TO RELEASE. 00226 M01S00010.qload3 +++|* AND *QLOAD* COULD NOT FIND AN OUTPUT FILE TO RELEASE. 00227 M01S00158.qload +++|* 00228 M01S00159.qload +++|* * OUTPUT FILE RELEASED.* INFORMATIVE MESSAGE. 00229 M01S00160.qload +++|* 00230 M01S00161.qload +++|* * PREMATURE *EOF* ENCOUNTERED.* WHILE PROCESSING THE LOAD 00231 M01S00162.qload +++|* FILE AN *EOF* WAS ENCOUNTERED BEFORE IT WAS EXPECTED. 00232 M01S00163.qload +++|* NOTIFY ANALYST TO INVESTIGATE THE FORMAT OF THE 00233 M01S00164.qload +++|* LOAD TAPE. 00234 M01S00165.qload +++|* 00235 M01S00166.qload +++|* * QFT LIMIT ON LOAD.* THE CALCULATED QFT THRESHOLD HAS 00236 M01S00167.qload +++|* BEEN REACHED. CONSULT LISTING TO DETERMINE WHICH 00237 M01S00168.qload +++|* FILES WERE NOT LOADED. 00238 M01S00169.qload +++|* 00239 M01S00170.qload +++|* * QFT FULL DETECTED BY QFM.* *QFM* RETURNED QFT FULL 00240 M01S00171.qload +++|* STATUS WHEN CALLED TO ASSIGN A FILE TO MASS 00241 M01S00172.qload +++|* STORAGE. CHECK THE OUTPUT TO DETERMINE WHICH FILES 00242 M01S00173.qload +++|* WERE NOT PROCESSED. 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 M01S00174.qload +++|* 00250 M01S00175.qload +++|* * QLOAD ABORTED.* THE OPERATOR DROPPED THE JOB OR THE 00251 M01S00176.qload +++|* JOB WAS ABORTED FOR A SYSTEM ERROR. IF NOT 00252 M01S00177.qload +++|* OPERATOR DROP CHECK DAYFILE FOR CAUSE. 00253 M01S00178.qload +++|* 00254 M01S00179.qload +++|* * QLOAD OPERATION COMPLETE.* INFORMATIVE MESSAGE. 00255 M01S00180.qload +++|* 00256 M01S00181.qload +++|* * QLOAD TERMINATED.* QLOAD HAD ABORTED AND THE ABORT 00257 M01S00182.qload +++|* PROCESSING WAS TERMINATED BY THE OPERATOR OR DUE 00258 M01S00183.qload +++|* TO A SYSTEM ERROR. CHECK THE DAYFILE FOR CAUSE. 00259 M01S00184.qload +++|* 00260 M01S00185.qload +++|* * QUEUE FILE ASSIGN ERROR.* AN ATTEMPT TO FORCE A DEVICE 00261 M01S00186.qload +++|* ASSIGNMENT FOR THE QUEUE FILE BEING LOADED RESULTED 00262 M01S00187.qload +++|* IN THE DEVICE BEING ASSIGNED TO THE WRONG EQUIPMENT. 00263 M01S00001.ns2099 +++|*
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2099 |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00264 M02S00002.271l716 ---|* * IQFT NOT FOUND.* NO IQFT FILE WAS FOUND ON THE SELECTED
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2099 |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00265 M02S00003.271l716 ---|* DEVICE. THE DEVICE SHOULD BE INITIALIZED DUE TO THE
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2099 |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00266 M02S00004.271l716 ---|* INDETERMINATE STATE THAT IT IS IN. 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 (Added by) | qload |
M02 (Updated by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 00271 M02S00188.qload1 ---|*
| Line S00189 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 00272 M02S00189.qload1 ---|* * UNKNOWN VER.1 SYSTEM SECTOR TYPE.* AN ATTEMPT WAS MADE
| Line S00190 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 00273 M02S00190.qload1 ---|* TO LOAD A VERSION ONE QUEUE FILE THAT WAS NOT INPUT,
| Line S00191 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 00274 M02S00191.qload1 ---|* PRINT, OR PUNCH.
| Line S00192 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 00275 M02S00192.qload1 ---|*
| Line S00193 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 00276 M02S00193.qload1 ---|* * UNKNOWN VER.1 QUEUE PRIORITY. * AN ATTEMPT WAS MADE
| Line S00194 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 00277 M02S00194.qload1 ---|* TO LOAD A VERSION ONE INPUT FILE WITH AN UNKNOWN
| Line S00195 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 00278 M02S00195.qload1 ---|* PRIORITY. 00279 M01S00196.qload +++| SPACE 4 00280 M01S00197.qload +++|** MESSAGES ISSUED TO DAYFILE ONLY. 00281 M01S00198.qload +++|* 00282 M01S00199.qload +++|* 00283 M01S00200.qload +++|* * QLOAD - NNNN FILES IGNORED.* 00284 M01S00201.qload +++|* 00285 M01S00202.qload +++|* * QLOAD - NNNN ACTIVE FILES LOADED.* 00286 M01S00203.qload +++|* 00287 M01S00204.qload +++|* * QLOAD - NNNN INACTIVE FILES LOADED.* 00288 M01S00205.qload +++|* 00289 M01S00206.qload +++|* * QLOAD - NNNN FILES LISTED.* 00290 M01S00207.qload +++|* 00291 M01S00208.qload +++|* * QLOAD - NNNN ERRXXX FILES CREATED.* 00292 M01S00209.qload +++|* 00293 M01S00210.qload +++|* *** PROCESSING DUMP FILE. *** 00294 M01S00211.qload +++|* DUMPNAM DATE,TIME. 00295 M01S00212.qload +++|* 00296 M01S00213.qload +++|* THE TWO LINES IDENTIFYING THE DUMP TAPE BEING PROCCESSED 00297 M01S00214.qload +++|* WILL BE ISSUED WHEN THE DUMP HEADER FIELD IS ENCOUNTERED. 00298 M01S00215.qload +++|* THE FILE POSITIONING REQUESTS MAY POSITION THE FILE BEYOND 00299 M01S00216.qload +++|* THIS POINT IN WHICH CASE THE MESSAGE WILL NOT BE ISSUED. 00300 M01S00217.qload +++| SPACE 4 00301 M01S00218.qload +++|** COMMON DECKS (DEFINITIONS). 00302 M01S00219.qload +++| 00303 M01S00220.qload +++| 00304 M01S00221.qload +++|*CALL COMCMAC 00305 M01S00222.qload +++|*CALL COMCCMD 00306 M01S00223.qload +++| LIST X 00307 M01S00224.qload +++|*CALL COMSIOQ 00308 M01S00225.qload +++|*CALL COMSJIO 00309 M01S00226.qload +++|*CALL COMSQFS 00310 M01S00016.ns21000 +++|*CALL COMSSFM 00311 M01S00227.qload +++| LIST -X 00312 M01S00012.ns22000 +++|*CALL COMSMLS 00313 M01S00004.v23l617 +++|*CALL COMSMSC
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | ns2217 |
Seq # *Modification Id* Act ----------------------------+ 00314 M02S00013.ns2217 ---|*CALL COMSSCD 00315 M01S00228.qload +++|*CALL COMSSSE 00316 M01S00229.qload +++|*CALL COMSSSJ 00317 M01S00230.qload +++| QUAL COMS1DS
| Line S00231 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00318 M02S00231.v23l617 ---|*CALL COMS1DS 00319 M01S00232.qload +++| QUAL * 00320 M01S00233.qload +++|*CALL COMSDSP 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 M01S00234.qload +++| EJECT 00348 M01S00235.qload +++| TITLE QLOAD - CONSTANTS, COUNTERS, FETS, TABLES. 00349 M01S00236.qload +++|* CONSTANTS. 00350 M01S00237.qload +++| 00351 M01S00238.qload +++| 00352 M01S00239.qload +++| BUFL EQU 1001B OUTPUT BUFFER LENGTH 00353 M01S00240.qload +++| IBUFL EQU 1001B *IQFT* BUFFER LENGTH 00354 M01S00241.qload +++| SBUFL EQU 2041B SCRATCH BUFFER LENGTH
| Line S00242 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00355 M02S00242.ns21000 ---| SSBFL EQU 100B SYSTEM SECTOR BUFFER LENGTH 00356 M01S00017.ns21000 +++| SSBFL EQU 200B SYSTEM INFORMATION BUFFER LENGTH
| Line S00243 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00357 M02S00243.274l797 ---| TBUFL EQU 4011B TAPE BUFFER LENGTH 00358 M01S00001.274l797 +++| TBUFL EQU 20041B TAPE BUFFER LENGTH 00359 M01S00244.qload +++| WBUFL EQU 102B LENGTH OF WORKING BUFFER
| Line S00245 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns2127 |
Seq # *Modification Id* Act ----------------------------+ 00360 M02S00245.ns2127 ---| FRDC EQU 20B *DSP* DISPOSITION CODE FLAG 00361 M01S00246.qload +++| TACF EQU FOTA TABLE OF ACTIVE CREATION FAMILIES (*VIE*) 00362 M01S00014.ns22000 +++| LINE EQU TPPA+PPLN LINE NUMBER 00363 M01S00015.ns22000 +++| PDFE EQU TPPA+PPPD PRINT DENSITY FORMAT EFFECTOR 00364 M01S00247.qload +++| SPACE 4 00365 M01S00248.qload +++|* INDICATORS AND COUNTERS. 00366 M01S00249.qload +++| 00367 M01S00250.qload +++| 00368 M01S00251.qload +++| ORG OVLA 00369 M01S00252.qload +++| FWA BSS 0 00370 M01S00253.qload +++| ABTE CON 0 ABORT AT END OF LIST FLAG 00371 M01S00254.qload +++| ABTI CON 0 ABORT PROCESSING, 0 = SKIP FILE 00372 M01S00016.ns22000 +++| ALEF CON 0 ACCESS LEVEL ERROR FLAG 00373 M01S00255.qload +++| DEVN CON 0 FAMILY/DEVICE NUMBER 00374 M01S00256.qload +++| DSPC CON 0 FILE DISPOSITION CODE 00375 M01S00257.qload +++| DWIQ CON 0 NON ZERO IF DATA WRITTEN ON *IQFT* FILE 00376 M01S00258.qload +++| EOR CON 0 NON ZERO IF *EOR* ENCOUNTERED 00377 M01S00259.qload +++| ERRF CON 0 NON ZERO IF ERROR IN CURRENT FILE 00378 M01S00260.qload +++| ERTP CON 0 FILE ERROR TYPE 00379 M01S00261.qload +++| FILE CON 0 QUEUE FILE COUNT
| Line S00262 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00380 M02S00262.ns22000 ---| LINE CON 0 LINE NUMBER FOR OUTPUT 00381 M01S00263.qload +++| LIST CON 0 NON ZERO IF LIST OPTION 00382 M01S00264.qload +++| TRMM CON 0 ADDRESS OF TERMINATION MESSAGE 00383 M01S00265.qload +++| QLIM CON 0 QFT LIMIT FOR ACTIVE LOAD
| Line S00266 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00384 M02S00266.ns22000 ---| QUTP CON 0 QUEUE TYPE 00385 M01S00267.qload +++| 00386 M01S00268.qload +++|* CONTROL WORD POINTERS AND COPY CONTROLS. 00387 M01S00269.qload +++| 00388 M01S00270.qload +++| ASSF CON 0 INDICATES THE FILE IS ASSIGNED TO DISK 00389 M01S00271.qload +++| CQCW CON 0 CURRENT QUEUE CONTROL WORD 00390 M01S00272.qload +++| CTCW CON 0 CURRENT TAPE CONTROL WORD 00391 M01S00273.qload +++| CTLO CON 0 BUFFER LOCATION OF CURRENT CONTROL WORD 00392 M01S00274.qload +++| LEVL CON 0 RECORD LEVEL NUMBER 00393 M01S00275.qload +++| NTCW CON 0 WORDS TO NEXT TAPE CONTROL WORD 00394 M01S00276.qload +++| NQCW CON 0 WORD TO NEXT QUEUE CONTROL WORD 00395 M01S00277.qload +++| WDSX CON 0 WORDS IN TRANSFER BUFFER 00396 M01S00278.qload +++| SPACE 4 00397 M01S00279.qload +++|* FILE DISPOSITION COUNTS AND ERROR FILE COUNT. 00398 M01S00280.qload +++| 00399 M01S00281.qload +++| 00400 M01S00282.qload +++| FLDS BSSZ 4 00401 M01S00283.qload +++| EFCT CON 0 ERROR FILE COUNT 00402 M01S00284.qload +++| FLDSL EQU *-FLDS 00403 M01S00285.qload +++| SPACE 4 00404 M01S00286.qload +++|* IQFT ENTRY FOR CURRENT LOAD FILE. 00405 M01S00287.qload +++| 00406 M01S00288.qload +++| 00407 M01S00289.qload +++| IQFE BSS QFEWL 00408 M01S00290.qload +++| OLDN BSS 1 OLD QUEUE FILE NAME 00409 M01S00291.qload +++| SPACE 4 00410 M01S00292.qload +++|* ROUTE PARAMETER BLOCK. 00411 M01S00293.qload +++| 00412 M01S00294.qload +++|
| Line S00295 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00413 M02S00295.ns22000 ---| ROTB BSS 6
| Line S00296 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00414 M02S00296.ns22000 ---| ROTBL EQU *-ROTB
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | ns2127 |
Seq # *Modification Id* Act ----------------------------+ 00415 M02S00017.ns2127 ---| ROTB BSS EPBL 00416 M01S00002.ns2127 +++| ROTB BSSZ EPBL 00417 M01S00297.qload +++| SPACE 4 00418 M01S00298.qload +++|* FETS. 00419 M01S00299.qload +++| 00420 M01S00300.qload +++| 00421 M01S00301.qload +++| IQ BSS 0 00422 M01S00302.qload +++| NIQ BSS 0 IQFT FILE 00423 M01S00303.qload +++| "RFIQ" RFILEB IBUF,IBUFL,EPR,(FET=8) 00424 M01S00304.qload +++| 00425 M01S00305.qload +++| 00426 M01S00306.qload +++| O BSS 0 OUTPUT FILE 00427 M01S00307.qload +++| OUTPUT FILEB OBUF,BUFL,(FET=7) 00428 M01S00308.qload +++| 00429 M01S00309.qload +++| 00430 M01S00310.qload +++| S BSS 0 SCRATCH FILE 00431 M01S00311.qload +++| "RFSC" FILEB SBUF,SBUFL,EPR,(FET=8) 00432 M01S00312.qload +++| 00433 M01S00313.qload +++| 00434 M01S00314.qload +++| T BSS 0 LOAD FILE 00435 M01S00315.qload +++| TAPE FILEB TBUF,TBUFL,EPR,LBL 00436 M01S00316.qload +++| BSS 1 00437 M01S00317.qload +++| 00438 M01S00318.qload +++| 00439 M01S00319.qload +++| Q BSS 0 *FET* FOR *QFM* CALLS 00440 M01S00320.qload +++| QCALLS FILEB IQFE,QFEWL+1,(FET=8) 00441 M01S00321.qload +++|
| Line S00322 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00442 M02S00322.ns21000 ---| C BSS 0 SYSTEM SECTOR FOR *CQFF* *QFM* FUNCTION 00443 M01S00018.ns21000 +++| C BSS 0 SYSTEM INFORMATION (SYSTEM/EOI SECTORS) 00444 M01S00323.qload +++| CFILE FILEB SSBF,SSBFL+1,(FET=8) 00445 M01S00324.qload +++| SPACE 4 00446 M01S00325.qload +++|** TRANSFER TABLES. 00447 M01S00326.qload +++|* 00448 M01S00327.qload +++|* THE FOLLOWING TABLES ARE USED BY ROUTINE *PTT* (CALLED BY 00449 M01S00328.qload +++|* *RSS*) TO TRANSFER NOS VERSION ONE SYSTEM SECTOR FIELDS TO 00450 M01S00329.qload +++|* THEIR PROPER PLACE IN A NOS VERSION TWO SYSTEM SECTOR. THE 00451 M01S00330.qload +++|* THREE TABLES ARE *INTB* WHICH CONTAINS INPUT DEPENDENT 00452 M01S00331.qload +++|* SYSTEM SECTOR TRANSFER DATA, *OTTB*, WHICH CONTAINS 00453 M01S00332.qload +++|* OUTPUT DEPENDENT SYSTEM SECTOR TRANSFER DATA, AND *IOTB* 00454 M01S00333.qload +++|* WHICH CONTAINS TRANSFER DATA THAT IS FOR BOTH INPUT AND 00455 M01S00334.qload +++|* OUTPUT SYSTEM SECTORS. TABLES END WITH A ZERO WORD. 00456 M01S00335.qload +++|* 00457 M01S00336.qload +++|*T 12/0, 12/DFM, 12/DAD, 12/SFM, 12/SAD.
Figure
00458 M01S00337.qload +++|* 00459 M01S00338.qload +++|* DFM = DESTINATION FIELD MASK, NUMBER OF BITS IN FIELD. 00460 M01S00339.qload +++|* DAD = DESTINATION ADDRESS FROM *COMSSSE*. 00461 M01S00340.qload +++|* SFM = SOURCE FIELD MASK, NUMBER OF BITS IN FIELD. 00462 M01S00341.qload +++|* SAD = SOURCE ADDRESS FROM *COMSSSE*. 00463 M01S00342.qload +++| 00464 M01S00343.qload +++| OTTB VFD 12/0,12/24,12/RASS,12/24,12//NOSV1/RASS 00465 M01S00344.qload +++| VFD 12/0,12/12,12/LCSS,12/12,12//NOSV1/LCSS 00466 M01S00345.qload +++| VFD 12/0,12/12,12/RCSS,12/12,12//NOSV1/RCSS 00467 M01S00346.qload +++| VFD 12/0,12/24,12/RTSS,12/24,12//NOSV1/RTSS 00468 M01S00347.qload +++| VFD 12/0,12/12,12/SCSS,12/12,12//NOSV1/SCSS 00469 M01S00348.qload +++| VFD 12/0,12/12,12/RBSS,12/12,12//NOSV1/RBSS 00470 M01S00349.qload +++| VFD 12/0,12/12,12/IOSS+19,12/12,12//NOSV1/FCSS 00471 M01S00350.qload +++| VFD 60/0 00472 M01S00351.qload +++| 00473 M01S00352.qload +++| INTB VFD 12/0,12/12,12/JCSS,12/12,12//NOSV1/JCSS 00474 M01S00353.qload +++| VFD 12/0,12/12,12/JESS,12/12,12//NOSV1/JESS 00475 M01S00354.qload +++| VFD 12/0,12/24,12/CRSS,12/24,12//NOSV1/CRSS 00476 M01S00355.qload +++| VFD 12/0,12/48,12/TNSS,12/48,12//NOSV1/TNSS 00477 M01S00356.qload +++| VFD 60/0 00478 M01S00357.qload +++| 00479 M01S00358.qload +++| IOTB VFD 12/0,12/12,12/EQSS,12/12,12//NOSV1/EQSS 00480 M01S00359.qload +++| VFD 12/0,12/12,12/FTSS,12/12,12//NOSV1/FTSS 00481 M01S00360.qload +++| VFD 12/0,12/12,12/NSSS,12/12,12//NOSV1/NSSS 00482 M01S00361.qload +++| VFD 12/0,12/60,12/DTSS,12/60,12//NOSV1/DTSS 00483 M01S00362.qload +++| VFD 12/0,12/12,12/FGSS,12/12,12//NOSV1/FRSS+4 00484 M01S00363.qload +++| VFD 12/0,12/12,12/RMSS,12/12,12//NOSV1/QFSS 00485 M01S00364.qload +++| VFD 12/0,12/12,12/CMSS,12/12,12//NOSV1/MISS 00486 M01S00365.qload +++| VFD 12/0,12/60,12/DASS,12/60,12//NOSV1/DASS 00487 M01S00366.qload +++| VFD 12/0,12/48,12/FDSS,12/48,12//NOSV1/FDSS 00488 M01S00367.qload +++| VFD 12/0,12/60,12/ACSS,12/60,12//NOSV1/ACSS 00489 M01S00368.qload +++| VFD 12/0,12/60,12/OASS,12/60,12//NOSV1/ACSS 00490 M01S00369.qload +++| VFD 12/0,12/12,12/DCSS,12/12,12//NOSV1/DVSS 00491 M01S00370.qload +++| VFD 12/0,12/36,12/CDSS+2,12/36,12//NOSV1/CDSS+2 00492 M01S00371.qload +++| VFD 12/0,12/60,12/JNSS,12/60,12//NOSV1/JNSS 00493 M01S00372.qload +++| VFD 12/0,12/48,12/FMSS,12/48,12//NOSV1/FMSS 00494 M01S00373.qload +++| VFD 12/0,12/48,12/FOSS,12/48,12//NOSV1/FMSS 00495 M01S00374.qload +++| VFD 12/0,12/12,12/IOSS+5,12/12,12//NOSV1/EQSS 00496 M01S00375.qload +++| VFD 12/0,12/12,12/IOSS+6,12/12,12//NOSV1/FTSS 00497 M01S00376.qload +++| VFD 12/0,12/24,12/IOSS+16,12/24,12//NOSV1/DISS 00498 M01S00377.qload +++| VFD 12/0,12/12,12/IOSS+17,12/12,12//NOSV1/DISS+1 00499 M01S00378.qload +++| VFD 60/0 00500 M01S00379.qload +++| TITLE MAIN LOOP. 00501 M01S00380.qload +++|** QLOAD - MAIN LOOP. 00502 M01S00381.qload +++|* 00503 M01S00382.qload +++|* ENTRY PARAMETERS PROCESSED BY *QFSP*. 00504 M01S00383.qload +++|* 00505 M01S00384.qload +++|* EXIT (X2) = K-DISPLAY CONTROL. 00506 M01S00385.qload +++|* (X5) = TERMINATING MESSAGE. 00507 M01S00386.qload +++| 00508 M01S00387.qload +++| 00509 M01S00388.qload +++| QLOAD SUBR ENTRY/EXIT 00510 M01S00389.qload +++| RJ PRS PRESET FILES 00511 M01S00390.qload +++| NZ B7,ERR IF ERROR IN PARAMETERS 00512 M01S00391.qload +++| SA5 TARA+ARFC SET FUNCTION 00513 M01S00392.qload +++| SX5 X5-3 CHECK FOR OUT 00514 M01S00393.qload +++| ZR X5,OUT IF OUT REQUEST 00515 M01S00394.qload +++| RJ PLF POSITION LOAD FILE 00516 M01S00395.qload +++| NZ B7,ERR IF PROCESSING ERROR
| Line S00396 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00517 M02S00396.ns22000 ---| QDL1 RJ GNF GET NEXT LOAD FILE 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 M01S00397.qload +++| NZ B7,ERR IF PROCESSING ERROR 00522 M01S00398.qload +++| MI X1,QDL4 IF *EOF* ENCOUNTERED
| Line S00399 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 00523 M02S00399.qload1 ---| NG X4,QDL2 IF 5.5 (RHF) FILE TO BE SKIPPED 00524 M01S00001.qload1 +++| NZ X4,QDL2 IF VERSION ONE FILE TO SKIP 00525 M01S00400.qload +++| RJ BIE BUILD *IQFT* ENTRY 00526 M01S00401.qload +++| RJ CFS CHECK FILE SELECTION 00527 M01S00402.qload +++| SA4 ERRF CHECK FOR ERROR SKIP 00528 M01S00403.qload +++| IX6 X1+X4 00529 M01S00404.qload +++| NZ X6,QDL2 IF SKIP OR LIST 00530 M01S00405.qload +++| 00531 M01S00406.qload +++|* LOAD THE QUEUE FILE. 00532 M01S00407.qload +++| 00533 M01S00408.qload +++| RJ CPY COPY THE FILE 00534 M01S00021.ns22000 +++| SA1 ALEF 00535 M01S00022.ns22000 +++| NZ X1,QDL1.1 IF ACCESS LEVEL ERROR 00536 M01S00409.qload +++| NZ B7,ERR IF ERROR IN COPY 00537 M01S00410.qload +++| RJ DSP DISPOSE THE FILE 00538 M01S00411.qload +++| RJ WIQ WRITE *IQFT* ENTRY 00539 M01S00412.qload +++| EQ QDL3 WRITE OUTPUT DATA 00540 M01S00413.qload +++| 00541 M01S00414.qload +++|* SKIP QUEUED FILE. 00542 M01S00415.qload +++| 00543 M01S00023.ns22000 +++| QDL1.1 SX1 X1-1 00544 M01S00024.ns22000 +++| NZ X1,QDL3 IF NO SKIP NEEDED 00545 M01S00416.qload +++| QDL2 RJ SQF SKIP QUEUED FILE 00546 M01S00417.qload +++| NZ B7,ERR IF PROCESSING ERROR 00547 M01S00418.qload +++| QDL3 RJ WOL WRITE OUTPUT LINE 00548 M01S00419.qload +++| EQ QDL1 LOOP 00549 M01S00420.qload +++| 00550 M01S00421.qload +++| QDL4 RJ CIQ CLOSE *IQFT* FILE 00551 M01S00422.qload +++| RJ ISM ISSUE FILES PROCESSED MESSAGE 00552 M01S00423.qload +++| SA1 ABTE 00553 M01S00424.qload +++| NZ X1,TRM IF ABORT AT END OF LIST SET
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Updated by) | qload4 |
Seq # *Modification Id* Act ----------------------------+ 00554 M02S00019.qload4 ---| WRITER O FLUSH OUTPUT BUFFER 00555 M01S00425.qload +++| SA5 TRMM LOAD ADDRESS OF TERMINATION MESSAGE 00556 M01S00426.qload +++| MESSAGE X5 00557 M01S00427.qload +++| BX2 X2-X2 SET PRIMARY RIGHT SCREEN 00558 M01S00428.qload +++| JP QLOADX RETURN TO *QFSP* 00559 M01S00429.qload +++| SPACE 4 00560 M01S00430.qload +++|** ABORT PROCESSING. 00561 M01S00431.qload +++| 00562 M01S00432.qload +++| 00563 M01S00433.qload +++| ABT RJ CIQ CLOSE THE *IQFT* FILE 00564 M01S00434.qload +++| RECALL S 00565 M01S00435.qload +++| RETURN S 00566 M01S00436.qload +++| SX6 MES2 * QLOAD ABORTED.* 00567 M01S00437.qload +++| SA6 TRMM 00568 M01S00438.qload +++| MESSAGE X6 00569 M01S00439.qload +++| SX7 LSDP SET TO LIST REMAINING FILES 00570 M01S00440.qload +++| SA7 DSPC 00571 M01S00441.qload +++| SA7 LIST 00572 M01S00442.qload +++| SA1 TARA+ARFC 00573 M01S00443.qload +++| PL X1,ABT1 IF K-DISPLAY SELECTED 00574 M01S00444.qload +++| SX6 B1+ SET ABORT AT END OF LIST 00575 M01S00445.qload +++| SA6 ABTE 00576 M01S00446.qload +++| ABT1 EREXIT TRM SET NEW ABORT ADDRESS 00577 M01S00447.qload +++| SA5 ABTI CHECK ABORT PROCESSING 00578 M01S00448.qload +++| ZR X5,QDL2 IF FILE TO BE SKIPPED 00579 M01S00449.qload +++| BX7 X7-X7 CLEAR ABORT PROCESSING 00580 M01S00450.qload +++| SA7 A5 00581 M01S00451.qload +++| JP QDL3 LIST REMAINING FILES 00582 M01S00452.qload +++| SPACE 4 00583 M01S00453.qload +++|** TERMINATE PROCESSING. 00584 M01S00454.qload +++| 00585 M01S00455.qload +++| 00586 M01S00456.qload +++| TRM SA1 PRSA CHECK FOR *FL* ASSIGNED 00587 M01S00457.qload +++| ZR X1,TRM1 IF *FL* NOT ASSIGNED 00588 M01S00458.qload +++| WRITER O FLUSH OUTPUT FILE 00589 M01S00459.qload +++| TRM1 SX5 MES19 * QLOAD TERMINATED.* 00590 M01S00460.qload +++| MESSAGE X5 00591 M01S00461.qload +++| ABORT TERMINATE THE LOAD 00592 M01S00462.qload +++| SPACE 4 00593 M01S00463.qload +++|** ERROR PROCESSING. 00594 M01S00464.qload +++| 00595 M01S00465.qload +++| 00596 M01S00466.qload +++| ERR RJ CIQ CLOSE THE *IQFT* FILE 00597 M01S00467.qload +++| RETURN S 00598 M01S00468.qload +++| SA1 PRSA CHECK FOR *FL* ASSIGNED 00599 M01S00469.qload +++| ZR X1,ERR1 IF *FL* NOT ASSIGNED 00600 M01S00470.qload +++| RJ ISM ISSUE FILES PROCESSED MESSAGES
| Line S00471 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload4 |
Seq # *Modification Id* Act ----------------------------+ 00601 M02S00471.qload4 ---| WRITER O FLUSH THE OUTPUT FILE 00602 M01S00472.qload +++| ERR1 SX5 B7 ISSUE MESSAGE 00603 M01S00473.qload +++| MESSAGE X5
| Line S00474 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload10 |
Seq # *Modification Id* Act ----------------------------+ 00604 M02S00474.qload10 ---| BX2 X2-X2 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 (Updated by) | qload12 |
Seq # *Modification Id* Act ----------------------------+ 00607 M02S00003.qload12 ---| ABORT 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 00616 M01S00004.qload10 +++| 00617 M01S00005.qload10 +++| ERR2 BX2 X2-X2 00618 M01S00475.qload +++| JP QLOADX RETURN 00619 M01S00476.qload +++| SPACE 4 00620 M01S00477.qload +++|** PROCESS OUT COMMAND. 00621 M01S00478.qload +++| 00622 M01S00479.qload +++| 00623 M01S00480.qload +++| OUT STATUS O CHECK IF OUTPUT PRESENT 00624 M01S00481.qload +++| SA5 O 00625 M01S00482.qload +++| MX0 -18 00626 M01S00483.qload +++| BX6 -X0*X5 00627 M01S00484.qload +++| AX6 1 00628 M01S00485.qload +++| NZ X6,OUT1 IF FILE PRESENT 00629 M01S00486.qload +++| SX5 MES17 * NO OUTPUT FILE PRESENT.* 00630 M01S00487.qload +++| EQ OUT2 00631 M01S00488.qload +++| 00632 M01S00489.qload +++| OUT1 SA2 O GET FILE NAME 00633 M01S00490.qload +++| MX0 42 00634 M01S00491.qload +++| BX6 X0*X2 00635 M01S00492.qload +++| SA6 ROTB *DSP* PARAMETER BLOCK 00636 M01S00493.qload +++| SA2 OUTA 00637 M01S00494.qload +++| BX6 X2 00638 M01S00495.qload +++| SA6 A6+B1 00639 M01S00496.qload +++| ROUTE ROTB,RECALL 00640 M01S00497.qload +++| SX5 MES4 * OUTPUT FILE RELEASED.* 00641 M01S00498.qload +++| OUT2 MESSAGE X5 00642 M01S00499.qload +++| BX2 X2-X2 00643 M01S00500.qload +++| JP QLOADX RETURN 00644 M01S00501.qload +++| 00645 M01S00502.qload +++| 00646 M01S00503.qload +++| OUTA VFD 24/0,12/2HPR,6/0,18/FRDC 00647 M01S00504.qload +++| TITLE FIRST LEVEL SUBROUTINES. 00648 M01S00505.qload +++| BIE SPACE 4,20 00649 M01S00506.qload +++|** BIE - BUILD *IQFT* ENTRY. 00650 M01S00507.qload +++|* 00651 M01S00508.qload +++|* ENTRY (ROTB) = ROUTE BLOCK. 00652 M01S00509.qload +++|* (SSBF) = SYSTEM SECTOR FOR FILE IF IT EXISTS. 00653 M01S00510.qload +++|* 00654 M01S00511.qload +++|* EXIT (IQFE) = *IQFT* ENTRY. 00655 M01S00512.qload +++|* (OLDN) = OLD JSN FOR THE FILE. 00656 M01S00513.qload +++|* JSN SET AS FILENAME IN FET-S.
| Line S00514 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00657 M02S00514.ns22000 ---|* (QUTP) = QUEUE TYPE. 00658 M01S00515.qload +++|* 00659 M01S00516.qload +++|* USES X - 0, 5, 6, 7. 00660 M01S00517.qload +++|* A - 5, 6, 7. 00661 M01S00518.qload +++|* B - 6. 00662 M01S00519.qload +++|* 00663 M01S00520.qload +++|* CALLS CRB, GSF. 00664 M01S00521.qload +++| 00665 M01S00522.qload +++| 00666 M01S00523.qload +++| BIE2 RJ CRB CONVERT ROUTE BLOCK TO AN *IQFT* ENTRY 00667 M01S00524.qload +++| 00668 M01S00525.qload +++| BIE SUBR ENTRY/EXIT 00669 M01S00526.qload +++| SA5 SSBF CHECK IF SYSTEM SECTOR PRESENT 00670 M01S00527.qload +++| ZR X5,BIE2 IF NO SYSTEM SECTOR 00671 M01S00528.qload +++| SB2 QFTE*5-1*5 SET NUMBER OF WORDS TO MOVE 00672 M01S00529.qload +++| SB3 QFTE-1 00673 M01S00530.qload +++| BIE1 SX5 IOSS+B2 SET QFT ENTRY 00674 M01S00531.qload +++| RJ GSF GET SYSTEM SECTOR FIELD 00675 M01S00532.qload +++| SA6 IQFE+B3 00676 M01S00533.qload +++| SB2 B2-5 00677 M01S00534.qload +++| SB3 B3-B1 00678 M01S00535.qload +++| PL B3,BIE1 IF MORE TO MOVE 00679 M01S00536.qload +++| MX0 24 00680 M01S00537.qload +++| BX7 X0*X6 00681 M01S00538.qload +++| SA7 OLDN SAVE OLD JSN 00682 M01S00539.qload +++| SX5 B1 00683 M01S00540.qload +++| SA7 Q SET NAME FOR *QFM* CALL 00684 M01S00541.qload +++| BX7 X7+X5 00685 M01S00542.qload +++| SA7 S SET FILE NAME INTO FET
| Line S00543 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00686 M02S00543.ns22000 ---| MX0 -3
| Line S00544 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00687 M02S00544.ns22000 ---| AX6 9
| Line S00545 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00688 M02S00545.ns22000 ---| BX7 -X0*X6
| Line S00546 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00689 M02S00546.ns22000 ---| SA7 QUTP SAVE QUEUE TYPE 00690 M01S00547.qload +++| SX5 FLSS GET FILE LENGTH 00691 M01S00548.qload +++| RJ GSF 00692 M01S00549.qload +++| MX0 24 00693 M01S00550.qload +++| BX6 X0*X6 00694 M01S00551.qload +++| SA6 IQFE+8 00695 M01S00552.qload +++| SX5 DTSS GET DATE AND TIME 00696 M01S00553.qload +++| RJ GSF 00697 M01S00554.qload +++| SA5 IQFE+8 00698 M01S00555.qload +++| MX0 -36 00699 M01S00556.qload +++| BX6 -X0*X6 00700 M01S00557.qload +++| BX6 X5+X6 00701 M01S00558.qload +++| SA6 A5 00702 M01S00559.qload +++| SX5 FMSS GET FAMILY NAME 00703 M01S00560.qload +++| RJ GSF 00704 M01S00561.qload +++| MX0 42 00705 M01S00562.qload +++| BX6 X0*X6 00706 M01S00563.qload +++| SA6 IQFE+9 00707 M01S00564.qload +++| SX5 CMSS GET CREATION MACHINE ID 00708 M01S00565.qload +++| RJ GSF 00709 M01S00566.qload +++| SA5 IQFE+9 00710 M01S00567.qload +++| MX0 12 00711 M01S00568.qload +++| BX6 X0*X6 00712 M01S00569.qload +++| LX6 12 00713 M01S00570.qload +++| BX6 X5+X6 00714 M01S00571.qload +++| SA6 A5 00715 M01S00572.qload +++| MX0 42 00716 M01S00573.qload +++| SX5 FDSS GET DESTINATION FAMILY NAME 00717 M01S00574.qload +++| RJ GSF GET SYSTEM SECTOR FIELD 00718 M01S00575.qload +++| MX0 60 00719 M01S00576.qload +++| SA6 IQFE+10 00720 M01S00577.qload +++| SX5 ACSS GET CREATION UN/UI 00721 M01S00578.qload +++| RJ GSF 00722 M01S00579.qload +++| SA6 IQFE+11 00723 M01S00580.qload +++| MX0 42 00724 M01S00581.qload +++| SX5 FOSS GET OWNER FAMILY NAME 00725 M01S00582.qload +++| RJ GSF 00726 M01S00583.qload +++| SA6 IQFE+12 00727 M01S00584.qload +++| JP BIEX RETURN 00728 M01S00585.qload +++| CIQ SPACE 4,20 00729 M01S00586.qload +++|** CIQ - CLOSE THE *IQFT* FILE. 00730 M01S00587.qload +++|* 00731 M01S00588.qload +++|* ENTRY (DWIQ) = 0 IF NO DATA WRITTEN TO THE *IQFT* FILE. 00732 M01S00589.qload +++|* 00733 M01S00590.qload +++|* USES A - 5, 6. 00734 M01S00591.qload +++|* X - 3, 5, 6. 00735 M01S00592.qload +++|* 00736 M01S00593.qload +++|* CALLS RAF. 00737 M01S00594.qload +++| 00738 M01S00595.qload +++| 00739 M01S00596.qload +++| CIQ SUBR ENTRY/EXIT 00740 M01S00597.qload +++| SA5 DWIQ CHECK FOR FILE WRITTEN 00741 M01S00598.qload +++| ZR X5,CIQ1 IF NO DATA WRITTEN 00742 M01S00599.qload +++| BX6 X6-X6 CLEAR DATA WRITTEN FLAG 00743 M01S00600.qload +++| SA6 A5 00744 M01S00601.qload +++| WRITER NIQ,R FLUSH THE BUFFER 00745 M01S00602.qload +++| CIQ1 SX3 NIQ RELEASE THE *IQFT* FILE 00746 M01S00603.qload +++| RJ RAF 00747 M01S00604.qload +++| JP CIQX RETURN 00748 M01S00605.qload +++| CFS SPACE 4,20 00749 M01S00606.qload +++|** CFS - CHECK FILE SELECTION. 00750 M01S00607.qload +++|* 00751 M01S00608.qload +++|* ENTRY (IQFE - IQFE+QFEWL) = IQFT ENTRY. 00752 M01S00609.qload +++|* (LIST) .NE. 0, IF LISTING FILES. 00753 M01S00610.qload +++|* 00754 M01S00611.qload +++|* EXIT (X1) = 0, IF NO ERRORS. 00755 M01S00612.qload +++|* 00756 M01S00613.qload +++|* ERROR (DSPC) = *IGDP* IF FILE IGNORED. 00757 M01S00614.qload +++|*
| Line S00615 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00758 M02S00615.ns21000 ---|* USES X - 1, 6.
| Line S00616 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00759 M02S00616.ns21000 ---|* A - 1, 6.
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00760 M02S00020.ns22000 ---|* USES X - 1, 3, 4, 6.
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00761 M02S00021.ns22000 ---|* A - 1, 3, 6.
| Line S00617 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00762 M02S00617.ns22000 ---|*
| Line S00618 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
M03 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00763 M03S00618.ns22000 ---|* CALLS VIE.
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00764 M02S00022.ns22000 ---|* CALLS CLD, VIE. 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 M01S00619.qload +++| 00771 M01S00620.qload +++| 00772 M01S00621.qload +++| CFS SUBR ENTRY/EXIT 00773 M01S00622.qload +++| SA1 LIST 00774 M01S00623.qload +++| NZ X1,CFSX IF LISTING FILES 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 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 M01S00624.qload +++| SA1 TARA+AROP SET ACTIVATE/INACTIVATE REQUEST 00786 M01S00625.qload +++| BX6 X1 00787 M01S00626.qload +++| RJ VIE VALIDATE IQFT ENTRY 00788 M01S00627.qload +++| ZR X1,CFSX IF FILE SELECTED
| Line S00628 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00789 M02S00628.ns21000 ---| SX6 IGDP SET FILE IGNORED 00790 M01S00027.ns21000 +++| CFS1 SX6 IGDP SET FILE IGNORED 00791 M01S00629.qload +++| SA6 DSPC 00792 M01S00630.qload +++| SX1 B1+ INDICATE ERROR 00793 M01S00631.qload +++| EQ CFSX RETURN 00794 M01S00632.qload +++| CPY SPACE 4,20 00795 M01S00633.qload +++|** CPY - COPY FILE. 00796 M01S00634.qload +++|* 00797 M01S00635.qload +++|* ENTRY (CQCW) = CURRENT QUEUE CONTROL WORD. 00798 M01S00636.qload +++|* (NTCW) = WORDS TO NEXT TAPE CONTROL WORD. 00799 M01S00637.qload +++|* (NQCW) = WORDS TO NEXT QUEUE CONTROL WORD. 00800 M01S00638.qload +++|* (SSBF) = SYSTEM SECTOR. 00801 M01S00639.qload +++|* (ROTB) = ROUTE BLOCK. 00802 M01S00640.qload +++|* 00803 M01S00641.qload +++|* EXIT (B7) = 0 IF FILE TO BE LOADED. 00804 M01S00642.qload +++|* (B7) = ERROR MESSAGE ADDRESS IF ERROR OCCURED. 00805 M01S00643.qload +++|* (ERRF) = 0 IF NO ERROR IN FILE. 00806 M01S00644.qload +++|* 00807 M01S00645.qload +++|* USES A - 1, 2, 3, 4, 5, 6, 7. 00808 M01S00646.qload +++|* B - 5, 6, 7. 00809 M01S00647.qload +++|* X - ALL. 00810 M01S00648.qload +++|* 00811 M01S00649.qload +++|* CALLS ASF, PCW, GCW, CWE, AQF. 00812 M01S00650.qload +++| 00813 M01S00651.qload +++| 00814 M01S00652.qload +++| CPY SUBR ENTRY/EXIT 00815 M01S00653.qload +++| SA1 C+1 REWIND FET 00816 M01S00654.qload +++| SX6 X1 00817 M01S00655.qload +++| SX7 B0 CLEAR WORD COUNT 00818 M01S00656.qload +++| SA6 A1+1 00819 M01S00657.qload +++| SA5 CQCW CHECK CURRENT CONTROL WORD 00820 M01S00658.qload +++| SA7 ASSF CLEAR FILE ASSIGNED TO MASS STORAGE 00821 M01S00659.qload +++| SA6 A6+1 00822 M01S00660.qload +++| SA7 WDSX 00823 M01S00661.qload +++| NZ X5,CPY1 IF WORKING ON CURRENT WORD 00824 M01S00662.qload +++| RJ GCW GET NEXT CONTROL WORD 00825 M01S00663.qload +++| CPY1 SA1 WDSX CHECK WORDS IN BUFFER 00826 M01S00664.qload +++| SA2 NTCW LOAD BLOCK SIZE 00827 M01S00665.qload +++| SA3 NQCW FIELD SIZE 00828 M01S00666.qload +++| SX4 64 00829 M01S00667.qload +++| IX5 X4-X1 WORDS NEEDED TO FILL COPY BLOCK 00830 M01S00668.qload +++| IX6 X2-X5 COMPARE BLOCK SIZE 00831 M01S00669.qload +++| IX7 X3-X5 COMPARE FIELD SIZE 00832 M01S00670.qload +++| MI X6,CPY4 IF SHORT MEDIA DATA BLOCK 00833 M01S00671.qload +++| MI X7,CPY6 IF SHORT FIELD 00834 M01S00672.qload +++| 00835 M01S00673.qload +++|* COPY DATA. 00836 M01S00674.qload +++| 00837 M01S00675.qload +++| SA6 A2 UPDATE COUNTS 00838 M01S00676.qload +++| SA7 A3 00839 M01S00677.qload +++| BX6 X4 SET WORDS IN BLOCK 00840 M01S00678.qload +++| SA6 A1 00841 M01S00679.qload +++| READW T,WBUF+1+X1,X5 FILL COPY BLOCK 00842 M01S00680.qload +++| SA1 NQCW CHECK FOR POSSIBLE *EOR* FIELD 00843 M01S00681.qload +++| SX7 B0+ CLEAR LEVEL NUMBER 00844 M01S00682.qload +++| SA7 LEVL 00845 M01S00683.qload +++| NZ X1,CPY2 IF NOT POSSIBLE *EOR* FIELD 00846 M01S00684.qload +++| SA1 CQCW CHECK IF *EOR* BLOCK 00847 M01S00685.qload +++| SA2 EOR CHECK IF LAST BLOCK 00848 M01S00686.qload +++| SA3 NTCW 00849 M01S00687.qload +++| MX0 -3 00850 M01S00688.qload +++| AX1 9 00851 M01S00689.qload +++| NZ X3,CPY1.1 IF DATA REMAINING IN RECORD 00852 M01S00690.qload +++| NZ X2,CPY5 IF *EOR* MEDIA BLOCK 00853 M01S00691.qload +++| CPY1.1 BX7 -X0*X1 00854 M01S00692.qload +++| NZ X7,CPY7 IF *EOR* OR *EOF* FIELD 00855 M01S00693.qload +++| CPY2 SA1 ASSF CHECK IF FILE ASSIGNED 00856 M01S00694.qload +++| NZ X1,CPY3 IF FILE ASSIGNED 00857 M01S00695.qload +++| RJ ASF ASSIGN FILE TO DISK 00858 M01S00696.qload +++| NZ B7,CPYX IF FILE NOT ASSIGNED 00859 M01S00697.qload +++| CPY3 SB5 B1 INDICATE NOT AT END OF RECORD 00860 M01S00698.qload +++| RJ CWE CHECK WRITE ERRORS 00861 M01S00699.qload +++| NZ B7,CPYX IF UNRECOVERABLE ERROR 00862 M01S00700.qload +++| NZ B6,CPY1 IF WRITE ERROR RECOPY FILE 00863 M01S00701.qload +++| SA1 WDSX SET UP CONTROL WORDS 00864 M01S00702.qload +++| SX2 5 00865 M01S00703.qload +++| SX3 64 00866 M01S00704.qload +++| IX6 X1*X2 00867 M01S00705.qload +++| LX3 36 00868 M01S00706.qload +++| BX6 X3+X6 00869 M01S00707.qload +++| BX7 X7-X7 CLEAR WORD COUNT 00870 M01S00708.qload +++| SA2 LEVL 00871 M01S00709.qload +++| SA6 WBUF 00872 M01S00710.qload +++| SA7 A1 00873 M01S00711.qload +++| BX6 X2 00874 M01S00712.qload +++| SA6 WBUF+1+X1 SET LEVEL NUMBER 00875 M01S00713.qload +++| WRITEW S,WBUF,X1+2 WRITE DATA 00876 M01S00714.qload +++| EQ CPY1 LOOP 00877 M01S00715.qload +++| 00878 M01S00716.qload +++|* PROCESS SHORT MEDIA DATA BLOCK. 00879 M01S00717.qload +++| 00880 M01S00718.qload +++| CPY4 IX7 X3-X2 FIELD - BLOCK LENGTH 00881 M01S00719.qload +++| MI X7,CPY6 IF FIELD IS SHORTER 00882 M01S00720.qload +++| BX6 X6-X6 UPDATE COUNTS 00883 M01S00721.qload +++| SA6 A2 00884 M01S00722.qload +++| SA7 A3 WORDS REMAINING IN FIELD 00885 M01S00723.qload +++| IX6 X1+X2 INCREMENT BUFFER WORD COUNT 00886 M01S00724.qload +++| SA6 A1 00887 M01S00725.qload +++| ZR X2,CPY5 IF END OF MEDIA BLOCK 00888 M01S00726.qload +++| READW T,WBUF+1+X1,X2 READ TO END OF BLOCK 00889 M01S00727.qload +++| CPY5 READO T SKIP TRAILING CONTROL WORD 00890 M01S00728.qload +++| SA4 EOR 00891 M01S00729.qload +++| NZ X4,CPY11 IF *EOR* BLOCK 00892 M01S00730.qload +++| RJ PCW PROCESS NEXT BLOCK 00893 M01S00731.qload +++| PL X1,CPY1 IF NOT *EOF* 00894 M01S00732.qload +++| SB7 MES20 * PREMATURE *EOF* ENCOUNTERED.* 00895 M01S00733.qload +++| EQ CPYX RETURN 00896 M01S00734.qload +++| 00897 M01S00735.qload +++|* PROCESS SHORT FIELD. 00898 M01S00736.qload +++| 00899 M01S00737.qload +++| CPY6 IX6 X2-X3 BLOCK - FIELD LENGTH 00900 M01S00738.qload +++| MI X6,CPY4 IF BLOCK SHORTER 00901 M01S00739.qload +++| SA6 A2 UPDATE COUNTS - WORDS IN BLOCK 00902 M01S00740.qload +++| IX7 X1+X3 00903 M01S00741.qload +++| SA7 A1 WORDS IN BUFFER 00904 M01S00742.qload +++| ZR X3,CPY7 IF END OF FIELD 00905 M01S00743.qload +++| READW T,WBUF+1+X1,X3 READ TO END OF FIELD 00906 M01S00744.qload +++| CPY7 SA1 CQCW CHECK IF EOR BLOCK 00907 M01S00745.qload +++| MX0 -3 00908 M01S00746.qload +++| AX1 9 00909 M01S00747.qload +++| BX7 -X0*X1 00910 M01S00748.qload +++| SX6 17B 00911 M01S00749.qload +++| SX7 X7-1 00912 M01S00750.qload +++| MI X7,CPY9 IF NOT *EOR* 00913 M01S00751.qload +++| NZ X7,CPY8 IF *EOF* 00914 M01S00752.qload +++| 00915 M01S00753.qload +++|* GET LEVEL NUMBER. 00916 M01S00754.qload +++| 00917 M01S00755.qload +++| SA1 WDSX 00918 M01S00756.qload +++| SA2 WBUF+1-1+X1 LAST WORD READ IS LEVEL NUMBER 00919 M01S00757.qload +++| SX7 X1-1 DECREMENT WORD COUNT 00920 M01S00758.qload +++| BX6 X2 00921 M01S00759.qload +++| SA7 A1 00922 M01S00760.qload +++| CPY8 LX6 -12 SET LEVEL NUMBER 00923 M01S00761.qload +++| SA6 LEVL 00924 M01S00762.qload +++| RJ GCW GET NEXT CONTROL WORD 00925 M01S00763.qload +++| SB7 B6-2 00926 M01S00764.qload +++| ZR B6,CPY2 IF DATA BLOCK 00927 M01S00765.qload +++| ZR B7,CPY2 IF DAYFILE 00928 M01S00766.qload +++| EQ CPY10 POSSIBLE ERROR ON DUMP 00929 M01S00767.qload +++| 00930 M01S00768.qload +++| CPY9 RJ GCW GET NEXT CONTROL WORD 00931 M01S00769.qload +++| SB7 B6-2 00932 M01S00770.qload +++| ZR B6,CPY1 IF DATA 00933 M01S00771.qload +++| ZR B7,CPY1 IF DAYFILE 00934 M01S00772.qload +++| NE B7,B1,CPY10 IF NOT *NOS* FIELD 00935 M01S00773.qload +++| NE B5,B1,CPY10 IF NOT END OF VOLUME 00936 M01S00774.qload +++| READO T SKIP TRAILING CONTROL WORD 00937 M01S00775.qload +++| RJ PCW PROCESS NEXT BLOCK 00938 M01S00776.qload +++| PL X1,CPY9 IF NOT *EOF* 00939 M01S00777.qload +++| SB7 MES20 * PREMATURE *EOF* ENCOUNTERED.* 00940 M01S00778.qload +++| EQ CPYX RETURN 00941 M01S00779.qload +++| 00942 M01S00780.qload +++|* CHECK FOR ERROR WHEN FILE DUMPED. 00943 M01S00781.qload +++|
| Line S00782 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00944 M02S00782.241l630 ---| CPY10 SX7 MSER 00945 M01S00003.241l630 +++| CPY10 SX7 DMER 00946 M01S00783.qload +++| SB6 B6-7 00947 M01S00784.qload +++| ZR B6,CPY16 IF ERROR WHEN DUMPED 00948 M01S00785.qload +++|
| Line S00786 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00949 M02S00786.ns22000 ---|* PRCESS END OF LOAD FILE. 00950 M01S00036.ns22000 +++|* PROCESS END OF LOAD FILE. 00951 M01S00787.qload +++| 00952 M01S00788.qload +++| CPY11 SA1 ASSF CHECK IF FILE ASSIGNED 00953 M01S00789.qload +++| NZ X1,CPY12 IF FILE ASSIGNED 00954 M01S00790.qload +++| RJ ASF ASSIGN FILE TO CORRECT DEVICE
| Line S00791 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00955 M02S00791.ns22000 ---| NZ B7,CPYX IF ERROR IN ASSIGN 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 M01S00792.qload +++| CPY12 SA1 WDSX DECREMENT WORD COUNT 00962 M01S00793.qload +++| SX6 17B 00963 M01S00794.qload +++| NZ X1,CPY13 IF NOT EMPTY FIELD 00964 M01S00795.qload +++| SX1 X1+1 00965 M01S00796.qload +++| CPY13 SA2 WBUF+1-1+X1 LAST WORD READ IS LEVEL NUMBER 00966 M01S00797.qload +++| SX3 5 00967 M01S00798.qload +++| SA4 CQCW CHECK FIELD TYPE 00968 M01S00799.qload +++| MX0 -3 00969 M01S00800.qload +++| AX4 9 00970 M01S00801.qload +++| SX1 X1-1 00971 M01S00802.qload +++| IX3 X3*X1 BYTE COUNT 00972 M01S00803.qload +++| BX4 -X0*X4 QUEUE FIELD TYPE 00973 M01S00804.qload +++| SX7 64 PRU SIZE 00974 M01S00805.qload +++| SX4 X4-1 00975 M01S00806.qload +++| LX7 36 00976 M01S00807.qload +++| BX7 X7+X3 CONTROL WORD 00977 M01S00808.qload +++| SA7 WBUF 00978 M01S00809.qload +++| MI X4,CPY15 IF NOT *EOR* 00979 M01S00810.qload +++| NZ X4,CPY14 IF *EOF* FIELD 00980 M01S00811.qload +++| BX6 X2 00981 M01S00812.qload +++| CPY14 LX6 -12 00982 M01S00813.qload +++| SA6 A2 00983 M01S00814.qload +++| CPY15 WRITEW S,WBUF,X1+2 WRITE LAST BLOCK OF DATA 00984 M01S00815.qload +++| SA1 NTCW 00985 M01S00816.qload +++| SA2 NQCW 00986 M01S00817.qload +++| IX3 X1+X2 00987 M01S00818.qload +++| SX7 FMER SET ERROR CODE 00988 M01S00819.qload +++| ZR X3,CPY17 IF ALL WORD COUNTS ARE ZERO 00989 M01S00820.qload +++| 00990 M01S00821.qload +++|* CHECK ERROR PROCESSING SELECTION. 00991 M01S00822.qload +++| 00992 M01S00823.qload +++| CPY16 SA7 ERTP SET ERROR TYPE 00993 M01S00824.qload +++| RJ SQF POSITION TO END OF QUEUE FILE 00994 M01S00825.qload +++| SA2 TARA+ARFC CHECK ERROR PROCESSING 00995 M01S00826.qload +++| LX2 59-57 00996 M01S00827.qload +++| MI X2,CPY17 IF ERROR PROCESSING SELECTED 00997 M01S00828.qload +++| SA7 ERRF SET TO IGNORE FILE 00998 M01S00829.qload +++| SB7 B0 CLEAR ERROR INDICATION 00999 M01S00830.qload +++| JP CPYX RETURN 01000 M01S00831.qload +++| 01001 M01S00832.qload +++| CPY17 WRITECW S,R FLUSH THE WRITE BUFFER 01002 M01S00833.qload +++| SB5 B0 INDICATE AT END OF RECORD 01003 M01S00834.qload +++| RJ CWE CHECK FOR WRITE ERROR 01004 M01S00835.qload +++| NZ B7,CPYX IF UNRECOVERABLE ERROR 01005 M01S00836.qload +++| NZ B6,CPY1 IF RECOPY REQUIRED 01006 M01S00837.qload +++| JP CPYX RETURN 01007 M01S00838.qload +++| DSP SPACE 4,20 01008 M01S00839.qload +++|** DSP - DISPOSE THE QUEUE FILE. 01009 M01S00840.qload +++|* 01010 M01S00841.qload +++|* ENTRY (ROTB) = ROUTE BLOCK FOR THE FILE. 01011 M01S00842.qload +++|* (IQFE) = *IQFT* ENTRY FOR THE FILE. 01012 M01S00843.qload +++|* (ERRF) = 0 IF FILE NOT TO BE IGNORED. 01013 M01S00844.qload +++|* (QLIM) = QFT LIMIT. 01014 M01S00845.qload +++|* 01015 M01S00846.qload +++|* EXIT FILE DISPOSED TO THE PROPER QUEUE. 01016 M01S00847.qload +++|* (DSPC) = FILE DISPOSITION CODE. 01017 M01S00848.qload +++|*
| Line S00849 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload8 |
Seq # *Modification Id* Act ----------------------------+ 01018 M02S00849.qload8 ---|* USES A - 1, 4, 5, 6, 7.
| Line S00850 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload8 |
Seq # *Modification Id* Act ----------------------------+ 01019 M02S00850.qload8 ---|* X - 0, 1, 4, 5, 6, 7. 01020 M01S00001.qload8 +++|* USES X - 0, 1, 2, 3, 4, 5, 6, 7. 01021 M01S00002.qload8 +++|* A - 1, 2, 4, 5, 6, 7. 01022 M01S00851.qload +++|*
| Line S00852 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01023 M02S00852.ns21000 ---|* MACROS QCALL, RETURN, ROUTE. 01024 M01S00028.ns21000 +++|* MACROS QCALL, RETURN, REWIND, ROUTE. 01025 M01S00853.qload +++| 01026 M01S00854.qload +++| 01027 M01S00855.qload +++| DSP4 SA1 Q+1 SET UP *FET* FOR *QFM* CALL 01028 M01S00856.qload +++| SX6 X1+QFEWL 01029 M01S00857.qload +++| SX7 X1+ 01030 M01S00858.qload +++| SA6 A1+B1 01031 M01S00859.qload +++| SA7 A6+B1 01032 M01S00860.qload +++| SA1 Q SET FET COMPLETE 01033 M01S00861.qload +++| SX6 B1+ 01034 M01S00862.qload +++| BX6 X1+X6 01035 M01S00863.qload +++| SA6 A1 01036 M01S00864.qload +++| QCALL RIQF,Q RELEASE TO THE INACTIVE QUEUE 01037 M01S00865.qload +++| SX6 INDP SET DISPOSITION *INACTIVE* 01038 M01S00866.qload +++| SA6 DSPC 01039 M01S00867.qload +++| DSP5 SX7 B0+ CLEAR ALTERNATE ABORT PROCESSING 01040 M01S00868.qload +++| SA7 ABTI 01041 M01S00869.qload +++| 01042 M01S00870.qload +++| DSP SUBR ENTRY/EXIT
| Line S00871 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01043 M02S00871.ns21000 ---| SA4 QLIM DECREMENT QFT LIMIT 01044 M01S00029.ns21000 +++| SA4 GNFC CHECK FOR EOI SECTOR TO WRITE 01045 M01S00030.ns21000 +++| NZ X4,DSP0 IF NO EOI TO WRITE 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 01051 M01S00031.ns21000 +++| QCALL QWEF,C WRITE EOI SECTOR 01052 M01S00032.ns21000 +++| DSP0 SA4 QLIM DECREMENT QFT LIMIT 01053 M01S00872.qload +++| SA5 ERRF CHECK FILE ERROR FLAG 01054 M01S00873.qload +++| SX7 IGDP SET FILE *IGNORED* 01055 M01S00874.qload +++| SX6 X4-1 01056 M01S00875.qload +++| SA7 ABTI SET ALTERNATE ABORT PROCESSING 01057 M01S00876.qload +++| ZR X5,DSP2 IF FILE NOT IGNORED 01058 M01S00877.qload +++| DSP1 SA7 DSPC 01059 M01S00878.qload +++| RETURN S,R RELEASE THE FILE SPACE 01060 M01S00879.qload +++| EQ DSP5 RETURN 01061 M01S00880.qload +++| 01062 M01S00881.qload +++|* PROCESS ACTIVE QUEUE FILE. 01063 M01S00882.qload +++| 01064 M01S00883.qload +++| DSP2 SA5 TARA+AROP CHECK THE LOAD OPTION 01065 M01S00884.qload +++| ZR X5,DSP4 IF INACTIVE LOAD 01066 M01S00885.qload +++| NG X6,DSP3 IF QFT LIMIT REACHED 01067 M01S00886.qload +++| SA4 ROTB CLEAR COMPLETION BIT 01068 M01S00887.qload +++| SA6 QLIM SET NEW QFT LIMIT
| Line S00888 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload8 |
Seq # *Modification Id* Act ----------------------------+ 01069 M02S00888.qload8 ---| SA5 A4+B1 CLEAR CENTRAL SITE AND DEFERRED ROUTE BITS 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 M01S00889.qload +++| MX0 59 01074 M01S00890.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 M01S00891.qload +++| LX5 -9 CLEAR PRIORITY FLAG 01080 M01S00892.qload +++| BX5 X0*X5 01081 M01S00893.qload +++| LX5 9
| Line S00894 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload8 |
Seq # *Modification Id* Act ----------------------------+ 01082 M02S00894.qload8 ---| MX0 58 01083 M01S00010.qload8 +++| DSP2.0 MX0 58 01084 M01S00895.qload +++| BX6 X0*X5 01085 M01S00005.ns2137 +++| SX1 FREP SELECT ERROR PROCESSING 01086 M01S00006.ns2137 +++| BX6 X1+X6 01087 M01S00896.qload +++| SA6 A5 01088 M01S00897.qload +++| SA7 A4 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 01093 M01S00033.ns21000 +++| REWIND S,R REPOSITION FILE TO *BOI* 01094 M01S00898.qload +++| ROUTE ROTB,RECALL RELEASE TO ACTIVE QUEUE
| Line S00899 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns2137 |
Seq # *Modification Id* Act ----------------------------+ 01095 M02S00899.ns2137 ---| SX6 ACDP SET DISPOSITION *ACTIVE* 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 (Updated by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 01102 M02S00013.251l664 ---| SX4 X2-/ERR/EC44 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 (Updated by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 01105 M02S00016.251l664 ---| ZR X4,DSP2.2 IF INVALID SERVICE CLASS
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
M02 (Updated by) | 251l664 |
Seq # *Modification Id* Act ----------------------------+ 01106 M02S00017.251l664 ---| ZR X3,DSP2.2 IF INVALID CREATOR FAMILY/USER 01107 M01S00001.251l664 +++| ZR X3,DSP2.2 IF INCORRECT SERVICE CLASS
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
M02 (Updated by) | qload9 |
Seq # *Modification Id* Act ----------------------------+ 01108 M02S00018.qload9 ---|
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
M02 (Updated by) | qload9 |
Seq # *Modification Id* Act ----------------------------+ 01109 M02S00019.qload9 ---|* RETURN ERROR CODE TO DAYFILE.
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
M02 (Updated by) | qload9 |
Seq # *Modification Id* Act ----------------------------+ 01110 M02S00020.qload9 ---|
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
M02 (Updated by) | qload9 |
Seq # *Modification Id* Act ----------------------------+ 01111 M02S00021.qload9 ---| DSP2.1 BX1 X2
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
M02 (Updated by) | qload9 |
Seq # *Modification Id* Act ----------------------------+ 01112 M02S00022.qload9 ---| RJ COD CONVERT OCTAL NUMBER TO DISPLAY CODE
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
M02 (Updated by) | qload9 |
Seq # *Modification Id* Act ----------------------------+ 01113 M02S00023.qload9 ---| SA1 MES25+2 ADD TO MESSAGE
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
M02 (Updated by) | qload9 |
Seq # *Modification Id* Act ----------------------------+ 01114 M02S00024.qload9 ---| MX0 12
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
M02 (Updated by) | qload9 |
Seq # *Modification Id* Act ----------------------------+ 01115 M02S00025.qload9 ---| BX6 X0*X4
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
M02 (Updated by) | qload9 |
Seq # *Modification Id* Act ----------------------------+ 01116 M02S00026.qload9 ---| BX1 -X0*X1
| Line S00027 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
M02 (Updated by) | qload9 |
Seq # *Modification Id* Act ----------------------------+ 01117 M02S00027.qload9 ---| BX6 X1+X6
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
M02 (Updated by) | qload9 |
Seq # *Modification Id* Act ----------------------------+ 01118 M02S00028.qload9 ---| SA6 A1+
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
M02 (Updated by) | qload9 |
Seq # *Modification Id* Act ----------------------------+ 01119 M02S00029.qload9 ---| SX6 MES25 * DSP RETURNED ERROR XXB.*
| Line S00030 Modification History | |
|---|---|
M01 (Added by) | ns2137 |
M02 (Updated by) | qload9 |
Seq # *Modification Id* Act ----------------------------+ 01120 M02S00030.qload9 ---| EQ DSP3.1 SKIP REMAINING FILES 01121 M01S00001.qload9 +++| DSP2.1 SX7 IGDP SET FILE IGNORED 01122 M01S00002.qload9 +++| EQ DSP1 RETURN CURRENT FILE 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 M01S00900.qload +++| SA6 DSPC 01145 M01S00901.qload +++| EQ DSP5 RETURN 01146 M01S00902.qload +++| 01147 M01S00903.qload +++| DSP3 SX6 MES11 * QFT LIMIT ON LOAD.*
| Line S00904 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns2137 |
Seq # *Modification Id* Act ----------------------------+ 01148 M02S00904.ns2137 ---| SA6 TRMM 01149 M01S00052.ns2137 +++| DSP3.1 SA6 TRMM 01150 M01S00905.qload +++| SX7 LSDP LIST REMAINING FILES 01151 M01S00906.qload +++| SA7 LIST 01152 M01S00907.qload +++| EQ DSP1 RETURN CURRENT FILE 01153 M01S00908.qload +++| GNF SPACE 4,20 01154 M01S00909.qload +++|** GNF - GET NEXT QUEUED FILE. 01155 M01S00910.qload +++|* 01156 M01S00911.qload +++|* ENTRY LOAD FILE POSITIONED TO THE START OF A QUEUED FILE. 01157 M01S00912.qload +++|* 01158 M01S00913.qload +++|* EXIT ROUTE BLOCK COPIED TO *ROTB*. 01159 M01S00914.qload +++|* SYSTEM SECTOR COPIED TO *SSBF*. 01160 M01S00915.qload +++|* (CQCW) = CURRENT QUEUE CONTROL WORD. 01161 M01S00916.qload +++|* (NQCW) = WORDS TO NEXT CONTROL WORD. 01162 M01S00917.qload +++|* (B7) = ADDRESS OF ERROR MESSAGE. 01163 M01S00918.qload +++|* (B7) = 0 IF NO ERRORS. 01164 M01S00919.qload +++|* (X1) = NEGATIVE IF *EOF* ENCOUNTERED.
| Line S00920 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 01165 M02S00920.qload1 ---|* (X4) = NEGATIVE, IF 5.5 (RHF) FILE TO BE SKIPPED. 01166 M01S00002.qload1 +++|* (X4) = NONZERO, IF VERSION ONE FILE TO SKIP. 01167 M01S00921.qload +++|* 01168 M01S00922.qload +++|* USES X - 1, 3, 4, 6. 01169 M01S00923.qload +++|* A - 3, 6. 01170 M01S00924.qload +++|* B - 2, 4, 6, 7. 01171 M01S00925.qload +++|*
| Line S00926 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01172 M02S00926.ns21000 ---|* CALLS GCW, PCW, RSF, RSS. 01173 M01S00034.ns21000 +++|* CALLS GCW, PCW, RES, RSF, RSS. 01174 M01S00927.qload +++|* 01175 M01S00928.qload +++|* MACROS MESSAGE, READO, SKIPFF. 01176 M01S00929.qload +++| 01177 M01S00930.qload +++| 01178 M01S00931.qload +++| GNF10 SB7 MES3 * LOAD FILE MISPOSITIONED.* 01179 M01S00932.qload +++| 01180 M01S00933.qload +++| GNF SUBR ENTRY/EXIT 01181 M01S00934.qload +++| GNF1 RJ PCW PROCESS CONTROL WORD 01182 M01S00935.qload +++| MI X1,GNFX IF *EOF* ENCOUNTERED 01183 M01S00936.qload +++| RJ GCW GET NEXT QUEUE CONTROL WORD 01184 M01S00937.qload +++| GNF2 SX4 B6-1 01185 M01S00938.qload +++| NZ X4,GNF8 IF NOT ROUTE BLOCK 01186 M01S00939.qload +++| SB4 ROTB COPY ROUTE BLOCK
| Line S00940 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01187 M02S00940.ns22000 ---| SX3 ROTBL
| Line S00046 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | ns2127 |
Seq # *Modification Id* Act ----------------------------+ 01188 M02S00046.ns2127 ---| SX3 EPBL 01189 M01S00003.ns2127 +++| SA3 NQCW 01190 M01S00941.qload +++| RJ RSF 01191 M01S00942.qload +++| NZ B7,GNFX IF ERROR ENCOUNTERED 01192 M01S00943.qload +++| JP B6+GNF3 PROCESS CONTROL BYTE 01193 M01S00944.qload +++| 01194 M01S00945.qload +++| GNF3 BSS 0 01195 M01S00946.qload +++| LOC 0 01196 M01S00947.qload +++| EQ GNF6 IF DATA FIELD 01197 M01S00948.qload +++|+ EQ GNF10 IF ROUTE BLOCK 01198 M01S00949.qload +++|+ EQ GNF6 IF DAYFILE 01199 M01S00950.qload +++|+ EQ GNF4 IF *NOS* SYSTEM FIELD 01200 M01S00951.qload +++|+ EQ GNF5 IF *NOS/BE* FIELD 01201 M01S00952.qload +++|+ EQ GNF5 IF SCOPE 2 FIELD 01202 M01S00953.qload +++|+ EQ GNF8 IF DUMP HEADER FIELD 01203 M01S00954.qload +++|+ EQ GNF10 IF ERROR BLOCK 01204 M01S00955.qload +++| LOC *O 01205 M01S00956.qload +++| 01206 M01S00957.qload +++| GNF4 EQ B5,B1,GNF9 IF END OF VOLUME
| Line S00958 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01207 M02S00958.ns21000 ---| SB4 SSBF COPY SYSTEM SECTOR
| Line S00959 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01208 M02S00959.ns21000 ---| SX3 SSBFL 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 M01S00960.qload +++| RJ RSF 01214 M01S00961.qload +++| NZ B7,GNFX IF ERROR ENCOUNTERED
| Line S00962 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01215 M02S00962.ns21000 ---| NG X1,GNFX IF *EOF* ENCOUNTERED 01216 M01S00963.qload +++| SA3 SSBF GET SYSTEM SECTOR TYPE 01217 M01S00964.qload +++| MX6 -6 01218 M01S00965.qload +++| AX3 6 01219 M01S00966.qload +++| BX6 -X6*X3
| Line S00967 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 01220 M02S00967.qload1 ---| BX4 X4-X4
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | qload1 |
M02 (Updated by) | qload4 |
Seq # *Modification Id* Act ----------------------------+ 01221 M02S00003.qload4 ---| SX4 B0 CLEAR VERSION ONE FILE TO SKIP 01222 M01S00001.qload4 +++| BX4 X4-X4 CLEAR VERSION ONE FILE TO SKIP 01223 M01S00968.qload +++| SX3 X6-ROFT 01224 M01S00969.qload +++| PL X3,GNFX IF VERSION TWO SYSTEM SECTOR
| Line S00970 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 01225 M02S00970.qload1 ---| SX3 X6-5 HARDCODED VERSION ONE VALUE, *S1FT*
| Line S00971 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 01226 M02S00971.qload1 ---| SX4 -1 SET 5.5 (RHF) FILE TO BE SKIPPED
| Line S00972 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 01227 M02S00972.qload1 ---| ZR X3,GNFX IF RHF FILE 01228 M01S00973.qload +++| RJ RSS REFORMAT VERSION ONE SYSTEM SECTOR
| Line S00974 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 01229 M02S00974.qload1 ---| SX1 B0 SET *EOF* NOT ENCOUNTERED
| Line S00975 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 01230 M02S00975.qload1 ---| SX4 B0 CLEAR * 5.5 (RHF) FILE TO BE SKIPPED *
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | qload1 |
M02 (Updated by) | qload2 |
Seq # *Modification Id* Act ----------------------------+ 01231 M02S00004.qload2 ---| SX1 B0+ CLEAR *EOF* ENCOUNTERED 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 (Updated by) | qload4 |
Seq # *Modification Id* Act ----------------------------+ 01236 M02S00043.qload4 ---| SB7 B0+ CLEAR ERROR ENCOUNTERED
| Line S00044 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Updated by) | qload4 |
Seq # *Modification Id* Act ----------------------------+ 01237 M02S00044.qload4 ---| BX1 X1-X1 CLEAR *EOF* ENCOUNTERED
| Line S00045 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Updated by) | qload4 |
Seq # *Modification Id* Act ----------------------------+ 01238 M02S00045.qload4 ---| BX4 X4-X4 CLEAR VERSION ONE FILE TO SKIP
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | qload2 |
M02 (Updated by) | qload4 |
Seq # *Modification Id* Act ----------------------------+ 01239 M02S00001.qload4 ---| BX1 X1-X1 CLEAR *EOF* ENCOUNTERED
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | qload2 |
M02 (Updated by) | qload4 |
Seq # *Modification Id* Act ----------------------------+ 01240 M02S00002.qload4 ---| SB7 B0 CLEAR ERROR ENCOUNTERED 01241 M01S00976.qload +++| EQ GNFX RETURN 01242 M01S00977.qload +++| 01243 M01S00978.qload +++| GNF5 SA3 T SET LEVEL 17 INTO FET 01244 M01S00979.qload +++| MX6 4 01245 M01S00980.qload +++| LX6 18 01246 M01S00981.qload +++| BX3 -X6*X3 01247 M01S00982.qload +++| BX6 X6+X3 01248 M01S00983.qload +++| SA6 A3 01249 M01S00984.qload +++| SKIPFF A3,1,R SKIP TO *EOF* 01250 M01S00985.qload +++| SA3 T 01251 M01S00986.qload +++| LX3 59-9 01252 M01S00987.qload +++| MX1 1 SET *EOF* ENCOUNTERED 01253 M01S00988.qload +++| NG X3,GNF10 IF *EOI* ENCOUNTERED
| Line S00989 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 01254 M02S00989.qload1 ---| SX4 B0+ CLEAR * 5.5 (RHF) FILE TO BE SKIPPED *
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | qload1 |
M02 (Updated by) | qload4 |
Seq # *Modification Id* Act ----------------------------+ 01255 M02S00005.qload4 ---| SX4 B0+ CLEAR VERSION ONE FILE TO SKIP 01256 M01S00990.qload +++| EQ GNFX RETURN 01257 M01S00991.qload +++| 01258 M01S00992.qload +++| GNF6 BX6 X6-X6 CLEAR *SSBF* 01259 M01S00993.qload +++| SB7 B0 CLEAR ERROR STATUS 01260 M01S00994.qload +++| SB2 SSBF+SSBFL-1 01261 M01S00995.qload +++| SA6 SSBF 01262 M01S00996.qload +++| GNF7 SA6 A6+B1 01263 M01S00997.qload +++| SB6 A6-B2 01264 M01S00998.qload +++| MI B6,GNF7 IF NOT END OF BUFFER 01265 M01S00002.qload4 +++| BX4 X4-X4 CLEAR VERSION ONE FILE TO SKIP
| Line S00999 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload1 |
Seq # *Modification Id* Act ----------------------------+ 01266 M02S00999.qload1 ---| SX4 B0 CLEAR * 5.5 (RHF) FILE TO BE SKIPPED * 01267 M01S01000.qload +++| EQ GNFX RETURN 01268 M01S01001.qload +++| 01269 M01S01002.qload +++| GNF8 SB2 B6-3 CHECK IF *NOS* FIELD 01270 M01S01003.qload +++| SB6 B6-6 CHECK IF HEADER FIELD 01271 M01S01004.qload +++| SB4 GNFB COPY HEADER FIELD TO MESSAGE AREA 01272 M01S01005.qload +++| ZR B2,GNF4 IF *NOS* FIELD 01273 M01S01006.qload +++| NZ B6,GNF10 IF NOT HEADER FIELD 01274 M01S01007.qload +++| SX3 4 01275 M01S01008.qload +++| RJ RSF READ SKIP FIELD 01276 M01S01009.qload +++| MESSAGE GNFA *** PROCESSING DUMP FILE. *** 01277 M01S01010.qload +++| MESSAGE GNFB *DUMPNAM DATE, TIME.* 01278 M01S01011.qload +++| NZ B7,GNFX IF ERROR ENCOUNTERED 01279 M01S01012.qload +++| EQ GNF2 PROCESS NEXT RECORD 01280 M01S01013.qload +++| 01281 M01S01014.qload +++|* PROCEED TO NEXT REEL. 01282 M01S01015.qload +++| 01283 M01S01016.qload +++| GNF9 READO T SKIP TRAILING CONTROL WORD 01284 M01S01017.qload +++| EQ GNF1 PROCESS NEXT BLOCK 01285 M01S01018.qload +++| 01286 M01S01019.qload +++| GNFA DATA C$*** PROCESSING DUMP FILE. ***$ 01287 M01S01020.qload +++| GNFB BSS 5 01288 M01S00046.ns21000 +++| GNFC BSS 1 EOI PRESENT FLAG 01289 M01S01021.qload +++| ISM SPACE 4,20 01290 M01S01022.qload +++|** ISM - ISSUE FILES LOADED MESSAGE. 01291 M01S01023.qload +++|* 01292 M01S01024.qload +++|* ENTRY (FLDS) = FILE DISPOSITION COUNTS. 01293 M01S01025.qload +++|* (EFCT) = ERROR FILE COUNT. 01294 M01S01026.qload +++|* 01295 M01S01027.qload +++|* EXIT OUTPUT FILE FLUSHED. 01296 M01S01028.qload +++|* 01297 M01S01029.qload +++|* USES A - 1, 2, 6. 01298 M01S01030.qload +++|* B - 3, 6. 01299 M01S01031.qload +++|* X - 0, 1, 2, 6. 01300 M01S01032.qload +++|* 01301 M01S01033.qload +++|* CALLS CDD. 01302 M01S01034.qload +++| 01303 M01S01035.qload +++| 01304 M01S01036.qload +++| ISM SUBR ENTRY/EXIT 01305 M01S01037.qload +++| SB6 B0+ CLEAR MESSAGE INDEX 01306 M01S01038.qload +++| IMS1 SA1 FLDS+B6 GET DISPOSITION COUNT 01307 M01S01039.qload +++| SB6 B6+B1 INCREMENT INDEX 01308 M01S01040.qload +++| SB3 B6-FLDSL-1 01309 M01S01041.qload +++| ZR B3,IMS2 IF END OF MESSAGES 01310 M01S01042.qload +++| ZR X1,IMS1 IF EMPTY COUNT 01311 M01S01043.qload +++| RJ CDD CONVERT COUNT TO DECIMAL DISPLAY CODE 01312 M01S01044.qload +++| SA2 IMSA-1+B6 MERGE COUNT WITH MESSAGE 01313 M01S01045.qload +++| SA1 X2+B1 01314 M01S01046.qload +++| MX0 -24 01315 M01S01047.qload +++| BX6 -X0*X6 01316 M01S01048.qload +++| LX0 -24 01317 M01S01049.qload +++| BX1 X0*X1 01318 M01S01050.qload +++| LX6 -24 01319 M01S01051.qload +++| BX6 X6+X1 01320 M01S01052.qload +++| SA6 A1 01321 M01S01053.qload +++| MESSAGE X2 01322 M01S01054.qload +++| EQ IMS1 LOOP TO END OF MESSAGES 01323 M01S01055.qload +++| 01324 M01S01056.qload +++| IMS2 WRITER O,R FLUSH OUTPUT FILE 01325 M01S01057.qload +++| JP ISMX RETURN 01326 M01S01058.qload +++| 01327 M01S01059.qload +++|* THE FOLLOWING TABLES ARE ORDER DEPENDENT. 01328 M01S01060.qload +++| 01329 M01S01061.qload +++| IMSA CON IMSB 01330 M01S01062.qload +++| CON IMSC 01331 M01S01063.qload +++| CON IMSD 01332 M01S01064.qload +++| CON IMSE 01333 M01S01065.qload +++| CON IMSF 01334 M01S01066.qload +++| 01335 M01S01067.qload +++| IMSB DATA C* QLOAD - NNNN FILES IGNORED.* 01336 M01S01068.qload +++| IMSC DATA C* QLOAD - NNNN ACTIVE FILES LOADED.* 01337 M01S01069.qload +++| IMSD DATA C* QLOAD - NNNN INACTIVE FILES LOADED.* 01338 M01S01070.qload +++| IMSE DATA C* QLOAD - NNNN FILES LISTED.* 01339 M01S01071.qload +++| IMSF DATA C* QLOAD - NNNN ERRXXX FILES CREATED.* 01340 M01S01072.qload +++| PLF SPACE 4,15 01341 M01S01073.qload +++|** PLF - POSITION LOAD FILE. 01342 M01S01074.qload +++|* 01343 M01S01075.qload +++|* ENTRY LOAD FILE ASSIGNED TO JOB. 01344 M01S01076.qload +++|* 01345 M01S01077.qload +++|* EXIT LOAD FILE POSITION TO SELECTED POSITION. 01346 M01S01078.qload +++|* (B7) = ERROR MESSAGE ADDRESS. 01347 M01S01079.qload +++|* (B7) = 0 IF NO ERROR OCURRED. 01348 M01S01080.qload +++|* 01349 M01S01081.qload +++|* USES A - 4, 5, 6. 01350 M01S01082.qload +++|* B - 7. 01351 M01S01083.qload +++|* X - 0, 4, 5, 6. 01352 M01S01084.qload +++| 01353 M01S01085.qload +++| 01354 M01S01086.qload +++| PLF4 SB7 MES3 * LOAD FILE MISPOSITIONED.* 01355 M01S01087.qload +++| 01356 M01S01088.qload +++| PLF SUBR ENTRY/EXIT 01357 M01S01089.qload +++| SA5 TARA+ARFC CHECK FOR REWIND 01358 M01S01090.qload +++| LX5 59-58 01359 M01S01091.qload +++| PL X5,PLF1 IF REWIND NOT SELECTED 01360 M01S01092.qload +++| REWIND T,R 01361 M01S01093.qload +++| PLF1 SA5 TARA+ARNF CHECK FILE SKIP COUNT 01362 M01S01094.qload +++| ZR X5,PLF2 IF NO FILE COUNT 01363 M01S01095.qload +++| SA4 T SET LEVEL NUMBER 01364 M01S01096.qload +++| MX0 4 01365 M01S01097.qload +++| LX0 18 01366 M01S01098.qload +++| BX6 X4+X0 01367 M01S01099.qload +++| SA6 A4 01368 M01S01100.qload +++| SKIPFF A4,X5,R SKIP FILE COUNT 01369 M01S01101.qload +++| SA5 T CHECK RESPONSE 01370 M01S01102.qload +++| LX5 59-9 01371 M01S01103.qload +++| MI X5,PLF4 IF INCORRECT POSITION 01372 M01S01104.qload +++| PLF2 SA5 TARA+ARSC CHECK SECTOR COUNT 01373 M01S01105.qload +++| SA4 T CLEAR LEVEL NUMBER 01374 M01S01106.qload +++| ZR X5,PLF3 IF SKIP COUNT NOT SPECIFIED 01375 M01S01107.qload +++| MX0 4 01376 M01S01108.qload +++| SX5 X5+B1 SKIP HEADER RECORD 01377 M01S01109.qload +++| LX0 18 01378 M01S01110.qload +++| BX6 -X0*X4 01379 M01S01111.qload +++| SA6 A4 01380 M01S01112.qload +++| SKIPF A4,X5,R SKIP RECORD COUNT 01381 M01S01113.qload +++| SA5 T CHECK RESPONSE 01382 M01S01114.qload +++| BX6 X5 01383 M01S01115.qload +++| LX5 59-9 01384 M01S01116.qload +++| MI X5,PLF4 IF *EOI* 01385 M01S01117.qload +++| PLF3 READCW T,17B INITIALIZE READ 01386 M01S01118.qload +++| SB7 B0 CLEAR ERROR 01387 M01S01119.qload +++| JP PLFX RETURN 01388 M01S01120.qload +++| PRS SPACE 2,20 01389 M01S01121.qload +++|** PRS - PRESET FILES AND CONTROL. 01390 M01S01122.qload +++|* 01391 M01S01123.qload +++|* ENTRY PARAMETERS PROCESSED BY *QFSP*. 01392 M01S01124.qload +++|* 01393 M01S01125.qload +++|* EXIT CONTROL BLOCKS CLEARED. 01394 M01S01126.qload +++|* FILES INTIALIZED. 01395 M01S01127.qload +++|* CONTROL FLAGS PRESET. 01396 M01S01128.qload +++|* (B7) = ERROR MESSAGE ADDRESS. 01397 M01S01129.qload +++|* (B7) = 0 IF NO ERROR. 01398 M01S01130.qload +++|* 01399 M01S01131.qload +++|* USES X - 1, 2, 3, 4, 5, 6, 7. 01400 M01S01132.qload +++|* A - 1, 2, 3, 5, 6, 7. 01401 M01S01133.qload +++|* B - 5, 6, 7. 01402 M01S01134.qload +++|* 01403 M01S01135.qload +++|* CALLS PIQ, SFN, SQL. 01404 M01S01136.qload +++|*
| Line S01137 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | qload3 |
Seq # *Modification Id* Act ----------------------------+ 01405 M02S01137.qload3 ---|* MACROS CLOCK, DATE, EREXIT, MEMORY, WRITE. 01406 M01S00011.qload3 +++|* MACROS CLOCK, DATE, EREXIT, MEMORY, SETFS, WRITE. 01407 M01S01138.qload +++| 01408 M01S01139.qload +++|
| Line S01140 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01409 M02S01140.ns21000 ---| PRS9 SA2 X3+TEQA CHECK FOR REMOVABLE DEVICE
| Line S01141 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01410 M02S01141.ns21000 ---| ZR X3,PRS10 IF EQUIPMENT NOT SPECIFIED
| Line S01142 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01411 M02S01142.ns21000 ---| LX2 59-1
| Line S01143 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01412 M02S01143.ns21000 ---| SB7 MES6 * ACTIVE LOAD NOT ALLOWED.*
| Line S01144 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01413 M02S01144.ns21000 ---| MI X2,PRSX IF REMOVABLE DEVICE
| Line S01145 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01414 M02S01145.ns21000 ---| PRS10 RJ SQL SET QFT LIMIT
| Line S01146 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01415 M02S01146.ns21000 ---| BX6 X6-X6 CLEAR FOT FULL FLAG
| Line S01147 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01416 M02S01147.ns21000 ---| SA6 FOTF
| Line S01148 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 01417 M02S01148.ns21000 ---| SB7 B0 CLEAR ERROR INDICATOR 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 M01S01149.qload +++| 01429 M01S01150.qload +++| PRS SUBR ENTRY/EXIT 01430 M01S00047.ns22000 +++| SX7 99999 01431 M01S00048.ns22000 +++| SA7 LINE FORCE PAGE EJECT 01432 M01S00049.ns22000 +++| SX6 B1 01433 M01S01151.qload +++| BX7 X7-X7 CLEAR CONTROL BLOCK 01434 M01S01152.qload +++| SA7 FWA
| Line S01153 Modification History | |
|---|---|
M01 (Added by) | qload |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01435 M02S01153.ns22000 ---| SB6 ROTB+ROTBL-1 01436 M01S00050.ns22000 +++| SB6 ROTB+EPBL-1 01437 M01S00051.ns22000 +++| SA6 PDFE+1 ENABLE PRINT DENSITY CONTROL 01438 M01S01154.qload +++| PRS1 SA7 A7+B1 01439 M01S01155.qload +++| SB5 A7-B6
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/qload.txt · Last modified: by 127.0.0.1