cdc:nos2.source:opl.opl871:deck:1rm
Deck 1RM
20 Modifications
Listing Sections
- Deck 1RM Start
- Deck 1RM Part 1 (Line 1400)
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M01S00001.1rm +++| IDENT 1RM,RDM 00002 M01S00002.1rm +++| PERIPH 00003 M01S00003.1rm +++| BASE M 00004 M01S00004.1rm +++| SST 00005 M01S00005.1rm +++| TITLE 1RM - REDEFINE MASS STORAGE.
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00006 M02S00006.ns22000 ---| COMMENT 78/04/10. 80/02/25. 1RM - REDEFINE MASS STORAGE. 00007 M01S00001.ns22000 +++|*COMMENT 1RM - REDEFINE MASS STORAGE.
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00008 M02S00007.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1976. 00009 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00010 M01S00008.1rm +++| RDM SPACE 4,10 00011 M01S00009.1rm +++|***** 1RM - REDEFINE MASS STORAGE. 00012 M01S00010.1rm +++|* 00013 M01S00011.1rm +++|* A. J. BEEKMAN. 77/04/25. 00014 M01S00012.1rm +++|* W. E. GOEBEL. 80/02/25. 00015 M01S00013.1rm +++|* 00016 M01S00014.1rm +++|* *1RM* PROVIDES FUNCTIONS USED IN THE REDEFINITION OR REPAIR 00017 M01S00015.1rm +++|* OF 844 AND 885 TYPE MASS STORAGE DEVICES. 00018 M01S00016.1rm +++| SPACE 4,10 00019 M01S00017.1rm +++|*** *1RM* USES PARAMETERS PASSED TO IT FROM THE CPU ROUTINE 00020 M01S00018.1rm +++|* *CONFIG* (CONFIGURATION MONITOR) TO PERFORM OPERATIONS 00021 M01S00019.1rm +++|* WHICH CONTROL THE ON-LINE RECONFIGURATION OR REPAIR OF 00022 M01S00020.1rm +++|* 844 AND 885 TYPE MASS STORAGE DEVICES. 00023 M01S00021.1rm +++| SPACE 4,10 00024 M01S00022.1rm +++|*** *1RM* PROCESSES THE FUNCTIONS AS DEFINED IN *COMS1RM*. 00025 M01S00023.1rm +++|* ALL *1RM* FUNCTIONS REQUIRE THAT THE CALLING JOB HAS MASS
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00026 M02S00024.242l642 ---|* STORAGE SUBSYSTEM QUEUE PRIORITY. 00027 M01S00001.242l642 +++|* STORAGE SUBSYSTEM ID. 00028 M01S00025.1rm +++|* 00029 M01S00026.1rm +++|* THE CALL TO *1RM* IS IN THE FOLLOWING FORM - 00030 M01S00027.1rm +++|*
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00031 M02S00028.241l630 ---|*T IR 24/ *1RMP*,18/ 0,18/ ADDR
Figure IR
00032 M01S00001.241l630 +++|*T IR 24/ *1RMP*,18/ KDMA,18/ ADDR
Figure IR
00033 M01S00029.1rm +++|* 00034 M01S00030.1rm +++|* ADDR = ADDRESS OF CALL BLOCK. 00035 M01S00002.241l630 +++|* KDMA = K-DISPLAY MESSAGE LINE ADDRESS. 00036 M01S00031.1rm +++|* 00037 M01S00032.1rm +++|* THE CALL BLOCK FORMAT IS DOCUMENTED IN *COMS1RM*. 00038 M01S00033.1rm +++| SPACE 4,10 00039 M01S00034.1rm +++|*** K-DISPLAY COMMANDS. 00040 M01S00035.1rm +++|* 00041 M01S00036.1rm +++|* THE FOLLOWING COMMANDS ARE ENTERED IN RESPONSE TO AN 00042 M01S00037.1rm +++|* ERROR CONDITION DETECTED BY *1RM*. 00043 M01S00038.1rm +++|* 00044 M01S00039.1rm +++|* ABORT. THIS COMMAND IS ENTERED TO DISCONTINUE PROCESSING 00045 M01S00040.1rm +++|* OF THE CURRENT COMMAND IN PROGRESS. 00046 M01S00041.1rm +++|* 00047 M01S00042.1rm +++|* IGNORE. THE ERROR CONDITION DETECTED BY *1RM* IS TO 00048 M01S00043.1rm +++|* BE IGNORED. THIS COMMAND SHOULD BE USED WITH 00049 M01S00044.1rm +++|* DISCRETION. IT SHOULD BE USED ONLY WHEN THE 00050 M01S00045.1rm +++|* ERROR BEING POSTED IS WELL UNDERSTOOD AND 00051 M01S00046.1rm +++|* CAN LEGITIMATELY BE IGNORED. 00052 M01S00047.1rm +++|* 00053 M01S00048.1rm +++|* NEXT. THIS COMMAND IS ENTERED IN RESPONSE TO AN 00054 M01S00049.1rm +++|* 885 SERVO TIMING CHECK WHEN THE TIMING DATA 00055 M01S00050.1rm +++|* IS IN THE REQUIRED RANGE. ENTRY OF THIS 00056 M01S00051.1rm +++|* COMMAND WILL CAUSE PROCESSING TO CONTINUE 00057 M01S00052.1rm +++|* WITH EITHER THE NEXT UNIT OR THE NEXT STEP 00058 M01S00053.1rm +++|* OF PROCESSING. 00059 M01S00054.1rm +++|* 00060 M01S00055.1rm +++|* RECHECK. THIS COMMAND IS ENTERED TO RETRY A PROCESS 00061 M01S00056.1rm +++|* WHICH PREVIOUSLY GAVE AN ERROR. IF THE ERROR 00062 M01S00057.1rm +++|* PERSISTS THE MESSAGE WILL BE POSTED AGAIN 00063 M01S00058.1rm +++|* WITH ANOTHER OPPORTUNITY FOR OPERATOR ACTION. 00064 M01S00059.1rm +++| SPACE 4,10 00065 M01S00060.1rm +++|*** K-DISPLAY OPERATOR MESSAGES. 00066 M01S00061.1rm +++|* 00067 M01S00062.1rm +++|* 00068 M01S00063.1rm +++|* THE FOLLOWING COMMANDS ARE POSTED ON THE K-DISPLAY BY 00069 M01S00064.1rm +++|* *1RM*. WHEN *1RM* DETECTS A CONDITION WHICH MAY BE 00070 M01S00065.1rm +++|* RESPONDED TO BY THE OPERATOR, A MESSAGE IS POSTED AND 00071 M01S00066.1rm +++|* THE LEGAL COMMANDS ARE POSTED ON THE K-DISPLAY. THE 00072 M01S00067.1rm +++|* FOLLOWING LIST OF ERROR MESSAGES LISTS THOSE LEGAL 00073 M01S00068.1rm +++|* COMMANDS AND INDICATES IF AN OPERATOR RESPONSE IS 00074 M01S00069.1rm +++|* REQUIRED OR OPTIONAL. 00075 M01S00070.1rm +++|* 00076 M01S00071.1rm +++|* 00077 M01S00072.1rm +++|* UNIT XX, CHYY WRITE/READ VERIFY ERROR. 00078 M01S00073.1rm +++|* PART OF THE VALIDATION PROCEDURE WHEN RETURNING 00079 M01S00074.1rm +++|* AN EQUIPMENT FOR SYSTEM USE (CLEAR COMMAND) IS 00080 M01S00075.1rm +++|* TO WRITE A SECTOR OF DATA TO THE DEVICE, READ IT 00081 M01S00076.1rm +++|* BACK AND VERIFY THE DATA. WHEN THIS VERIFICATION 00082 M01S00077.1rm +++|* FAILS THE ABOVE MESSAGE APPEARS. 00083 M01S00078.1rm +++|* COMMANDS - REQUIRED. 00084 M01S00079.1rm +++|* ABORT, IGNORE, RECHECK. 00085 M01S00080.1rm +++|* 00086 M01S00081.1rm +++|*
| Line S00082 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00087 M02S00082.ns22000 ---|* *ERROR IN PERFORMING SERVO CHECK ON UNIT XX.* 00088 M01S00002.ns22000 +++|* ERROR IN PERFORMING SERVO CHECK ON UNIT XX. 00089 M01S00083.1rm +++|* THE SERVO ADJUSTMENT PROCEDURE HAS ENCOUNTERED 00090 M01S00084.1rm +++|* A DISK ERROR CONDITION. 00091 M01S00085.1rm +++|* COMMANDS - REQUIRED. 00092 M01S00086.1rm +++|* ABORT, IGNORE, RECHECK. 00093 M01S00087.1rm +++|* 00094 M01S00088.1rm +++|* 00095 M01S00089.1rm +++|* UNIT XX SERVO TIMING= XXX. ACCEPTABLE RANGE IS 325 TO 345. 00096 M01S00090.1rm +++|* WHEN RECONFIGURING AN 885 HDA A SERVO ADJUSTMENT 00097 M01S00091.1rm +++|* PROCEDURE IS EXECUTED. THIS PROCEDURE MEASURES 00098 M01S00092.1rm +++|* SERVO TIMING CHARACTERISTICS WHICH MUST BE IN THE 00099 M01S00093.1rm +++|* SPECIFIED RANGE. A DRIVE ADJUSTMENT MUST BE MADE 00100 M01S00094.1rm +++|* BY A CE UNTIL THE TIMING IS IN THE SPECIFIED 00101 M01S00095.1rm +++|* RANGE. 00102 M01S00096.1rm +++|* COMMANDS - REQUIRED. 00103 M01S00097.1rm +++|* ABORT, RECHECK. 00104 M01S00098.1rm +++|* NEXT. ONLY IF TIMING IS IN RANGE. 00105 M01S00099.1rm +++|* IGNORE. ONLY IF TIMING IS NOT IN RANGE. 00106 M01S00100.1rm +++|* 00107 M01S00101.1rm +++|* 00108 M01S00102.1rm +++|* ERROR ON LINK DEVICE. 00109 M01S00103.1rm +++|* WHEN A DEVICE IS SHARED BETWEEN MAINFRAMES THE 00110 M01S00104.1rm +++|* LINK DEVICE IS READ TO SYNCHRONIZE PROCESSING 00111 M01S00105.1rm +++|* BETWEEN MACHINES. WHEN AN ERROR OCCURS IN 00112 M01S00106.1rm +++|* READING THE LINK DEVICE THIS ERROR MESSAGE 00113 M01S00107.1rm +++|* IS ISSUED. 00114 M01S00108.1rm +++|* COMMANDS - REQUIRED. 00115 M01S00109.1rm +++|* ABORT, IGNORE. 00116 M01S00110.1rm +++|* 00117 M01S00111.1rm +++|* 00118 M01S00112.1rm +++|* SPIN DOWN UNIT XX. 00119 M01S00113.1rm +++|* THIS IS A DIRECTIVE TO THE OPERATOR OR CE TO 00120 M01S00114.1rm +++|* SPIN DOWN THE SPECIFIED UNIT IN PREPARATION 00121 M01S00115.1rm +++|* FOR MOVING THE PACK OR HDA. 00122 M01S00116.1rm +++|* COMMAND - OPTIONAL. 00123 M01S00117.1rm +++|* ABORT, IGNORE. 00124 M01S00118.1rm +++|* 00125 M01S00119.1rm +++|* 00126 M01S00120.1rm +++|* MOVE PACK FROM UNIT XX TO UNIT YY AND SPIN UP. 00127 M01S00121.1rm +++|* THIS DIRECTIVE IS ISSUED TO THE OPERATOR FOR 00128 M01S00122.1rm +++|* EACH UNIT TO BE MOVED DURING A RECONFIGURATION. 00129 M01S00123.1rm +++|* UNIT XX HAS PREVIOUSLY BEEN DIRECTED TO BE 00130 M01S00124.1rm +++|* SPUN DOWN AND ITS PACK OR HDA IS NOW TO BE 00131 M01S00125.1rm +++|* MOVED TO UNIT YY. 00132 M01S00126.1rm +++|* COMMANDS - OPTIONAL. 00133 M01S00127.1rm +++|* ABORT, IGNORE. 00134 M01S00128.1rm +++|* 00135 M01S00129.1rm +++|* 00136 M01S00130.1rm +++|* UNIT XX, CHYY LABEL READ ERROR. 00137 M01S00131.1rm +++|* IN VERIFYING THAT THE CORRECT LABEL IS PRESENT 00138 M01S00132.1rm +++|* ON UNIT XX A DISK ERROR OCCURRED WHICH PREVENTED 00139 M01S00133.1rm +++|* THE LABEL FROM BEING READ SUCCESSFULLY. 00140 M01S00134.1rm +++|* THE CHANNEL IS SPECIFIED IN THE MESSAGE AND 00141 M01S00135.1rm +++|* MAY BE HELPFUL IF THE VERIFY ERROR OCCURS 00142 M01S00136.1rm +++|* ONLY FROM A SINGLE CHANNEL IN A DUAL ACCESS 00143 M01S00137.1rm +++|* CONFIGURATION. 00144 M01S00138.1rm +++|* COMMANDS - REQUIRED. 00145 M01S00139.1rm +++|* ABORT, IGNORE, RECHECK. 00146 M01S00140.1rm +++|* 00147 M01S00141.1rm +++|* 00148 M01S00142.1rm +++|* UNIT XX, CHYY LABEL VERIFICATION ERROR. 00149 M01S00143.1rm +++|* THE LABEL SECTOR WAS READ BUT THE DATA IN THE 00150 M01S00144.1rm +++|* LABEL SECTOR IS NOT CORRECT. 00151 M01S00145.1rm +++|* COMMANDS - REQUIRED. 00152 M01S00146.1rm +++|* ABORT, IGNORE, RECHECK. 00153 M01S00147.1rm +++|* 00154 M01S00148.1rm +++|* 00155 M01S00149.1rm +++|* WAITING FOR MACHINE ID=XX. 00156 M01S00150.1rm +++|* A SHARED DEVICE IS BEING PROCESSED AND IT HAS 00157 M01S00151.1rm +++|* BEEN DETECTED THAT MACHINE IDXX IS NOT AT THE 00158 M01S00152.1rm +++|* SAME STAGE OF PROCESSING AS THIS MACHINE. 00159 M01S00153.1rm +++|* COMMANDS - REQUIRED. 00160 M01S00154.1rm +++|* ABORT, IGNORE. 00161 M01S00155.1rm +++|* 00162 M01S00156.1rm +++|* 00163 M01S00157.1rm +++|* COMMAND ABORTED. 00164 M01S00158.1rm +++|* INFORMATIVE MESSAGE STATING THAT THE ATTEMPTED 00165 M01S00159.1rm +++|* COMMAND WAS ABORTED AND ALL VALUES FOR THE CURRENT 00166 M01S00160.1rm +++|* EQUIPMENT BEING PROCESSED HAVE BEEN RESET TO THEIR 00167 M01S00161.1rm +++|* ORIGINAL VALUE. 00168 M01S00162.1rm +++|* COMMANDS - NONE. 00169 M01S00163.1rm +++|* 00170 M01S00164.1rm +++|* 00171 M01S00165.1rm +++|* UNIT XX SERVO TIMING IN PROGRESS. 00172 M01S00166.1rm +++|* INFORMATIVE MESSAGE STATING THAT ADJUSTMENTS ARE 00173 M01S00167.1rm +++|* BEING MADE ON THE SERVO TIMING. 00174 M01S00168.1rm +++|* COMMANDS - NONE. 00175 M01S00169.1rm +++|* 00176 M01S00170.1rm +++|*
| Line S00171 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00177 M02S00171.ns22000 ---|* EQXX SYSTEM USAGE OF DEVICE SUSPENDED. 00178 M01S00003.ns22000 +++|* EQXXX, REDEFINITION COMPLETE. 00179 M01S00004.ns22000 +++|* NORMAL COMPLETION MESSAGE. 00180 M01S00005.ns22000 +++|* 00181 M01S00006.ns22000 +++|* 00182 M01S00007.ns22000 +++|* EQXXX, SYSTEM USAGE OF DEVICE SUSPENDED. 00183 M01S00172.1rm +++|* INFORMATIVE MESSAGE STATING THAT DEVICE USAGE HAS 00184 M01S00173.1rm +++|* BEEN SUSPENDED AS REQUESTED. 00185 M01S00174.1rm +++|* COMMANDS - NONE. 00186 M01S00175.1rm +++| SPACE 4,10 00187 M01S00176.1rm +++|*** DAYFILE MESSAGES. 00188 M01S00177.1rm +++|*
| Line S00178 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00189 M02S00178.v23l617 ---|* * 1RM INVALID REQUEST.* = ILLEGAL FUNCTION CODE OR STATUS 00190 M01S00001.v23l617 +++|* * 1RM INCORRECT REQUEST.* = INCORRECT FUNCTION CODE OR STATUS 00191 M01S00179.1rm +++|* WORD ADDRESS OUT OF RANGE. 00192 M01S00180.1rm +++|*
| Line S00181 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00193 M02S00181.v23l617 ---|* * 1RM INVALID USER ACCESS.* = CALLING JOB NOT MASS STORAGE 00194 M01S00002.v23l617 +++|* * 1RM USER ACCESS NOT VALID.* = CALLING JOB NOT MASS STORAGE 00195 M01S00182.1rm +++|* SUBSYSTEM QUEUE PRIORITY. 00196 M01S00008.ns22000 +++| SPACE 4,10 00197 M01S00009.ns22000 +++|** ROUTINES USED. 00198 M01S00010.ns22000 +++|* 00199 M01S00011.ns22000 +++|* 0SI - SERVO TIMING. 00200 M01S00183.1rm +++| SPACE 4 00201 M01S00012.ns22000 +++|** COMMON DECKS. 00202 M01S00013.ns22000 +++| 00203 M01S00014.ns22000 +++| 00204 M01S00184.1rm +++|*CALL COMPMAC 00205 M01S00185.1rm +++|*CALL COMSCPS 00206 M01S00001.1rm1 +++| QUAL DSL 00207 M01S00002.1rm1 +++|*CALL COMSDSL 00208 M01S00003.1rm1 +++| QUAL * 00209 M01S00002.242l642 +++|*CALL COMSEVT 00210 M01S00186.1rm +++|*CALL COMSLSD 00211 M01S00187.1rm +++|*CALL COMSMMF 00212 M01S00188.1rm +++|*CALL COMSMSP 00213 M01S00189.1rm +++|*CALL COMSMST 00214 M01S00190.1rm +++|*CALL COMSPIM 00215 M01S00191.1rm +++|*CALL COMSPRD 00216 M01S00192.1rm +++|*CALL COMSSSD 00217 M01S00193.1rm +++|*CALL COMSZOL 00218 M01S00194.1rm +++| LIST X 00219 M01S00195.1rm +++|*CALL COMS1RM 00220 M01S00196.1rm +++| LIST * 00221 M01S00197.1rm +++| TITLE MACROS. 00222 M01S00198.1rm +++| COMMAND SPACE 4,10 00223 M01S00199.1rm +++|** COMMAND - SPECIFY LEGAL K-DISPLAY COMMANDS. 00224 M01S00200.1rm +++|* 00225 M01S00201.1rm +++|* THE *TPAR* WORD INDICATES TO *CONFIG* WHICH K-DISPLAY 00226 M01S00202.1rm +++|* COMMANDS ARE LEGAL FOR *1RM* PROCESSING. THIS 00227 M01S00203.1rm +++|* MACRO IS USED TO SET THE *TPAR* WORD TO THE LEGAL 00228 M01S00204.1rm +++|* COMMANDS. WHEN *CONFIG* DETECTS A LEGAL COMMAND IT IS 00229 M01S00205.1rm +++|* PASSED TO *1RM* VIA WORD *TCOM* IN THE CALL BLOCK. 00230 M01S00206.1rm +++|* *1RM* CHECKS FOR COMMANDS WITH THE AID OF THE *IFCOM* 00231 M01S00207.1rm +++|* MACRO. 00232 M01S00208.1rm +++|* 00233 M01S00209.1rm +++|* COMMAND C 00234 M01S00210.1rm +++|* C = A LIST OF LEGAL COMMAND KEYWORDS. 00235 M01S00211.1rm +++| 00236 M01S00212.1rm +++| 00237 M01S00213.1rm +++| COMMAND MACRO C 00238 M01S00214.1rm +++| MACREF COMMAND 00239 M01S00215.1rm +++| .2 SET 0 00240 M01S00216.1rm +++| IRP C
| Line S00217 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 1rm6 |
Seq # *Modification Id* Act ----------------------------+ 00241 M02S00217.1rm6 ---| .1 OCTMIC ._C-1 00242 M01S00001.1rm6 +++| .1 DECMIC ._C-1 00243 M01S00218.1rm +++| .2 SET .2+1BS".1" 00244 M01S00219.1rm +++| IRP 00245 M01S00220.1rm +++| IFGT .2,77 00246 M01S00221.1rm +++| LDC .2 00247 M01S00222.1rm +++| ELSE 1 00248 M01S00223.1rm +++| LDN .2 00249 M01S00224.1rm +++| RJM SLC 00250 M01S00225.1rm +++| ENDM 00251 M01S00226.1rm +++| LDBUF SPACE 4,10 00252 M01S00227.1rm +++|** LDBUF - LOAD ADDRESS OF CALL BUFFER WORD. 00253 M01S00228.1rm +++|* 00254 M01S00229.1rm +++|* LDBUF ADD 00255 M01S00230.1rm +++|* ADD = CALL BUFFER WORD INDEX. 00256 M01S00231.1rm +++| 00257 M01S00232.1rm +++| 00258 M01S00233.1rm +++| LDBUF MACRO A 00259 M01S00234.1rm +++| MACREF LDBUF 00260 M01S00235.1rm +++| RJM LDB 00261 M01S00236.1rm +++| IFNE A,0,1 00262 M01S00237.1rm +++| ADN A 00263 M01S00238.1rm +++| ENDM 00264 M01S00239.1rm +++| IFCOM SPACE 4,10 00265 M01S00240.1rm +++|** IFCOM - CHECK IF COMMAND ENTERED. 00266 M01S00241.1rm +++|* 00267 M01S00242.1rm +++|* THIS MACRO CHECKS FOR A COMMAND PREVIOUSLY SPECIFIED 00268 M01S00243.1rm +++|* WITH THE COMMAND MACRO TO SEE IF IT HAS BEEN ENTERED 00269 M01S00244.1rm +++|* VIA THE K-DISPLAY. 00270 M01S00245.1rm +++|* 00271 M01S00246.1rm +++|* IFCOM C,TAG 00272 M01S00247.1rm +++|* C = COMMAND LIST TO BE CHECKED. 00273 M01S00248.1rm +++|* TAG = ADDRESS TO JUMP TO IF COMMAND ENTERED. 00274 M01S00249.1rm +++| 00275 M01S00250.1rm +++| 00276 M01S00251.1rm +++| IFCOM MACRO C,TAG 00277 M01S00252.1rm +++| MACREF IFCOM 00278 M01S00253.1rm +++| .2 SET 0 00279 M01S00254.1rm +++| IRP C
| Line S00255 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 1rm6 |
Seq # *Modification Id* Act ----------------------------+ 00280 M02S00255.1rm6 ---| .1 OCTMIC ._C-1 00281 M01S00002.1rm6 +++| .1 DECMIC ._C-1 00282 M01S00256.1rm +++| .2 SET .2+1BS".1" 00283 M01S00257.1rm +++| IRP 00284 M01S00258.1rm +++| IFGT .2,77 00285 M01S00259.1rm +++| LDC .2 00286 M01S00260.1rm +++| ELSE 1 00287 M01S00261.1rm +++| LDN .2 00288 M01S00262.1rm +++| RJM CLC 00289 M01S00263.1rm +++| IF DEF,TAG 00290 M01S00264.1rm +++| IFLT *-TAG,40 00291 M01S00265.1rm +++| NJN TAG IF TAG WITHIN RANGE 00292 M01S00266.1rm +++| ELSE 2 00293 M01S00267.1rm +++| ZJN *+3 IF TAG OUT OF RANGE, REVERSE TEST LOGIC 00294 M01S00268.1rm +++| LJM TAG LONG JUMP TO TAG 00295 M01S00269.1rm +++| ENDM 00296 M01S00270.1rm +++| MESG SPACE 4,10 00297 M01S00271.1rm +++|** MESG - SEND MESSAGE TO K-DISPLAY. 00298 M01S00272.1rm +++|* 00299 M01S00273.1rm +++|* MESG ADD 00300 M01S00274.1rm +++|* ADD = ADDRESS OF K-DISPLAY MESSAGE. 00301 M01S00275.1rm +++| 00302 M01S00276.1rm +++| 00303 M01S00277.1rm +++| MESG MACRO A 00304 M01S00278.1rm +++| MACREF MESG 00305 M01S00279.1rm +++| IFC NE,=A=*=,1 00306 M01S00280.1rm +++| LDC A 00307 M01S00281.1rm +++| RJM KMS 00308 M01S00282.1rm +++| ENDM 00309 M01S00283.1rm +++| SPACE 4,10 00310 M01S00284.1rm +++|**** DIRECT LOCATION ASSIGNMENTS. 00311 M01S00285.1rm +++| 00312 M01S00286.1rm +++|
| Line S00287 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns2483 |
Seq # *Modification Id* Act ----------------------------+ 00313 M02S00287.ns2483 ---| LIST G 00314 M01S00288.1rm +++| BEGIN BSSN 20 00315 M01S00289.1rm +++| CN BSSN 5 CM WORD BUFFER 00316 M01S00290.1rm +++| CH BSSN 1 CHANNEL CURRENTLY IN USE 00317 M01S00291.1rm +++| DI BSSN 1 DAT INDEX
| Line S00292 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00318 M02S00292.ns22000 ---| EQ BSSN 1 EQUIPMENT NUMBER FOR RECONFIGURATION 00319 M01S00015.ns22000 +++| EQ BSSN 1 EST ORDINAL FOR RECONFIGURATION 00320 M01S00293.1rm +++| FN BSSN 1 FUNCTION IN PROGRESS 00321 M01S00294.1rm +++| GL BSSN 1 DEVICE UNAVAILABLE FLAG 00322 M01S00295.1rm +++| LU BSSN 1 LOGICAL UNIT NUMBER OF CURRENT UNIT 00323 M01S00296.1rm +++| LT BSSN 1 LABEL TRACK FROM MST 00324 M01S00297.1rm +++| MF BSSN 1 MMF STATUS 00325 M01S00298.1rm +++| MM BSSN 1 MACHINE MASK FOR THIS MACHINE 00326 M01S00299.1rm +++| MS BSSN 1 MST ADDRESS/10B 00327 M01S00300.1rm +++| NC BSSN 1 FIRST OF SECOND CHANNEL FLAG 00328 M01S00301.1rm +++| NU BSSN 1 NUMBER OF UNITS FOR EQUIPMENT 00329 M01S00302.1rm +++| PU BSSN 1 PHYSICAL UNIT NUMBER OF CURRENT UNIT 00330 M01S00303.1rm +++| RM BSSN 1 *RD* DEVICE MST ADDRESS/10B 00331 M01S00304.1rm +++| RU BSSN 1 UNITS FOR RECONFIGURATION OR REPAIR 00332 M01S00305.1rm +++| SC BSSN 1 SUSPENDED DEVICE COUNT 00333 M01S00306.1rm +++| SL BSSN 1 SINGLE UNIT SECTOR LIMIT FOR EQUIPMENT 00334 M01S00307.1rm +++| MX BSSN 0 MAXIMUM DIRECT CELL 00335 M01S00308.1rm +++| END BSSN 00336 M01S00309.1rm +++| ERRPL MX-50 DIRECT CELL OVERFLOW
| Line S00310 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns2483 |
Seq # *Modification Id* Act ----------------------------+ 00337 M02S00310.ns2483 ---| LIST * 00338 M01S00311.1rm +++| 00339 M01S00312.1rm +++| 00340 M01S00313.1rm +++|**** 00341 M01S00314.1rm +++| TITLE RDM - MAIN PROGRAM. 00342 M01S00315.1rm +++|** RDM - MAIN PROGRAM. 00343 M01S00016.ns22000 +++| 00344 M01S00316.1rm +++| 00345 M01S00317.1rm +++| ORG PPFW 00346 M01S00318.1rm +++| RDM RJM PRS PRESET 00347 M01S00319.1rm +++| RDM1 DELAY 00348 M01S00320.1rm +++| PAUSE 00349 M01S00321.1rm +++| LDBUF RFNB CHECK FOR FUNCTION REQUEST 00350 M01S00322.1rm +++| CRD CN 00351 M01S00323.1rm +++| LDD CM+1 00352 M01S00324.1rm +++| ZJN RDM2 IF NO ERROR FLAG 00353 M01S00325.1rm +++| LDN 0 00354 M01S00326.1rm +++| LJM RDM4 DROP PP 00355 M01S00327.1rm +++| 00356 M01S00328.1rm +++| RDM2 LDD CN+4 00357 M01S00329.1rm +++| SHN 21 00358 M01S00330.1rm +++| PJN RDM1 IF NO FUNCTION PRESENT 00359 M01S00331.1rm +++| STD FN 00360 M01S00332.1rm +++| RJM SEQ SET EQUIPMENT PARAMETERS 00361 M01S00333.1rm +++| LDM TFCN,FN 00362 M01S00334.1rm +++| STM RDMA 00363 M01S00335.1rm +++| RJM * PROCESS REQUEST 00364 M01S00336.1rm +++| RDMA EQU *-1 00365 M01S00337.1rm +++| 00366 M01S00338.1rm +++|* RETURN FROM FUNCTION PROCESSOR. 00367 M01S00339.1rm +++|* IF A DEVICE SUSPEND REQUEST IS OUTSTANDING *1RM* MUST 00368 M01S00340.1rm +++|* REMAIN ASSIGNED UNTIL IT IS CLEARED. IF *1RM* WERE 00369 M01S00341.1rm +++|* TO DROP OUT A DEADLOCK COULD BE CREATED BECAUSE OF 00370 M01S00342.1rm +++|* PP RESOURCES BEING TIED UP WAITING FOR THE SUSPENDED 00371 M01S00343.1rm +++|* DEVICE. 00372 M01S00344.1rm +++|* 00373 M01S00345.1rm +++|* (A) = 0 IF COMMAND WAS NOT ABORTED. 00374 M01S00346.1rm +++|* (A) .NE. 0 IF *ABORT* WAS ENTERED. 00375 M01S00347.1rm +++| 00376 M01S00348.1rm +++| ZJN RDM3 IF COMMAND NOT ABORTED 00377 M01S00349.1rm +++| MESG RDMB *COMMAND ABORTED* 00378 M01S00350.1rm +++| RDM3 RJM RRD RESET *RD* DEVICE 00379 M01S00351.1rm +++| LDBUF RFNB READ FUNCTION WORD 00380 M01S00352.1rm +++| CRD CN 00381 M01S00353.1rm +++| LDD SC CHECK FOR SUSPENDED DEVICES 00382 M01S00354.1rm +++| ZJN RDM4 IF NO DEVICE SUSPENDED - DROP PP 00383 M01S00355.1rm +++| LDD CN+4 00384 M01S00356.1rm +++| SCN 1 00385 M01S00357.1rm +++| RDM4 STD CN+4 00386 M01S00358.1rm +++| LDBUF RFNB 00387 M01S00359.1rm +++| CWD CN 00388 M01S00360.1rm +++| LDD CN+4 00389 M01S00361.1rm +++| ZJN RDM5 IF DROP OF PP 00390 M01S00362.1rm +++| LJM RDM1 CHECK FOR NEXT FUNCTION 00391 M01S00363.1rm +++|
| Line S00364 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00392 M02S00364.242l642 ---| RDM5 MONITOR DPPM
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Updated by) | 1rm5 |
Seq # *Modification Id* Act ----------------------------+ 00393 M02S00003.1rm5 ---| RDM5 LDK ZERL RESTART JOBS WAITING ON THIS DEVICE 00394 M01S00001.1rm5 +++| RDM5 RJM CSP CLEAR EQUIPMENT ASSIGNMENT 00395 M01S00002.1rm5 +++| LDK ZERL RESTART JOBS WAITING ON DEVICE 00396 M01S00004.242l642 +++| CRD CM 00397 M01S00005.242l642 +++| LDD EQ EST ORDINAL 00398 M01S00006.242l642 +++| STD CM+3 00399 M01S00007.242l642 +++|* LDN 0 *WISE* SUBFUNCTION 00400 M01S00008.242l642 +++|* STD CM+4 00401 M01S00009.242l642 +++| ERRNZ WISE ADJUST CODE IF VALUE CHANGES 00402 M01S00010.242l642 +++| MONITOR EATM 00403 M01S00011.242l642 +++| MONITOR DPPM 00404 M01S00365.1rm +++| LJM PPR EXIT 00405 M01S00366.1rm +++| 00406 M01S00367.1rm +++| RDMB DATA C*COMMAND ABORTED.* 00407 M01S00368.1rm +++| SPACE 4,10 00408 M01S00369.1rm +++|** TFCN - TABLE OF FUNCTION CODE PROCESSORS. 00409 M01S00370.1rm +++|* 00410 M01S00371.1rm +++|* ENTRY = 1 WORD INDEXED BY FUNCTION CODE. 00411 M01S00372.1rm +++|* 00412 M01S00373.1rm +++|*T 12/ ADDR
Figure
00413 M01S00374.1rm +++|* ADDR = ADDRESS OF FUNCTION PROCESSOR. 00414 M01S00375.1rm +++| 00415 M01S00376.1rm +++| 00416 M01S00377.1rm +++| TFCN INDEX TABLE OF FUNCTION CODE PROCESSORS
| Line S00378 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00417 M02S00378.v23l617 ---| INDEX RUMF,UMT UPDATE MST-S FROM ECS 00418 M01S00003.v23l617 +++| INDEX RUMF,UMT UPDATE MST-S FROM EXTENDED MEMORY 00419 M01S00379.1rm +++| INDEX RCLF,CLR CLEAR IDLE AND SUSPEND REQUESTS 00420 M01S00380.1rm +++| INDEX RCDF,CDI CLEAR DAT INTERLOCK 00421 M01S00381.1rm +++| INDEX RDDF,RDD REDEFINE DEVICE 00422 M01S00382.1rm +++| INDEX RSPF,SPD SUSPEND DEVICE ACTIVITY 00423 M01S00383.1rm +++| INDEX RMXF 00424 M01S00384.1rm +++| CDI TITLE CLEAR *DATI* INTERLOCK. 00425 M01S00385.1rm +++|** CDI - CLEAR *DATI* INTERLOCK. (FUNCTION RCDF). 00426 M01S00386.1rm +++|* 00427 M01S00387.1rm +++|* ENTRY (MF) = MULTI-MAINFRAME LINK DEVICE. 00428 M01S00388.1rm +++|* 00429 M01S00389.1rm +++|* USES CN - CN+4. 00430 M01S00390.1rm +++|* 00431 M01S00391.1rm +++|* CALLS IFR. 00432 M01S00392.1rm +++| 00433 M01S00393.1rm +++| 00434 M01S00394.1rm +++| CDI SUBR ENTRY/EXIT 00435 M01S00395.1rm +++| LDD MF CHECK FOR MULTI-MAINFRAME 00436 M01S00396.1rm +++| ZJN CDIX IF NOT MMF 00437 M01S00397.1rm +++| LDC MMFL READ *DATI* INTERLOCK INDICATION 00438 M01S00398.1rm +++| CRD CN 00439 M01S00399.1rm +++| LDD CN+2 00440 M01S00400.1rm +++| ZJN CDIX IF INTERLOCK NOT SET 00441 M01S00401.1rm +++| LCN DATI 00442 M01S00402.1rm +++| RJM IFR CLEAR *DATI* FLAG REGISTER INTERLOCK 00443 M01S00403.1rm +++| LDN 0 CLEAR INTERLOCK INDICATOR 00444 M01S00404.1rm +++| STD CN+2 00445 M01S00405.1rm +++| LDC MMFL 00446 M01S00406.1rm +++| CWD CN 00447 M01S00407.1rm +++| LDN 0 00448 M01S00408.1rm +++| UJN CDIX RETURN 00449 M01S00409.1rm +++| TITLE CLR - CLEAR IDLE AND SUSPEND REQUEST. 00450 M01S00410.1rm +++|** CLR - CLEAR IDLE AND SUSPEND REQUEST. (FUNCTION RCLF). 00451 M01S00411.1rm +++|* 00452 M01S00412.1rm +++|* CLEAR THE IDLE AND SUSPEND REQUESTED BIT FOR THE SPECIFIED 00453 M01S00413.1rm +++|* EQUIPMENT. 00454 M01S00414.1rm +++|*
| Line S00415 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00455 M02S00415.ns22000 ---|* ENTRY (EQ) = EQUIPMENT NUMBER. 00456 M01S00017.ns22000 +++|* ENTRY (EQ) = EST ORDINAL. 00457 M01S00416.1rm +++|*
| Line S00417 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00458 M02S00417.242l642 ---|* EXIT (A) .NE. 0 IF OPERATION ABORTED. 00459 M01S00012.242l642 +++|* EXIT (A) .NE. 0 IF THE OPERATION WAS ABORTED OR AN ERROR 00460 M01S00013.242l642 +++|* FLAG IS SET AT THE CONTROL POINT. 00461 M01S00418.1rm +++|* 00462 M01S00419.1rm +++|* USES LU, NC, T5, T7, CM - CM+4, CN - CN+4. 00463 M01S00420.1rm +++|* 00464 M01S00421.1rm +++|* CALLS CAS, CDI, CDP, CSP, MSV, PUE, SCF, SDI, SNC, VLB, WAM. 00465 M01S00422.1rm +++|*
| Line S00423 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00466 M02S00423.ns22000 ---|* MACROS CMSTF, LDBUF, MONITOR. 00467 M01S00018.ns22000 +++|* MACROS CMSTF, LDBUF, MONITOR, SFA. 00468 M01S00424.1rm +++| 00469 M01S00425.1rm +++| 00470 M01S00426.1rm +++| CLR SUBR ENTRY 00471 M01S00427.1rm +++| LDD GL 00472 M01S00428.1rm +++| ZJN CLR1 IF DEVICE AVAILABLE 00473 M01S00429.1rm +++| LJM CLR6 CLEAR SUSPEND AND IDLE STATUS 00474 M01S00430.1rm +++| 00475 M01S00431.1rm +++| CLR1 LDN MSTL SET MST WORD COUNT 00476 M01S00432.1rm +++| STD T7 00477 M01S00433.1rm +++| LDBUF ESTD READ EST ENTRY 00478 M01S00434.1rm +++| CRD CN 00479 M01S00435.1rm +++| ADN MSTD-ESTD READ MST 00480 M01S00436.1rm +++| CRM BFMS,T7 00481 M01S00437.1rm +++| RJM SCF SET COMMON FIELDS IN *RD* DEVICE 00482 M01S00014.242l642 +++| NJN CLRX IF ERROR FLAG SET AT CP 00483 M01S00438.1rm +++| 00484 M01S00439.1rm +++|* VERIFY FUNCTIONAL AND LOGICAL INTEGRITY OF EQUIPMENT. 00485 M01S00440.1rm +++| 00486 M01S00441.1rm +++| CLR2 LDN 1 SET FIRST CHANNEL 00487 M01S00442.1rm +++| STD NC 00488 M01S00443.1rm +++| CLR3 RJM SNC SET *NC* CHANNEL 00489 M01S00444.1rm +++| NJN CLR5 IF CHANNEL NOT AVAILABLE 00490 M01S00445.1rm +++| RJM VLB VERIFY LABEL SECTOR 00491 M01S00446.1rm +++| NJN CLR7 IF *ABORT* 00492 M01S00447.1rm +++| CLR4 RJM MSV MASS STORAGE VERIFICATION 00493 M01S00448.1rm +++| ZJN CLR5 IF VERIFY GOOD 00494 M01S00449.1rm +++| LDC CLRA * UNIT XX, CHYY WRITE/READ VERIFY ERROR.* 00495 M01S00450.1rm +++| RJM PUE PROCESS UNIT ERROR 00496 M01S00451.1rm +++| MJN CLR4 IF *RECHECK* 00497 M01S00452.1rm +++| NJN CLR7 IF *ABORT* 00498 M01S00453.1rm +++| CLR5 SOD NC 00499 M01S00454.1rm +++| PJN CLR3 IF MORE CHANNELS TO PROCESS 00500 M01S00455.1rm +++| 00501 M01S00456.1rm +++|* ADVANCE TO NEXT UNIT. 00502 M01S00457.1rm +++| 00503 M01S00458.1rm +++| AOD LU 00504 M01S00459.1rm +++| LDD SL 00505 M01S00460.1rm +++| RAD T7 00506 M01S00461.1rm +++| SBM SLM 00507 M01S00462.1rm +++| MJN CLR2 IF MORE UNITS TO PROCESS 00508 M01S00463.1rm +++| 00509 M01S00464.1rm +++|* CLEAR SUSPEND AND IDLE STATUS. 00510 M01S00465.1rm +++| 00511 M01S00466.1rm +++| CLR6 RJM SDI SET DAT INTERLOCK
| Line S00467 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00512 M02S00467.242l642 ---| CLR7 NJN CLR8.1 IF *ABORT* 00513 M01S00015.242l642 +++| CLR7 NJN CLR9 IF *ABORT* 00514 M01S00468.1rm +++| RJM CSP CLEAR SUSPEND STATUS 00515 M01S00469.1rm +++| RJM CAS CHECK ALL SUSPENDS CLEARED 00516 M01S00470.1rm +++| NJN CLR8 IF SUSPEND SET FOR OTHER MACHINES 00517 M01S00471.1rm +++| LDD EQ 00518 M01S00472.1rm +++| STD T5 00519 M01S00473.1rm +++| CMSTF GRDR CLEAR REDEFINITION REQUESTED 00520 M01S00474.1rm +++| CLR8 RJM CDI CLEAR DAT INTERLOCK
| Line S00475 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00521 M02S00475.242l642 ---| LDC MJNI+WAM4-WAMB USE CORRECT CONDITIONAL JUMP 00522 M01S00016.242l642 +++| LDC ZJNI+WAM4-WAMB USE CORRECT CONDITIONAL JUMP 00523 M01S00476.1rm +++| RJM WAM ENSURE SYNCHRONIZATION OF PROCESSING
| Line S00477 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00524 M02S00477.242l642 ---| CLR8.1 NJN CLR9 IF *ABORT*
| Line S00478 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
M03 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00525 M03S00478.242l642 ---| LDD EQ
| Line S00479 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
M03 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00526 M03S00479.242l642 ---| ADM ESTS
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00527 M02S00019.242l642 ---| SFA EST,EQ READ EST ENTRY
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00528 M02S00020.242l642 ---| ADK EQDE
| Line S00480 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00529 M02S00480.242l642 ---| CRD CM
| Line S00481 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00530 M02S00481.242l642 ---| LDD CM
| Line S00482 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00531 M02S00482.242l642 ---| LPC 2000
| Line S00483 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00532 M02S00483.242l642 ---| ZJN CLR8.2 IF NOT SYSTEM DEVICE
| Line S00484 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
M03 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00533 M03S00484.242l642 ---| LDD EQ SET EQUIPMENT NUMBER
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00534 M02S00021.242l642 ---| LDD EQ SET EST ORDINAL
| Line S00485 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00535 M02S00485.242l642 ---| STD CM+1
| Line S00486 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00536 M02S00486.242l642 ---| LDN SSDS RESTORE SYSTEM DEVICE TO LIST
| Line S00487 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00537 M02S00487.242l642 ---| STD CM+2
| Line S00488 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00538 M02S00488.242l642 ---| MONITOR SEQM
| Line S00489 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00539 M02S00489.242l642 ---| CLR8.2 RJM CDP COMPLETE DEVICE PROCESSING 00540 M01S00017.242l642 +++| NJN CLR9 IF *ABORT* 00541 M01S00018.242l642 +++| RJM CDP COMPLETE DEVICE PROCESSING 00542 M01S00490.1rm +++| LDN 0 00543 M01S00491.1rm +++| CLR9 LJM CLRX RETURN 00544 M01S00492.1rm +++| 00545 M01S00493.1rm +++| CLRA DATA C* UNIT XX, CHYY WRITE/READ VERIFY ERROR.* 00546 M01S00494.1rm +++| RDD TITLE REDEFINE UNITS FUNCTION PROCESSOR. 00547 M01S00495.1rm +++|** RDD - REDEFINE UNITS. (FUNCTION RDDF). 00548 M01S00496.1rm +++|* 00549 M01S00497.1rm +++|* REDEFINE AN EQUIPMENT BY CHANGING THE UNITS AND OPTIONALLY 00550 M01S00498.1rm +++|* THE CHANNELS. THE CHANGE MAY INVOLVE PHYSICALLY MOVING 00551 M01S00499.1rm +++|* PACKS OR HDAS IN WHICH CASE THE PROCESS IS GUIDED BY 00552 M01S00500.1rm +++|* MESSAGES WHICH APPEAR ON THE *K* DISPLAY AND AT THE USER-S 00553 M01S00501.1rm +++|* CONTROL POINT. 00554 M01S00502.1rm +++|* 00555 M01S00503.1rm +++|* ENTRY (FG) = FLAGS. 00556 M01S00504.1rm +++|* 1 = SPIN DOWN UNITS BEING CHANGED. 00557 M01S00505.1rm +++|* 2 = VERIFY LABELS ON NEW CONFIGURATION. 00558 M01S00506.1rm +++|* 00559 M01S00507.1rm +++|* EXIT (A) .NE. 0 IF OPERATION ABORTED. 00560 M01S00508.1rm +++|* 00561 M01S00509.1rm +++|* USES CM - CM+4, CN - CN+4. 00562 M01S00510.1rm +++|*
| Line S00511 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 1rm1 |
Seq # *Modification Id* Act ----------------------------+ 00563 M02S00511.1rm1 ---|* CALLS CLR, SCH, SDU, SPD, SUU, ULD. 00564 M01S00004.1rm1 +++|* CALLS CLR, GCI, SCH, SDU, SPD, SUU, ULD. 00565 M01S00512.1rm +++|* 00566 M01S00513.1rm +++|* MACROS LDBUF. 00567 M01S00514.1rm +++| 00568 M01S00515.1rm +++| 00569 M01S00516.1rm +++| RDD SUBR ENTRY/EXIT 00570 M01S00517.1rm +++| LDD RU 00571 M01S00518.1rm +++| ZJN RDD1 IF NO CHANGE OF UNITS 00572 M01S00519.1rm +++| RJM SPD SUSPEND DEVICE USAGE 00573 M01S00520.1rm +++| NJN RDDX IF REDEFINITION ABORTED 00574 M01S00521.1rm +++| LDD GL 00575 M01S00522.1rm +++| NJN RDD1 IF DEVICE UNAVAILABLE 00576 M01S00523.1rm +++| RJM SDU SPIN DOWN CHANGED UNITS
| Line S00524 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00577 M02S00524.242l642 ---| NJN RDDX IF *ABORT* 00578 M01S00019.242l642 +++| NJN RDDX IF *ABORT* OR ERROR FLAG SET 00579 M01S00525.1rm +++| RJM SUU SPIN UP UNITS
| Line S00526 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00580 M02S00526.242l642 ---| NJN RDDX IF *ABORT* 00581 M01S00020.242l642 +++| NJN RDDX IF *ABORT* OR ERROR FLAG SET 00582 M01S00527.1rm +++| 00583 M01S00528.1rm +++|* SET NEW CONFIGURATION IN MST. 00584 M01S00529.1rm +++| 00585 M01S00530.1rm +++| RDD1 LDBUF ESTD SET NEW CHANNELS 00586 M01S00531.1rm +++| CRD CN
| Line S00532 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00587 M02S00532.252l678 ---| LDD EQ
| Line S00533 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00588 M02S00533.252l678 ---| SHN 14
| Line S00534 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00589 M02S00534.252l678 ---| LMD CN+1
| Line S00535 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00590 M02S00535.252l678 ---| RJM SCH SET CHANNELS
| Line S00536 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 1rm1 |
M03 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00591 M03S00536.252l678 ---| LDD MS READ CURRENT CONFIGURATION
| Line S00537 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 1rm1 |
M03 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00592 M03S00537.252l678 ---| SHN 3
| Line S00538 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 1rm1 |
M03 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00593 M03S00538.252l678 ---| ADN DDLL
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00594 M02S00005.252l678 ---| LDD CN+1 SET NEW CHANNELS IN MST 00595 M01S00001.252l678 +++| LDD CN+1 SET NEW CHANNELS IN EST 00596 M01S00006.1rm1 +++| RJM GCI 00597 M01S00007.1rm1 +++| ZJN RDD2 IF FULL-TRACK CHANNEL
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00598 M02S00008.252l678 ---| LDN 0
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00599 M02S00009.252l678 ---| UJN RDD3 DO NOT SET FULL-TRACK FLAG
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00600 M02S00010.252l678 ---|
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00601 M02S00011.252l678 ---| RDD2 LDN 40 SET FULL-TRACK FLAG
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00602 M02S00012.252l678 ---| RDD3 LMD T2
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00603 M02S00013.252l678 ---| STD CN SAVE FIRST CHANNEL
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00604 M02S00014.252l678 ---| LDD CN+1 PROCESS SECOND CHANNEL
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00605 M02S00015.252l678 ---| SHN -6
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00606 M02S00016.252l678 ---| STD T2 00607 M01S00002.252l678 +++| LDD CN+1 SET HALF-TRACK FLAG 00608 M01S00003.252l678 +++| LPC 7377 00609 M01S00004.252l678 +++| LMC 400 00610 M01S00005.252l678 +++| STD CN+1 00611 M01S00006.252l678 +++| RDD2 LDD CN+2 PROCESS SECOND CHANNEL 00612 M01S00017.1rm1 +++| ZJN RDD5 IF NO SECOND CHANNEL 00613 M01S00018.1rm1 +++| RJM GCI
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00614 M02S00019.252l678 ---| ZJN RDD4 IF FULL-TRACK CHANNEL
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00615 M02S00020.252l678 ---| LDN 0
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00616 M02S00021.252l678 ---| UJN RDD5 DO NOT SET FULL-TRACK CHANNEL
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00617 M02S00022.252l678 ---|
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00618 M02S00023.252l678 ---| RDD4 LDN 40 SET FULL-TRACK FLAG
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00619 M02S00024.252l678 ---| RDD5 LMD T2
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00620 M02S00025.252l678 ---| SHN 6
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00621 M02S00026.252l678 ---| RAD CN MERGE WITH FIRST CHANNEL
| Line S00027 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00622 M02S00027.252l678 ---| LDD MS
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00623 M02S00028.252l678 ---| SHN 3
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00624 M02S00029.252l678 ---| ADN DILL
| Line S00030 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00625 M02S00030.252l678 ---| CRD CM
| Line S00031 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00626 M02S00031.252l678 ---| LDD CN SET NEW CHANNELS IN MST
| Line S00032 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00627 M02S00032.252l678 ---| STD CM+1
| Line S00033 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00628 M02S00033.252l678 ---| LDD MS REWRITE *DILL*
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00629 M02S00034.252l678 ---| SHN 3
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00630 M02S00035.252l678 ---| ADN DILL
| Line S00036 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00631 M02S00036.252l678 ---| CWD CM
| Line S00037 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00632 M02S00037.252l678 ---| ADN DDLL-DILL
| Line S00539 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00633 M02S00539.252l678 ---| CRD CM 00634 M01S00007.252l678 +++| ZJN RDD5 IF FULL-TRACK CHANNEL 00635 M01S00008.252l678 +++| LDD CN+2 SET HALF-TRACK FLAG 00636 M01S00009.252l678 +++| LPC 7377 00637 M01S00010.252l678 +++| LMC 400 00638 M01S00011.252l678 +++| STD CN+2 00639 M01S00012.252l678 +++| RDD5 LDD EQ SET CHANNELS IN EST 00640 M01S00013.252l678 +++| RJM SCH 00641 M01S00540.1rm +++| LDBUF MSTD+DDLL SET NEW UNIT LIST 00642 M01S00541.1rm +++| CRD CN 00643 M01S00542.1rm +++| LDD CN 00644 M01S00543.1rm +++| LPC 3777 00645 M01S00544.1rm +++| STD CN
| Line S00545 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00646 M02S00545.242l642 ---| LDD CM PROPAGATE SUSPEND STATUS
| Line S00546 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00647 M02S00546.242l642 ---| LPC 4000
| Line S00547 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00648 M02S00547.242l642 ---| RAD CN 00649 M01S00548.1rm +++| LDD MS 00650 M01S00549.1rm +++| SHN 3 00651 M01S00550.1rm +++| ADN DDLL 00652 M01S00551.1rm +++| CWD CN 00653 M01S00552.1rm +++| RJM ULD UPDATE LINKED DEVICES MST-S 00654 M01S00553.1rm +++| RJM CLR CLEAR SUSPEND AND IDLE AFTER VALIDATION 00655 M01S00554.1rm +++| LJM RDDX RETURN 00656 M01S00555.1rm +++| SPD TITLE SUSPEND PROCESSING ON DEVICE. 00657 M01S00556.1rm +++|** SPD - SUSPEND PROCESSING ON DEVICE. (FUNCTION RSPF). 00658 M01S00557.1rm +++|* 00659 M01S00558.1rm +++|* THIS FUNCTION SUSPENDS PROCESSING ON A DEVICE SO THAT 00660 M01S00559.1rm +++|* REPAIR OPERATIONS CAN BE EFFECTED. ALSO A DEVICE MAY 00661 M01S00560.1rm +++|* BE SUSPENDED SO THAT A UNIT IN ITS CONFIGURATION MAY 00662 M01S00561.1rm +++|* BE ADDED TO ANOTHER EQUIPMENT. 00663 M01S00562.1rm +++|*
| Line S00563 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00664 M02S00563.242l642 ---|* EXIT (A) .NE. 0 IF OPERATION ABORTED. 00665 M01S00021.242l642 +++|* EXIT (A) .NE. 0 IF THE OPERATION WAS ABORTED OR AN ERROR 00666 M01S00022.242l642 +++|* FLAG IS SET AT THE CONTROL POINT. 00667 M01S00564.1rm +++|* (SC) UPDATED TO INDICATE NEW SUSPEND COUNT. 00668 M01S00565.1rm +++|* 00669 M01S00566.1rm +++|* USES CM - CM+4. 00670 M01S00567.1rm +++|* 00671 M01S00568.1rm +++|* CALLS CDI, SDI, SSP, WAM. 00672 M01S00569.1rm +++|*
| Line S00570 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00673 M02S00570.ns22000 ---|* MACROS MONITOR. 00674 M01S00022.ns22000 +++|* MACROS MONITOR, SFA. 00675 M01S00571.1rm +++| 00676 M01S00572.1rm +++| 00677 M01S00573.1rm +++| SPD SUBR ENTRY/EXIT 00678 M01S00574.1rm +++| 00679 M01S00575.1rm +++|* THE *DATI* INTERLOCK IS HELD WHILE SETTING THE SUSPEND 00680 M01S00576.1rm +++|* STATUS ON A DEVICE. SUSPEND STATUS REQUIRES THAT IDLE 00681 M01S00577.1rm +++|* BE SET ON THE DEVICE. THE *DATI* INTERLOCK CONTROLS THE 00682 M01S00578.1rm +++|* CLEARING OF SUSPEND. WHEN THE LAST MACHINE CLEARS IT-S 00683 M01S00579.1rm +++|* SUSPEND STATUS IT ALSO CLEARS DEVICE IDLE. THUS WHEN 00684 M01S00580.1rm +++|* CHECKING TO ENSURE IDLE IS SET SO THAT SUSPEND MAY THEN BE 00685 M01S00581.1rm +++|* SET, THE *DATI* INTERLOCK IS HELD TO ENSURE THAT ANOTHER 00686 M01S00582.1rm +++|* MACHINE IS NOT CLEARING IDLE AT THE SAME TIME. 00687 M01S00583.1rm +++| 00688 M01S00584.1rm +++| RJM SDI SET *DATI* INTERLOCK 00689 M01S00585.1rm +++| NJN SPDX IF SUSPEND ABORTED 00690 M01S00586.1rm +++| 00691 M01S00587.1rm +++|* CHECK THAT THE DEVICE IDLE STATUS HAS NOT BEEN CLEARED 00692 M01S00588.1rm +++|* BY ANOTHER MACHINE. 00693 M01S00589.1rm +++| 00694 M01S00590.1rm +++| LDD EQ OBTAIN UP-TO-DATE MST IN CM 00695 M01S00591.1rm +++| STD CM+1 00696 M01S00592.1rm +++| LDN UTRS 00697 M01S00593.1rm +++| STD CM+3 00698 M01S00594.1rm +++| MONITOR STBM
| Line S00595 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00699 M02S00595.ns22000 ---| LDD EQ READ *ACGL* OF MST
| Line S00596 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00700 M02S00596.ns22000 ---| ADM ESTS 00701 M01S00023.ns22000 +++| SFA EST,EQ READ *ACGL* WORD OF MST 00702 M01S00024.ns22000 +++| ADK EQDE 00703 M01S00597.1rm +++| CRD CM 00704 M01S00598.1rm +++| LDD CM+4 00705 M01S00599.1rm +++| SHN 3 00706 M01S00600.1rm +++| ADN ACGL 00707 M01S00601.1rm +++| CRD CM 00708 M01S00602.1rm +++| LDD CM+4 CHECK REDEFINITION REQUESTED BIT 00709 M01S00603.1rm +++| SHN 21-GRDR 00710 M01S00604.1rm +++| PJN SPD1 IF IDLE NOT SET 00711 M01S00605.1rm +++| RJM SSP SET SUSPEND STATUS 00712 M01S00606.1rm +++| SPD1 RJM CDI CLEAR *DATI* INTERLOCK 00713 M01S00607.1rm +++| 00714 M01S00608.1rm +++|* IN ORDER TO ENSURE ALL MACHINES ARE SYNCHRONIZED IN 00715 M01S00609.1rm +++|* THEIR PROCESSING OF A DEVICE THE FOLLOWING CODE WAITS 00716 M01S00610.1rm +++|* FOR ANY OTHER MACHINES SHARING THE DEVICE TO SUSPEND 00717 M01S00611.1rm +++|* ACTIVITY. 00718 M01S00612.1rm +++|
| Line S00613 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00719 M02S00613.242l642 ---| LDC PJNI+WAM4-WAMB USE CORRECT CONDITIONAL JUMP 00720 M01S00023.242l642 +++| LDC NJNI+WAM4-WAMB USE CORRECT CONDITIONAL JUMP 00721 M01S00614.1rm +++| RJM WAM WAIT FOR ALL MACHINES 00722 M01S00615.1rm +++| NJN SPD2 IF *ABORT*
| Line S00616 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00723 M02S00616.ns22000 ---| LDD EQ
| Line S00617 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00724 M02S00617.ns22000 ---| ADM ESTS
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00725 M02S00025.242l642 ---| SFA EST,EQ CHECK FOR SYSTEM DEVICE
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00726 M02S00026.242l642 ---| ADK EQDE
| Line S00618 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00727 M02S00618.242l642 ---| CRD CM
| Line S00619 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00728 M02S00619.242l642 ---| LDD CM
| Line S00620 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00729 M02S00620.242l642 ---| LPC 2000
| Line S00621 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00730 M02S00621.242l642 ---| ZJN SPD2 IF NOT SYSTEM DEVICE
| Line S00622 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
M03 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00731 M03S00622.242l642 ---| LDD EQ SET EQUIPMENT NUMBER
| Line S00027 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00732 M02S00027.242l642 ---| LDD EQ SET EST ORDINAL
| Line S00623 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00733 M02S00623.242l642 ---| STD CM+1
| Line S00624 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00734 M02S00624.242l642 ---| LDN SSDS REMOVE SYSTEM DEVICE FROM LIST
| Line S00625 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00735 M02S00625.242l642 ---| STD CM+2
| Line S00626 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00736 M02S00626.242l642 ---| MONITOR SEQM
| Line S00627 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00737 M02S00627.242l642 ---| LDN 0 00738 M01S00024.242l642 +++|* LDN 0 INDICATE NO ABORT 00739 M01S00628.1rm +++| SPD2 LJM SPDX RETURN
| Line S00629 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00740 M02S00629.v23l617 ---| TITLE UMT - UPDATE SHARED DEVICE MST FROM ECS. 00741 M01S00004.v23l617 +++| TITLE UMT - UPDATE SHARED DEVICE MST FROM EXTENDED MEMORY. 00742 M01S00630.1rm +++|** UMT - UPDATE SHARED DEVICE MST FROM ECS. (FUNCTION RUMF). 00743 M01S00631.1rm +++|* 00744 M01S00632.1rm +++|* ENTRY NO CALL BLOCK PARAMETERS NEEDED. 00745 M01S00633.1rm +++|* 00746 M01S00634.1rm +++|* EXIT MST-S FOR ALL SHARED DEVICES UPDATED FROM ECS. 00747 M01S00635.1rm +++|* 00748 M01S00636.1rm +++|* USES CM - CM+4, CN - CN+4. 00749 M01S00637.1rm +++|*
| Line S00638 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00750 M02S00638.ns22000 ---|* MACROS MONITOR. 00751 M01S00028.ns22000 +++|* MACROS MONITOR, SFA. 00752 M01S00639.1rm +++| 00753 M01S00640.1rm +++| 00754 M01S00641.1rm +++| UMT SUBR ENTRY/EXIT 00755 M01S00642.1rm +++| LDD MF 00756 M01S00643.1rm +++| ZJN UMTX IF NOT MULTI-MAINFRAME 00757 M01S00644.1rm +++| LDN ESTP INITIALIZE EST SEARCH 00758 M01S00645.1rm +++| CRD CN
| Line S00646 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00759 M02S00646.ns22000 ---| UMT1 AOD CN READ EST 00760 M01S00029.ns22000 +++| LDN NOPE-1 INITIALIZE EST ORDINAL FOR SEARCH 00761 M01S00030.ns22000 +++| STD CN 00762 M01S00031.ns22000 +++| UMT1 AOD CN ADVANCE EST ORDINAL 00763 M01S00032.ns22000 +++| LMD CN+3 00764 M01S00033.ns22000 +++| ZJN UMTX IF END OF EQUIPMENTS 00765 M01S00034.ns22000 +++| SFA EST,CN READ EST ENTRY 00766 M01S00035.ns22000 +++| ADK EQDE 00767 M01S00647.1rm +++| CRD CM
| Line S00648 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00768 M02S00648.ns22000 ---| LMD CN+2
| Line S00649 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00769 M02S00649.ns22000 ---| ZJN UMTX IF END OF EQUIPMENTS 00770 M01S00650.1rm +++| LDD CM 00771 M01S00651.1rm +++| SHN 21-13 00772 M01S00652.1rm +++| PJN UMT1 IF NOT MASS STORAGE 00773 M01S00653.1rm +++| SHN 21-11-21+13 00774 M01S00654.1rm +++| PJN UMT1 IF NOT SHARED DEVICE
| Line S00655 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00775 M02S00655.v23l617 ---| LDD CN UPDATE MST FROM ECS 00776 M01S00005.v23l617 +++| LDD CN UPDATE MST FROM EXTENDED MEMORY
| Line S00656 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00777 M02S00656.ns22000 ---| SBM ESTS 00778 M01S00657.1rm +++| STD CM+1 00779 M01S00658.1rm +++| LDN UTRS 00780 M01S00659.1rm +++| STD CM+3 00781 M01S00660.1rm +++| MONITOR STBM 00782 M01S00661.1rm +++| UJN UMT1 NEXT EQUIPMENT 00783 M01S00662.1rm +++| CAS TITLE SUBROUTINES. 00784 M01S00663.1rm +++| CAS SPACE 4,10 00785 M01S00664.1rm +++|** CAS - CHECK ALL SUSPENDS CLEARED. 00786 M01S00665.1rm +++|*
| Line S00666 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00787 M02S00666.ns22000 ---|* ENTRY (EQ) = EQUIPMENT NUMBER. 00788 M01S00036.ns22000 +++|* ENTRY (EQ) = EST ORDINAL. 00789 M01S00667.1rm +++|* (DI) = DAT INDEX. 00790 M01S00668.1rm +++|* 00791 M01S00669.1rm +++|* EXIT (A) = 0 IF SUSPEND CLEARED FOR ALL OTHER MACHINES. 00792 M01S00670.1rm +++|* 00793 M01S00671.1rm +++|* USES T1 - T3. 00794 M01S00672.1rm +++|* 00795 M01S00673.1rm +++|* CALLS RDE. 00796 M01S00037.ns22000 +++|* 00797 M01S00038.ns22000 +++|* MACROS SFA. 00798 M01S00674.1rm +++| 00799 M01S00675.1rm +++| 00800 M01S00676.1rm +++| CAS SUBR ENTRY/EXIT 00801 M01S00677.1rm +++| LDD MF 00802 M01S00678.1rm +++| ZJN CASX IF NOT MMF
| Line S00679 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00803 M02S00679.ns22000 ---| LDD EQ TEST FOR SHARED DEVICE
| Line S00680 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00804 M02S00680.ns22000 ---| ADM ESTS 00805 M01S00039.ns22000 +++| SFA EST,EQ TEST FOR SHARED DEVICE 00806 M01S00040.ns22000 +++| ADK EQDE 00807 M01S00681.1rm +++| CRD CM 00808 M01S00682.1rm +++| LDD CM 00809 M01S00683.1rm +++| LPC 1000 00810 M01S00684.1rm +++| ZJN CASX IF DEVICE NOT SHARED 00811 M01S00685.1rm +++| RJM RDE READ DAT ENTRY FOR DEVICE 00812 M01S00686.1rm +++| NJN CASX IF *ABORT*
| Line S00687 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00813 M02S00687.242l642 ---| LDC BFMS+2+DDLL*5 00814 M01S00025.242l642 +++| LDC BFMS+2+DALL*5 00815 M01S00688.1rm +++| STD T1 00816 M01S00689.1rm +++| LDN 1 PRESET SEARCH MASK 00817 M01S00690.1rm +++| STD T2 00818 M01S00691.1rm +++| LDN MXMF 00819 M01S00692.1rm +++| STD T3 00820 M01S00693.1rm +++| CAS1 LDM TDAT+5+4 00821 M01S00694.1rm +++| LMD T2 00822 M01S00695.1rm +++| SBM TDAT+5+4 00823 M01S00696.1rm +++| PJN CAS2 IF NOT SHARING WITH THIS MACHINE 00824 M01S00697.1rm +++| LDI T1
| Line S00698 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00825 M02S00698.242l642 ---| SHN 21-13
| Line S00699 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00826 M02S00699.242l642 ---| MJN CASX IF SUSPEND STATUS SET 00827 M01S00026.242l642 +++| SHN 0-10 00828 M01S00027.242l642 +++| LMN 3 00829 M01S00028.242l642 +++| ZJN CAS4 IF DEVICE IS DOWN 00830 M01S00700.1rm +++| CAS2 LDD T2 ADVANCE MACHINE MASK AND INDEX 00831 M01S00701.1rm +++| RAD T2 00832 M01S00702.1rm +++| LDN LLLL*5 00833 M01S00703.1rm +++| RAD T1 00834 M01S00704.1rm +++| SOD T3 00835 M01S00705.1rm +++| NJN CAS1 IF MORE MACHINES
| Line S00706 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00836 M02S00706.242l642 ---| LJM CASX RETURN 00837 M01S00029.242l642 +++| CAS3 LJM CASX RETURN 00838 M01S00030.242l642 +++| 00839 M01S00031.242l642 +++| CAS4 LDN 1 SET REPLY STATUS 00840 M01S00032.242l642 +++| UJN CAS3 RETURN 00841 M01S00707.1rm +++| CDP SPACE 4,10 00842 M01S00708.1rm +++|** CDP - COMPLETE DEVICE PROCESSING. 00843 M01S00709.1rm +++|*
| Line S00710 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00844 M02S00710.ns22000 ---|* ENTRY (EQ) = EQUIPMENT. 00845 M01S00041.ns22000 +++|* ENTRY (EQ) = EST ORDINAL. 00846 M01S00711.1rm +++|* 00847 M01S00712.1rm +++|* CALLS C2D. 00848 M01S00713.1rm +++|* 00849 M01S00714.1rm +++|* MACROS MESG. 00850 M01S00715.1rm +++| 00851 M01S00716.1rm +++| 00852 M01S00717.1rm +++| CDP SUBR ENTRY/EXIT
| Line S00718 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00853 M02S00718.ns22000 ---| LDD EQ
| Line S00719 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00854 M02S00719.ns22000 ---| RJM C2D
| Line S00720 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00855 M02S00720.ns22000 ---| STM CDPA+1 00856 M01S00042.ns22000 +++| LDD EQ CONVERT UPPER TWO DIGITS OF EST ORDINAL 00857 M01S00043.ns22000 +++| SHN -3 00858 M01S00044.ns22000 +++| RJM C2D 00859 M01S00045.ns22000 +++| STM CDPA+1 00860 M01S00046.ns22000 +++| LDD EQ CONVERT LOWER DIGIT OF EST ORDINAL 00861 M01S00047.ns22000 +++| LPN 7 00862 M01S00048.ns22000 +++| SHN 6 00863 M01S00049.ns22000 +++| ADC 2R0, 00864 M01S00050.ns22000 +++| STM CDPA+2 00865 M01S00721.1rm +++| MESG CDPA 00866 M01S00722.1rm +++| UJN CDPX RETURN 00867 M01S00723.1rm +++|
| Line S00724 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00868 M02S00724.ns22000 ---| CDPA DATA C*EQXX PROCESSING COMPLETE.* 00869 M01S00051.ns22000 +++| CDPA DATA C*EQXXX, REDEFINITION COMPLETE.* 00870 M01S00725.1rm +++| CLC SPACE 4,10 00871 M01S00726.1rm +++|** CLC - CHECK FOR LEGAL COMMAND. 00872 M01S00727.1rm +++|* 00873 M01S00728.1rm +++|* ENTRY (A) = COMMAND MASK TO CHECK. 00874 M01S00729.1rm +++|* 00875 M01S00730.1rm +++|* EXIT (A) .NE. 0 IF COMMAND ENTERED. 00876 M01S00731.1rm +++|* LEGAL COMMANDS CLEARED WHEN (A) .NE. 0. 00877 M01S00732.1rm +++|* 00878 M01S00733.1rm +++|* USES CM - CM+4. 00879 M01S00734.1rm +++|* 00880 M01S00735.1rm +++|* MACROS COMMAND, LDBUF, PAUSE. 00881 M01S00736.1rm +++| 00882 M01S00737.1rm +++|
| Line S00738 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 1rm6 |
Seq # *Modification Id* Act ----------------------------+ 00883 M02S00738.1rm6 ---| .1 OCTMIC .ABORT-1 SET BIT NUMBER MICRO FOR *ABORT* 00884 M01S00003.1rm6 +++| .1 DECMIC .ABORT-1 SET BIT NUMBER MICRO FOR *ABORT* 00885 M01S00739.1rm +++| CLC1 LDN 1BS".1" ERROR FLAG TREATED AS *ABORT* COMMAND 00886 M01S00740.1rm +++| CLC2 BSS 0 00887 M01S00741.1rm +++| CLCA LPC * 00888 M01S00742.1rm +++| ZJN CLCX IF NO LEGAL COMMAND FOUND 00889 M01S00743.1rm +++| COMMAND CLEAR LEGAL COMMANDS 00890 M01S00744.1rm +++| LDN 1 RETURN STATUS 00891 M01S00745.1rm +++| 00892 M01S00746.1rm +++| CLC SUBR ENTRY/EXIT 00893 M01S00747.1rm +++| STM CLCA+1 SET LEGAL COMMAND MASK 00894 M01S00748.1rm +++| SHN -14 00895 M01S00749.1rm +++| LMC LPCI 00896 M01S00750.1rm +++| STM CLCA 00897 M01S00751.1rm +++| PAUSE CHECK ERROR FLAG 00898 M01S00752.1rm +++| LDD CM+1 00899 M01S00753.1rm +++| SBN ODET 00900 M01S00754.1rm +++| PJN CLC1 IF ERROR FLAG SET 00901 M01S00755.1rm +++| LDBUF TCOM READ LEGAL COMMANDS 00902 M01S00756.1rm +++| CRD CM 00903 M01S00757.1rm +++| LDD CM+3 00904 M01S00758.1rm +++| SHN 14 00905 M01S00759.1rm +++| LMD CM+4 00906 M01S00760.1rm +++| LJM CLC2 RETURN 00907 M01S00761.1rm +++| CNR SPACE 4,10 00908 M01S00762.1rm +++|** CNR - CHECK NOT READY STATUS ON DEVICE. 00909 M01S00763.1rm +++|* 00910 M01S00764.1rm +++|* ENTRY (T6) = TRACK TO READ.
| Line S00765 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00911 M02S00765.ns22000 ---|* (T5) = EQUIPMENT NUMBER. 00912 M01S00052.ns22000 +++|* (T5) = EST ORDINAL. 00913 M01S00766.1rm +++|* 00914 M01S00767.1rm +++|* EXIT (A) = 0 IF UNIT HAS NOT READY STATUS. 00915 M01S00768.1rm +++|* .GT. 0 IF UNIT HAS READY STATUS. 00916 M01S00769.1rm +++|* .LT. 0 IF MASS STORAGE READ ERROR. 00917 M01S00770.1rm +++|* 00918 M01S00771.1rm +++|* CALLS RDS. 00919 M01S00772.1rm +++|* 00920 M01S00773.1rm +++|* MACROS ENDMS, SETMS. 00921 M01S00774.1rm +++| 00922 M01S00775.1rm +++| 00923 M01S00776.1rm +++| CNR1 ENDMS 00924 M01S00777.1rm +++| LDN 1 SET READY STATUS 00925 M01S00778.1rm +++| 00926 M01S00779.1rm +++| CNR SUBR ENTRY/EXIT
| Line S00780 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00927 M02S00780.242l642 ---| SETMS READ,NR 00928 M01S00033.242l642 +++| SETMS IO,(AD,DF,NR) 00929 M01S00781.1rm +++| LDC BFMS READ SECTOR 00930 M01S00782.1rm +++| RJM RDS 00931 M01S00783.1rm +++| PJN CNR1 IF NO MASS STORAGE ERROR
| Line S00784 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00932 M02S00784.242l642 ---| LDM RDCT CHECK NOT READY STATUS
| Line S00785 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00933 M02S00785.242l642 ---| LPN 77
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Updated by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00934 M02S00034.253l688 ---| LPN 17 CHECK NOT READY STATUS 00935 M01S00001.253l688 +++| LPN 77 CHECK NOT READY STATUS 00936 M01S00786.1rm +++| LMN NRDE 00937 M01S00787.1rm +++| ZJN CNRX IF NOT READY 00938 M01S00788.1rm +++| LCN 1 SET READ ERROR 00939 M01S00789.1rm +++| UJN CNRX RETURN 00940 M01S00790.1rm +++| CSP SPACE 4,10
| Line S00791 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00941 M02S00791.242l642 ---|** CSP - CLEAR REDEFINITION IN PROGRESS BIT. 00942 M01S00035.242l642 +++|** CSP - CLEAR SUSPEND STATUS. 00943 M01S00792.1rm +++|* 00944 M01S00793.1rm +++|* ENTRY (MS) = MST ADDRESS/10B. 00945 M01S00794.1rm +++|* (SC) = SUSPEND COUNT. 00946 M01S00795.1rm +++|*
| Line S00796 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00947 M02S00796.242l642 ---|* USES SC, T5, CM - CM+4. 00948 M01S00036.242l642 +++|* USES SC, T5, CM - CM+7. 00949 M01S00797.1rm +++|*
| Line S00798 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00950 M02S00798.242l642 ---|* MACROS CMSTF. 00951 M01S00037.242l642 +++|* MACROS CMSTF, MONITOR. 00952 M01S00799.1rm +++| 00953 M01S00800.1rm +++| 00954 M01S00801.1rm +++| CSP SUBR ENTRY/EXIT
| Line S00802 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00955 M02S00802.242l642 ---| LDD MS READ UNIT LIST WORD
| Line S00803 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00956 M02S00803.242l642 ---| SHN 3
| Line S00804 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00957 M02S00804.242l642 ---| ADN DDLL
| Line S00805 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00958 M02S00805.242l642 ---| CRD CM
| Line S00806 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00959 M02S00806.242l642 ---| LDD CM
| Line S00807 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00960 M02S00807.242l642 ---| SHN 21-13
| Line S00808 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00961 M02S00808.242l642 ---| PJN CSPX IF SUSPEND NOT SET
| Line S00809 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00962 M02S00809.242l642 ---| LDC -4000 CLEAR BIT
| Line S00810 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00963 M02S00810.242l642 ---| RAD CM
| Line S00811 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00964 M02S00811.242l642 ---| LDD MS REWRITE UNIT LIST WORD
| Line S00812 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00965 M02S00812.242l642 ---| SHN 3
| Line S00813 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00966 M02S00813.242l642 ---| ADN DDLL
| Line S00814 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00967 M02S00814.242l642 ---| CWD CM 00968 M01S00038.242l642 +++| LDM SCFA 00969 M01S00039.242l642 +++| LPN 77 00970 M01S00040.242l642 +++| ZJN CSP1 IF EQUIPMENT NOT ASSIGNED 00971 M01S00003.1rm5 +++| SOM SCFA CLEAR ASSIGNMENT FLAG 00972 M01S00041.242l642 +++| LDD CP GET EJT ORDINAL 00973 M01S00042.242l642 +++| ADK TERW 00974 M01S00043.242l642 +++| CRD CM+3 00975 M01S00044.242l642 +++| LDD EQ 00976 M01S00045.242l642 +++| LMC 4000 INDICATE EJT ORDINAL PASSED 00977 M01S00046.242l642 +++| STD CM+1 00978 M01S00047.242l642 +++| MONITOR DEQM
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 1rm5 |
M02 (Updated by) | 1rm5a |
Seq # *Modification Id* Act ----------------------------+ 00979 M02S00004.1rm5a ---| LDD SC 00980 M01S00001.1rm5a +++| CSP1 LDD SC 00981 M01S00005.1rm5 +++| ZJN CSPX IF EQUIPMENTS NOT SUSPENDED
| Line S00048 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Updated by) | 1rm5a |
Seq # *Modification Id* Act ----------------------------+ 00982 M02S00048.1rm5a ---| CSP1 LDD EQ SET DEVICE STATE = ON 00983 M01S00002.1rm5a +++| LDD EQ SET DEVICE STATE = ON 00984 M01S00049.242l642 +++| STD T5 00985 M01S00050.242l642 +++| STD CM+1 00986 M01S00051.242l642 +++| LDN ** 00987 M01S00052.242l642 +++| CSPA EQU *-1 00988 M01S00053.242l642 +++| ZJN CSP2 IF DEVICE STATE UNCHANGED 00989 M01S00054.242l642 +++| LDK ONES 00990 M01S00055.242l642 +++| STD CM+2 00991 M01S00056.242l642 +++| MONITOR SEQM 00992 M01S00815.1rm +++| SOD SC UPDATE SUSPEND COUNT
| Line S00816 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00993 M02S00816.242l642 ---| LDD EQ
| Line S00817 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00994 M02S00817.242l642 ---| STD T5
| Line S00818 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00995 M02S00818.242l642 ---| CMSTF LFPR FORCE UPDATE OF LOCAL MST TO ECS
| Line S00819 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00996 M02S00819.242l642 ---| UJN CSPX RETURN 00997 M01S00057.242l642 +++| CSP2 CMSTF LFPR FORCE UPDATE OF LOCAL MST TO ECS 00998 M01S00058.242l642 +++| UJP CSPX RETURN 00999 M01S00820.1rm +++| C3D SPACE 4,10 01000 M01S00821.1rm +++|** C3D - CONVERT THREE DIGITS OF DECIMAL DISPLAY CODE. 01001 M01S00822.1rm +++|* 01002 M01S00823.1rm +++|* ENTRY (A) = NUMBER TO CONVERT. 01003 M01S00824.1rm +++|* 01004 M01S00825.1rm +++|* EXIT (A) = THREE DISPLAY CODE DIGITS. 01005 M01S00826.1rm +++|* (A) = 999 IN DISPLAY CODE IF .GT. THREE DIGITS. 01006 M01S00827.1rm +++|* 01007 M01S00828.1rm +++|* USES CM - CM+4. 01008 M01S00829.1rm +++| 01009 M01S00830.1rm +++| 01010 M01S00831.1rm +++| C3D3 LDC 3R999 01011 M01S00832.1rm +++| 01012 M01S00833.1rm +++| C3D SUBR ENTRY/EXIT 01013 M01S00834.1rm +++| STD CM+3 01014 M01S00835.1rm +++| ADC -999D 01015 M01S00836.1rm +++| PJN C3D3 IF .GE. 999 01016 M01S00837.1rm +++| LDN 2 PRESET DIVISION 01017 M01S00838.1rm +++| STD CM+4 01018 M01S00839.1rm +++| LDN 0 01019 M01S00840.1rm +++| STD CM 01020 M01S00841.1rm +++| STD CM+1 01021 M01S00842.1rm +++| STD CM+2 01022 M01S00843.1rm +++| C3D1 LDD CM+3 01023 M01S00844.1rm +++| SBM C3DA,CM+4 01024 M01S00845.1rm +++| MJN C3D2 IF NEXT DECIMAL PLACE 01025 M01S00846.1rm +++| STD CM+3 01026 M01S00847.1rm +++| AOM CM,CM+4 01027 M01S00848.1rm +++| UJN C3D1 CONTINUE DIVISION 01028 M01S00849.1rm +++| 01029 M01S00850.1rm +++| C3D2 SOD CM+4 01030 M01S00851.1rm +++| PJN C3D1 IF NOT COMPLETE 01031 M01S00852.1rm +++| LDD CM+2 ASSEMBLE DIGITS 01032 M01S00853.1rm +++| SHN 6 01033 M01S00854.1rm +++| ADD CM+1 01034 M01S00855.1rm +++| SHN 6 01035 M01S00856.1rm +++| ADD CM 01036 M01S00857.1rm +++| ADC 3R000 01037 M01S00858.1rm +++| UJN C3DX RETURN 01038 M01S00859.1rm +++| 01039 M01S00860.1rm +++| C3DA CON 1,10D,100D DIVISION TABLE 01040 M01S00861.1rm +++| DOS SPACE 4,20 01041 M01S00862.1rm +++|** DOS - DELAY APPROXIMATELY ONE SECOND. 01042 M01S00863.1rm +++|* 01043 M01S00864.1rm +++|* THE PURPOSE OF THIS ROUTINE IS TO AVOID CHECKING THE DEVICE 01044 M01S00865.1rm +++|* TOO OFTEN. THE TIME INTERVAL IS NOT REALLY IMPORTANT. 01045 M01S00866.1rm +++|* 01046 M01S00867.1rm +++|* USES T1, T2. 01047 M01S00868.1rm +++|* 01048 M01S00869.1rm +++|* MACROS DELAY, PAUSE. 01049 M01S00870.1rm +++| 01050 M01S00871.1rm +++| 01051 M01S00872.1rm +++| DOS SUBR ENTRY/EXIT 01052 M01S00873.1rm +++| LDN 40D SET DELAY INCREMENT PARAMETERS 01053 M01S00874.1rm +++| STD T2 01054 M01S00875.1rm +++| DOS1 LDC 100D 01055 M01S00876.1rm +++| STD T1 01056 M01S00877.1rm +++| DOS2 DELAY 01057 M01S00878.1rm +++| PAUSE NE 01058 M01S00879.1rm +++| SOD T1 01059 M01S00880.1rm +++| NJN DOS2 IF NOT END OF INNER INCREMENT 01060 M01S00881.1rm +++| SOD T2 01061 M01S00882.1rm +++| NJN DOS1 IF NOT END OF DELAY 01062 M01S00883.1rm +++| UJN DOSX RETURN 01063 M01S00038.1rm1 +++| GCI SPACE 4,10 01064 M01S00039.1rm1 +++|** GCI - GET CHANNEL CONTROLWARE TABLE INDEX. 01065 M01S00040.1rm1 +++|* 01066 M01S00041.1rm1 +++|* ENTRY (A) = CHANNEL(S). 01067 M01S00042.1rm1 +++|* 01068 M01S00043.1rm1 +++|* EXIT (A) = 0, IF FULL-TRACK CONTROLLER CHANNEL. 01069 M01S00044.1rm1 +++|* .NE. 0, OTHERWISE. 01070 M01S00045.1rm1 +++|* (T2) = CHANNEL BEING PROCESSED. 01071 M01S00046.1rm1 +++|* 01072 M01S00047.1rm1 +++|* USES T0, T1, T2, CM - CM+4. 01073 M01S00048.1rm1 +++| 01074 M01S00049.1rm1 +++| 01075 M01S00050.1rm1 +++| GCI SUBR ENTRY/EXIT 01076 M01S00051.1rm1 +++| LPN 37 SAVE CHANNEL NUMBER 01077 M01S00052.1rm1 +++| STD T1 01078 M01S00053.1rm1 +++| STD T2 01079 M01S00054.1rm1 +++| LCN 0 01080 M01S00055.1rm1 +++| STD T0 01081 M01S00056.1rm1 +++| GCI1 AOD T0 INCREMENT CM WORD OFFSET 01082 M01S00057.1rm1 +++| LCN 5 DIVIDE BY 5 01083 M01S00058.1rm1 +++| RAD T1 01084 M01S00059.1rm1 +++| PJN GCI1 IF INCORRECT CM WORD OFFSET 01085 M01S00060.1rm1 +++| LDC ** FWA OF CHANNEL CONTROLWARE TABLE 01086 M01S00061.1rm1 +++| GCIA EQU *-2 01087 M01S00062.1rm1 +++| ADD T0 ADD CORRECT CM WORD OFFSET 01088 M01S00063.1rm1 +++| CRD CM 01089 M01S00064.1rm1 +++| LDM CM+5,T1 01090 M01S00065.1rm1 +++| LPN 77
| Line S00066 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | ns2104b |
Seq # *Modification Id* Act ----------------------------+ 01091 M02S00066.ns2104b ---| LMN /DSL/FTBC
| Line S00067 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | ns2104b |
Seq # *Modification Id* Act ----------------------------+ 01092 M02S00067.ns2104b ---| ZJN GCIX IF FULL-TRACK CONTROLLER CHANNEL
| Line S00068 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Updated by) | ns2104b |
Seq # *Modification Id* Act ----------------------------+ 01093 M02S00068.ns2104b ---| LMN /DSL/FMBC&/DSL/FTBC 01094 M01S00001.ns2104b +++| LMN /DSL/FTCW 01095 M01S00002.ns2104b +++| ZJN GCIX IF FULL TRACK CONTROLWARE CHANNEL 01096 M01S00003.ns2104b +++| LMN /DSL/FMCW&/DSL/FTCW 01097 M01S00069.1rm1 +++| UJN GCIX RETURN 01098 M01S00884.1rm +++| KMS SPACE 4,10 01099 M01S00885.1rm +++|** KMS - SEND MESSAGE TO K-DISPLAY. 01100 M01S00886.1rm +++|* 01101 M01S00887.1rm +++|* ENTRY (A) = MESSAGE ADDRESS. 01102 M01S00888.1rm +++|* 01103 M01S00889.1rm +++|* USES T1 - T2. 01104 M01S00890.1rm +++|* 01105 M01S00891.1rm +++|* MACROS DELAY, PAUSE. 01106 M01S00892.1rm +++| 01107 M01S00893.1rm +++| 01108 M01S00894.1rm +++| KMS SUBR ENTRY/EXIT 01109 M01S00895.1rm +++| STD T1 01110 M01S00896.1rm +++| LDN 0 01111 M01S00897.1rm +++| STD T2 01112 M01S00898.1rm +++| KMS1 LDI T1 MOVE MESSAGE TO BUFFER 01113 M01S00899.1rm +++| ZJN KMS2 IF END OF MESSAGE 01114 M01S00900.1rm +++| STM KMSA,T2 01115 M01S00901.1rm +++| AOD T1 01116 M01S00902.1rm +++| AOD T2 01117 M01S00903.1rm +++| LMN 60D/2 01118 M01S00904.1rm +++| NJN KMS1 IF NOT END OF LINE 01119 M01S00905.1rm +++| KMS2 LDC 2R BLANK FILL MESSAGE 01120 M01S00906.1rm +++| STM KMSA,T2 01121 M01S00907.1rm +++| AOD T2 01122 M01S00908.1rm +++| SBN 60D/2 01123 M01S00909.1rm +++| MJN KMS2 IF NOT END OF LINE 01124 M01S00910.1rm +++| LDN 6 01125 M01S00911.1rm +++| STD T1 01126 M01S00912.1rm +++| LDD IR+3 WRITE MESSAGE TO K-DISPLAY 01127 M01S00913.1rm +++| SCN 77 01128 M01S00914.1rm +++| SHN 6 01129 M01S00915.1rm +++| ADD IR+2 01130 M01S00916.1rm +++| ADD RA 01131 M01S00917.1rm +++| SHN 6 01132 M01S00918.1rm +++| CWM KMSA,T1 01133 M01S00919.1rm +++| KMS3 DELAY PAUSE FOR MESSAGE TO BE SEEN 01134 M01S00920.1rm +++| PAUSE NE 01135 M01S00921.1rm +++| SOD T2 01136 M01S00922.1rm +++| PJN KMS3 IF MORE DELAY 01137 M01S00923.1rm +++| LJM KMSX RETURN 01138 M01S00924.1rm +++| 01139 M01S00925.1rm +++| KMSA BSS 60D/2+1 01140 M01S00926.1rm +++| LDB SPACE 4,10 01141 M01S00927.1rm +++|** LDB - LOAD CALL BLOCK BUFFER ADDRESS. 01142 M01S00928.1rm +++|* 01143 M01S00929.1rm +++|* EXIT (A) = ABSOLUTE ADDRESS OF CALL BLOCK. 01144 M01S00930.1rm +++| 01145 M01S00931.1rm +++| 01146 M01S00932.1rm +++| LDB SUBR ENTRY/EXIT 01147 M01S00933.1rm +++| LDD IR+3 GET CALL BLOCK ADDRESS FROM *IR* 01148 M01S00934.1rm +++| LPN 77 01149 M01S00935.1rm +++| SHN 6 01150 M01S00936.1rm +++| ADD RA 01151 M01S00937.1rm +++| SHN 6 01152 M01S00938.1rm +++| ADD IR+4 01153 M01S00939.1rm +++| UJN LDBX RETURN 01154 M01S00940.1rm +++| PSA SPACE 4,10 01155 M01S00941.1rm +++|** PSA - PROCESS SERVO ADJUSTMENT. 01156 M01S00942.1rm +++|* 01157 M01S00943.1rm +++|* ENTRY (T5) = 0. 01158 M01S00944.1rm +++|* (T6) = LABEL TRACK. 01159 M01S00945.1rm +++|* (T7) = CURRENT SECTOR. 01160 M01S00946.1rm +++|* 01161 M01S00947.1rm +++|* EXIT (A) .NE. 0 IF *ABORT*. 01162 M01S00948.1rm +++|* 01163 M01S00949.1rm +++|* USES CN - CN+1, T6 - T7. 01164 M01S00950.1rm +++|* 01165 M01S00951.1rm +++|* CALLS C3D, SPU, WFC. 01166 M01S00952.1rm +++|* 01167 M01S00953.1rm +++|* MACROS COMMAND, EXECUTE, MESG, SETMS. 01168 M01S00954.1rm +++| 01169 M01S00955.1rm +++| 01170 M01S00956.1rm +++| PSA9 LDN 0 RETURN STATUS 01171 M01S00957.1rm +++| 01172 M01S00958.1rm +++| PSA SUBR ENTRY/EXIT
| Line S00959 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01173 M02S00959.242l642 ---| SETMS 01174 M01S00059.242l642 +++| SETMS STATUS 01175 M01S00960.1rm +++| LDD CM+3 01176 M01S00961.1rm +++| LPC 3777 01177 M01S00962.1rm +++| LMC 2RDM 01178 M01S00963.1rm +++| ZJN PSA1 IF 885 01179 M01S00964.1rm +++| LMN 2RDQ&2RDM 01180 M01S00965.1rm +++| NJN PSA9 IF NOT 885 01181 M01S00966.1rm +++| PSA1 LDD T7 SAVE LOGICAL SECTOR NUMBER 01182 M01S00967.1rm +++| STD CN 01183 M01S00968.1rm +++| LDD RM SET UNIT IN MESSAGES 01184 M01S00969.1rm +++| RJM SPU 01185 M01S00970.1rm +++| STM PSAB+24 01186 M01S00971.1rm +++| STM PSAC+3 01187 M01S00972.1rm +++| STM PSAD+3 01188 M01S00973.1rm +++| PSA2 MESG PSAD * UNIT XX SERVO TIMING IN PROGRESS.*
| Line S00974 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01189 M02S00974.ns22000 ---| LDC 2000 SET *0PI* FUNCTION 01190 M01S00053.ns22000 +++| LDN 0 SET *0SI* FUNCTION 01191 M01S00975.1rm +++| STM OVLA
| Line S00976 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01192 M02S00976.ns22000 ---| EXECUTE 0PI,OVLA+1 01193 M01S00054.ns22000 +++| EXECUTE 0SI,OVLA+1 01194 M01S00977.1rm +++| STM PSAA SET PROCESSOR ADDRESS 01195 M01S00978.1rm +++| LDN 0 SET TRACK TO ZERO 01196 M01S00979.1rm +++| STD T6 01197 M01S00980.1rm +++| LDD CN RESTORE SECTOR NUMBER 01198 M01S00981.1rm +++| STD T7 01199 M01S00982.1rm +++| RJM * PERFORM SERVO CHECK 01200 M01S00983.1rm +++| PSAA EQU *-1 01201 M01S00984.1rm +++| MJN PSA4 IF SERVO CHECK UNSUCCESSFUL 01202 M01S00985.1rm +++| STD CN+1 SAVE TIME 01203 M01S00986.1rm +++| NJN PSA3 IF NOT OUT OF RANGE 01204 M01S00987.1rm +++| LDC 999D SET OUT OF RANGE 01205 M01S00988.1rm +++| PSA3 RJM C3D CONVERT THREE DIGITS TO DECIMAL DISPLAY 01206 M01S00989.1rm +++| STM PSAC+14 01207 M01S00990.1rm +++| SHN -14 01208 M01S00991.1rm +++| LMC 2L 01209 M01S00992.1rm +++| STM PSAC+13 01210 M01S00993.1rm +++| LDD CN+1 01211 M01S00994.1rm +++| ADC -325D 01212 M01S00995.1rm +++| MJN PSA5 IF OUT OF RANGE
| Line S00996 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 1rm4 |
Seq # *Modification Id* Act ----------------------------+ 01213 M02S00996.1rm4 ---| SBN 346D-335D 01214 M01S00001.1rm4 +++| SBN 346D-325D 01215 M01S00997.1rm +++| PJN PSA5 IF OUT OF RANGE 01216 M01S00998.1rm +++| COMMAND (ABORT,NEXT,RECHECK) ENABLE COMMANDS 01217 M01S00999.1rm +++| UJN PSA6 SET MESSAGE 01218 M01S01000.1rm +++| 01219 M01S01001.1rm +++| PSA4 COMMAND (ABORT,IGNORE,RECHECK) ENABLE COMMANDS 01220 M01S01002.1rm +++| MESG PSAB SET ERROR MESSAGE 01221 M01S01003.1rm +++| UJN PSA7 WAIT FOR COMMAND 01222 M01S01004.1rm +++| 01223 M01S01005.1rm +++| PSA5 COMMAND (ABORT,IGNORE,RECHECK) ENABLE COMMANDS 01224 M01S01006.1rm +++| PSA6 MESG PSAC SET TIMING DATA MESSAGE 01225 M01S01007.1rm +++| PSA7 LDD LT RESET TO LABEL TRACK 01226 M01S01008.1rm +++| STD T6 01227 M01S01009.1rm +++| RJM WFC WAIT FOR COMMAND 01228 M01S01010.1rm +++| PJN PSA8 IF NOT *RECHECK* 01229 M01S01011.1rm +++| LJM PSA2 RECHECK SERVO TIMING 01230 M01S01012.1rm +++| 01231 M01S01013.1rm +++| PSA8 LJM PSAX RETURN WITH STATUS 01232 M01S01014.1rm +++| 01233 M01S01015.1rm +++| PSAB DATA C* ERROR IN PERFORMING SERVO CHECK ON UNITXX.* 01234 M01S01016.1rm +++| PSAC DATA C* UNIT XX SERVO TIMING= XXX. ACCEPTABLE RANGE IS 325 01235 M01S01017.1rm +++|,TO 345.* 01236 M01S01018.1rm +++| PSAD DATA C* UNIT XX SERVO TIMING IN PROGRESS.* 01237 M01S01019.1rm +++| PUE SPACE 4,10 01238 M01S01020.1rm +++|** PUE - PROCESS UNIT ERROR. 01239 M01S01021.1rm +++|* 01240 M01S01022.1rm +++|* ENTRY (A) = ERROR MESSAGE ADDRESS. 01241 M01S01023.1rm +++|* (CH) = CHANNEL. 01242 M01S01024.1rm +++|* 01243 M01S01025.1rm +++|* EXIT (A) .LT. 0 IF *RECHECK* COMMAND ENTERED. 01244 M01S01026.1rm +++|* (A) = 0 IF *IGNORE* OR *NEXT* COMMAND ENTERED. 01245 M01S01027.1rm +++|* (A) .GT. 0 IF *ABORT* COMMAND ENTERED. 01246 M01S01028.1rm +++|* 01247 M01S01029.1rm +++|* USES T1. 01248 M01S01030.1rm +++|* 01249 M01S01031.1rm +++|* CALLS C2D, SPU, WFC. 01250 M01S01032.1rm +++|* 01251 M01S01033.1rm +++|* MACROS COMMAND, MESG. 01252 M01S01034.1rm +++| 01253 M01S01035.1rm +++| 01254 M01S01036.1rm +++| PUE SUBR ENTRY/EXIT 01255 M01S01037.1rm +++| STD T1 01256 M01S01038.1rm +++| LDD RM SET UNIT AND CHANNEL IN MESSAGE 01257 M01S01039.1rm +++| RJM SPU 01258 M01S01040.1rm +++| STM 3,T1 01259 M01S01041.1rm +++| LDD CH 01260 M01S01042.1rm +++| RJM C2D 01261 M01S01043.1rm +++| STM 6,T1 01262 M01S01044.1rm +++| COMMAND (ABORT,IGNORE,RECHECK) 01263 M01S01045.1rm +++| LDD T1 01264 M01S01046.1rm +++| MESG * 01265 M01S01047.1rm +++| RJM WFC WAIT FOR COMMAND 01266 M01S01048.1rm +++| LJM PUEX RETURN 01267 M01S01049.1rm +++| RDE SPACE 4,20
| Line S01050 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01268 M02S01050.v23l617 ---|** RDE - READ DAT ENTRY FROM ECS. 01269 M01S00006.v23l617 +++|** RDE - READ DAT ENTRY FROM EXTENDED MEMORY. 01270 M01S01051.1rm +++|* 01271 M01S01052.1rm +++|* ENTRY (MF) = LINK EQUIPMENT. 01272 M01S01053.1rm +++|* (DI) = DAT INDEX. 01273 M01S01054.1rm +++|* 01274 M01S01055.1rm +++|* EXIT (A) .NE. 0 IF *ABORT*. 01275 M01S01056.1rm +++|* (TDAT) = DAT ENTRY. 01276 M01S01057.1rm +++|* (BFMS) = DAT TRACK FOR THIS EQUIPMENT. 01277 M01S01058.1rm +++|* 01278 M01S01059.1rm +++|* USES T3, CM - CM+4, T5 - T7. 01279 M01S01060.1rm +++|* 01280 M01S01061.1rm +++|* CALLS RDS. 01281 M01S01062.1rm +++|* 01282 M01S01063.1rm +++|* MACROS COMMAND, ENDMS, IFCOM, MESG, SETMS. 01283 M01S01064.1rm +++| 01284 M01S01065.1rm +++| 01285 M01S01066.1rm +++| RDE SUBR ENTRY/EXIT 01286 M01S01067.1rm +++| LDD MF SET LINK EQUIPMENT 01287 M01S01068.1rm +++| STD T5
| Line S01069 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01288 M02S01069.242l642 ---| SETMS READ,NR 01289 M01S00060.242l642 +++| SETMS IO,(NR,DF) 01290 M01S01070.1rm +++| 01291 M01S01071.1rm +++|* SET POINTERS TO READ DAT. 01292 M01S01072.1rm +++| 01293 M01S01073.1rm +++| LDD CM+4 GET DAT POINTER 01294 M01S01074.1rm +++| SHN 3 01295 M01S01075.1rm +++| ADN ALGL 01296 M01S01076.1rm +++| CRD CM 01297 M01S01077.1rm +++| LDD CM+4 SET DAT TRACK 01298 M01S01078.1rm +++| STD T6 01299 M01S01079.1rm +++| LDD DI SET DAT SECTOR 01300 M01S01080.1rm +++| SHN 21-4 01301 M01S01081.1rm +++| STD T7 01302 M01S01082.1rm +++| SHN -14 SET DAT SECTOR INDEX 01303 M01S01083.1rm +++| STD T3 01304 M01S01084.1rm +++| SHN 2 SET INDEX * 5 01305 M01S01085.1rm +++| RAD T3 01306 M01S01086.1rm +++| 01307 M01S01087.1rm +++|* READ DAT. 01308 M01S01088.1rm +++| 01309 M01S01089.1rm +++| LDC BFMS READ SECTOR 01310 M01S01090.1rm +++| RJM RDS 01311 M01S01091.1rm +++| PJN RDE2 IF NO ERROR 01312 M01S01092.1rm +++| MESG RDEA ERROR ON LINK DEVICE 01313 M01S01093.1rm +++| COMMAND (ABORT,IGNORE) SET LEGAL COMMANDS 01314 M01S01094.1rm +++| RDE1 IFCOM IGNORE,RDE2 IF *IGNORE* 01315 M01S01095.1rm +++| IFCOM ABORT,RDEX IF *ABORT* 01316 M01S01096.1rm +++| UJN RDE1 RECHECK COMMAND ENTRY 01317 M01S01097.1rm +++| 01318 M01S01098.1rm +++| RDE2 LDN 0 INITIALIZE BUFFER INDEX 01319 M01S01099.1rm +++| STD CM 01320 M01S01100.1rm +++| RDE3 LDM BFMS+2,T3 01321 M01S01101.1rm +++| STM TDAT,CM 01322 M01S01102.1rm +++| AOD T3 ADVANCE POINTERS 01323 M01S01103.1rm +++| AOD CM 01324 M01S01104.1rm +++| LMN 5*2 01325 M01S01105.1rm +++| NJN RDE3 IF TWO WORDS NOT MOVED 01326 M01S01106.1rm +++| LDM TDAT+4 SET DAT TRACK FOR THIS EQUIPMENT 01327 M01S01107.1rm +++| STD T6 01328 M01S01108.1rm +++| LDN 0 01329 M01S01109.1rm +++| STD T7 01330 M01S01110.1rm +++| LDC BFMS READ DAT TRACK 01331 M01S01111.1rm +++| RJM RDS 01332 M01S01112.1rm +++| PJN RDE5 IF NO ERROR 01333 M01S01113.1rm +++| MESG RDEA ERROR ON LINK DEVICE 01334 M01S01114.1rm +++| COMMAND (ABORT,IGNORE) SET LEGAL COMMANDS 01335 M01S01115.1rm +++| RDE4 IFCOM IGNORE,RDE5 IF *IGNORE* 01336 M01S01116.1rm +++| IFCOM ABORT,RDEX IF *ABORT* 01337 M01S01117.1rm +++| UJN RDE4 RECHECK COMMAND ENTRY 01338 M01S01118.1rm +++| 01339 M01S01119.1rm +++| RDE5 ENDMS 01340 M01S01120.1rm +++| LJM RDEX RETURN 01341 M01S01121.1rm +++| 01342 M01S01122.1rm +++| RDEA DATA C*ERROR ON LINK DEVICE.* 01343 M01S01123.1rm +++| RRD SPACE 4,10 01344 M01S01124.1rm +++|** RRD - RESET *RD* DEVICE FIELDS. 01345 M01S01125.1rm +++|* 01346 M01S01126.1rm +++|* ENTRY (RM) = MST ADDRESS/10B OF *RD* DEVICE. 01347 M01S00061.242l642 +++|* (EQ) = ORIGINAL EST ORDINAL. 01348 M01S01127.1rm +++|*
| Line S01128 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01349 M02S01128.252l678 ---|* USES CM - CM+4. 01350 M01S00014.252l678 +++|* USES CM - CM+4, CN - CN+4. 01351 M01S01129.1rm +++|* 01352 M01S01130.1rm +++|* CALLS SCH. 01353 M01S01131.1rm +++|* 01354 M01S01132.1rm +++|* MACROS MONITOR. 01355 M01S01133.1rm +++| 01356 M01S01134.1rm +++| 01357 M01S01135.1rm +++| RRD SUBR ENTRY/EXIT
| Line S01136 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01358 M02S01136.242l642 ---|
| Line S01137 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01359 M02S01137.242l642 ---|* RESET EST FIELDS.
| Line S00062 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Updated by) | 1rm5 |
Seq # *Modification Id* Act ----------------------------+ 01360 M02S00062.1rm5 ---| LDM SCFA
| Line S00063 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Updated by) | 1rm5 |
Seq # *Modification Id* Act ----------------------------+ 01361 M02S00063.1rm5 ---| LPN 77 01362 M01S00006.1rm5 +++| LDM SCFB 01363 M01S00064.242l642 +++| ZJN RRDX IF *RD* DOES NOT NEED TO BE RESET 01364 M01S00065.242l642 +++| 01365 M01S00066.242l642 +++|* RESET EST/MST FIELDS. 01366 M01S01138.1rm +++| 01367 M01S01139.1rm +++| LDN ZERL CLEAR CHANNELS 01368 M01S01140.1rm +++| CRD CM 01369 M01S01141.1rm +++| LDD RM CLEAR MST WORDS 01370 M01S01142.1rm +++| SHN 3 01371 M01S01143.1rm +++| ADN MDGL 01372 M01S01144.1rm +++| CWD CM 01373 M01S01145.1rm +++| ADN DILL-MDGL 01374 M01S01146.1rm +++| CWD CM 01375 M01S01147.1rm +++| ADN DDLL-DILL 01376 M01S01148.1rm +++| CWD CM
| Line S01149 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01377 M02S01149.252l678 ---| LDN 37 CLEAR CHANNELS 01378 M01S00015.252l678 +++| LDN ZERL CLEAR CHANNELS 01379 M01S00016.252l678 +++| CRD CN 01380 M01S00017.252l678 +++| LDN 0 01381 M01S01150.1rm +++| RJM SCH 01382 M01S01151.1rm +++| LDC 2RRD RESET *RD* EQUIPMENT TYPE 01383 M01S01152.1rm +++| STD CM+3 01384 M01S01153.1rm +++| LDN SMNS SET MNEMONIC 01385 M01S01154.1rm +++| STD CM+2 01386 M01S01155.1rm +++| MONITOR SEQM 01387 M01S00007.1rm5 +++|* LDN 0 01388 M01S00008.1rm5 +++| STM SCFB CLEAR *RD* ALTERED FLAG 01389 M01S01156.1rm +++| LJM RRDX RETURN 01390 M01S01157.1rm +++| SCF SPACE 4,20 01391 M01S01158.1rm +++|** SCF - SET COMMON *RD* DEVICE FIELDS. 01392 M01S01159.1rm +++|* 01393 M01S01160.1rm +++|* ENTRY (CN - CN+4) = EST ENTRY. 01394 M01S01161.1rm +++|* (BFMS) = MST ENTRY. 01395 M01S00067.242l642 +++|* (EQ) = ORIGINAL EST ORDINAL. 01396 M01S01162.1rm +++|*
| Line S01163 Modification History | |
|---|---|
M01 (Added by) | 1rm |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01397 M02S01163.242l642 ---|* EXIT (T5) = 0. 01398 M01S00068.242l642 +++|* EXIT (A) .NE. 0 IF AN ERROR FLAG IS SET IN THE CPA. 01399 M01S00069.242l642 +++|* (T5) = 0.
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/1rm.txt · Last modified: by 127.0.0.1