cdc:nos2.source:opl.opl871:deck:1rm
Deck 1RM
Library Member Format: MODIFY
Listing Sections
- Deck 1RM Start
- Deck 1RM Part 1 (Line 1482)
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M00S00001.1rm +++| IDENT 1RM,RDM 00002 M00S00002.1rm +++| PERIPH 00003 M00S00003.1rm +++| BASE M 00004 M00S00004.1rm +++| SST 00005 M00S00005.1rm +++| TITLE 1RM - REDEFINE MASS STORAGE.
| Line S00006 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00006 M01S00006.ns22000 ---| COMMENT 78/04/10. 80/02/25. 1RM - REDEFINE MASS STORAGE.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00007 M01S00001.ns22000 +++|*COMMENT 1RM - REDEFINE MASS STORAGE.
| Line S00007 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00008 M01S00007.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1976.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00009 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00010 M00S00008.1rm +++| RDM SPACE 4,10 00011 M00S00009.1rm +++|***** 1RM - REDEFINE MASS STORAGE. 00012 M00S00010.1rm +++|* 00013 M00S00011.1rm +++|* A. J. BEEKMAN. 77/04/25. 00014 M00S00012.1rm +++|* W. E. GOEBEL. 80/02/25. 00015 M00S00013.1rm +++|* 00016 M00S00014.1rm +++|* *1RM* PROVIDES FUNCTIONS USED IN THE REDEFINITION OR REPAIR 00017 M00S00015.1rm +++|* OF 844 AND 885 TYPE MASS STORAGE DEVICES. 00018 M00S00016.1rm +++| SPACE 4,10 00019 M00S00017.1rm +++|*** *1RM* USES PARAMETERS PASSED TO IT FROM THE CPU ROUTINE 00020 M00S00018.1rm +++|* *CONFIG* (CONFIGURATION MONITOR) TO PERFORM OPERATIONS 00021 M00S00019.1rm +++|* WHICH CONTROL THE ON-LINE RECONFIGURATION OR REPAIR OF 00022 M00S00020.1rm +++|* 844 AND 885 TYPE MASS STORAGE DEVICES. 00023 M00S00021.1rm +++| SPACE 4,10 00024 M00S00022.1rm +++|*** *1RM* PROCESSES THE FUNCTIONS AS DEFINED IN *COMS1RM*. 00025 M00S00023.1rm +++|* ALL *1RM* FUNCTIONS REQUIRE THAT THE CALLING JOB HAS MASS
| Line S00024 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00026 M01S00024.242l642 ---|* STORAGE SUBSYSTEM QUEUE PRIORITY.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00027 M01S00001.242l642 +++|* STORAGE SUBSYSTEM ID. 00028 M00S00025.1rm +++|* 00029 M00S00026.1rm +++|* THE CALL TO *1RM* IS IN THE FOLLOWING FORM - 00030 M00S00027.1rm +++|*
| Line S00028 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00031 M01S00028.241l630 ---|*T IR 24/ *1RMP*,18/ 0,18/ ADDR
Figure IR
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00032 M01S00001.241l630 +++|*T IR 24/ *1RMP*,18/ KDMA,18/ ADDR
Figure IR
00033 M00S00029.1rm +++|* 00034 M00S00030.1rm +++|* ADDR = ADDRESS OF CALL BLOCK.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 00035 M01S00002.241l630 +++|* KDMA = K-DISPLAY MESSAGE LINE ADDRESS. 00036 M00S00031.1rm +++|* 00037 M00S00032.1rm +++|* THE CALL BLOCK FORMAT IS DOCUMENTED IN *COMS1RM*. 00038 M00S00033.1rm +++| SPACE 4,10 00039 M00S00034.1rm +++|*** K-DISPLAY COMMANDS. 00040 M00S00035.1rm +++|* 00041 M00S00036.1rm +++|* THE FOLLOWING COMMANDS ARE ENTERED IN RESPONSE TO AN 00042 M00S00037.1rm +++|* ERROR CONDITION DETECTED BY *1RM*. 00043 M00S00038.1rm +++|* 00044 M00S00039.1rm +++|* ABORT. THIS COMMAND IS ENTERED TO DISCONTINUE PROCESSING 00045 M00S00040.1rm +++|* OF THE CURRENT COMMAND IN PROGRESS. 00046 M00S00041.1rm +++|* 00047 M00S00042.1rm +++|* IGNORE. THE ERROR CONDITION DETECTED BY *1RM* IS TO 00048 M00S00043.1rm +++|* BE IGNORED. THIS COMMAND SHOULD BE USED WITH 00049 M00S00044.1rm +++|* DISCRETION. IT SHOULD BE USED ONLY WHEN THE 00050 M00S00045.1rm +++|* ERROR BEING POSTED IS WELL UNDERSTOOD AND 00051 M00S00046.1rm +++|* CAN LEGITIMATELY BE IGNORED. 00052 M00S00047.1rm +++|* 00053 M00S00048.1rm +++|* NEXT. THIS COMMAND IS ENTERED IN RESPONSE TO AN 00054 M00S00049.1rm +++|* 885 SERVO TIMING CHECK WHEN THE TIMING DATA 00055 M00S00050.1rm +++|* IS IN THE REQUIRED RANGE. ENTRY OF THIS 00056 M00S00051.1rm +++|* COMMAND WILL CAUSE PROCESSING TO CONTINUE 00057 M00S00052.1rm +++|* WITH EITHER THE NEXT UNIT OR THE NEXT STEP 00058 M00S00053.1rm +++|* OF PROCESSING. 00059 M00S00054.1rm +++|* 00060 M00S00055.1rm +++|* RECHECK. THIS COMMAND IS ENTERED TO RETRY A PROCESS 00061 M00S00056.1rm +++|* WHICH PREVIOUSLY GAVE AN ERROR. IF THE ERROR 00062 M00S00057.1rm +++|* PERSISTS THE MESSAGE WILL BE POSTED AGAIN 00063 M00S00058.1rm +++|* WITH ANOTHER OPPORTUNITY FOR OPERATOR ACTION. 00064 M00S00059.1rm +++| SPACE 4,10 00065 M00S00060.1rm +++|*** K-DISPLAY OPERATOR MESSAGES. 00066 M00S00061.1rm +++|* 00067 M00S00062.1rm +++|* 00068 M00S00063.1rm +++|* THE FOLLOWING COMMANDS ARE POSTED ON THE K-DISPLAY BY 00069 M00S00064.1rm +++|* *1RM*. WHEN *1RM* DETECTS A CONDITION WHICH MAY BE 00070 M00S00065.1rm +++|* RESPONDED TO BY THE OPERATOR, A MESSAGE IS POSTED AND 00071 M00S00066.1rm +++|* THE LEGAL COMMANDS ARE POSTED ON THE K-DISPLAY. THE 00072 M00S00067.1rm +++|* FOLLOWING LIST OF ERROR MESSAGES LISTS THOSE LEGAL 00073 M00S00068.1rm +++|* COMMANDS AND INDICATES IF AN OPERATOR RESPONSE IS 00074 M00S00069.1rm +++|* REQUIRED OR OPTIONAL. 00075 M00S00070.1rm +++|* 00076 M00S00071.1rm +++|* 00077 M00S00072.1rm +++|* UNIT XX, CHYY WRITE/READ VERIFY ERROR. 00078 M00S00073.1rm +++|* PART OF THE VALIDATION PROCEDURE WHEN RETURNING 00079 M00S00074.1rm +++|* AN EQUIPMENT FOR SYSTEM USE (CLEAR COMMAND) IS 00080 M00S00075.1rm +++|* TO WRITE A SECTOR OF DATA TO THE DEVICE, READ IT 00081 M00S00076.1rm +++|* BACK AND VERIFY THE DATA. WHEN THIS VERIFICATION 00082 M00S00077.1rm +++|* FAILS THE ABOVE MESSAGE APPEARS. 00083 M00S00078.1rm +++|* COMMANDS - REQUIRED. 00084 M00S00079.1rm +++|* ABORT, IGNORE, RECHECK. 00085 M00S00080.1rm +++|* 00086 M00S00081.1rm +++|*
| Line S00082 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00087 M01S00082.ns22000 ---|* *ERROR IN PERFORMING SERVO CHECK ON UNIT XX.*
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00088 M01S00002.ns22000 +++|* ERROR IN PERFORMING SERVO CHECK ON UNIT XX. 00089 M00S00083.1rm +++|* THE SERVO ADJUSTMENT PROCEDURE HAS ENCOUNTERED 00090 M00S00084.1rm +++|* A DISK ERROR CONDITION. 00091 M00S00085.1rm +++|* COMMANDS - REQUIRED. 00092 M00S00086.1rm +++|* ABORT, IGNORE, RECHECK. 00093 M00S00087.1rm +++|* 00094 M00S00088.1rm +++|* 00095 M00S00089.1rm +++|* UNIT XX SERVO TIMING= XXX. ACCEPTABLE RANGE IS 325 TO 345. 00096 M00S00090.1rm +++|* WHEN RECONFIGURING AN 885 HDA A SERVO ADJUSTMENT 00097 M00S00091.1rm +++|* PROCEDURE IS EXECUTED. THIS PROCEDURE MEASURES 00098 M00S00092.1rm +++|* SERVO TIMING CHARACTERISTICS WHICH MUST BE IN THE 00099 M00S00093.1rm +++|* SPECIFIED RANGE. A DRIVE ADJUSTMENT MUST BE MADE 00100 M00S00094.1rm +++|* BY A CE UNTIL THE TIMING IS IN THE SPECIFIED 00101 M00S00095.1rm +++|* RANGE. 00102 M00S00096.1rm +++|* COMMANDS - REQUIRED. 00103 M00S00097.1rm +++|* ABORT, RECHECK. 00104 M00S00098.1rm +++|* NEXT. ONLY IF TIMING IS IN RANGE. 00105 M00S00099.1rm +++|* IGNORE. ONLY IF TIMING IS NOT IN RANGE. 00106 M00S00100.1rm +++|* 00107 M00S00101.1rm +++|* 00108 M00S00102.1rm +++|* ERROR ON LINK DEVICE. 00109 M00S00103.1rm +++|* WHEN A DEVICE IS SHARED BETWEEN MAINFRAMES THE 00110 M00S00104.1rm +++|* LINK DEVICE IS READ TO SYNCHRONIZE PROCESSING 00111 M00S00105.1rm +++|* BETWEEN MACHINES. WHEN AN ERROR OCCURS IN 00112 M00S00106.1rm +++|* READING THE LINK DEVICE THIS ERROR MESSAGE 00113 M00S00107.1rm +++|* IS ISSUED. 00114 M00S00108.1rm +++|* COMMANDS - REQUIRED. 00115 M00S00109.1rm +++|* ABORT, IGNORE. 00116 M00S00110.1rm +++|* 00117 M00S00111.1rm +++|* 00118 M00S00112.1rm +++|* SPIN DOWN UNIT XX. 00119 M00S00113.1rm +++|* THIS IS A DIRECTIVE TO THE OPERATOR OR CE TO 00120 M00S00114.1rm +++|* SPIN DOWN THE SPECIFIED UNIT IN PREPARATION 00121 M00S00115.1rm +++|* FOR MOVING THE PACK OR HDA. 00122 M00S00116.1rm +++|* COMMAND - OPTIONAL. 00123 M00S00117.1rm +++|* ABORT, IGNORE. 00124 M00S00118.1rm +++|* 00125 M00S00119.1rm +++|* 00126 M00S00120.1rm +++|* MOVE PACK FROM UNIT XX TO UNIT YY AND SPIN UP. 00127 M00S00121.1rm +++|* THIS DIRECTIVE IS ISSUED TO THE OPERATOR FOR 00128 M00S00122.1rm +++|* EACH UNIT TO BE MOVED DURING A RECONFIGURATION. 00129 M00S00123.1rm +++|* UNIT XX HAS PREVIOUSLY BEEN DIRECTED TO BE 00130 M00S00124.1rm +++|* SPUN DOWN AND ITS PACK OR HDA IS NOW TO BE 00131 M00S00125.1rm +++|* MOVED TO UNIT YY. 00132 M00S00126.1rm +++|* COMMANDS - OPTIONAL. 00133 M00S00127.1rm +++|* ABORT, IGNORE. 00134 M00S00128.1rm +++|* 00135 M00S00129.1rm +++|* 00136 M00S00130.1rm +++|* UNIT XX, CHYY LABEL READ ERROR. 00137 M00S00131.1rm +++|* IN VERIFYING THAT THE CORRECT LABEL IS PRESENT 00138 M00S00132.1rm +++|* ON UNIT XX A DISK ERROR OCCURRED WHICH PREVENTED 00139 M00S00133.1rm +++|* THE LABEL FROM BEING READ SUCCESSFULLY. 00140 M00S00134.1rm +++|* THE CHANNEL IS SPECIFIED IN THE MESSAGE AND 00141 M00S00135.1rm +++|* MAY BE HELPFUL IF THE VERIFY ERROR OCCURS 00142 M00S00136.1rm +++|* ONLY FROM A SINGLE CHANNEL IN A DUAL ACCESS 00143 M00S00137.1rm +++|* CONFIGURATION. 00144 M00S00138.1rm +++|* COMMANDS - REQUIRED. 00145 M00S00139.1rm +++|* ABORT, IGNORE, RECHECK. 00146 M00S00140.1rm +++|* 00147 M00S00141.1rm +++|* 00148 M00S00142.1rm +++|* UNIT XX, CHYY LABEL VERIFICATION ERROR. 00149 M00S00143.1rm +++|* THE LABEL SECTOR WAS READ BUT THE DATA IN THE 00150 M00S00144.1rm +++|* LABEL SECTOR IS NOT CORRECT. 00151 M00S00145.1rm +++|* COMMANDS - REQUIRED. 00152 M00S00146.1rm +++|* ABORT, IGNORE, RECHECK. 00153 M00S00147.1rm +++|* 00154 M00S00148.1rm +++|* 00155 M00S00149.1rm +++|* WAITING FOR MACHINE ID=XX. 00156 M00S00150.1rm +++|* A SHARED DEVICE IS BEING PROCESSED AND IT HAS 00157 M00S00151.1rm +++|* BEEN DETECTED THAT MACHINE IDXX IS NOT AT THE 00158 M00S00152.1rm +++|* SAME STAGE OF PROCESSING AS THIS MACHINE. 00159 M00S00153.1rm +++|* COMMANDS - REQUIRED. 00160 M00S00154.1rm +++|* ABORT, IGNORE. 00161 M00S00155.1rm +++|* 00162 M00S00156.1rm +++|* 00163 M00S00157.1rm +++|* COMMAND ABORTED. 00164 M00S00158.1rm +++|* INFORMATIVE MESSAGE STATING THAT THE ATTEMPTED 00165 M00S00159.1rm +++|* COMMAND WAS ABORTED AND ALL VALUES FOR THE CURRENT 00166 M00S00160.1rm +++|* EQUIPMENT BEING PROCESSED HAVE BEEN RESET TO THEIR 00167 M00S00161.1rm +++|* ORIGINAL VALUE. 00168 M00S00162.1rm +++|* COMMANDS - NONE. 00169 M00S00163.1rm +++|* 00170 M00S00164.1rm +++|* 00171 M00S00165.1rm +++|* UNIT XX SERVO TIMING IN PROGRESS. 00172 M00S00166.1rm +++|* INFORMATIVE MESSAGE STATING THAT ADJUSTMENTS ARE 00173 M00S00167.1rm +++|* BEING MADE ON THE SERVO TIMING. 00174 M00S00168.1rm +++|* COMMANDS - NONE. 00175 M00S00169.1rm +++|* 00176 M00S00170.1rm +++|*
| Line S00171 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00177 M01S00171.ns22000 ---|* EQXX SYSTEM USAGE OF DEVICE SUSPENDED.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 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 M00S00172.1rm +++|* INFORMATIVE MESSAGE STATING THAT DEVICE USAGE HAS 00184 M00S00173.1rm +++|* BEEN SUSPENDED AS REQUESTED. 00185 M00S00174.1rm +++|* COMMANDS - NONE. 00186 M00S00175.1rm +++| SPACE 4,10 00187 M00S00176.1rm +++|*** DAYFILE MESSAGES. 00188 M00S00177.1rm +++|*
| Line S00178 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00189 M01S00178.v23l617 ---|* * 1RM INVALID REQUEST.* = ILLEGAL FUNCTION CODE OR STATUS
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00190 M01S00001.v23l617 +++|* * 1RM INCORRECT REQUEST.* = INCORRECT FUNCTION CODE OR STATUS 00191 M00S00179.1rm +++|* WORD ADDRESS OUT OF RANGE. 00192 M00S00180.1rm +++|*
| Line S00181 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00193 M01S00181.v23l617 ---|* * 1RM INVALID USER ACCESS.* = CALLING JOB NOT MASS STORAGE
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00194 M01S00002.v23l617 +++|* * 1RM USER ACCESS NOT VALID.* = CALLING JOB NOT MASS STORAGE 00195 M00S00182.1rm +++|* SUBSYSTEM QUEUE PRIORITY.
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00196 M01S00008.ns22000 +++| SPACE 4,10 00197 M01S00009.ns22000 +++|** ROUTINES USED. 00198 M01S00010.ns22000 +++|* 00199 M01S00011.ns22000 +++|* 0SI - SERVO TIMING. 00200 M00S00183.1rm +++| SPACE 4
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00201 M01S00012.ns22000 +++|** COMMON DECKS. 00202 M01S00013.ns22000 +++| 00203 M01S00014.ns22000 +++| 00204 M00S00184.1rm +++|*CALL COMPMAC 00205 M00S00185.1rm +++|*CALL COMSCPS
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
Seq # *Modification Id* Act ----------------------------+ 00206 M01S00001.1rm1 +++| QUAL DSL 00207 M01S00002.1rm1 +++|*CALL COMSDSL 00208 M01S00003.1rm1 +++| QUAL *
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00209 M01S00002.242l642 +++|*CALL COMSEVT 00210 M00S00186.1rm +++|*CALL COMSLSD 00211 M00S00187.1rm +++|*CALL COMSMMF 00212 M00S00188.1rm +++|*CALL COMSMSP 00213 M00S00189.1rm +++|*CALL COMSMST 00214 M00S00190.1rm +++|*CALL COMSPIM 00215 M00S00191.1rm +++|*CALL COMSPRD 00216 M00S00192.1rm +++|*CALL COMSSSD 00217 M00S00193.1rm +++|*CALL COMSZOL 00218 M00S00194.1rm +++| LIST X 00219 M00S00195.1rm +++|*CALL COMS1RM 00220 M00S00196.1rm +++| LIST * 00221 M00S00197.1rm +++| TITLE MACROS. 00222 M00S00198.1rm +++| COMMAND SPACE 4,10 00223 M00S00199.1rm +++|** COMMAND - SPECIFY LEGAL K-DISPLAY COMMANDS. 00224 M00S00200.1rm +++|* 00225 M00S00201.1rm +++|* THE *TPAR* WORD INDICATES TO *CONFIG* WHICH K-DISPLAY 00226 M00S00202.1rm +++|* COMMANDS ARE LEGAL FOR *1RM* PROCESSING. THIS 00227 M00S00203.1rm +++|* MACRO IS USED TO SET THE *TPAR* WORD TO THE LEGAL 00228 M00S00204.1rm +++|* COMMANDS. WHEN *CONFIG* DETECTS A LEGAL COMMAND IT IS 00229 M00S00205.1rm +++|* PASSED TO *1RM* VIA WORD *TCOM* IN THE CALL BLOCK. 00230 M00S00206.1rm +++|* *1RM* CHECKS FOR COMMANDS WITH THE AID OF THE *IFCOM* 00231 M00S00207.1rm +++|* MACRO. 00232 M00S00208.1rm +++|* 00233 M00S00209.1rm +++|* COMMAND C 00234 M00S00210.1rm +++|* C = A LIST OF LEGAL COMMAND KEYWORDS. 00235 M00S00211.1rm +++| 00236 M00S00212.1rm +++| 00237 M00S00213.1rm +++| COMMAND MACRO C 00238 M00S00214.1rm +++| MACREF COMMAND 00239 M00S00215.1rm +++| .2 SET 0 00240 M00S00216.1rm +++| IRP C
| Line S00217 Modification History | |
|---|---|
M01 (Removed by) | 1rm6 |
Seq # *Modification Id* Act ----------------------------+ 00241 M01S00217.1rm6 ---| .1 OCTMIC ._C-1
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 1rm6 |
Seq # *Modification Id* Act ----------------------------+ 00242 M01S00001.1rm6 +++| .1 DECMIC ._C-1 00243 M00S00218.1rm +++| .2 SET .2+1BS".1" 00244 M00S00219.1rm +++| IRP 00245 M00S00220.1rm +++| IFGT .2,77 00246 M00S00221.1rm +++| LDC .2 00247 M00S00222.1rm +++| ELSE 1 00248 M00S00223.1rm +++| LDN .2 00249 M00S00224.1rm +++| RJM SLC 00250 M00S00225.1rm +++| ENDM 00251 M00S00226.1rm +++| LDBUF SPACE 4,10 00252 M00S00227.1rm +++|** LDBUF - LOAD ADDRESS OF CALL BUFFER WORD. 00253 M00S00228.1rm +++|* 00254 M00S00229.1rm +++|* LDBUF ADD 00255 M00S00230.1rm +++|* ADD = CALL BUFFER WORD INDEX. 00256 M00S00231.1rm +++| 00257 M00S00232.1rm +++| 00258 M00S00233.1rm +++| LDBUF MACRO A 00259 M00S00234.1rm +++| MACREF LDBUF 00260 M00S00235.1rm +++| RJM LDB 00261 M00S00236.1rm +++| IFNE A,0,1 00262 M00S00237.1rm +++| ADN A 00263 M00S00238.1rm +++| ENDM 00264 M00S00239.1rm +++| IFCOM SPACE 4,10 00265 M00S00240.1rm +++|** IFCOM - CHECK IF COMMAND ENTERED. 00266 M00S00241.1rm +++|* 00267 M00S00242.1rm +++|* THIS MACRO CHECKS FOR A COMMAND PREVIOUSLY SPECIFIED 00268 M00S00243.1rm +++|* WITH THE COMMAND MACRO TO SEE IF IT HAS BEEN ENTERED 00269 M00S00244.1rm +++|* VIA THE K-DISPLAY. 00270 M00S00245.1rm +++|* 00271 M00S00246.1rm +++|* IFCOM C,TAG 00272 M00S00247.1rm +++|* C = COMMAND LIST TO BE CHECKED. 00273 M00S00248.1rm +++|* TAG = ADDRESS TO JUMP TO IF COMMAND ENTERED. 00274 M00S00249.1rm +++| 00275 M00S00250.1rm +++| 00276 M00S00251.1rm +++| IFCOM MACRO C,TAG 00277 M00S00252.1rm +++| MACREF IFCOM 00278 M00S00253.1rm +++| .2 SET 0 00279 M00S00254.1rm +++| IRP C
| Line S00255 Modification History | |
|---|---|
M01 (Removed by) | 1rm6 |
Seq # *Modification Id* Act ----------------------------+ 00280 M01S00255.1rm6 ---| .1 OCTMIC ._C-1
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 1rm6 |
Seq # *Modification Id* Act ----------------------------+ 00281 M01S00002.1rm6 +++| .1 DECMIC ._C-1 00282 M00S00256.1rm +++| .2 SET .2+1BS".1" 00283 M00S00257.1rm +++| IRP 00284 M00S00258.1rm +++| IFGT .2,77 00285 M00S00259.1rm +++| LDC .2 00286 M00S00260.1rm +++| ELSE 1 00287 M00S00261.1rm +++| LDN .2 00288 M00S00262.1rm +++| RJM CLC 00289 M00S00263.1rm +++| IF DEF,TAG 00290 M00S00264.1rm +++| IFLT *-TAG,40 00291 M00S00265.1rm +++| NJN TAG IF TAG WITHIN RANGE 00292 M00S00266.1rm +++| ELSE 2 00293 M00S00267.1rm +++| ZJN *+3 IF TAG OUT OF RANGE, REVERSE TEST LOGIC 00294 M00S00268.1rm +++| LJM TAG LONG JUMP TO TAG 00295 M00S00269.1rm +++| ENDM 00296 M00S00270.1rm +++| MESG SPACE 4,10 00297 M00S00271.1rm +++|** MESG - SEND MESSAGE TO K-DISPLAY. 00298 M00S00272.1rm +++|* 00299 M00S00273.1rm +++|* MESG ADD 00300 M00S00274.1rm +++|* ADD = ADDRESS OF K-DISPLAY MESSAGE. 00301 M00S00275.1rm +++| 00302 M00S00276.1rm +++| 00303 M00S00277.1rm +++| MESG MACRO A 00304 M00S00278.1rm +++| MACREF MESG 00305 M00S00279.1rm +++| IFC NE,=A=*=,1 00306 M00S00280.1rm +++| LDC A 00307 M00S00281.1rm +++| RJM KMS 00308 M00S00282.1rm +++| ENDM 00309 M00S00283.1rm +++| SPACE 4,10 00310 M00S00284.1rm +++|**** DIRECT LOCATION ASSIGNMENTS. 00311 M00S00285.1rm +++| 00312 M00S00286.1rm +++|
| Line S00287 Modification History | |
|---|---|
M01 (Removed by) | ns2483 |
Seq # *Modification Id* Act ----------------------------+ 00313 M01S00287.ns2483 ---| LIST G 00314 M00S00288.1rm +++| BEGIN BSSN 20 00315 M00S00289.1rm +++| CN BSSN 5 CM WORD BUFFER 00316 M00S00290.1rm +++| CH BSSN 1 CHANNEL CURRENTLY IN USE 00317 M00S00291.1rm +++| DI BSSN 1 DAT INDEX
| Line S00292 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00318 M01S00292.ns22000 ---| EQ BSSN 1 EQUIPMENT NUMBER FOR RECONFIGURATION
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00319 M01S00015.ns22000 +++| EQ BSSN 1 EST ORDINAL FOR RECONFIGURATION 00320 M00S00293.1rm +++| FN BSSN 1 FUNCTION IN PROGRESS 00321 M00S00294.1rm +++| GL BSSN 1 DEVICE UNAVAILABLE FLAG 00322 M00S00295.1rm +++| LU BSSN 1 LOGICAL UNIT NUMBER OF CURRENT UNIT 00323 M00S00296.1rm +++| LT BSSN 1 LABEL TRACK FROM MST 00324 M00S00297.1rm +++| MF BSSN 1 MMF STATUS 00325 M00S00298.1rm +++| MM BSSN 1 MACHINE MASK FOR THIS MACHINE 00326 M00S00299.1rm +++| MS BSSN 1 MST ADDRESS/10B 00327 M00S00300.1rm +++| NC BSSN 1 FIRST OF SECOND CHANNEL FLAG 00328 M00S00301.1rm +++| NU BSSN 1 NUMBER OF UNITS FOR EQUIPMENT 00329 M00S00302.1rm +++| PU BSSN 1 PHYSICAL UNIT NUMBER OF CURRENT UNIT 00330 M00S00303.1rm +++| RM BSSN 1 *RD* DEVICE MST ADDRESS/10B 00331 M00S00304.1rm +++| RU BSSN 1 UNITS FOR RECONFIGURATION OR REPAIR 00332 M00S00305.1rm +++| SC BSSN 1 SUSPENDED DEVICE COUNT 00333 M00S00306.1rm +++| SL BSSN 1 SINGLE UNIT SECTOR LIMIT FOR EQUIPMENT 00334 M00S00307.1rm +++| MX BSSN 0 MAXIMUM DIRECT CELL 00335 M00S00308.1rm +++| END BSSN 00336 M00S00309.1rm +++| ERRPL MX-50 DIRECT CELL OVERFLOW
| Line S00310 Modification History | |
|---|---|
M01 (Removed by) | ns2483 |
Seq # *Modification Id* Act ----------------------------+ 00337 M01S00310.ns2483 ---| LIST * 00338 M00S00311.1rm +++| 00339 M00S00312.1rm +++| 00340 M00S00313.1rm +++|**** 00341 M00S00314.1rm +++| TITLE RDM - MAIN PROGRAM. 00342 M00S00315.1rm +++|** RDM - MAIN PROGRAM.
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00343 M01S00016.ns22000 +++| 00344 M00S00316.1rm +++| 00345 M00S00317.1rm +++| ORG PPFW 00346 M00S00318.1rm +++| RDM RJM PRS PRESET 00347 M00S00319.1rm +++| RDM1 DELAY 00348 M00S00320.1rm +++| PAUSE 00349 M00S00321.1rm +++| LDBUF RFNB CHECK FOR FUNCTION REQUEST 00350 M00S00322.1rm +++| CRD CN 00351 M00S00323.1rm +++| LDD CM+1 00352 M00S00324.1rm +++| ZJN RDM2 IF NO ERROR FLAG 00353 M00S00325.1rm +++| LDN 0 00354 M00S00326.1rm +++| LJM RDM4 DROP PP 00355 M00S00327.1rm +++| 00356 M00S00328.1rm +++| RDM2 LDD CN+4 00357 M00S00329.1rm +++| SHN 21 00358 M00S00330.1rm +++| PJN RDM1 IF NO FUNCTION PRESENT 00359 M00S00331.1rm +++| STD FN 00360 M00S00332.1rm +++| RJM SEQ SET EQUIPMENT PARAMETERS 00361 M00S00333.1rm +++| LDM TFCN,FN 00362 M00S00334.1rm +++| STM RDMA 00363 M00S00335.1rm +++| RJM * PROCESS REQUEST 00364 M00S00336.1rm +++| RDMA EQU *-1 00365 M00S00337.1rm +++| 00366 M00S00338.1rm +++|* RETURN FROM FUNCTION PROCESSOR. 00367 M00S00339.1rm +++|* IF A DEVICE SUSPEND REQUEST IS OUTSTANDING *1RM* MUST 00368 M00S00340.1rm +++|* REMAIN ASSIGNED UNTIL IT IS CLEARED. IF *1RM* WERE 00369 M00S00341.1rm +++|* TO DROP OUT A DEADLOCK COULD BE CREATED BECAUSE OF 00370 M00S00342.1rm +++|* PP RESOURCES BEING TIED UP WAITING FOR THE SUSPENDED 00371 M00S00343.1rm +++|* DEVICE. 00372 M00S00344.1rm +++|* 00373 M00S00345.1rm +++|* (A) = 0 IF COMMAND WAS NOT ABORTED. 00374 M00S00346.1rm +++|* (A) .NE. 0 IF *ABORT* WAS ENTERED. 00375 M00S00347.1rm +++| 00376 M00S00348.1rm +++| ZJN RDM3 IF COMMAND NOT ABORTED 00377 M00S00349.1rm +++| MESG RDMB *COMMAND ABORTED* 00378 M00S00350.1rm +++| RDM3 RJM RRD RESET *RD* DEVICE 00379 M00S00351.1rm +++| LDBUF RFNB READ FUNCTION WORD 00380 M00S00352.1rm +++| CRD CN 00381 M00S00353.1rm +++| LDD SC CHECK FOR SUSPENDED DEVICES 00382 M00S00354.1rm +++| ZJN RDM4 IF NO DEVICE SUSPENDED - DROP PP 00383 M00S00355.1rm +++| LDD CN+4 00384 M00S00356.1rm +++| SCN 1 00385 M00S00357.1rm +++| RDM4 STD CN+4 00386 M00S00358.1rm +++| LDBUF RFNB 00387 M00S00359.1rm +++| CWD CN 00388 M00S00360.1rm +++| LDD CN+4 00389 M00S00361.1rm +++| ZJN RDM5 IF DROP OF PP 00390 M00S00362.1rm +++| LJM RDM1 CHECK FOR NEXT FUNCTION 00391 M00S00363.1rm +++|
| Line S00364 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00392 M01S00364.242l642 ---| RDM5 MONITOR DPPM
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | 1rm5 |
Seq # *Modification Id* Act ----------------------------+ 00393 M02S00003.1rm5 ---| RDM5 LDK ZERL RESTART JOBS WAITING ON THIS DEVICE
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 1rm5 |
Seq # *Modification Id* Act ----------------------------+ 00394 M01S00001.1rm5 +++| RDM5 RJM CSP CLEAR EQUIPMENT ASSIGNMENT 00395 M01S00002.1rm5 +++| LDK ZERL RESTART JOBS WAITING ON DEVICE
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 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 M00S00365.1rm +++| LJM PPR EXIT 00405 M00S00366.1rm +++| 00406 M00S00367.1rm +++| RDMB DATA C*COMMAND ABORTED.* 00407 M00S00368.1rm +++| SPACE 4,10 00408 M00S00369.1rm +++|** TFCN - TABLE OF FUNCTION CODE PROCESSORS. 00409 M00S00370.1rm +++|* 00410 M00S00371.1rm +++|* ENTRY = 1 WORD INDEXED BY FUNCTION CODE. 00411 M00S00372.1rm +++|* 00412 M00S00373.1rm +++|*T 12/ ADDR
Figure
00413 M00S00374.1rm +++|* ADDR = ADDRESS OF FUNCTION PROCESSOR. 00414 M00S00375.1rm +++| 00415 M00S00376.1rm +++| 00416 M00S00377.1rm +++| TFCN INDEX TABLE OF FUNCTION CODE PROCESSORS
| Line S00378 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00417 M01S00378.v23l617 ---| INDEX RUMF,UMT UPDATE MST-S FROM ECS
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00418 M01S00003.v23l617 +++| INDEX RUMF,UMT UPDATE MST-S FROM EXTENDED MEMORY 00419 M00S00379.1rm +++| INDEX RCLF,CLR CLEAR IDLE AND SUSPEND REQUESTS 00420 M00S00380.1rm +++| INDEX RCDF,CDI CLEAR DAT INTERLOCK 00421 M00S00381.1rm +++| INDEX RDDF,RDD REDEFINE DEVICE 00422 M00S00382.1rm +++| INDEX RSPF,SPD SUSPEND DEVICE ACTIVITY 00423 M00S00383.1rm +++| INDEX RMXF 00424 M00S00384.1rm +++| CDI TITLE CLEAR *DATI* INTERLOCK. 00425 M00S00385.1rm +++|** CDI - CLEAR *DATI* INTERLOCK. (FUNCTION RCDF). 00426 M00S00386.1rm +++|* 00427 M00S00387.1rm +++|* ENTRY (MF) = MULTI-MAINFRAME LINK DEVICE. 00428 M00S00388.1rm +++|* 00429 M00S00389.1rm +++|* USES CN - CN+4. 00430 M00S00390.1rm +++|* 00431 M00S00391.1rm +++|* CALLS IFR. 00432 M00S00392.1rm +++| 00433 M00S00393.1rm +++| 00434 M00S00394.1rm +++| CDI SUBR ENTRY/EXIT 00435 M00S00395.1rm +++| LDD MF CHECK FOR MULTI-MAINFRAME 00436 M00S00396.1rm +++| ZJN CDIX IF NOT MMF 00437 M00S00397.1rm +++| LDC MMFL READ *DATI* INTERLOCK INDICATION 00438 M00S00398.1rm +++| CRD CN 00439 M00S00399.1rm +++| LDD CN+2 00440 M00S00400.1rm +++| ZJN CDIX IF INTERLOCK NOT SET 00441 M00S00401.1rm +++| LCN DATI 00442 M00S00402.1rm +++| RJM IFR CLEAR *DATI* FLAG REGISTER INTERLOCK 00443 M00S00403.1rm +++| LDN 0 CLEAR INTERLOCK INDICATOR 00444 M00S00404.1rm +++| STD CN+2 00445 M00S00405.1rm +++| LDC MMFL 00446 M00S00406.1rm +++| CWD CN 00447 M00S00407.1rm +++| LDN 0 00448 M00S00408.1rm +++| UJN CDIX RETURN 00449 M00S00409.1rm +++| TITLE CLR - CLEAR IDLE AND SUSPEND REQUEST. 00450 M00S00410.1rm +++|** CLR - CLEAR IDLE AND SUSPEND REQUEST. (FUNCTION RCLF). 00451 M00S00411.1rm +++|* 00452 M00S00412.1rm +++|* CLEAR THE IDLE AND SUSPEND REQUESTED BIT FOR THE SPECIFIED 00453 M00S00413.1rm +++|* EQUIPMENT. 00454 M00S00414.1rm +++|*
| Line S00415 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00455 M01S00415.ns22000 ---|* ENTRY (EQ) = EQUIPMENT NUMBER.
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00456 M01S00017.ns22000 +++|* ENTRY (EQ) = EST ORDINAL. 00457 M00S00416.1rm +++|*
| Line S00417 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00458 M01S00417.242l642 ---|* EXIT (A) .NE. 0 IF OPERATION ABORTED.
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 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 M00S00418.1rm +++|* 00462 M00S00419.1rm +++|* USES LU, NC, T5, T7, CM - CM+4, CN - CN+4. 00463 M00S00420.1rm +++|* 00464 M00S00421.1rm +++|* CALLS CAS, CDI, CDP, CSP, MSV, PUE, SCF, SDI, SNC, VLB, WAM. 00465 M00S00422.1rm +++|*
| Line S00423 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00466 M01S00423.ns22000 ---|* MACROS CMSTF, LDBUF, MONITOR.
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00467 M01S00018.ns22000 +++|* MACROS CMSTF, LDBUF, MONITOR, SFA. 00468 M00S00424.1rm +++| 00469 M00S00425.1rm +++| 00470 M00S00426.1rm +++| CLR SUBR ENTRY 00471 M00S00427.1rm +++| LDD GL 00472 M00S00428.1rm +++| ZJN CLR1 IF DEVICE AVAILABLE 00473 M00S00429.1rm +++| LJM CLR6 CLEAR SUSPEND AND IDLE STATUS 00474 M00S00430.1rm +++| 00475 M00S00431.1rm +++| CLR1 LDN MSTL SET MST WORD COUNT 00476 M00S00432.1rm +++| STD T7 00477 M00S00433.1rm +++| LDBUF ESTD READ EST ENTRY 00478 M00S00434.1rm +++| CRD CN 00479 M00S00435.1rm +++| ADN MSTD-ESTD READ MST 00480 M00S00436.1rm +++| CRM BFMS,T7 00481 M00S00437.1rm +++| RJM SCF SET COMMON FIELDS IN *RD* DEVICE
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00482 M01S00014.242l642 +++| NJN CLRX IF ERROR FLAG SET AT CP 00483 M00S00438.1rm +++| 00484 M00S00439.1rm +++|* VERIFY FUNCTIONAL AND LOGICAL INTEGRITY OF EQUIPMENT. 00485 M00S00440.1rm +++| 00486 M00S00441.1rm +++| CLR2 LDN 1 SET FIRST CHANNEL 00487 M00S00442.1rm +++| STD NC 00488 M00S00443.1rm +++| CLR3 RJM SNC SET *NC* CHANNEL 00489 M00S00444.1rm +++| NJN CLR5 IF CHANNEL NOT AVAILABLE 00490 M00S00445.1rm +++| RJM VLB VERIFY LABEL SECTOR 00491 M00S00446.1rm +++| NJN CLR7 IF *ABORT* 00492 M00S00447.1rm +++| CLR4 RJM MSV MASS STORAGE VERIFICATION 00493 M00S00448.1rm +++| ZJN CLR5 IF VERIFY GOOD 00494 M00S00449.1rm +++| LDC CLRA * UNIT XX, CHYY WRITE/READ VERIFY ERROR.* 00495 M00S00450.1rm +++| RJM PUE PROCESS UNIT ERROR 00496 M00S00451.1rm +++| MJN CLR4 IF *RECHECK* 00497 M00S00452.1rm +++| NJN CLR7 IF *ABORT* 00498 M00S00453.1rm +++| CLR5 SOD NC 00499 M00S00454.1rm +++| PJN CLR3 IF MORE CHANNELS TO PROCESS 00500 M00S00455.1rm +++| 00501 M00S00456.1rm +++|* ADVANCE TO NEXT UNIT. 00502 M00S00457.1rm +++| 00503 M00S00458.1rm +++| AOD LU 00504 M00S00459.1rm +++| LDD SL 00505 M00S00460.1rm +++| RAD T7 00506 M00S00461.1rm +++| SBM SLM 00507 M00S00462.1rm +++| MJN CLR2 IF MORE UNITS TO PROCESS 00508 M00S00463.1rm +++| 00509 M00S00464.1rm +++|* CLEAR SUSPEND AND IDLE STATUS. 00510 M00S00465.1rm +++| 00511 M00S00466.1rm +++| CLR6 RJM SDI SET DAT INTERLOCK
| Line S00467 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00512 M01S00467.242l642 ---| CLR7 NJN CLR8.1 IF *ABORT*
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00513 M01S00015.242l642 +++| CLR7 NJN CLR9 IF *ABORT* 00514 M00S00468.1rm +++| RJM CSP CLEAR SUSPEND STATUS 00515 M00S00469.1rm +++| RJM CAS CHECK ALL SUSPENDS CLEARED 00516 M00S00470.1rm +++| NJN CLR8 IF SUSPEND SET FOR OTHER MACHINES 00517 M00S00471.1rm +++| LDD EQ 00518 M00S00472.1rm +++| STD T5 00519 M00S00473.1rm +++| CMSTF GRDR CLEAR REDEFINITION REQUESTED 00520 M00S00474.1rm +++| CLR8 RJM CDI CLEAR DAT INTERLOCK
| Line S00475 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00521 M01S00475.242l642 ---| LDC MJNI+WAM4-WAMB USE CORRECT CONDITIONAL JUMP
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00522 M01S00016.242l642 +++| LDC ZJNI+WAM4-WAMB USE CORRECT CONDITIONAL JUMP 00523 M00S00476.1rm +++| RJM WAM ENSURE SYNCHRONIZATION OF PROCESSING
| Line S00477 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00524 M01S00477.242l642 ---| CLR8.1 NJN CLR9 IF *ABORT*
| Line S00478 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00525 M02S00478.242l642 ---| LDD EQ 00526 M02S00479.242l642 ---| ADM ESTS
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00527 M02S00019.242l642 ---| SFA EST,EQ READ EST ENTRY 00528 M02S00020.242l642 ---| ADK EQDE
| Line S00480 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00529 M01S00480.242l642 ---| CRD CM 00530 M01S00481.242l642 ---| LDD CM 00531 M01S00482.242l642 ---| LPC 2000 00532 M01S00483.242l642 ---| ZJN CLR8.2 IF NOT SYSTEM DEVICE
| Line S00484 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00533 M02S00484.242l642 ---| LDD EQ SET EQUIPMENT NUMBER
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00534 M02S00021.242l642 ---| LDD EQ SET EST ORDINAL
| Line S00485 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00535 M01S00485.242l642 ---| STD CM+1 00536 M01S00486.242l642 ---| LDN SSDS RESTORE SYSTEM DEVICE TO LIST 00537 M01S00487.242l642 ---| STD CM+2 00538 M01S00488.242l642 ---| MONITOR SEQM 00539 M01S00489.242l642 ---| CLR8.2 RJM CDP COMPLETE DEVICE PROCESSING
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00540 M01S00017.242l642 +++| NJN CLR9 IF *ABORT* 00541 M01S00018.242l642 +++| RJM CDP COMPLETE DEVICE PROCESSING 00542 M00S00490.1rm +++| LDN 0 00543 M00S00491.1rm +++| CLR9 LJM CLRX RETURN 00544 M00S00492.1rm +++| 00545 M00S00493.1rm +++| CLRA DATA C* UNIT XX, CHYY WRITE/READ VERIFY ERROR.* 00546 M00S00494.1rm +++| RDD TITLE REDEFINE UNITS FUNCTION PROCESSOR. 00547 M00S00495.1rm +++|** RDD - REDEFINE UNITS. (FUNCTION RDDF). 00548 M00S00496.1rm +++|* 00549 M00S00497.1rm +++|* REDEFINE AN EQUIPMENT BY CHANGING THE UNITS AND OPTIONALLY 00550 M00S00498.1rm +++|* THE CHANNELS. THE CHANGE MAY INVOLVE PHYSICALLY MOVING 00551 M00S00499.1rm +++|* PACKS OR HDAS IN WHICH CASE THE PROCESS IS GUIDED BY 00552 M00S00500.1rm +++|* MESSAGES WHICH APPEAR ON THE *K* DISPLAY AND AT THE USER-S 00553 M00S00501.1rm +++|* CONTROL POINT. 00554 M00S00502.1rm +++|* 00555 M00S00503.1rm +++|* ENTRY (FG) = FLAGS. 00556 M00S00504.1rm +++|* 1 = SPIN DOWN UNITS BEING CHANGED. 00557 M00S00505.1rm +++|* 2 = VERIFY LABELS ON NEW CONFIGURATION. 00558 M00S00506.1rm +++|* 00559 M00S00507.1rm +++|* EXIT (A) .NE. 0 IF OPERATION ABORTED. 00560 M00S00508.1rm +++|* 00561 M00S00509.1rm +++|* USES CM - CM+4, CN - CN+4. 00562 M00S00510.1rm +++|*
| Line S00511 Modification History | |
|---|---|
M01 (Removed by) | 1rm1 |
Seq # *Modification Id* Act ----------------------------+ 00563 M01S00511.1rm1 ---|* CALLS CLR, SCH, SDU, SPD, SUU, ULD.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
Seq # *Modification Id* Act ----------------------------+ 00564 M01S00004.1rm1 +++|* CALLS CLR, GCI, SCH, SDU, SPD, SUU, ULD. 00565 M00S00512.1rm +++|* 00566 M00S00513.1rm +++|* MACROS LDBUF. 00567 M00S00514.1rm +++| 00568 M00S00515.1rm +++| 00569 M00S00516.1rm +++| RDD SUBR ENTRY/EXIT 00570 M00S00517.1rm +++| LDD RU 00571 M00S00518.1rm +++| ZJN RDD1 IF NO CHANGE OF UNITS 00572 M00S00519.1rm +++| RJM SPD SUSPEND DEVICE USAGE 00573 M00S00520.1rm +++| NJN RDDX IF REDEFINITION ABORTED 00574 M00S00521.1rm +++| LDD GL 00575 M00S00522.1rm +++| NJN RDD1 IF DEVICE UNAVAILABLE 00576 M00S00523.1rm +++| RJM SDU SPIN DOWN CHANGED UNITS
| Line S00524 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00577 M01S00524.242l642 ---| NJN RDDX IF *ABORT*
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00578 M01S00019.242l642 +++| NJN RDDX IF *ABORT* OR ERROR FLAG SET 00579 M00S00525.1rm +++| RJM SUU SPIN UP UNITS
| Line S00526 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00580 M01S00526.242l642 ---| NJN RDDX IF *ABORT*
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00581 M01S00020.242l642 +++| NJN RDDX IF *ABORT* OR ERROR FLAG SET 00582 M00S00527.1rm +++| 00583 M00S00528.1rm +++|* SET NEW CONFIGURATION IN MST. 00584 M00S00529.1rm +++| 00585 M00S00530.1rm +++| RDD1 LDBUF ESTD SET NEW CHANNELS 00586 M00S00531.1rm +++| CRD CN
| Line S00532 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00587 M01S00532.252l678 ---| LDD EQ 00588 M01S00533.252l678 ---| SHN 14 00589 M01S00534.252l678 ---| LMD CN+1 00590 M01S00535.252l678 ---| RJM SCH SET CHANNELS
| Line S00536 Modification History | |
|---|---|
M01 (Removed by) | 1rm1 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00591 M02S00536.252l678 ---| LDD MS READ CURRENT CONFIGURATION 00592 M02S00537.252l678 ---| SHN 3 00593 M02S00538.252l678 ---| ADN DDLL
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00594 M02S00005.252l678 ---| LDD CN+1 SET NEW CHANNELS IN MST
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00595 M01S00001.252l678 +++| LDD CN+1 SET NEW CHANNELS IN EST
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
Seq # *Modification Id* Act ----------------------------+ 00596 M01S00006.1rm1 +++| RJM GCI 00597 M01S00007.1rm1 +++| ZJN RDD2 IF FULL-TRACK CHANNEL
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00598 M02S00008.252l678 ---| LDN 0 00599 M02S00009.252l678 ---| UJN RDD3 DO NOT SET FULL-TRACK FLAG 00600 M02S00010.252l678 ---| 00601 M02S00011.252l678 ---| RDD2 LDN 40 SET FULL-TRACK FLAG 00602 M02S00012.252l678 ---| RDD3 LMD T2 00603 M02S00013.252l678 ---| STD CN SAVE FIRST CHANNEL 00604 M02S00014.252l678 ---| LDD CN+1 PROCESS SECOND CHANNEL 00605 M02S00015.252l678 ---| SHN -6 00606 M02S00016.252l678 ---| STD T2
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 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
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
Seq # *Modification Id* Act ----------------------------+ 00612 M01S00017.1rm1 +++| ZJN RDD5 IF NO SECOND CHANNEL 00613 M01S00018.1rm1 +++| RJM GCI
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00614 M02S00019.252l678 ---| ZJN RDD4 IF FULL-TRACK CHANNEL 00615 M02S00020.252l678 ---| LDN 0 00616 M02S00021.252l678 ---| UJN RDD5 DO NOT SET FULL-TRACK CHANNEL 00617 M02S00022.252l678 ---| 00618 M02S00023.252l678 ---| RDD4 LDN 40 SET FULL-TRACK FLAG 00619 M02S00024.252l678 ---| RDD5 LMD T2 00620 M02S00025.252l678 ---| SHN 6 00621 M02S00026.252l678 ---| RAD CN MERGE WITH FIRST CHANNEL 00622 M02S00027.252l678 ---| LDD MS 00623 M02S00028.252l678 ---| SHN 3 00624 M02S00029.252l678 ---| ADN DILL 00625 M02S00030.252l678 ---| CRD CM 00626 M02S00031.252l678 ---| LDD CN SET NEW CHANNELS IN MST 00627 M02S00032.252l678 ---| STD CM+1 00628 M02S00033.252l678 ---| LDD MS REWRITE *DILL* 00629 M02S00034.252l678 ---| SHN 3 00630 M02S00035.252l678 ---| ADN DILL 00631 M02S00036.252l678 ---| CWD CM 00632 M02S00037.252l678 ---| ADN DDLL-DILL
| Line S00539 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00633 M01S00539.252l678 ---| CRD CM
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 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 M00S00540.1rm +++| LDBUF MSTD+DDLL SET NEW UNIT LIST 00642 M00S00541.1rm +++| CRD CN 00643 M00S00542.1rm +++| LDD CN 00644 M00S00543.1rm +++| LPC 3777 00645 M00S00544.1rm +++| STD CN
| Line S00545 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00646 M01S00545.242l642 ---| LDD CM PROPAGATE SUSPEND STATUS 00647 M01S00546.242l642 ---| LPC 4000 00648 M01S00547.242l642 ---| RAD CN 00649 M00S00548.1rm +++| LDD MS 00650 M00S00549.1rm +++| SHN 3 00651 M00S00550.1rm +++| ADN DDLL 00652 M00S00551.1rm +++| CWD CN 00653 M00S00552.1rm +++| RJM ULD UPDATE LINKED DEVICES MST-S 00654 M00S00553.1rm +++| RJM CLR CLEAR SUSPEND AND IDLE AFTER VALIDATION 00655 M00S00554.1rm +++| LJM RDDX RETURN 00656 M00S00555.1rm +++| SPD TITLE SUSPEND PROCESSING ON DEVICE. 00657 M00S00556.1rm +++|** SPD - SUSPEND PROCESSING ON DEVICE. (FUNCTION RSPF). 00658 M00S00557.1rm +++|* 00659 M00S00558.1rm +++|* THIS FUNCTION SUSPENDS PROCESSING ON A DEVICE SO THAT 00660 M00S00559.1rm +++|* REPAIR OPERATIONS CAN BE EFFECTED. ALSO A DEVICE MAY 00661 M00S00560.1rm +++|* BE SUSPENDED SO THAT A UNIT IN ITS CONFIGURATION MAY 00662 M00S00561.1rm +++|* BE ADDED TO ANOTHER EQUIPMENT. 00663 M00S00562.1rm +++|*
| Line S00563 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00664 M01S00563.242l642 ---|* EXIT (A) .NE. 0 IF OPERATION ABORTED.
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 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 M00S00564.1rm +++|* (SC) UPDATED TO INDICATE NEW SUSPEND COUNT. 00668 M00S00565.1rm +++|* 00669 M00S00566.1rm +++|* USES CM - CM+4. 00670 M00S00567.1rm +++|* 00671 M00S00568.1rm +++|* CALLS CDI, SDI, SSP, WAM. 00672 M00S00569.1rm +++|*
| Line S00570 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00673 M01S00570.ns22000 ---|* MACROS MONITOR.
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00674 M01S00022.ns22000 +++|* MACROS MONITOR, SFA. 00675 M00S00571.1rm +++| 00676 M00S00572.1rm +++| 00677 M00S00573.1rm +++| SPD SUBR ENTRY/EXIT 00678 M00S00574.1rm +++| 00679 M00S00575.1rm +++|* THE *DATI* INTERLOCK IS HELD WHILE SETTING THE SUSPEND 00680 M00S00576.1rm +++|* STATUS ON A DEVICE. SUSPEND STATUS REQUIRES THAT IDLE 00681 M00S00577.1rm +++|* BE SET ON THE DEVICE. THE *DATI* INTERLOCK CONTROLS THE 00682 M00S00578.1rm +++|* CLEARING OF SUSPEND. WHEN THE LAST MACHINE CLEARS IT-S 00683 M00S00579.1rm +++|* SUSPEND STATUS IT ALSO CLEARS DEVICE IDLE. THUS WHEN 00684 M00S00580.1rm +++|* CHECKING TO ENSURE IDLE IS SET SO THAT SUSPEND MAY THEN BE 00685 M00S00581.1rm +++|* SET, THE *DATI* INTERLOCK IS HELD TO ENSURE THAT ANOTHER 00686 M00S00582.1rm +++|* MACHINE IS NOT CLEARING IDLE AT THE SAME TIME. 00687 M00S00583.1rm +++| 00688 M00S00584.1rm +++| RJM SDI SET *DATI* INTERLOCK 00689 M00S00585.1rm +++| NJN SPDX IF SUSPEND ABORTED 00690 M00S00586.1rm +++| 00691 M00S00587.1rm +++|* CHECK THAT THE DEVICE IDLE STATUS HAS NOT BEEN CLEARED 00692 M00S00588.1rm +++|* BY ANOTHER MACHINE. 00693 M00S00589.1rm +++| 00694 M00S00590.1rm +++| LDD EQ OBTAIN UP-TO-DATE MST IN CM 00695 M00S00591.1rm +++| STD CM+1 00696 M00S00592.1rm +++| LDN UTRS 00697 M00S00593.1rm +++| STD CM+3 00698 M00S00594.1rm +++| MONITOR STBM
| Line S00595 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00699 M01S00595.ns22000 ---| LDD EQ READ *ACGL* OF MST 00700 M01S00596.ns22000 ---| ADM ESTS
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00701 M01S00023.ns22000 +++| SFA EST,EQ READ *ACGL* WORD OF MST 00702 M01S00024.ns22000 +++| ADK EQDE 00703 M00S00597.1rm +++| CRD CM 00704 M00S00598.1rm +++| LDD CM+4 00705 M00S00599.1rm +++| SHN 3 00706 M00S00600.1rm +++| ADN ACGL 00707 M00S00601.1rm +++| CRD CM 00708 M00S00602.1rm +++| LDD CM+4 CHECK REDEFINITION REQUESTED BIT 00709 M00S00603.1rm +++| SHN 21-GRDR 00710 M00S00604.1rm +++| PJN SPD1 IF IDLE NOT SET 00711 M00S00605.1rm +++| RJM SSP SET SUSPEND STATUS 00712 M00S00606.1rm +++| SPD1 RJM CDI CLEAR *DATI* INTERLOCK 00713 M00S00607.1rm +++| 00714 M00S00608.1rm +++|* IN ORDER TO ENSURE ALL MACHINES ARE SYNCHRONIZED IN 00715 M00S00609.1rm +++|* THEIR PROCESSING OF A DEVICE THE FOLLOWING CODE WAITS 00716 M00S00610.1rm +++|* FOR ANY OTHER MACHINES SHARING THE DEVICE TO SUSPEND 00717 M00S00611.1rm +++|* ACTIVITY. 00718 M00S00612.1rm +++|
| Line S00613 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00719 M01S00613.242l642 ---| LDC PJNI+WAM4-WAMB USE CORRECT CONDITIONAL JUMP
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00720 M01S00023.242l642 +++| LDC NJNI+WAM4-WAMB USE CORRECT CONDITIONAL JUMP 00721 M00S00614.1rm +++| RJM WAM WAIT FOR ALL MACHINES 00722 M00S00615.1rm +++| NJN SPD2 IF *ABORT*
| Line S00616 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00723 M01S00616.ns22000 ---| LDD EQ 00724 M01S00617.ns22000 ---| ADM ESTS
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00725 M02S00025.242l642 ---| SFA EST,EQ CHECK FOR SYSTEM DEVICE 00726 M02S00026.242l642 ---| ADK EQDE
| Line S00618 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00727 M01S00618.242l642 ---| CRD CM 00728 M01S00619.242l642 ---| LDD CM 00729 M01S00620.242l642 ---| LPC 2000 00730 M01S00621.242l642 ---| ZJN SPD2 IF NOT SYSTEM DEVICE
| Line S00622 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00731 M02S00622.242l642 ---| LDD EQ SET EQUIPMENT NUMBER
| Line S00027 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00732 M02S00027.242l642 ---| LDD EQ SET EST ORDINAL
| Line S00623 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00733 M01S00623.242l642 ---| STD CM+1 00734 M01S00624.242l642 ---| LDN SSDS REMOVE SYSTEM DEVICE FROM LIST 00735 M01S00625.242l642 ---| STD CM+2 00736 M01S00626.242l642 ---| MONITOR SEQM 00737 M01S00627.242l642 ---| LDN 0
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00738 M01S00024.242l642 +++|* LDN 0 INDICATE NO ABORT 00739 M00S00628.1rm +++| SPD2 LJM SPDX RETURN
| Line S00629 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00740 M01S00629.v23l617 ---| TITLE UMT - UPDATE SHARED DEVICE MST FROM ECS.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00741 M01S00004.v23l617 +++| TITLE UMT - UPDATE SHARED DEVICE MST FROM EXTENDED MEMORY. 00742 M00S00630.1rm +++|** UMT - UPDATE SHARED DEVICE MST FROM ECS. (FUNCTION RUMF). 00743 M00S00631.1rm +++|* 00744 M00S00632.1rm +++|* ENTRY NO CALL BLOCK PARAMETERS NEEDED. 00745 M00S00633.1rm +++|* 00746 M00S00634.1rm +++|* EXIT MST-S FOR ALL SHARED DEVICES UPDATED FROM ECS. 00747 M00S00635.1rm +++|* 00748 M00S00636.1rm +++|* USES CM - CM+4, CN - CN+4. 00749 M00S00637.1rm +++|*
| Line S00638 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00750 M01S00638.ns22000 ---|* MACROS MONITOR.
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00751 M01S00028.ns22000 +++|* MACROS MONITOR, SFA. 00752 M00S00639.1rm +++| 00753 M00S00640.1rm +++| 00754 M00S00641.1rm +++| UMT SUBR ENTRY/EXIT 00755 M00S00642.1rm +++| LDD MF 00756 M00S00643.1rm +++| ZJN UMTX IF NOT MULTI-MAINFRAME 00757 M00S00644.1rm +++| LDN ESTP INITIALIZE EST SEARCH 00758 M00S00645.1rm +++| CRD CN
| Line S00646 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00759 M01S00646.ns22000 ---| UMT1 AOD CN READ EST
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 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 M00S00647.1rm +++| CRD CM
| Line S00648 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00768 M01S00648.ns22000 ---| LMD CN+2 00769 M01S00649.ns22000 ---| ZJN UMTX IF END OF EQUIPMENTS 00770 M00S00650.1rm +++| LDD CM 00771 M00S00651.1rm +++| SHN 21-13 00772 M00S00652.1rm +++| PJN UMT1 IF NOT MASS STORAGE 00773 M00S00653.1rm +++| SHN 21-11-21+13 00774 M00S00654.1rm +++| PJN UMT1 IF NOT SHARED DEVICE
| Line S00655 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00775 M01S00655.v23l617 ---| LDD CN UPDATE MST FROM ECS
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 00776 M01S00005.v23l617 +++| LDD CN UPDATE MST FROM EXTENDED MEMORY
| Line S00656 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00777 M01S00656.ns22000 ---| SBM ESTS 00778 M00S00657.1rm +++| STD CM+1 00779 M00S00658.1rm +++| LDN UTRS 00780 M00S00659.1rm +++| STD CM+3 00781 M00S00660.1rm +++| MONITOR STBM 00782 M00S00661.1rm +++| UJN UMT1 NEXT EQUIPMENT 00783 M00S00662.1rm +++| CAS TITLE SUBROUTINES. 00784 M00S00663.1rm +++| CAS SPACE 4,10 00785 M00S00664.1rm +++|** CAS - CHECK ALL SUSPENDS CLEARED. 00786 M00S00665.1rm +++|*
| Line S00666 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00787 M01S00666.ns22000 ---|* ENTRY (EQ) = EQUIPMENT NUMBER.
| Line S00036 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00788 M01S00036.ns22000 +++|* ENTRY (EQ) = EST ORDINAL. 00789 M00S00667.1rm +++|* (DI) = DAT INDEX. 00790 M00S00668.1rm +++|* 00791 M00S00669.1rm +++|* EXIT (A) = 0 IF SUSPEND CLEARED FOR ALL OTHER MACHINES. 00792 M00S00670.1rm +++|* 00793 M00S00671.1rm +++|* USES T1 - T3. 00794 M00S00672.1rm +++|* 00795 M00S00673.1rm +++|* CALLS RDE.
| Line S00037 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00796 M01S00037.ns22000 +++|* 00797 M01S00038.ns22000 +++|* MACROS SFA. 00798 M00S00674.1rm +++| 00799 M00S00675.1rm +++| 00800 M00S00676.1rm +++| CAS SUBR ENTRY/EXIT 00801 M00S00677.1rm +++| LDD MF 00802 M00S00678.1rm +++| ZJN CASX IF NOT MMF
| Line S00679 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00803 M01S00679.ns22000 ---| LDD EQ TEST FOR SHARED DEVICE 00804 M01S00680.ns22000 ---| ADM ESTS
| Line S00039 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00805 M01S00039.ns22000 +++| SFA EST,EQ TEST FOR SHARED DEVICE 00806 M01S00040.ns22000 +++| ADK EQDE 00807 M00S00681.1rm +++| CRD CM 00808 M00S00682.1rm +++| LDD CM 00809 M00S00683.1rm +++| LPC 1000 00810 M00S00684.1rm +++| ZJN CASX IF DEVICE NOT SHARED 00811 M00S00685.1rm +++| RJM RDE READ DAT ENTRY FOR DEVICE 00812 M00S00686.1rm +++| NJN CASX IF *ABORT*
| Line S00687 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00813 M01S00687.242l642 ---| LDC BFMS+2+DDLL*5
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00814 M01S00025.242l642 +++| LDC BFMS+2+DALL*5 00815 M00S00688.1rm +++| STD T1 00816 M00S00689.1rm +++| LDN 1 PRESET SEARCH MASK 00817 M00S00690.1rm +++| STD T2 00818 M00S00691.1rm +++| LDN MXMF 00819 M00S00692.1rm +++| STD T3 00820 M00S00693.1rm +++| CAS1 LDM TDAT+5+4 00821 M00S00694.1rm +++| LMD T2 00822 M00S00695.1rm +++| SBM TDAT+5+4 00823 M00S00696.1rm +++| PJN CAS2 IF NOT SHARING WITH THIS MACHINE 00824 M00S00697.1rm +++| LDI T1
| Line S00698 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00825 M01S00698.242l642 ---| SHN 21-13 00826 M01S00699.242l642 ---| MJN CASX IF SUSPEND STATUS SET
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00827 M01S00026.242l642 +++| SHN 0-10 00828 M01S00027.242l642 +++| LMN 3 00829 M01S00028.242l642 +++| ZJN CAS4 IF DEVICE IS DOWN 00830 M00S00700.1rm +++| CAS2 LDD T2 ADVANCE MACHINE MASK AND INDEX 00831 M00S00701.1rm +++| RAD T2 00832 M00S00702.1rm +++| LDN LLLL*5 00833 M00S00703.1rm +++| RAD T1 00834 M00S00704.1rm +++| SOD T3 00835 M00S00705.1rm +++| NJN CAS1 IF MORE MACHINES
| Line S00706 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00836 M01S00706.242l642 ---| LJM CASX RETURN
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 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 M00S00707.1rm +++| CDP SPACE 4,10 00842 M00S00708.1rm +++|** CDP - COMPLETE DEVICE PROCESSING. 00843 M00S00709.1rm +++|*
| Line S00710 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00844 M01S00710.ns22000 ---|* ENTRY (EQ) = EQUIPMENT.
| Line S00041 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00845 M01S00041.ns22000 +++|* ENTRY (EQ) = EST ORDINAL. 00846 M00S00711.1rm +++|* 00847 M00S00712.1rm +++|* CALLS C2D. 00848 M00S00713.1rm +++|* 00849 M00S00714.1rm +++|* MACROS MESG. 00850 M00S00715.1rm +++| 00851 M00S00716.1rm +++| 00852 M00S00717.1rm +++| CDP SUBR ENTRY/EXIT
| Line S00718 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00853 M01S00718.ns22000 ---| LDD EQ 00854 M01S00719.ns22000 ---| RJM C2D 00855 M01S00720.ns22000 ---| STM CDPA+1
| Line S00042 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 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 M00S00721.1rm +++| MESG CDPA 00866 M00S00722.1rm +++| UJN CDPX RETURN 00867 M00S00723.1rm +++|
| Line S00724 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00868 M01S00724.ns22000 ---| CDPA DATA C*EQXX PROCESSING COMPLETE.*
| Line S00051 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00869 M01S00051.ns22000 +++| CDPA DATA C*EQXXX, REDEFINITION COMPLETE.* 00870 M00S00725.1rm +++| CLC SPACE 4,10 00871 M00S00726.1rm +++|** CLC - CHECK FOR LEGAL COMMAND. 00872 M00S00727.1rm +++|* 00873 M00S00728.1rm +++|* ENTRY (A) = COMMAND MASK TO CHECK. 00874 M00S00729.1rm +++|* 00875 M00S00730.1rm +++|* EXIT (A) .NE. 0 IF COMMAND ENTERED. 00876 M00S00731.1rm +++|* LEGAL COMMANDS CLEARED WHEN (A) .NE. 0. 00877 M00S00732.1rm +++|* 00878 M00S00733.1rm +++|* USES CM - CM+4. 00879 M00S00734.1rm +++|* 00880 M00S00735.1rm +++|* MACROS COMMAND, LDBUF, PAUSE. 00881 M00S00736.1rm +++| 00882 M00S00737.1rm +++|
| Line S00738 Modification History | |
|---|---|
M01 (Removed by) | 1rm6 |
Seq # *Modification Id* Act ----------------------------+ 00883 M01S00738.1rm6 ---| .1 OCTMIC .ABORT-1 SET BIT NUMBER MICRO FOR *ABORT*
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 1rm6 |
Seq # *Modification Id* Act ----------------------------+ 00884 M01S00003.1rm6 +++| .1 DECMIC .ABORT-1 SET BIT NUMBER MICRO FOR *ABORT* 00885 M00S00739.1rm +++| CLC1 LDN 1BS".1" ERROR FLAG TREATED AS *ABORT* COMMAND 00886 M00S00740.1rm +++| CLC2 BSS 0 00887 M00S00741.1rm +++| CLCA LPC * 00888 M00S00742.1rm +++| ZJN CLCX IF NO LEGAL COMMAND FOUND 00889 M00S00743.1rm +++| COMMAND CLEAR LEGAL COMMANDS 00890 M00S00744.1rm +++| LDN 1 RETURN STATUS 00891 M00S00745.1rm +++| 00892 M00S00746.1rm +++| CLC SUBR ENTRY/EXIT 00893 M00S00747.1rm +++| STM CLCA+1 SET LEGAL COMMAND MASK 00894 M00S00748.1rm +++| SHN -14 00895 M00S00749.1rm +++| LMC LPCI 00896 M00S00750.1rm +++| STM CLCA 00897 M00S00751.1rm +++| PAUSE CHECK ERROR FLAG 00898 M00S00752.1rm +++| LDD CM+1 00899 M00S00753.1rm +++| SBN ODET 00900 M00S00754.1rm +++| PJN CLC1 IF ERROR FLAG SET 00901 M00S00755.1rm +++| LDBUF TCOM READ LEGAL COMMANDS 00902 M00S00756.1rm +++| CRD CM 00903 M00S00757.1rm +++| LDD CM+3 00904 M00S00758.1rm +++| SHN 14 00905 M00S00759.1rm +++| LMD CM+4 00906 M00S00760.1rm +++| LJM CLC2 RETURN 00907 M00S00761.1rm +++| CNR SPACE 4,10 00908 M00S00762.1rm +++|** CNR - CHECK NOT READY STATUS ON DEVICE. 00909 M00S00763.1rm +++|* 00910 M00S00764.1rm +++|* ENTRY (T6) = TRACK TO READ.
| Line S00765 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00911 M01S00765.ns22000 ---|* (T5) = EQUIPMENT NUMBER.
| Line S00052 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00912 M01S00052.ns22000 +++|* (T5) = EST ORDINAL. 00913 M00S00766.1rm +++|* 00914 M00S00767.1rm +++|* EXIT (A) = 0 IF UNIT HAS NOT READY STATUS. 00915 M00S00768.1rm +++|* .GT. 0 IF UNIT HAS READY STATUS. 00916 M00S00769.1rm +++|* .LT. 0 IF MASS STORAGE READ ERROR. 00917 M00S00770.1rm +++|* 00918 M00S00771.1rm +++|* CALLS RDS. 00919 M00S00772.1rm +++|* 00920 M00S00773.1rm +++|* MACROS ENDMS, SETMS. 00921 M00S00774.1rm +++| 00922 M00S00775.1rm +++| 00923 M00S00776.1rm +++| CNR1 ENDMS 00924 M00S00777.1rm +++| LDN 1 SET READY STATUS 00925 M00S00778.1rm +++| 00926 M00S00779.1rm +++| CNR SUBR ENTRY/EXIT
| Line S00780 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00927 M01S00780.242l642 ---| SETMS READ,NR
| Line S00033 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00928 M01S00033.242l642 +++| SETMS IO,(AD,DF,NR) 00929 M00S00781.1rm +++| LDC BFMS READ SECTOR 00930 M00S00782.1rm +++| RJM RDS 00931 M00S00783.1rm +++| PJN CNR1 IF NO MASS STORAGE ERROR
| Line S00784 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00932 M01S00784.242l642 ---| LDM RDCT CHECK NOT READY STATUS 00933 M01S00785.242l642 ---| LPN 77
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00934 M02S00034.253l688 ---| LPN 17 CHECK NOT READY STATUS
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00935 M01S00001.253l688 +++| LPN 77 CHECK NOT READY STATUS 00936 M00S00786.1rm +++| LMN NRDE 00937 M00S00787.1rm +++| ZJN CNRX IF NOT READY 00938 M00S00788.1rm +++| LCN 1 SET READ ERROR 00939 M00S00789.1rm +++| UJN CNRX RETURN 00940 M00S00790.1rm +++| CSP SPACE 4,10
| Line S00791 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00941 M01S00791.242l642 ---|** CSP - CLEAR REDEFINITION IN PROGRESS BIT.
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00942 M01S00035.242l642 +++|** CSP - CLEAR SUSPEND STATUS. 00943 M00S00792.1rm +++|* 00944 M00S00793.1rm +++|* ENTRY (MS) = MST ADDRESS/10B. 00945 M00S00794.1rm +++|* (SC) = SUSPEND COUNT. 00946 M00S00795.1rm +++|*
| Line S00796 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00947 M01S00796.242l642 ---|* USES SC, T5, CM - CM+4.
| Line S00036 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00948 M01S00036.242l642 +++|* USES SC, T5, CM - CM+7. 00949 M00S00797.1rm +++|*
| Line S00798 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00950 M01S00798.242l642 ---|* MACROS CMSTF.
| Line S00037 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00951 M01S00037.242l642 +++|* MACROS CMSTF, MONITOR. 00952 M00S00799.1rm +++| 00953 M00S00800.1rm +++| 00954 M00S00801.1rm +++| CSP SUBR ENTRY/EXIT
| Line S00802 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00955 M01S00802.242l642 ---| LDD MS READ UNIT LIST WORD 00956 M01S00803.242l642 ---| SHN 3 00957 M01S00804.242l642 ---| ADN DDLL 00958 M01S00805.242l642 ---| CRD CM 00959 M01S00806.242l642 ---| LDD CM 00960 M01S00807.242l642 ---| SHN 21-13 00961 M01S00808.242l642 ---| PJN CSPX IF SUSPEND NOT SET 00962 M01S00809.242l642 ---| LDC -4000 CLEAR BIT 00963 M01S00810.242l642 ---| RAD CM 00964 M01S00811.242l642 ---| LDD MS REWRITE UNIT LIST WORD 00965 M01S00812.242l642 ---| SHN 3 00966 M01S00813.242l642 ---| ADN DDLL 00967 M01S00814.242l642 ---| CWD CM
| Line S00038 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00968 M01S00038.242l642 +++| LDM SCFA 00969 M01S00039.242l642 +++| LPN 77 00970 M01S00040.242l642 +++| ZJN CSP1 IF EQUIPMENT NOT ASSIGNED
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 1rm5 |
Seq # *Modification Id* Act ----------------------------+ 00971 M01S00003.1rm5 +++| SOM SCFA CLEAR ASSIGNMENT FLAG
| Line S00041 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 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 (Removed by) | 1rm5a |
Seq # *Modification Id* Act ----------------------------+ 00979 M02S00004.1rm5a ---| LDD SC
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 1rm5a |
Seq # *Modification Id* Act ----------------------------+ 00980 M01S00001.1rm5a +++| CSP1 LDD SC
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | 1rm5 |
Seq # *Modification Id* Act ----------------------------+ 00981 M01S00005.1rm5 +++| ZJN CSPX IF EQUIPMENTS NOT SUSPENDED
| Line S00048 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | 1rm5a |
Seq # *Modification Id* Act ----------------------------+ 00982 M02S00048.1rm5a ---| CSP1 LDD EQ SET DEVICE STATE = ON
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 1rm5a |
Seq # *Modification Id* Act ----------------------------+ 00983 M01S00002.1rm5a +++| LDD EQ SET DEVICE STATE = ON
| Line S00049 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 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 M00S00815.1rm +++| SOD SC UPDATE SUSPEND COUNT
| Line S00816 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00993 M01S00816.242l642 ---| LDD EQ 00994 M01S00817.242l642 ---| STD T5 00995 M01S00818.242l642 ---| CMSTF LFPR FORCE UPDATE OF LOCAL MST TO ECS 00996 M01S00819.242l642 ---| UJN CSPX RETURN
| Line S00057 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00997 M01S00057.242l642 +++| CSP2 CMSTF LFPR FORCE UPDATE OF LOCAL MST TO ECS 00998 M01S00058.242l642 +++| UJP CSPX RETURN 00999 M00S00820.1rm +++| C3D SPACE 4,10 01000 M00S00821.1rm +++|** C3D - CONVERT THREE DIGITS OF DECIMAL DISPLAY CODE. 01001 M00S00822.1rm +++|* 01002 M00S00823.1rm +++|* ENTRY (A) = NUMBER TO CONVERT. 01003 M00S00824.1rm +++|* 01004 M00S00825.1rm +++|* EXIT (A) = THREE DISPLAY CODE DIGITS. 01005 M00S00826.1rm +++|* (A) = 999 IN DISPLAY CODE IF .GT. THREE DIGITS. 01006 M00S00827.1rm +++|* 01007 M00S00828.1rm +++|* USES CM - CM+4. 01008 M00S00829.1rm +++| 01009 M00S00830.1rm +++| 01010 M00S00831.1rm +++| C3D3 LDC 3R999 01011 M00S00832.1rm +++| 01012 M00S00833.1rm +++| C3D SUBR ENTRY/EXIT 01013 M00S00834.1rm +++| STD CM+3 01014 M00S00835.1rm +++| ADC -999D 01015 M00S00836.1rm +++| PJN C3D3 IF .GE. 999 01016 M00S00837.1rm +++| LDN 2 PRESET DIVISION 01017 M00S00838.1rm +++| STD CM+4 01018 M00S00839.1rm +++| LDN 0 01019 M00S00840.1rm +++| STD CM 01020 M00S00841.1rm +++| STD CM+1 01021 M00S00842.1rm +++| STD CM+2 01022 M00S00843.1rm +++| C3D1 LDD CM+3 01023 M00S00844.1rm +++| SBM C3DA,CM+4 01024 M00S00845.1rm +++| MJN C3D2 IF NEXT DECIMAL PLACE 01025 M00S00846.1rm +++| STD CM+3 01026 M00S00847.1rm +++| AOM CM,CM+4 01027 M00S00848.1rm +++| UJN C3D1 CONTINUE DIVISION 01028 M00S00849.1rm +++| 01029 M00S00850.1rm +++| C3D2 SOD CM+4 01030 M00S00851.1rm +++| PJN C3D1 IF NOT COMPLETE 01031 M00S00852.1rm +++| LDD CM+2 ASSEMBLE DIGITS 01032 M00S00853.1rm +++| SHN 6 01033 M00S00854.1rm +++| ADD CM+1 01034 M00S00855.1rm +++| SHN 6 01035 M00S00856.1rm +++| ADD CM 01036 M00S00857.1rm +++| ADC 3R000 01037 M00S00858.1rm +++| UJN C3DX RETURN 01038 M00S00859.1rm +++| 01039 M00S00860.1rm +++| C3DA CON 1,10D,100D DIVISION TABLE 01040 M00S00861.1rm +++| DOS SPACE 4,20 01041 M00S00862.1rm +++|** DOS - DELAY APPROXIMATELY ONE SECOND. 01042 M00S00863.1rm +++|* 01043 M00S00864.1rm +++|* THE PURPOSE OF THIS ROUTINE IS TO AVOID CHECKING THE DEVICE 01044 M00S00865.1rm +++|* TOO OFTEN. THE TIME INTERVAL IS NOT REALLY IMPORTANT. 01045 M00S00866.1rm +++|* 01046 M00S00867.1rm +++|* USES T1, T2. 01047 M00S00868.1rm +++|* 01048 M00S00869.1rm +++|* MACROS DELAY, PAUSE. 01049 M00S00870.1rm +++| 01050 M00S00871.1rm +++| 01051 M00S00872.1rm +++| DOS SUBR ENTRY/EXIT 01052 M00S00873.1rm +++| LDN 40D SET DELAY INCREMENT PARAMETERS 01053 M00S00874.1rm +++| STD T2 01054 M00S00875.1rm +++| DOS1 LDC 100D 01055 M00S00876.1rm +++| STD T1 01056 M00S00877.1rm +++| DOS2 DELAY 01057 M00S00878.1rm +++| PAUSE NE 01058 M00S00879.1rm +++| SOD T1 01059 M00S00880.1rm +++| NJN DOS2 IF NOT END OF INNER INCREMENT 01060 M00S00881.1rm +++| SOD T2 01061 M00S00882.1rm +++| NJN DOS1 IF NOT END OF DELAY 01062 M00S00883.1rm +++| UJN DOSX RETURN
| Line S00038 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
Seq # *Modification Id* Act ----------------------------+ 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 (Removed by) | ns2104b |
Seq # *Modification Id* Act ----------------------------+ 01091 M02S00066.ns2104b ---| LMN /DSL/FTBC 01092 M02S00067.ns2104b ---| ZJN GCIX IF FULL-TRACK CONTROLLER CHANNEL 01093 M02S00068.ns2104b ---| LMN /DSL/FMBC&/DSL/FTBC
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2104b |
Seq # *Modification Id* Act ----------------------------+ 01094 M01S00001.ns2104b +++| LMN /DSL/FTCW 01095 M01S00002.ns2104b +++| ZJN GCIX IF FULL TRACK CONTROLWARE CHANNEL 01096 M01S00003.ns2104b +++| LMN /DSL/FMCW&/DSL/FTCW
| Line S00069 Modification History | |
|---|---|
M01 (Added by) | 1rm1 |
Seq # *Modification Id* Act ----------------------------+ 01097 M01S00069.1rm1 +++| UJN GCIX RETURN 01098 M00S00884.1rm +++| KMS SPACE 4,10 01099 M00S00885.1rm +++|** KMS - SEND MESSAGE TO K-DISPLAY. 01100 M00S00886.1rm +++|* 01101 M00S00887.1rm +++|* ENTRY (A) = MESSAGE ADDRESS. 01102 M00S00888.1rm +++|* 01103 M00S00889.1rm +++|* USES T1 - T2. 01104 M00S00890.1rm +++|* 01105 M00S00891.1rm +++|* MACROS DELAY, PAUSE. 01106 M00S00892.1rm +++| 01107 M00S00893.1rm +++| 01108 M00S00894.1rm +++| KMS SUBR ENTRY/EXIT 01109 M00S00895.1rm +++| STD T1 01110 M00S00896.1rm +++| LDN 0 01111 M00S00897.1rm +++| STD T2 01112 M00S00898.1rm +++| KMS1 LDI T1 MOVE MESSAGE TO BUFFER 01113 M00S00899.1rm +++| ZJN KMS2 IF END OF MESSAGE 01114 M00S00900.1rm +++| STM KMSA,T2 01115 M00S00901.1rm +++| AOD T1 01116 M00S00902.1rm +++| AOD T2 01117 M00S00903.1rm +++| LMN 60D/2 01118 M00S00904.1rm +++| NJN KMS1 IF NOT END OF LINE 01119 M00S00905.1rm +++| KMS2 LDC 2R BLANK FILL MESSAGE 01120 M00S00906.1rm +++| STM KMSA,T2 01121 M00S00907.1rm +++| AOD T2 01122 M00S00908.1rm +++| SBN 60D/2 01123 M00S00909.1rm +++| MJN KMS2 IF NOT END OF LINE 01124 M00S00910.1rm +++| LDN 6 01125 M00S00911.1rm +++| STD T1 01126 M00S00912.1rm +++| LDD IR+3 WRITE MESSAGE TO K-DISPLAY 01127 M00S00913.1rm +++| SCN 77 01128 M00S00914.1rm +++| SHN 6 01129 M00S00915.1rm +++| ADD IR+2 01130 M00S00916.1rm +++| ADD RA 01131 M00S00917.1rm +++| SHN 6 01132 M00S00918.1rm +++| CWM KMSA,T1 01133 M00S00919.1rm +++| KMS3 DELAY PAUSE FOR MESSAGE TO BE SEEN 01134 M00S00920.1rm +++| PAUSE NE 01135 M00S00921.1rm +++| SOD T2 01136 M00S00922.1rm +++| PJN KMS3 IF MORE DELAY 01137 M00S00923.1rm +++| LJM KMSX RETURN 01138 M00S00924.1rm +++| 01139 M00S00925.1rm +++| KMSA BSS 60D/2+1 01140 M00S00926.1rm +++| LDB SPACE 4,10 01141 M00S00927.1rm +++|** LDB - LOAD CALL BLOCK BUFFER ADDRESS. 01142 M00S00928.1rm +++|* 01143 M00S00929.1rm +++|* EXIT (A) = ABSOLUTE ADDRESS OF CALL BLOCK. 01144 M00S00930.1rm +++| 01145 M00S00931.1rm +++| 01146 M00S00932.1rm +++| LDB SUBR ENTRY/EXIT 01147 M00S00933.1rm +++| LDD IR+3 GET CALL BLOCK ADDRESS FROM *IR* 01148 M00S00934.1rm +++| LPN 77 01149 M00S00935.1rm +++| SHN 6 01150 M00S00936.1rm +++| ADD RA 01151 M00S00937.1rm +++| SHN 6 01152 M00S00938.1rm +++| ADD IR+4 01153 M00S00939.1rm +++| UJN LDBX RETURN 01154 M00S00940.1rm +++| PSA SPACE 4,10 01155 M00S00941.1rm +++|** PSA - PROCESS SERVO ADJUSTMENT. 01156 M00S00942.1rm +++|* 01157 M00S00943.1rm +++|* ENTRY (T5) = 0. 01158 M00S00944.1rm +++|* (T6) = LABEL TRACK. 01159 M00S00945.1rm +++|* (T7) = CURRENT SECTOR. 01160 M00S00946.1rm +++|* 01161 M00S00947.1rm +++|* EXIT (A) .NE. 0 IF *ABORT*. 01162 M00S00948.1rm +++|* 01163 M00S00949.1rm +++|* USES CN - CN+1, T6 - T7. 01164 M00S00950.1rm +++|* 01165 M00S00951.1rm +++|* CALLS C3D, SPU, WFC. 01166 M00S00952.1rm +++|* 01167 M00S00953.1rm +++|* MACROS COMMAND, EXECUTE, MESG, SETMS. 01168 M00S00954.1rm +++| 01169 M00S00955.1rm +++| 01170 M00S00956.1rm +++| PSA9 LDN 0 RETURN STATUS 01171 M00S00957.1rm +++| 01172 M00S00958.1rm +++| PSA SUBR ENTRY/EXIT
| Line S00959 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01173 M01S00959.242l642 ---| SETMS
| Line S00059 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01174 M01S00059.242l642 +++| SETMS STATUS 01175 M00S00960.1rm +++| LDD CM+3 01176 M00S00961.1rm +++| LPC 3777 01177 M00S00962.1rm +++| LMC 2RDM 01178 M00S00963.1rm +++| ZJN PSA1 IF 885 01179 M00S00964.1rm +++| LMN 2RDQ&2RDM 01180 M00S00965.1rm +++| NJN PSA9 IF NOT 885 01181 M00S00966.1rm +++| PSA1 LDD T7 SAVE LOGICAL SECTOR NUMBER 01182 M00S00967.1rm +++| STD CN 01183 M00S00968.1rm +++| LDD RM SET UNIT IN MESSAGES 01184 M00S00969.1rm +++| RJM SPU 01185 M00S00970.1rm +++| STM PSAB+24 01186 M00S00971.1rm +++| STM PSAC+3 01187 M00S00972.1rm +++| STM PSAD+3 01188 M00S00973.1rm +++| PSA2 MESG PSAD * UNIT XX SERVO TIMING IN PROGRESS.*
| Line S00974 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01189 M01S00974.ns22000 ---| LDC 2000 SET *0PI* FUNCTION
| Line S00053 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01190 M01S00053.ns22000 +++| LDN 0 SET *0SI* FUNCTION 01191 M00S00975.1rm +++| STM OVLA
| Line S00976 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01192 M01S00976.ns22000 ---| EXECUTE 0PI,OVLA+1
| Line S00054 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01193 M01S00054.ns22000 +++| EXECUTE 0SI,OVLA+1 01194 M00S00977.1rm +++| STM PSAA SET PROCESSOR ADDRESS 01195 M00S00978.1rm +++| LDN 0 SET TRACK TO ZERO 01196 M00S00979.1rm +++| STD T6 01197 M00S00980.1rm +++| LDD CN RESTORE SECTOR NUMBER 01198 M00S00981.1rm +++| STD T7 01199 M00S00982.1rm +++| RJM * PERFORM SERVO CHECK 01200 M00S00983.1rm +++| PSAA EQU *-1 01201 M00S00984.1rm +++| MJN PSA4 IF SERVO CHECK UNSUCCESSFUL 01202 M00S00985.1rm +++| STD CN+1 SAVE TIME 01203 M00S00986.1rm +++| NJN PSA3 IF NOT OUT OF RANGE 01204 M00S00987.1rm +++| LDC 999D SET OUT OF RANGE 01205 M00S00988.1rm +++| PSA3 RJM C3D CONVERT THREE DIGITS TO DECIMAL DISPLAY 01206 M00S00989.1rm +++| STM PSAC+14 01207 M00S00990.1rm +++| SHN -14 01208 M00S00991.1rm +++| LMC 2L 01209 M00S00992.1rm +++| STM PSAC+13 01210 M00S00993.1rm +++| LDD CN+1 01211 M00S00994.1rm +++| ADC -325D 01212 M00S00995.1rm +++| MJN PSA5 IF OUT OF RANGE
| Line S00996 Modification History | |
|---|---|
M01 (Removed by) | 1rm4 |
Seq # *Modification Id* Act ----------------------------+ 01213 M01S00996.1rm4 ---| SBN 346D-335D
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 1rm4 |
Seq # *Modification Id* Act ----------------------------+ 01214 M01S00001.1rm4 +++| SBN 346D-325D 01215 M00S00997.1rm +++| PJN PSA5 IF OUT OF RANGE 01216 M00S00998.1rm +++| COMMAND (ABORT,NEXT,RECHECK) ENABLE COMMANDS 01217 M00S00999.1rm +++| UJN PSA6 SET MESSAGE 01218 M00S01000.1rm +++| 01219 M00S01001.1rm +++| PSA4 COMMAND (ABORT,IGNORE,RECHECK) ENABLE COMMANDS 01220 M00S01002.1rm +++| MESG PSAB SET ERROR MESSAGE 01221 M00S01003.1rm +++| UJN PSA7 WAIT FOR COMMAND 01222 M00S01004.1rm +++| 01223 M00S01005.1rm +++| PSA5 COMMAND (ABORT,IGNORE,RECHECK) ENABLE COMMANDS 01224 M00S01006.1rm +++| PSA6 MESG PSAC SET TIMING DATA MESSAGE 01225 M00S01007.1rm +++| PSA7 LDD LT RESET TO LABEL TRACK 01226 M00S01008.1rm +++| STD T6 01227 M00S01009.1rm +++| RJM WFC WAIT FOR COMMAND 01228 M00S01010.1rm +++| PJN PSA8 IF NOT *RECHECK* 01229 M00S01011.1rm +++| LJM PSA2 RECHECK SERVO TIMING 01230 M00S01012.1rm +++| 01231 M00S01013.1rm +++| PSA8 LJM PSAX RETURN WITH STATUS 01232 M00S01014.1rm +++| 01233 M00S01015.1rm +++| PSAB DATA C* ERROR IN PERFORMING SERVO CHECK ON UNITXX.* 01234 M00S01016.1rm +++| PSAC DATA C* UNIT XX SERVO TIMING= XXX. ACCEPTABLE RANGE IS 325 01235 M00S01017.1rm +++|,TO 345.* 01236 M00S01018.1rm +++| PSAD DATA C* UNIT XX SERVO TIMING IN PROGRESS.* 01237 M00S01019.1rm +++| PUE SPACE 4,10 01238 M00S01020.1rm +++|** PUE - PROCESS UNIT ERROR. 01239 M00S01021.1rm +++|* 01240 M00S01022.1rm +++|* ENTRY (A) = ERROR MESSAGE ADDRESS. 01241 M00S01023.1rm +++|* (CH) = CHANNEL. 01242 M00S01024.1rm +++|* 01243 M00S01025.1rm +++|* EXIT (A) .LT. 0 IF *RECHECK* COMMAND ENTERED. 01244 M00S01026.1rm +++|* (A) = 0 IF *IGNORE* OR *NEXT* COMMAND ENTERED. 01245 M00S01027.1rm +++|* (A) .GT. 0 IF *ABORT* COMMAND ENTERED. 01246 M00S01028.1rm +++|* 01247 M00S01029.1rm +++|* USES T1. 01248 M00S01030.1rm +++|* 01249 M00S01031.1rm +++|* CALLS C2D, SPU, WFC. 01250 M00S01032.1rm +++|* 01251 M00S01033.1rm +++|* MACROS COMMAND, MESG. 01252 M00S01034.1rm +++| 01253 M00S01035.1rm +++| 01254 M00S01036.1rm +++| PUE SUBR ENTRY/EXIT 01255 M00S01037.1rm +++| STD T1 01256 M00S01038.1rm +++| LDD RM SET UNIT AND CHANNEL IN MESSAGE 01257 M00S01039.1rm +++| RJM SPU 01258 M00S01040.1rm +++| STM 3,T1 01259 M00S01041.1rm +++| LDD CH 01260 M00S01042.1rm +++| RJM C2D 01261 M00S01043.1rm +++| STM 6,T1 01262 M00S01044.1rm +++| COMMAND (ABORT,IGNORE,RECHECK) 01263 M00S01045.1rm +++| LDD T1 01264 M00S01046.1rm +++| MESG * 01265 M00S01047.1rm +++| RJM WFC WAIT FOR COMMAND 01266 M00S01048.1rm +++| LJM PUEX RETURN 01267 M00S01049.1rm +++| RDE SPACE 4,20
| Line S01050 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01268 M01S01050.v23l617 ---|** RDE - READ DAT ENTRY FROM ECS.
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01269 M01S00006.v23l617 +++|** RDE - READ DAT ENTRY FROM EXTENDED MEMORY. 01270 M00S01051.1rm +++|* 01271 M00S01052.1rm +++|* ENTRY (MF) = LINK EQUIPMENT. 01272 M00S01053.1rm +++|* (DI) = DAT INDEX. 01273 M00S01054.1rm +++|* 01274 M00S01055.1rm +++|* EXIT (A) .NE. 0 IF *ABORT*. 01275 M00S01056.1rm +++|* (TDAT) = DAT ENTRY. 01276 M00S01057.1rm +++|* (BFMS) = DAT TRACK FOR THIS EQUIPMENT. 01277 M00S01058.1rm +++|* 01278 M00S01059.1rm +++|* USES T3, CM - CM+4, T5 - T7. 01279 M00S01060.1rm +++|* 01280 M00S01061.1rm +++|* CALLS RDS. 01281 M00S01062.1rm +++|* 01282 M00S01063.1rm +++|* MACROS COMMAND, ENDMS, IFCOM, MESG, SETMS. 01283 M00S01064.1rm +++| 01284 M00S01065.1rm +++| 01285 M00S01066.1rm +++| RDE SUBR ENTRY/EXIT 01286 M00S01067.1rm +++| LDD MF SET LINK EQUIPMENT 01287 M00S01068.1rm +++| STD T5
| Line S01069 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01288 M01S01069.242l642 ---| SETMS READ,NR
| Line S00060 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01289 M01S00060.242l642 +++| SETMS IO,(NR,DF) 01290 M00S01070.1rm +++| 01291 M00S01071.1rm +++|* SET POINTERS TO READ DAT. 01292 M00S01072.1rm +++| 01293 M00S01073.1rm +++| LDD CM+4 GET DAT POINTER 01294 M00S01074.1rm +++| SHN 3 01295 M00S01075.1rm +++| ADN ALGL 01296 M00S01076.1rm +++| CRD CM 01297 M00S01077.1rm +++| LDD CM+4 SET DAT TRACK 01298 M00S01078.1rm +++| STD T6 01299 M00S01079.1rm +++| LDD DI SET DAT SECTOR 01300 M00S01080.1rm +++| SHN 21-4 01301 M00S01081.1rm +++| STD T7 01302 M00S01082.1rm +++| SHN -14 SET DAT SECTOR INDEX 01303 M00S01083.1rm +++| STD T3 01304 M00S01084.1rm +++| SHN 2 SET INDEX * 5 01305 M00S01085.1rm +++| RAD T3 01306 M00S01086.1rm +++| 01307 M00S01087.1rm +++|* READ DAT. 01308 M00S01088.1rm +++| 01309 M00S01089.1rm +++| LDC BFMS READ SECTOR 01310 M00S01090.1rm +++| RJM RDS 01311 M00S01091.1rm +++| PJN RDE2 IF NO ERROR 01312 M00S01092.1rm +++| MESG RDEA ERROR ON LINK DEVICE 01313 M00S01093.1rm +++| COMMAND (ABORT,IGNORE) SET LEGAL COMMANDS 01314 M00S01094.1rm +++| RDE1 IFCOM IGNORE,RDE2 IF *IGNORE* 01315 M00S01095.1rm +++| IFCOM ABORT,RDEX IF *ABORT* 01316 M00S01096.1rm +++| UJN RDE1 RECHECK COMMAND ENTRY 01317 M00S01097.1rm +++| 01318 M00S01098.1rm +++| RDE2 LDN 0 INITIALIZE BUFFER INDEX 01319 M00S01099.1rm +++| STD CM 01320 M00S01100.1rm +++| RDE3 LDM BFMS+2,T3 01321 M00S01101.1rm +++| STM TDAT,CM 01322 M00S01102.1rm +++| AOD T3 ADVANCE POINTERS 01323 M00S01103.1rm +++| AOD CM 01324 M00S01104.1rm +++| LMN 5*2 01325 M00S01105.1rm +++| NJN RDE3 IF TWO WORDS NOT MOVED 01326 M00S01106.1rm +++| LDM TDAT+4 SET DAT TRACK FOR THIS EQUIPMENT 01327 M00S01107.1rm +++| STD T6 01328 M00S01108.1rm +++| LDN 0 01329 M00S01109.1rm +++| STD T7 01330 M00S01110.1rm +++| LDC BFMS READ DAT TRACK 01331 M00S01111.1rm +++| RJM RDS 01332 M00S01112.1rm +++| PJN RDE5 IF NO ERROR 01333 M00S01113.1rm +++| MESG RDEA ERROR ON LINK DEVICE 01334 M00S01114.1rm +++| COMMAND (ABORT,IGNORE) SET LEGAL COMMANDS 01335 M00S01115.1rm +++| RDE4 IFCOM IGNORE,RDE5 IF *IGNORE* 01336 M00S01116.1rm +++| IFCOM ABORT,RDEX IF *ABORT* 01337 M00S01117.1rm +++| UJN RDE4 RECHECK COMMAND ENTRY 01338 M00S01118.1rm +++| 01339 M00S01119.1rm +++| RDE5 ENDMS 01340 M00S01120.1rm +++| LJM RDEX RETURN 01341 M00S01121.1rm +++| 01342 M00S01122.1rm +++| RDEA DATA C*ERROR ON LINK DEVICE.* 01343 M00S01123.1rm +++| RRD SPACE 4,10 01344 M00S01124.1rm +++|** RRD - RESET *RD* DEVICE FIELDS. 01345 M00S01125.1rm +++|* 01346 M00S01126.1rm +++|* ENTRY (RM) = MST ADDRESS/10B OF *RD* DEVICE.
| Line S00061 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01347 M01S00061.242l642 +++|* (EQ) = ORIGINAL EST ORDINAL. 01348 M00S01127.1rm +++|*
| Line S01128 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01349 M01S01128.252l678 ---|* USES CM - CM+4.
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01350 M01S00014.252l678 +++|* USES CM - CM+4, CN - CN+4. 01351 M00S01129.1rm +++|* 01352 M00S01130.1rm +++|* CALLS SCH. 01353 M00S01131.1rm +++|* 01354 M00S01132.1rm +++|* MACROS MONITOR. 01355 M00S01133.1rm +++| 01356 M00S01134.1rm +++| 01357 M00S01135.1rm +++| RRD SUBR ENTRY/EXIT
| Line S01136 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01358 M01S01136.242l642 ---| 01359 M01S01137.242l642 ---|* RESET EST FIELDS.
| Line S00062 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | 1rm5 |
Seq # *Modification Id* Act ----------------------------+ 01360 M02S00062.1rm5 ---| LDM SCFA 01361 M02S00063.1rm5 ---| LPN 77
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | 1rm5 |
Seq # *Modification Id* Act ----------------------------+ 01362 M01S00006.1rm5 +++| LDM SCFB
| Line S00064 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01363 M01S00064.242l642 +++| ZJN RRDX IF *RD* DOES NOT NEED TO BE RESET 01364 M01S00065.242l642 +++| 01365 M01S00066.242l642 +++|* RESET EST/MST FIELDS. 01366 M00S01138.1rm +++| 01367 M00S01139.1rm +++| LDN ZERL CLEAR CHANNELS 01368 M00S01140.1rm +++| CRD CM 01369 M00S01141.1rm +++| LDD RM CLEAR MST WORDS 01370 M00S01142.1rm +++| SHN 3 01371 M00S01143.1rm +++| ADN MDGL 01372 M00S01144.1rm +++| CWD CM 01373 M00S01145.1rm +++| ADN DILL-MDGL 01374 M00S01146.1rm +++| CWD CM 01375 M00S01147.1rm +++| ADN DDLL-DILL 01376 M00S01148.1rm +++| CWD CM
| Line S01149 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01377 M01S01149.252l678 ---| LDN 37 CLEAR CHANNELS
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01378 M01S00015.252l678 +++| LDN ZERL CLEAR CHANNELS 01379 M01S00016.252l678 +++| CRD CN 01380 M01S00017.252l678 +++| LDN 0 01381 M00S01150.1rm +++| RJM SCH 01382 M00S01151.1rm +++| LDC 2RRD RESET *RD* EQUIPMENT TYPE 01383 M00S01152.1rm +++| STD CM+3 01384 M00S01153.1rm +++| LDN SMNS SET MNEMONIC 01385 M00S01154.1rm +++| STD CM+2 01386 M00S01155.1rm +++| MONITOR SEQM
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | 1rm5 |
Seq # *Modification Id* Act ----------------------------+ 01387 M01S00007.1rm5 +++|* LDN 0 01388 M01S00008.1rm5 +++| STM SCFB CLEAR *RD* ALTERED FLAG 01389 M00S01156.1rm +++| LJM RRDX RETURN 01390 M00S01157.1rm +++| SCF SPACE 4,20 01391 M00S01158.1rm +++|** SCF - SET COMMON *RD* DEVICE FIELDS. 01392 M00S01159.1rm +++|* 01393 M00S01160.1rm +++|* ENTRY (CN - CN+4) = EST ENTRY. 01394 M00S01161.1rm +++|* (BFMS) = MST ENTRY.
| Line S00067 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01395 M01S00067.242l642 +++|* (EQ) = ORIGINAL EST ORDINAL. 01396 M00S01162.1rm +++|*
| Line S01163 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01397 M01S01163.242l642 ---|* EXIT (T5) = 0.
| Line S00068 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01398 M01S00068.242l642 +++|* EXIT (A) .NE. 0 IF AN ERROR FLAG IS SET IN THE CPA. 01399 M01S00069.242l642 +++|* (T5) = 0. 01400 M00S01164.1rm +++|* (T6) = LABEL TRACK. 01401 M00S01165.1rm +++|* (T7) = 0. 01402 M00S01166.1rm +++|* (LU) = 0.
| Line S01167 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01403 M01S01167.242l642 ---|* SETMS READ,NR EXECUTED. 01404 M00S01168.1rm +++|*
| Line S01169 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01405 M01S01169.242l642 ---|* USES LU, CM+2 - CM+4, T5 - T7.
| Line S00070 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01406 M01S00070.242l642 +++|* USES T5, T7 - CM+3. 01407 M00S01170.1rm +++|* 01408 M00S01171.1rm +++|* CALLS SCH. 01409 M00S01172.1rm +++|*
| Line S01173 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01410 M01S01173.242l642 ---|* MACROS MONITOR, SETMS.
| Line S00071 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01411 M01S00071.242l642 +++|* MACROS DELAY, MONITOR, PAUSE. 01412 M00S01174.1rm +++| 01413 M00S01175.1rm +++| 01414 M00S01176.1rm +++| SCF SUBR ENTRY/EXIT
| Line S01177 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01415 M01S01177.242l642 ---| LDM BFMS+DDLL*5 CLEAR SUSPEND BIT 01416 M01S01178.242l642 ---| LPC 3777 01417 M01S01179.242l642 ---| STM BFMS+DDLL*5 01418 M01S01180.242l642 ---| LDN 0 CLEAR DEVICE ACTIVITY
| Line S00072 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01419 M01S00072.242l642 +++| SCFA LDN 0 01420 M01S00073.242l642 +++|* LDN 1 (ON SECOND CALL)
| Line S00074 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | 1rm5 |
Seq # *Modification Id* Act ----------------------------+ 01421 M02S00074.1rm5 ---| NJP SCF2 IF DEVICE ALREADY RESERVED
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | 1rm5 |
Seq # *Modification Id* Act ----------------------------+ 01422 M01S00009.1rm5 +++| NJP SCF2 IF DEVICE ALREADY ASSIGNED
| Line S00075 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01423 M01S00075.242l642 +++| LDD CP 01424 M01S00076.242l642 +++| ADK TERW 01425 M01S00077.242l642 +++| CRD T7 01426 M01S00078.242l642 +++| LDD EQ SET ORIGINAL EST ORDINAL 01427 M01S00079.242l642 +++| STD T5 01428 M01S00080.242l642 +++| SCF1 DELAY 01429 M01S00081.242l642 +++| PAUSE 01430 M01S00082.242l642 +++| LDD CM+1 01431 M01S00083.242l642 +++| NJN SCFX IF ERROR FLAG IS SET 01432 M01S00084.242l642 +++| LDD T5 SET EST ORDINAL 01433 M01S00085.242l642 +++| LMC 4000 01434 M01S00086.242l642 +++| STD CM+1 01435 M01S00087.242l642 +++| LDK RVES 01436 M01S00088.242l642 +++| STD CM+2 01437 M01S00089.242l642 +++| LDD T7 SPECIFY EJT ORDINAL 01438 M01S00090.242l642 +++| STD CM+3 01439 M01S00091.242l642 +++| MONITOR REQM 01440 M01S00092.242l642 +++| LDD CM+1 01441 M01S00093.242l642 +++| ZJN SCF1 IF EQUIPMENT NOT ASSIGNED 01442 M01S00094.242l642 +++| AOM SCFA INDICATE ASSIGNED EQUIPMENT 01443 M01S00095.242l642 +++| SCF2 LDN 0 CLEAR DEVICE ACTIVITY/SET STATE = ON 01444 M00S01181.1rm +++| STM BFMS+DALL*5 01445 M00S01182.1rm +++| STM BFMS+DALL*5+1 01446 M00S01183.1rm +++| LDD RM SET PARAMETERS IN *RD* DEVICE 01447 M00S01184.1rm +++| SHN 3 01448 M00S01185.1rm +++| ADN MDGL 01449 M00S01186.1rm +++| CWM BFMS+MDGL*5,ON 01450 M00S01187.1rm +++| ADN DILL-MDGL-1 01451 M00S01188.1rm +++| CWM BFMS+DILL*5,ON 01452 M00S01189.1rm +++| ADN DDLL-DILL-1 01453 M00S01190.1rm +++| CWM BFMS+DDLL*5,ON
| Line S01191 Modification History | |
|---|---|
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01454 M01S01191.252l678 ---| LDD CN+1 SET CHANNELS
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01455 M01S00018.252l678 +++| LDN 0 SET CHANNELS 01456 M00S01192.1rm +++| RJM SCH
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01457 M01S00019.252l678 +++| LDN 0 01458 M01S00020.252l678 +++| STD CM+1 01459 M00S01193.1rm +++| LDD CN+3 SET EQUIPMENT TYPE IN EQUIPMENT 0 01460 M00S01194.1rm +++| STD CM+3 01461 M00S01195.1rm +++| LDN SMNS SET MNEMONIC 01462 M00S01196.1rm +++| STD CM+2 01463 M00S01197.1rm +++| MONITOR SEQM
| Line S00096 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01464 M02S00096.252l678 ---|* LDN 0
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01465 M01S00021.252l678 +++| SFA EST,EQ 01466 M01S00022.252l678 +++| ADN EQAE 01467 M01S00023.252l678 +++| CRD CM 01468 M01S00024.252l678 +++| LDD CM+2 SET INSTRUCTION PLUG FOR DRIVER 01469 M01S00025.252l678 +++| STM SCFC+4 01470 M01S00026.252l678 +++| LDN 1 01471 M01S00027.252l678 +++| STD CM+1 01472 M01S00028.252l678 +++| LDD MA 01473 M01S00029.252l678 +++| CWM SCFC,ON 01474 M01S00030.252l678 +++| LDN 0 SET ADDRESS FOR *RD* DEVICE 01475 M01S00031.252l678 +++| SFA EST 01476 M01S00032.252l678 +++| STD CM+4 01477 M01S00033.252l678 +++| SHN -14
| Line S00097 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 01478 M01S00097.242l642 +++| STD CM+3
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 1rm2 |
M02 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01479 M02S00001.252l678 ---| LDD CN+2 SET INSTRUCTION PLUG FOR DRIVER 01480 M02S00002.252l678 ---| STD CM+4
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 1rm2 |
M02 (Removed by) | 1rm2a |
M03 (Removed by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01481 M03S00003.252l678 ---| LCN 0
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/1rm.txt · Last modified: by 127.0.0.1