cdc:nos2.source:opl.opl871:deck:1mb
Deck 1MB
13 Modifications
Listing Sections
- Deck 1MB Start
- Deck 1MB Part 1 (Line 1614)
- Deck 1MB Part 2 (Line 3342)
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M01S00001.1mb +++| IDENT 1MB,/1MB/MEP 00002 M01S00002.1mb +++| PERIPH 00003 M01S00003.1mb +++| BASE MIXED 00004 M01S00004.1mb +++| SST SSCP 00005 M01S00005.1mb +++|*COMMENT 1MB - HARDWARE ERROR PROCESSOR.
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00006 M02S00006.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1984. 00007 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00008 M01S00007.1mb +++| TITLE 1MB - HARDWARE ERROR PROCESSOR. 00009 M01S00008.1mb +++| SPACE 4,10 00010 M01S00009.1mb +++|*** 1MB - HARDWARE ERROR PROCESSOR. 00011 M01S00010.1mb +++|* J. D. LANGE. 74/05/10. 00012 M01S00011.1mb +++|* C. R. LUND. 80/01/07. 00013 M01S00012.1mb +++|* P. J. ENGLE. 84/09/10. 00014 M01S00013.1mb +++|* M. S. PESCHMAN 85/07/24. 00015 M01S00014.1mb +++| SPACE 4,30 00016 M01S00015.1mb +++|*** EITHER *1MB* OR *1SC* IS CALLED BY THE SYSTEM MONITOR 00017 M01S00016.1mb +++|* TO PERFORM FUNCTIONS WHICH CAN NOT BE PROCESSED BY THE 00018 M01S00017.1mb +++|* MONITOR. 00019 M01S00018.1mb +++|* FOR MAINFRAMES WITH MAINTENANCE REGISTERS, ERRORS ARE 00020 M01S00019.1mb +++|* PROCESSED BY *1MB* IN ROUTINE *MEP*. CORRECTED MEMORY 00021 M01S00020.1mb +++|* ERRORS ARE HANDLED COMPLETELY BY *1MB* WHO BUILDS THE TABLE 00022 M01S00021.1mb +++|* OF UNIQUE ID-S AS IS DONE FOR SECDED ERRORS. 00023 M01S00022.1mb +++|* *1SC* PERFORMS SCR PROCESSING ON FATAL SCR ERRORS 00024 M01S00023.1mb +++|* AND ON UNIQUE SECDED ERRORS ONLY. *1SC* FIRST CHECKS FOR 00025 M01S00024.1mb +++|* FATAL ERRORS, AND (IF NONE HAVE OCCURRED) THEN INCREMENTS 00026 M01S00025.1mb +++|* THE APPROPRIATE COUNTER IN CM WORD *SCRL* FOR UNIQUE 00027 M01S00026.1mb +++|* SECDED ERRORS, CLEARS THE ERROR BIT IN THE SCR, AND DROPS 00028 M01S00027.1mb +++|* THE PP. IF MONITOR HAS DETERMINED THAT A SECDED ERROR 00029 M01S00028.1mb +++|* WAS NOT UNIQUE (I.E. - THE ERROR WAS CAUSED BY THE SAME 00030 M01S00029.1mb +++|* MEMORY LOCATION PREVIOUSLY THAT HOUR), MONITOR WILL 00031 M01S00030.1mb +++|* INCREMENT THE APPROPRIATE COUNTERS IF THOSE COUNTERS HAVE 00032 M01S00031.1mb +++|* NOT EXCEEDED THEIR THRESHOLDS. WHEN MONITOR HAS 00033 M01S00032.1mb +++|* FINISHED PROCESSING NON-UNIQUE ERRORS, IT WILL CLEAR 00034 M01S00033.1mb +++|* THE SECDED ERROR BIT AND CONTINUE IN ITS PROCESSING LOOP. 00035 M01S00034.1mb +++|* IN A SYSTEM EXPERIENCING FREQUENT SINGLE BIT SECDED 00036 M01S00035.1mb +++|* ERRORS, THIS PROCESS OF CHECKING FOR ERROR UNIQUENESS IN 00037 M01S00036.1mb +++|* MONITOR WILL REDUCE THE NUMBER OF CALLS TO *1SC* TO A 00038 M01S00037.1mb +++|* MAXIMUM OF *UIDL* PER HOUR (SEE *COMSSCR*). 00039 M01S00038.1mb +++|* FOR CYBER 176 MACHINES, LCME SINGLE BIT SECDED 00040 M01S00039.1mb +++|* ERRORS ARE PROCESSED IN A SIMILAR MANNER. 00041 M01S00040.1mb +++|* FOR MAINFRAMES WITH AN ESM MAINTENANCE PORT 00042 M01S00041.1mb +++|* DEFINED, *2TH* WILL LOG THE CONTENTS OF THE ESM 00043 M01S00042.1mb +++|* SECDED LOG TO THE BML AT THE END OF EVERY HOUR. 00044 M01S00043.1mb +++|* SCR PROCESSING AND TERMINOLOGY IS ALSO USED TO 00045 M01S00044.1mb +++|* REFER TO CYBER 170 - 865/875 MAINTENANCE REGISTERS. 00046 M01S00045.1mb +++| SPACE 4,10 00047 M01S00046.1mb +++|**** DIRECT LOCATION ASSIGNMENTS. 00048 M01S00047.1mb +++| 00049 M01S00048.1mb +++| 00050 M01S00049.1mb +++| T8 EQU 16 TEMPORARY 00051 M01S00050.1mb +++| T9 EQU 17 TEMPORARY 00052 M01S00051.1mb +++| CN EQU 20 - 24 CM BUFFER (5 LOCATIONS) 00053 M01S00001.ns2769 +++| WB EQU CN - CN+4 FOR *COMPIMB* COMPATIBILITY 00054 M01S00052.1mb +++| MF EQU 25 MACHINE FLAG 00055 M01S00053.1mb +++| NB EQU 26 NUMBER OF PP BYTES IN *BML* MESSAGE 00056 M01S00054.1mb +++| PN EQU 27 PP NUMBER * 100B 00057 M01S00055.1mb +++| SC EQU 30 - 34 S/C PARAMETER WORD *SCRL* (5 LOCATIONS) 00058 M01S00056.1mb +++| MI EQU 60 - 64 MAINFRAME IDENTIFICATION 00059 M01S00057.1mb +++| EM EQU 65 LAST MASS STORAGE EST ORDINAL + 1 00060 M01S00058.1mb +++| 00061 M01S00059.1mb +++| 00062 M01S00060.1mb +++|** DIRECT CELLS FOR STATUS AND CONTROL REGISTER PROCESSING. 00063 M01S00061.1mb +++| 00064 M01S00062.1mb +++| QUAL 1SC 00065 M01S00063.1mb +++| CH EQU 40 - 41 S/C REGISTER CHANNELS 00066 M01S00064.1mb +++| ER EQU 42 NUMBER OF S/C REGISTER ERRORS 00067 M01S00065.1mb +++| NP EQU 43 NUMBER OF PP-S IN SYSTEM 00068 M01S00066.1mb +++| NW EQU 44 NUMBER OF CM WORDS IN *BML* MESSAGE 00069 M01S00067.1mb +++| QUAL * 00070 M01S00068.1mb +++| 00071 M01S00069.1mb +++| 00072 M01S00070.1mb +++|** DIRECT CELLS FOR MAINTENANCE REGISTER PROCESSING. 00073 M01S00071.1mb +++| 00074 M01S00072.1mb +++| QUAL 1MB 00075 M01S00073.1mb +++| BP EQU 40 NEXT WORD IN *BML* MESSAGE TO USE 00076 M01S00074.1mb +++| EC EQU 41 ELEMENT ACCESS CODE 00077 M01S00075.1mb +++| MB EQU 42 - 43 M/R BUFFER CONTROL WORD ADDRESS 00078 M01S00076.1mb +++| MS EQU 44 - 45 M/R BUFFER ADDRESS 00079 M01S00077.1mb +++| RN EQU 46 REGISTER NUMBER 00080 M01S00078.1mb +++| DC EQU 60 - 64 *DFT* CONTROL WORD 00081 M01S00079.1mb +++| QUAL * 00082 M01S00080.1mb +++|**** 00083 M01S00081.1mb +++| SPACE 4,10 00084 M01S00082.1mb +++|* ASSEMBLY CONSTANTS. 00085 M01S00083.1mb +++| 00086 M01S00084.1mb +++| 00087 M01S00085.1mb +++| QUAL$ EQU 0 DO NOT QUALIFY COMMON DECKS 00088 M01S00086.1mb +++| 00089 M01S00087.1mb +++| MF70 EQU 0 CYBER 70 00090 M01S00088.1mb +++| ERRNZ MF70 CODE DEPENDS ON ZERO VALUE 00091 M01S00089.1mb +++| MF170 EQU 1 CYBER 170 00092 M01S00090.1mb +++| MF700 EQU 2 CYBER 170 - 700 SERIES 00093 M01S00091.1mb +++| MF865 EQU 3 CYBER 170 - 865 00094 M01S00092.1mb +++| MF875 EQU 4 CYBER 170 - 875 00095 M01S00093.1mb +++| MF180 EQU 5 CYBER 180 CLASS MACHINE 00096 M01S00094.1mb +++| MF176A EQU 6 CYBER 176 LEVEL A 00097 M01S00095.1mb +++| MF176B EQU 7 CYBER 176 LEVEL B 00098 M01S00096.1mb +++| MFMAX EQU 10B MAXIMUM MAINFRAME TYPE + 1 00099 M01S00097.1mb +++| TITLE COMMON SUBROUTINES. 00100 M01S00098.1mb +++| COMMON SPACE 4,10 00101 M01S00099.1mb +++|** COMMON - COMMON CODE FOR *1MB* AND *1SC*. 00102 M01S00100.1mb +++|* 00103 M01S00101.1mb +++|* THIS MACRO PROVIDES SIMILAR CODE FOR *1MB* AND *1SC*. 00104 M01S00102.1mb +++| 00105 M01S00103.1mb +++| 00106 M01S00104.1mb +++| COMMON MACRO 00107 M01S00105.1mb +++| COMMON RMT 00108 M01S00106.1mb +++| CKC SPACE 4,10 00109 M01S00107.1mb +++|** CKC - CHECK FOR *1CK* COMPLETE. 00110 M01S00108.1mb +++|* 00111 M01S00109.1mb +++|* ENTRY (SC+2) = *1CK* IR ADDRESS. 00112 M01S00110.1mb +++|* 00113 M01S00111.1mb +++|* EXIT *1CK* COMPLETE. 00114 M01S00112.1mb +++|* 00115 M01S00113.1mb +++|* USES CM - CM+4. 00116 M01S00114.1mb +++| 00117 M01S00115.1mb +++| 00118 M01S00116.1mb +++| CKC SUBR ENTRY/EXIT 00119 M01S00117.1mb +++| CKC1 LDD SC+2 READ *1CK* IR 00120 M01S00118.1mb +++| CRD CM 00121 M01S00119.1mb +++| LDD CM+1 00122 M01S00120.1mb +++| SCN 77 00123 M01S00121.1mb +++| SHN 6 00124 M01S00122.1mb +++| LMD CM 00125 M01S00123.1mb +++| LMC 3RK1C 00126 M01S00124.1mb +++| NJN CKCX IF *1CK* COMPLETE 00127 M01S00125.1mb +++| UJN CKC1 LOOP 00128 M01S00126.1mb +++| CKP SPACE 4,15 00129 M01S00127.1mb +++|** CKP - CHECKPOINT SYSTEM. 00130 M01S00128.1mb +++|* 00131 M01S00129.1mb +++|* ENTRY (SC+2) = *1CK* IR ADDRESS. 00132 M01S00130.1mb +++|* 00133 M01S00131.1mb +++|* EXIT EXITS TO *1CK* ON INITIAL CALL. 00134 M01S00132.1mb +++|* CHECKPOINT IN PROGRESS BIT SET IN *EICB*. 00135 M01S00133.1mb +++|* 00136 M01S00134.1mb +++|* USES CM - CM+4, SC+2. 00137 M01S00135.1mb +++|* 00138 M01S00136.1mb +++|* CALLS /1MB/DSP, *1CK*. 00139 M01S00137.1mb +++|* 00140 M01S00138.1mb +++|* MACROS EXECUTE. 00141 M01S00139.1mb +++| 00142 M01S00140.1mb +++| 00143 M01S00141.1mb +++| CKP SUBR ENTRY/EXIT 00144 M01S00142.1mb +++| LDD SC+2 CHECK FOR *1CK* ALREADY CALLED 00145 M01S00143.1mb +++| NJN CKPX IF *1CK* ALREADY CALLED 00146 M01S00144.1mb +++| .A IFC EQ,/"QUAL"/1MB/ 00147 M01S00145.1mb +++| RJM /1MB/DSP GET *EICB* POINTER 00148 M01S00146.1mb +++| ZJN CKP1 IF NO *EICB* 00149 M01S00147.1mb +++| ADN D7ST 00150 M01S00148.1mb +++| CRD CM READ STATUS WORD 00151 M01S00149.1mb +++| LDD CM 00152 M01S00150.1mb +++| SCN 4 00153 M01S00151.1mb +++| LMN 4 SET CHECKPOINT IN PROGRESS 00154 M01S00152.1mb +++| STD CM 00155 M01S00153.1mb +++| RJM /1MB/DSP 00156 M01S00154.1mb +++| ADN D7ST 00157 M01S00155.1mb +++| CWD CM 00158 M01S00156.1mb +++| .A ENDIF 00159 M01S00157.1mb +++| CKP1 EXECUTE 1CK,= 00160 M01S00158.1mb +++| LDD IA CALL *1CK* 00161 M01S00159.1mb +++| CWM CKPA,ON 00162 M01S00160.1mb +++| SCN 7 00163 M01S00161.1mb +++| STD SC+2 00164 M01S00162.1mb +++| LDM CKPA+2 00165 M01S00163.1mb +++| LMN 10
| Line S00164 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2660 |
Seq # *Modification Id* Act ----------------------------+ 00166 M02S00164.ns2660 ---| CKP2 ZJP DPP2 IF TO RECALL *1MB* 00167 M01S00001.ns2660 +++| CKP2 ZJP DPP3 IF TO RECALL *1MB* 00168 M01S00165.1mb +++| LMN 11&10 00169 M01S00166.1mb +++| ZJN CKP2 IF TO RECALL *1MB* 00170 M01S00001.ns2593 +++| LMN 13&11 00171 M01S00002.ns2593 +++| ZJN CKP2 IF TO RECALL *1MB*
| Line S00167 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2660 |
Seq # *Modification Id* Act ----------------------------+ 00172 M02S00167.ns2660 ---| LJM DPP1 EXIT TO *1CK* AND ENABLE *1MB* CALL 00173 M01S00002.ns2660 +++| LJM DPP2 EXIT TO *1CK* AND ENABLE *1MB* CALL 00174 M01S00168.1mb +++| 00175 M01S00169.1mb +++| CKPA VFD 18/0L1CK,6/0,12/1,24/0 SYSTEM CHECKPOINT CALL 00176 M01S00170.1mb +++| CSH SPACE 4,10 00177 M01S00171.1mb +++|** CSH - CHECKPOINT SYSTEM, SET STEP, AND HANG. 00178 M01S00172.1mb +++|* 00179 M01S00173.1mb +++|* ENTRY AT *CSH1* FOR CYBER 176 DOUBLE BIT *SECDED* ERROR. 00180 M01S00174.1mb +++|* 00181 M01S00175.1mb +++|* CALLS CKC, CKP, RSM. 00182 M01S00176.1mb +++| 00183 M01S00177.1mb +++| 00184 M01S00178.1mb +++| CSH SUBR ENTRY (DOES NOT RETURN) 00185 M01S00179.1mb +++| .A IFC EQ,/"QUAL"/1MB/ 00186 M01S00180.1mb +++| RJM /1MB/DPR DUMP PP REGISTERS 00187 M01S00181.1mb +++| .A ENDIF 00188 M01S00182.1mb +++| RJM CKP ATTEMPT SYSTEM CHECKPOINT 00189 M01S00183.1mb +++| LDD CP 00190 M01S00184.1mb +++| ADN MS2W DISPLAY * FATAL ERROR.* MESSAGE 00191 M01S00185.1mb +++| CWM CSHM,TR 00192 M01S00186.1mb +++| CSHA EQU *-1 (MESSAGE ADDRESS) 00193 M01S00187.1mb +++| RJM CKC WAIT FOR *1CK* TO FINISH 00194 M01S00188.1mb +++| .A IFC EQ,/"QUAL"/1MB/ 00195 M01S00189.1mb +++| RJM /1MB/DPR DUMP PP REGISTERS 00196 M01S00190.1mb +++| .A ENDIF 00197 M01S00191.1mb +++| CSH1 RJM RSM STEP SYSTEM 00198 M01S00192.1mb +++| CSH2 LDD CP DISPLAY *FATAL ERROR* MESSAGE AGAIN 00199 M01S00193.1mb +++| ADN MS2W 00200 M01S00194.1mb +++| CWM CSHM,TR 00201 M01S00195.1mb +++| CSHB EQU *-1 (MESSAGE ADDRESS)
| Line S00196 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 1mb35 |
Seq # *Modification Id* Act ----------------------------+ 00202 M02S00196.1mb35 ---| CSH3 DELAY
| Line S00197 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 1mb35 |
Seq # *Modification Id* Act ----------------------------+ 00203 M02S00197.1mb35 ---| LDD CP CHECK IF MESSAGE PRESENT
| Line S00198 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 1mb35 |
Seq # *Modification Id* Act ----------------------------+ 00204 M02S00198.1mb35 ---| ADN MS2W
| Line S00199 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 1mb35 |
Seq # *Modification Id* Act ----------------------------+ 00205 M02S00199.1mb35 ---| CRD CN
| Line S00200 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 1mb35 |
Seq # *Modification Id* Act ----------------------------+ 00206 M02S00200.1mb35 ---| LDD CN
| Line S00201 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 1mb35 |
Seq # *Modification Id* Act ----------------------------+ 00207 M02S00201.1mb35 ---| ZJN CSH2 IF NO MESSAGE AT SYSTEM CONTROL POINT
| Line S00202 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 1mb35 |
Seq # *Modification Id* Act ----------------------------+ 00208 M02S00202.1mb35 ---| UJN CSH3 CONTINUE CHECKING 00209 M01S00001.1mb35 +++| DELAY 5*8D DELAY 5 SECONDS (FOR OTHER MESSAGES) 00210 M01S00002.1mb35 +++| UJN CSH2 DISPLAY MESSAGE AGAIN 00211 M01S00203.1mb +++| DPP SPACE 4,20 00212 M01S00204.1mb +++|** DPP - DROP PP. 00213 M01S00205.1mb +++|* 00214 M01S00206.1mb +++|* ENTRY (SC - SC+4) = *SCRL* WORD WITH MONITOR LOCK-OUT BIT 00215 M01S00207.1mb +++|* SET. 00216 M01S00208.1mb +++|* 00217 M01S00209.1mb +++|* EXIT (SC - SC+4) = *SCRL* WORD WITH MONITOR LOCK-OUT BIT 00218 M01S00210.1mb +++|* CLEARED. 00219 M01S00211.1mb +++|* = WRITTEN TO CENTRAL MEMORY. 00220 M01S00212.1mb +++|* PP DROPPED. 00221 M01S00213.1mb +++|* 16-BIT INSTRUCTIONS CLEARED, IF PRESENT. 00222 M01S00214.1mb +++|* EXIT TO *PPR*. 00223 M01S00215.1mb +++|* 00224 M01S00216.1mb +++|* NOTE THE *DPPM* FUNCTION IN THIS ROUTINE IS 00225 M01S00217.1mb +++|* EXECUTED OUT OF NORMAL ORDER TO PREVENT 00226 M01S00218.1mb +++|* PP SATURATION WHEN *1MB* IS STEPPED 00227 M01S00219.1mb +++|* ON A *DPPM*. 00228 M01S00220.1mb +++| 00229 M01S00221.1mb +++| 00230 M01S00003.ns2660 +++| .A IFC EQ,/"QUAL"/1MB/ 00231 M01S00004.ns2660 +++| DPP5 LJM LED RELOAD DFT FOR SECOND TOP OF HOUR 00232 M01S00005.ns2660 +++| .A ENDIF 00233 M01S00006.ns2660 +++| 00234 M01S00222.1mb +++| DPP MONITOR DPPM DROP PP
| Line S00223 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2660 |
Seq # *Modification Id* Act ----------------------------+ 00235 M02S00223.ns2660 ---| DPP0 LDN 0 CLEAR *1CK* IR ADDRESS 00236 M01S00007.ns2660 +++| DPPA EQU DPP 00237 M01S00008.ns2660 +++|* UJN DPP5 (SECOND PASS TOP OF HOUR) 00238 M01S00009.ns2660 +++| DPP1 LDN 0 CLEAR *1CK* IR ADDRESS 00239 M01S00224.1mb +++| STD SC+2
| Line S00225 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2660 |
Seq # *Modification Id* Act ----------------------------+ 00240 M02S00225.ns2660 ---| DPP1 LDD SC CLEAR MONITOR LOCK-OUT BIT 00241 M01S00010.ns2660 +++| DPP2 LDD SC CLEAR MONITOR LOCK-OUT BIT 00242 M01S00226.1mb +++| LPC 3777 00243 M01S00227.1mb +++| STD SC
| Line S00228 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2660 |
Seq # *Modification Id* Act ----------------------------+ 00244 M02S00228.ns2660 ---| DPP2 LDC SCRL UPDATE *SCRL* 00245 M01S00011.ns2660 +++| DPP3 LDC SCRL UPDATE *SCRL* 00246 M01S00229.1mb +++| CWD SC 00247 M01S00230.1mb +++| .A IFC EQ,/"QUAL"/1MB/
| Line S00231 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2660 |
Seq # *Modification Id* Act ----------------------------+ 00248 M02S00231.ns2660 ---| DPPA LDN 0 00249 M01S00012.ns2660 +++| DPPB LDN 0 00250 M01S00232.1mb +++|* LDN 1 (16-BIT INSTRUCTIONS PRESENT)
| Line S00233 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2660 |
Seq # *Modification Id* Act ----------------------------+ 00251 M02S00233.ns2660 ---| ZJN DPP3 IF NO 16-BIT INSTRUCTIONS 00252 M01S00013.ns2660 +++| ZJN DPP4 IF NO 16-BIT INSTRUCTIONS 00253 M01S00234.1mb +++| RJM CPM CLEAR PP MEMORY 00254 M01S00235.1mb +++| LDC 400000B+LINS ADDRESS OF INSTRUCTION TABLE 00255 M01S00236.1mb +++| RJM DLI CLEAR 16-BIT INSTRUCTIONS 00256 M01S00237.1mb +++| .A ENDIF
| Line S00238 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2660 |
Seq # *Modification Id* Act ----------------------------+ 00257 M02S00238.ns2660 ---| DPP3 LJM PPR EXIT TO PP RESIDENT 00258 M01S00014.ns2660 +++| DPP4 LJM PPR EXIT TO PP RESIDENT 00259 M01S00239.1mb +++| IBM SPACE 4,10 00260 M01S00240.1mb +++|** *BML* MESSAGE BUFFER. 00261 M01S00241.1mb +++| 00262 M01S00242.1mb +++| 00263 M01S00243.1mb +++| IBMF VFD 12/0,12/0,6/0,6/0,24/0 MESSAGE ID/SYMPTOM CODE 00264 M01S00244.1mb +++| IBMG VFD 12/0,9/0,1/0,2/0,36/0 MESSAGE CONTINUATION BIT 00265 M01S00245.1mb +++| IBMH VFD 60/0 BML MESSAGE BUFFER (4 CM WORDS) 00266 M01S00246.1mb +++| VFD 60/0 00267 M01S00247.1mb +++| VFD 60/0 00268 M01S00248.1mb +++| VFD 60/0 00269 M01S00249.1mb +++| IBMHL EQU * END OF BML BUFFER 00270 M01S00250.1mb +++| RSM SPACE 4,10 00271 M01S00251.1mb +++|** RSM - REQUEST STEP MODE. 00272 M01S00252.1mb +++|* 00273 M01S00253.1mb +++|* ENTRY (SC - SC+4) = (SCRL). 00274 M01S00254.1mb +++|* 00275 M01S00255.1mb +++|* EXIT STEP MODE SET. 00276 M01S00256.1mb +++|* 00277 M01S00257.1mb +++|* USES CM - CM+4, SC - SC+4. 00278 M01S00258.1mb +++|* 00279 M01S00259.1mb +++|* MACROS MONITOR. 00280 M01S00260.1mb +++| 00281 M01S00261.1mb +++| 00282 M01S00262.1mb +++| RSM SUBR ENTRY/EXIT 00283 M01S00263.1mb +++| LDD SC 00284 M01S00264.1mb +++| SHN 21-11 00285 M01S00265.1mb +++| MJN RSMX IF STEP ALREADY REQUESTED 00286 M01S00266.1mb +++| LDD TH SET REQUEST BIT AND WRITE SCRL 00287 M01S00267.1mb +++| RAD SC 00288 M01S00268.1mb +++| LDC SCRL 00289 M01S00269.1mb +++| CWD SC 00290 M01S00270.1mb +++| LDD SC 00291 M01S00271.1mb +++| SHN 21-10 00292 M01S00272.1mb +++| MJN RSMX IF STEP SET 00293 M01S00273.1mb +++| LDN 0 CLEAR EJT ORDINAL 00294 M01S00274.1mb +++| STD CM+2 00295 M01S00275.1mb +++| LDN DPPM STEP ON DROP PP 00296 M01S00276.1mb +++| STD CM+3 00297 M01S00277.1mb +++| LMD TH 00298 M01S00278.1mb +++| STD CM+4
| Line S00279 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2726 |
Seq # *Modification Id* Act ----------------------------+ 00299 M02S00279.ns2726 ---| LDN 3 SET EMERGENCY STEP SUBFUNCTION 00300 M01S00001.ns2726 +++| LDN ESPS SET EMERGENCY STEP SUBFUNCTION 00301 M01S00280.1mb +++| STD CM+1 00302 M01S00281.1mb +++| MONITOR DSRM SET STEP MODE 00303 M01S00282.1mb +++| LDC SCRL READ *SCRL* 00304 M01S00283.1mb +++| CRD SC 00305 M01S00284.1mb +++| UJN RSMX RETURN 00306 M01S00285.1mb +++| 00307 M01S00286.1mb +++| COMMON RMT 00308 M01S00287.1mb +++| COMMON ENDM 00309 M01S00288.1mb +++| SPACE 4,10 00310 M01S00289.1mb +++|* MACROS. 00311 M01S00002.ns2769 +++| TBLM SPACE 4,10 00312 M01S00003.ns2769 +++|** TBLM - CREATE TABLE ENTRY MACRO. 00313 M01S00004.ns2769 +++|* 00314 M01S00005.ns2769 +++|*NAM TBLM 00315 M01S00006.ns2769 +++|* 00316 M01S00007.ns2769 +++|* ENTRY NAM = TABLE NAME. 00317 M01S00008.ns2769 +++|* 00318 M01S00009.ns2769 +++|* EXIT NAM_E MACRO DEFINED. 00319 M01S00010.ns2769 +++| 00320 M01S00011.ns2769 +++| 00321 M01S00012.ns2769 +++| PURGMAC TBLM 00322 M01S00013.ns2769 +++| 00323 M01S00014.ns2769 +++| MACRO TBLM,NAM 00324 M01S00015.ns2769 +++| PURGMAC NAM_E 00325 M01S00016.ns2769 +++| NAM_E MACRO ADDR 00326 M01S00017.ns2769 +++| LOCAL A 00327 M01S00018.ns2769 +++| MACREF NAM_E 00328 M01S00019.ns2769 +++| NOREF A 00329 M01S00020.ns2769 +++| A EQU ADDR 00330 M01S00021.ns2769 +++| T_NAM RMT 00331 M01S00022.ns2769 +++| CON A 00332 M01S00023.ns2769 +++| RMT 00333 M01S00024.ns2769 +++| TBLM ENDM 00334 M01S00025.ns2769 +++| EMBE SPACE 4,10 00335 M01S00026.ns2769 +++|** EMBE - ERROR MESSAGE TABLE ENTRY. 00336 M01S00027.ns2769 +++|* 00337 M01S00028.ns2769 +++|* THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TEMB* 00338 M01S00029.ns2769 +++|* THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH 00339 M01S00030.ns2769 +++|* REQUIRES THE FWA OF THE ERROR MESSAGE TABLE. 00340 M01S00031.ns2769 +++|* 00341 M01S00032.ns2769 +++|* EMBE ADDR 00342 M01S00033.ns2769 +++|* 00343 M01S00034.ns2769 +++|* ENTRY (ADDR) = ADDRESS OF INSTRUCTION. 00344 M01S00035.ns2769 +++|* 00345 M01S00036.ns2769 +++|* EXIT ADDRESS IS ADDED TO THE REMOTE BLOCK *TEMB*. 00346 M01S00037.ns2769 +++| 00347 M01S00038.ns2769 +++| 00348 M01S00039.ns2769 +++| EMB TBLM 00349 M01S00040.ns2769 +++| SPACE 4,10 00350 M01S00290.1mb +++| RPTR SPACE 4,15 00351 M01S00291.1mb +++|** RPTR - CONVERT ADDRESS FROM R-REGISTER FORMAT. 00352 M01S00292.1mb +++|* 00353 M01S00293.1mb +++|* RPTR DC,ADDR 00354 M01S00294.1mb +++|* 00355 M01S00295.1mb +++|* ENTRY *DC* = DIRECT CELL LOCATION OF R-REGISTER FORMAT 00356 M01S00296.1mb +++|* ADDRESS (R-UPPER IN *DC*+1 IS ASSUMED = 0). 00357 M01S00297.1mb +++|* *ADDR* = LOCATION TO STORE CONVERTED ADDRESS. 00358 M01S00298.1mb +++|* 00359 M01S00299.1mb +++|* EXIT (ADDR - ADDR+1) = CONVERTED ADDRESS. 00360 M01S00300.1mb +++|* (A) = CONVERTED ADDRESS, IF *ADDR* NOT SPECIFIED. 00361 M01S00301.1mb +++| 00362 M01S00302.1mb +++| 00363 M01S00303.1mb +++| PURGMAC RPTR 00364 M01S00304.1mb +++| 00365 M01S00305.1mb +++| RPTR MACRO D,A 00366 M01S00306.1mb +++| LDD D+2 R-LOWER 00367 M01S00307.1mb +++| SHN 6 00368 M01S00308.1mb +++| LMD D OFFSET 00369 M01S00309.1mb +++| .A IFC NE,$A$$ 00370 M01S00310.1mb +++| STM A+1 00371 M01S00311.1mb +++| SHN -14 00372 M01S00312.1mb +++| RAM A 00373 M01S00313.1mb +++| .A ENDIF 00374 M01S00314.1mb +++| RPTR ENDM
| Line S00315 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00375 M02S00315.ns2769 ---| SPACE 4,10 00376 M01S00316.1mb +++|** COMMON DECKS. 00377 M01S00317.1mb +++| 00378 M01S00318.1mb +++| 00379 M01S00319.1mb +++|*CALL COMPMAC 00380 M01S00320.1mb +++| RICHI$ BSS 0 00381 M01S00321.1mb +++|*CALL COMPCHI 00382 M01S00322.1mb +++|*CALL COMPIOU 00383 M01S00323.1mb +++|*CALL COMPMRM 00384 M01S00324.1mb +++|*CALL COMSCPS 00385 M01S00325.1mb +++|*CALL COMSDFS 00386 M01S00326.1mb +++| LIST X 00387 M01S00327.1mb +++|*CALL COMSDFT 00388 M01S00328.1mb +++| LIST * 00389 M01S00329.1mb +++| QUAL DSL 00390 M01S00330.1mb +++|*CALL COMSDSL 00391 M01S00331.1mb +++| QUAL * 00392 M01S00332.1mb +++|*CALL COMSDST 00393 M01S00333.1mb +++|*CALL COMSEVT 00394 M01S00334.1mb +++|*CALL COMSIOU 00395 M01S00335.1mb +++|*CALL COMSMSC 00396 M01S00001.272l774 +++| QUAL MSP 00397 M01S00336.1mb +++|*CALL COMSMSP 00398 M01S00002.272l774 +++| QUAL * 00399 M01S00337.1mb +++|*CALL COMSMST 00400 M01S00338.1mb +++|*CALL COMSPIM 00401 M01S00339.1mb +++|*CALL COMSREM 00402 M01S00340.1mb +++| QUAL SSD 00403 M01S00341.1mb +++|*CALL COMSSSD 00404 M01S00342.1mb +++| QUAL * 00405 M01S00343.1mb +++| LIST X 00406 M01S00344.1mb +++|*CALL COMSSCR 00407 M01S00345.1mb +++| LIST * 00408 M01S00346.1mb +++| QUAL 1DS 00409 M01S00347.1mb +++|*CALL COMS1DS 00410 M01S00348.1mb +++| QUAL * 00411 M01S00349.1mb +++| TITLE MAINTENANCE REGISTER PROCESSING. 00412 M01S00350.1mb +++|*** MEP - MAINTENANCE CHANNEL ERROR PROCESSOR. 00413 M01S00351.1mb +++|* 00414 M01S00352.1mb +++|* *MEP* IS THE MAIN DRIVER THAT PROCESSES THE LOGGING OF ERRORS 00415 M01S00353.1mb +++|* THAT WERE DETECTED BY *DFT*. *1MB* IS CALLED BY *MTR* TO 00416 M01S00354.1mb +++|* LOAD *DFT* IN THE NON-DEDICATED CASE. *1MB* WILL REACT TO 00417 M01S00355.1mb +++|* THE OS ACTION CODES SUPPLIED BY *DFT* AND LOG THE MAINTENANCE 00418 M01S00356.1mb +++|* REGISTERS TO THE *BML*. 00419 M01S00357.1mb +++| SPACE 4,10 00420 M01S00358.1mb +++|*** DAYFILE MESSAGES. 00421 M01S00359.1mb +++|* 00422 M01S00360.1mb +++|* 00423 M01S00361.1mb +++|* * 1MB - CALL ERROR.* = *1MB* WAS CALLED WITH AN ILLEGAL 00424 M01S00362.1mb +++|* FUNCTION BIT CODE. 00425 M01S00363.1mb +++| SPACE 4,20 00426 M01S00364.1mb +++|*** SYSTEM CONTROL POINT MESSAGES. 00427 M01S00365.1mb +++|* 00428 M01S00366.1mb +++|* 00429 M01S00367.1mb +++|* HH.MM.SS ERR=DEMMXXXXXXXX 00430 M01S00368.1mb +++|* 00431 M01S00369.1mb +++|* HH.MM.SS = TIME THE ERROR WAS DETECTED, IF VERSION 4 OR ABOVE 00432 M01S00370.1mb +++|* *DFT* AND THE TIME WAS AVAILABLE FROM THE WALL 00433 M01S00371.1mb +++|* CLOCK CHIP. 00434 M01S00372.1mb +++|* = TIME THE ERROR WAS LOGGED BY *1MB*, IF *DFT* 00435 M01S00373.1mb +++|* VERSION 3, OR THE TIME WAS NOT AVAILABLE TO *DFT*. 00436 M01S00374.1mb +++|* 00437 M01S00375.1mb +++|* E = ELEMENT SPECIFIER. 00438 M01S00376.1mb +++|* = C, FOR PROCESSOR 0. 00439 M01S00377.1mb +++|* = D, FOR PROCESSOR 1. 00440 M01S00378.1mb +++|* = I, FOR IOU 0. 00441 M01S00379.1mb +++|* = J, FOR IOU 1. 00442 M01S00380.1mb +++|* = M, FOR MEMORY. 00443 M01S00381.1mb +++|* = A, FOR *DFT* INTERNAL ERROR. 00444 M01S00382.1mb +++|* 00445 M01S00383.1mb +++|* MM = MODEL NUMBER OF THE SPECIFIED ELEMENT. 00446 M01S00384.1mb +++|* THIS FIELD IS NOT PRESENT IF THE ELEMENT SPECIFIER IS 00447 M01S00385.1mb +++|* *A*. 00448 M01S00386.1mb +++|* 00449 M01S00387.1mb +++|* XXXXXXXX = MODEL DEPENDENT DATA FURTHER DESCRIBING THE ERROR. 00450 M01S00388.1mb +++|* THIS NORMALLY CONSISTS OF THE THREE CHARACTER 00451 M01S00389.1mb +++|* *DFT* ANALYSIS CODE. 00452 M01S00390.1mb +++|* 00453 M01S00391.1mb +++|* 00454 M01S00392.1mb +++|* IN THE FOLLOWING MESSAGES, THE HEXADECIMAL NUMBER IN THE 00455 M01S00393.1mb +++|* MESSAGE IS THE *DFT* ANALYSIS CODE WHICH CAUSED THE MESSAGE. 00456 M01S00394.1mb +++|* 00457 M01S00395.1mb +++|* *(204) FATAL CPU ERROR* 00458 M01S00396.1mb +++|* *(215) FATAL MCH ERROR* 00459 M01S00397.1mb +++|* 00460 M01S00398.1mb +++|* THE FOLLOWING MESSAGE IS POSTED WHEN A POWER OR ENVIRONMENT 00461 M01S00399.1mb +++|* WARNING HAS CLEARED. 00462 M01S00400.1mb +++|* 00463 M01S00401.1mb +++|* *POWER/ENVIRONMENT NORMAL* 00464 M01S00402.1mb +++| SPACE 4,10 00465 M01S00403.1mb +++| ORG PPFW 00466 M01S00404.1mb +++| QUAL 1MB 00467 M01S00405.1mb +++| 00468 M01S00406.1mb +++| MEP BSS 0 ENTRY 00469 M01S00407.1mb +++| LJM MEP1 PRESET 00470 M01S00408.1mb +++| 00471 M01S00409.1mb +++|* GLOBAL STORAGE. 00472 M01S00410.1mb +++| 00473 M01S00411.1mb +++| DFTV CON 0 *DFT* VERSION (0 = VERSION 3) 00474 M01S00412.1mb +++| SSCW CON 0,0 SUPPORTIVE STATUS CONTROL WORD ADDRESS 00475 M01S00413.1mb +++| SPACE 4,10 00476 M01S00414.1mb +++|** COMMON SUBROUTINES. 00477 M01S00415.1mb +++| 00478 M01S00416.1mb +++| 00479 M01S00417.1mb +++| COMMON 00480 M01S00418.1mb +++| 00481 M01S00419.1mb +++| LIST D 00482 M01S00420.1mb +++| COMMON HERE 00483 M01S00421.1mb +++| LIST * 00484 M01S00422.1mb +++| SPACE 4,10 00485 M01S00423.1mb +++|* COMMON DECKS WITH NO 16-BIT INSTRUCTIONS. 00486 M01S00424.1mb +++| 00487 M01S00425.1mb +++| 00488 M01S00426.1mb +++|*CALL COMPMRA 00489 M01S00427.1mb +++|*CALL COMPACS 00490 M01S00428.1mb +++|*CALL COMT8AD 00491 M01S00429.1mb +++| SPACE 4,10 00492 M01S00430.1mb +++|* SYSTEM CONTROL POINT MESSAGES. 00493 M01S00431.1mb +++| 00494 M01S00432.1mb +++| 00495 M01S00433.1mb +++| MSFS DATA 28C HH.MM.SS.ERR=XXXXXXXXXXXX 00496 M01S00434.1mb +++| CSHM EQU MSFS DEFAULT *CSHM* MESSAGE 00497 M01S00435.1mb +++| MSCP DATA C*(204) FATAL CPU ERROR* 00498 M01S00436.1mb +++| MSME DATA C*(215) FATAL MCH ERROR* 00499 M01S00437.1mb +++| MSPN DATA C*POWER/ENVIRONMENT NORMAL* 00500 M01S00438.1mb +++| TOSC SPACE 4,10 00501 M01S00439.1mb +++|** TABLE OF OS ACTION CODES. 00502 M01S00440.1mb +++| 00503 M01S00441.1mb +++| TOSC INDEX 00504 M01S00442.1mb +++| INDEX EWAC,ENW ENVIRONMENT WARNING 00505 M01S00443.1mb +++| INDEX LPAC,LPW LONG POWER WARNING 00506 M01S00444.1mb +++| INDEX SPAC,SPW SHORT POWER WARNING 00507 M01S00445.1mb +++| INDEX WCAC,WCL WARNING CLEAR 00508 M01S00446.1mb +++| INDEX FIAC,FIE FATAL IOU ERROR 00509 M01S00447.1mb +++| INDEX NVAC,NIE NOS/VE IOU ERROR 00510 M01S00448.1mb +++| INDEX UMAC,MEP6 FATAL CM ERROR 00511 M01S00449.1mb +++| INDEX MBAC,MOB MULTIPLE ODD BIT ERROR 00512 M01S00450.1mb +++| INDEX UPAC,MEP6 FATAL CPU ERROR 00513 M01S00451.1mb +++| INDEX UIAC,FIE UNCORRECTED IOU ERROR 00514 M01S00452.1mb +++| INDEX MXAC 00515 M01S00453.1mb +++| TDFA SPACE 4,10 00516 M01S00454.1mb +++|** TDFA - TABLE OF *DFT* ANALYSIS CODES. 00517 M01S00455.1mb +++|* 00518 M01S00456.1mb +++|*T 12/ *DFT* CODE, 12/ ACTION, 12/ ROUTINE
Figure
00519 M01S00457.1mb +++|* 00520 M01S00458.1mb +++|* FOR *DFT* VERSION 4, OR ABOVE THE PROCESSING ROUTINE IS 00521 M01S00459.1mb +++|* SELECTED BY FINDING A TABLE ENTRY WITH A *DFT* ANALYSIS CODE 00522 M01S00460.1mb +++|* AND OS ACTION CODE MATCHING THOSE PASSED BY *DFT*. IF NO 00523 M01S00461.1mb +++|* MATCH IS FOUND, ROUTINE *MSC* WILL BE SELECTED. THE TABLE 00524 M01S00462.1mb +++|* MUST BE IN ASCENDING ORDER BY ANALYSIS CODE. 00525 M01S00463.1mb +++| 00526 M01S00464.1mb +++| 00527 M01S00465.1mb +++| TDFA BSS 0 00528 M01S00466.1mb +++| CON 4,S7AC,FIE C170 UNCORRECTED IOU ERROR (NIO PP) 00529 M01S00467.1mb +++| CON 4,S8AC,NIE C180 UNCORRECTED IOU ERROR (NIO PP) 00530 M01S00468.1mb +++| CON 6,SSAC,FIE FATAL IOU ERROR (NIO PP) 00531 M01S00469.1mb +++| CON 0#8,SSAC,FIE FATAL IOU ERROR (CIO PP) 00532 M01S00470.1mb +++| CON 0#9,S7AC,FIE C170 UNCORRECTED IOU ERROR (CIO PP) 00533 M01S00471.1mb +++| CON 0#9,S8AC,NIE C180 UNCORRECTED IOU ERROR (CIO PP) 00534 M01S00472.1mb +++| CON 0#105,SSAC,MOB MULTIPLE ODD BIT MEMORY ERROR 00535 M01S00473.1mb +++| CON 0#106,SSAC,MOB PARTIAL WRITE PARITY ERROR 00536 M01S00474.1mb +++| CON 0#21E,SSAC,MOB PARTIAL WRITE PARITY ERROR (990) 00537 M01S00475.1mb +++| CON 0#701,ISAC,ENW ENVIRONMENT WARNING 00538 M01S00476.1mb +++| CON 0#702,ISAC,LPW LONG POWER WARNING 00539 M01S00477.1mb +++| CON 0#703,SSAC,SPW SHORT POWER WARNING 00540 M01S00478.1mb +++| CON 0#704,RSAC,WCL ENVIRONMENT WARNING CLEAR 00541 M01S00479.1mb +++| CON 0#705,RSAC,WCL LONG POWER WARNING CLEAR 00542 M01S00480.1mb +++| CON 0#706,USAC,WCL SHORT POWER WARNING CLEAR 00543 M01S00481.1mb +++| CON 0#FFF END OF TABLE 00544 M01S00001.271l716 +++| CNR SPACE 4,15 00545 M01S00002.271l716 +++|** CNR - CHECK FOR NOS REQUEST. 00546 M01S00003.271l716 +++|* 00547 M01S00004.271l716 +++|* THIS ROUTINE IS CALLED IF *DFT* IS IN DEDICATED MODE AND 00548 M01S00005.271l716 +++|* THERE IS A NOS REQUEST PRESENT. IT RESERVES THE CIP 00549 M01S00006.271l716 +++|* CHANNEL, SETS THE REQUEST STATUS = *ACTIVE*, WAITS FOR THE 00550 M01S00007.271l716 +++|* REQUEST TO BE PROCESSED, AND RELEASES THE CIP CHANNEL. 00551 M01S00008.271l716 +++|* 00552 M01S00009.271l716 +++|* USES CM - CM+4, T1 - T1+4. 00553 M01S00010.271l716 +++|* 00554 M01S00011.271l716 +++|* CALLS CRQ, SDA. 00555 M01S00012.271l716 +++|* 00556 M01S00013.271l716 +++|* MACROS DCHAN, DELAY, RCHAN. 00557 M01S00014.271l716 +++| 00558 M01S00015.271l716 +++| 00559 M01S00016.271l716 +++| CNR SUBR ENTRY/EXIT 00560 M01S00017.271l716 +++| RJM SDA READ NOS REQUEST HEADER 00561 M01S00018.271l716 +++| CRD T1 00562 M01S00019.271l716 +++| LDD T1+4 CHECK REQUEST STATUS 00563 M01S00020.271l716 +++| LMN STRY 00564 M01S00021.271l716 +++| NJN CNRX IF NOT STATUS = *READY* 00565 M01S00022.271l716 +++| LDN DSAL LOCATE CIP CHANNEL 00566 M01S00023.271l716 +++| CRD CM 00567 M01S00024.271l716 +++| LDD CM+4 RESERVE CIP CHANNEL 00568 M01S00025.271l716 +++| LPN 77 00569 M01S00026.271l716 +++| STM CNRA 00570 M01S00027.271l716 +++| RCHAN 00571 M01S00028.271l716 +++| RJM CRQ CHECK REQUEST FOR SPECIAL PROCESSING 00572 M01S00029.271l716 +++| LDN STAC SET STATUS = *ACTIVE* 00573 M01S00030.271l716 +++| STD T1+4 00574 M01S00031.271l716 +++| RJM SDA REWRITE NOS REQUEST HEADER 00575 M01S00032.271l716 +++| CWD T1 00576 M01S00033.271l716 +++| 00577 M01S00034.271l716 +++|* WAIT FOR REQUEST TO BE PROCESSED BY *DFT*. 00578 M01S00035.271l716 +++| 00579 M01S00036.271l716 +++| CNR1 DELAY 00580 M01S00037.271l716 +++| RJM SDA READ NOS REQUEST HEADER 00581 M01S00038.271l716 +++| CRD T1 00582 M01S00039.271l716 +++| LDD T1+4 00583 M01S00040.271l716 +++| LMN STAC 00584 M01S00041.271l716 +++| ZJN CNR1 IF STATUS = *ACTIVE* STILL PRESENT 00585 M01S00042.271l716 +++| LDC ** RELEASE CIP CHANNEL 00586 M01S00043.271l716 +++| CNRA EQU *-1 00587 M01S00044.271l716 +++| DCHAN 00588 M01S00045.271l716 +++| LJM CNRX RETURN 00589 M01S00046.271l716 +++| CRQ SPACE 4,10 00590 M01S00047.271l716 +++|** CRQ - CHECK *DFT* REQUEST FOR SPECIAL PROCESSING. 00591 M01S00048.271l716 +++|* 00592 M01S00049.271l716 +++|* EXIT *UADM/FRAS* ISSUED IF NECESSARY. 00593 M01S00050.271l716 +++|* 00594 M01S00051.271l716 +++|* CALLS SDA. 00595 M01S00052.271l716 +++|* 00596 M01S00053.271l716 +++|* USES CM - CM+4. 00597 M01S00054.271l716 +++|* 00598 M01S00055.271l716 +++|* MACROS MONITOR. 00599 M01S00056.271l716 +++| 00600 M01S00057.271l716 +++| 00601 M01S00058.271l716 +++| CRQ SUBR ENTRY/EXIT 00602 M01S00059.271l716 +++| 00603 M01S00060.271l716 +++|* THE FOLLOWING CODE ASSUMES THERE IS ONLY ONE REQUEST BUFFER 00604 M01S00061.271l716 +++|* WHICH IMMEDIATELY FOLLOWS THE REQUEST HEADER. 00605 M01S00062.271l716 +++| 00606 M01S00063.271l716 +++| RJM SDA READ REQUEST 00607 M01S00064.271l716 +++| ADN 1 00608 M01S00065.271l716 +++| CRM CRQA,ON 00609 M01S00066.271l716 +++| LDM CRQA CHECK REQUEST 00610 M01S00067.271l716 +++| LMN RQSF 00611 M01S00068.271l716 +++| NJN CRQX IF NO *UADM* NEEDED 00612 M01S00069.271l716 +++| LDC FRAS SET *UADM* SUBFUNCTION 00613 M01S00070.271l716 +++| STM CRQA 00614 M01S00071.271l716 +++| LDD MA WRITE REQUEST TO MESSAGE BUFFER 00615 M01S00072.271l716 +++| CWM CRQA,ON 00616 M01S00073.271l716 +++| LDN ZERL SET *UADM* PARAMETERS 00617 M01S00074.271l716 +++| CRD CM 00618 M01S00075.271l716 +++| LDN 1 SET REQUEST COUNT 00619 M01S00076.271l716 +++| STD CM+1 00620 M01S00077.271l716 +++|* STD CM+2 (NO DROP FLAG IGNORED) 00621 M01S00078.271l716 +++| MONITOR UADM ALERT *CPUMTR* OF PENDING *FRC* UPDATE 00622 M01S00079.271l716 +++| UJN CRQX RETURN 00623 M01S00080.271l716 +++| 00624 M01S00081.271l716 +++| 00625 M01S00082.271l716 +++| CRQA BSS 5 00626 M01S00482.1mb +++| MEP SPACE 4,20 00627 M01S00483.1mb +++|* MAIN PROGRAM. 00628 M01S00484.1mb +++| 00629 M01S00485.1mb +++|** PROGRAMMING NOTE. 00630 M01S00486.1mb +++|* 00631 M01S00487.1mb +++|* WHENEVER A CALL TO *DFM* IS MADE, IT MAY BE NECESSARY FOR 00632 M01S00488.1mb +++|* *1DD* TO BE INVOKED TO FLUSH THE DAYFILE BUFFER. *1DD* 00633 M01S00489.1mb +++|* OVERLAYS A PART OF THE PP, WHICH IT RESTORES WHEN COMPLETE. 00634 M01S00490.1mb +++|* HOWEVER, SINCE ONLY 12-BIT DATA CAN BE RESTORED BY THIS 00635 M01S00491.1mb +++|* PROCESS, *1MB* MUST NEVER DEPEND ON 16-BIT DATA BEING 00636 M01S00492.1mb +++|* PRESERVED ACROSS A *DFM* CALL IN THE PART OF THE PP USED BY 00637 M01S00493.1mb +++|* *1DD*. FIRST, ANY *1MB* CODE CONTAINING LONG INSTRUCTIONS 00638 M01S00494.1mb +++|* MUST NOT START BEFORE LOCATION *DDLW*, DEFINED IN *COMSMSC* 00639 M01S00495.1mb +++|* AS THE LAST WORD USED BY *1DD*. SECOND, SINCE ANY DIRECT 00640 M01S00496.1mb +++|* CELLS CONTAINING 16-BIT DATA WILL NOT BE INTACT AFTER *1DD* 00641 M01S00497.1mb +++|* IS COMPLETE, CARE SHOULD BE TAKEN EITHER TO STORE 16-BIT DATA 00642 M01S00498.1mb +++|* IN THE PROTECTED AREA OF *1MB*, OR TO RE-READ THE DATA FROM 00643 M01S00499.1mb +++|* CM AFTER THE *DFM* CALL. 00644 M01S00500.1mb +++| 00645 M01S00501.1mb +++| 00646 M01S00502.1mb +++| .MEP MAX *,DDLW 00647 M01S00503.1mb +++| ORG .MEP 00648 M01S00504.1mb +++| 00649 M01S00505.1mb +++| MEP1 RJM PRS PRESET FOR *1MB* 00650 M01S00506.1mb +++| LDK EIBP READ *EICB* POINTER 00651 M01S00507.1mb +++| CRD CN 00652 M01S00508.1mb +++| ADN INWL-EIBP CHECK *MCH* ERROR BIT 00653 M01S00509.1mb +++| CRD CM 00654 M01S00510.1mb +++| LDD CN+3 SAVE *EICB* ADDRESS 00655 M01S00511.1mb +++| RAM DSPA 00656 M01S00512.1mb +++| LDD CN+4 00657 M01S00513.1mb +++| RAM DSPA+1 00658 M01S00514.1mb +++| LDD CM+4 00659 M01S00515.1mb +++| SHN 21-5 00660 M01S00516.1mb +++| MJP MRER IF MCH ERROR IN PROGRESS 00661 M01S00517.1mb +++| LDC LINS DEFINE LONG INSTRUCTIONS 00662 M01S00518.1mb +++| RJM DLI
| Line S00519 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2660 |
Seq # *Modification Id* Act ----------------------------+ 00663 M02S00519.ns2660 ---| AOM DPPA 00664 M01S00015.ns2660 +++| AOM DPPB 00665 M01S00520.1mb +++| RJM SBA SET BUFFER ADDRESSES 00666 M01S00521.1mb +++| RJM CTP CHECK FOR TIME PROCESSING 00667 M01S00522.1mb +++| LDDL DC+3 00668 M01S00523.1mb +++| SHN 21-DCE7 00669 M01S00524.1mb +++| MJN MEP2 IF ERRORS LOGGED IN M/R BUFFER 00670 M01S00525.1mb +++| LJM LED LOAD AND EXECUTE *DFT* 00671 M01S00526.1mb +++| 00672 M01S00527.1mb +++| MEP2 LCN 0 CLEAR C170 ERROR PRESENT FLAG 00673 M01S00528.1mb +++| STDL CN 00674 M01S00529.1mb +++| STDL CN+1 00675 M01S00530.1mb +++| STDL CN+2 00676 M01S00531.1mb +++| SCBN DCE7 00677 M01S00532.1mb +++| STDL CN+3 00678 M01S00533.1mb +++| RJM DOB 00679 M01S00534.1mb +++| ADK DFCW 00680 M01S00535.1mb +++| RDCL CN 00681 M01S00536.1mb +++| MEP3 LDN 1 SET INTERVAL BETWEEN CONTROL WORDS 00682 M01S00537.1mb +++| STD T2 00683 M01S00083.271l716 +++| RJM SCA SET ADDRESS OF CONTROL WORDS 00684 M01S00538.1mb +++| LDD DC+2 SET NUMBER OF M/R BUFFER CONTROL WORDS 00685 M01S00539.1mb +++| LPC 377 00686 M01S00540.1mb +++| RJM FOM FIND OLDEST M/R BUFFER CONTROL WORD 00687 M01S00541.1mb +++| STM FSSB SAVE M/R CONTROL WORD OFFSET 00688 M01S00542.1mb +++| STM LMRD SET NON-REGISTER FLAG 00689 M01S00543.1mb +++| ZJN MEP4 IF NO ENTRIES PRESENT 00690 M01S00544.1mb +++| RJM FSS FIND SUPPORTIVE STATUS DATA 00691 M01S00545.1mb +++| UJN MEP5 DETERMINE OS ACTION 00692 M01S00546.1mb +++| 00693 M01S00547.1mb +++| MEP4 RJM FNR FIND NON-REGISTER DATA 00694 M01S00548.1mb +++| NJN MEP5 IF DATA PRESENT 00695 M01S00549.1mb +++| LDC ** 00696 M01S00550.1mb +++| MEPA EQU *-1 AUTORESTART PENDING FLAG 00697 M01S00551.1mb +++| ZJP DPP IF AUTORESTART NOT PENDING 00698 M01S00552.1mb +++| LDD IA LOAD *1DS* TO ISSUE *AUTO* 00699 M01S00553.1mb +++| CWM MEPD,ON
| Line S00554 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2660 |
Seq # *Modification Id* Act ----------------------------+ 00700 M02S00554.ns2660 ---| LJM DPP0 CALL *1DS* AND ENABLE *1MB* CALL 00701 M01S00016.ns2660 +++| LJM DPP1 CALL *1DS* AND ENABLE *1MB* CALL 00702 M01S00555.1mb +++| 00703 M01S00556.1mb +++| MEP5 LDD CN+1 SET SYMPTOM CODE IN *BML* 00704 M01S00557.1mb +++| STM IBMF+1 00705 M01S00558.1mb +++| LDDL CN+2 SET SEQUENCE NUMBER IN *BML* 00706 M01S00559.1mb +++| SHN -10 00707 M01S00560.1mb +++| STM IBMG+4 00708 M01S00561.1mb +++| RJM DOA DETERMINE OS ACTION 00709 M01S00562.1mb +++| 00710 M01S00563.1mb +++|* OS ACTION ROUTINES WILL RETURN HERE. 00711 M01S00564.1mb +++| 00712 M01S00565.1mb +++| MEP6 RJM CTH CHECK THRESHOLD EXCEEDED 00713 M01S00566.1mb +++| RJM LMR LOG MAINTENANCE REGISTERS 00714 M01S00567.1mb +++| 00715 M01S00568.1mb +++|* CLEAR C170 VALID DATA FLAG, LOGGING ACTION FLAG, INTERLOCK 00716 M01S00569.1mb +++|* FLAG AND THRESHOLD EXCEEDED FLAG IN M/R BUFFER CONTROL WORD. 00717 M01S00570.1mb +++| 00718 M01S00571.1mb +++| LDD MB READ CONTROL WORD 00719 M01S00572.1mb +++| SHN 14 00720 M01S00573.1mb +++| LMD MB+1 00721 M01S00574.1mb +++| CRDL CN 00722 M01S00575.1mb +++| LDDL CN+2 CLEAR FLAGS 00723 M01S00576.1mb +++| MEPC SCBN (MRV7,MRIL,MRLG,MRTH) 00724 M01S00577.1mb +++|* SCBN (MRV7,MRIL) (180 LOGGING) 00725 M01S00578.1mb +++| STDL CN+2 00726 M01S00579.1mb +++| LDD MB REWRITE M/R BUFFER CONTROL WORD 00727 M01S00580.1mb +++| SHN 14 00728 M01S00581.1mb +++| LMD MB+1 00729 M01S00582.1mb +++| CWDL CN 00730 M01S00583.1mb +++| LJM MEP3 PROCESS NEXT M/R ENTRY 00731 M01S00584.1mb +++| 00732 M01S00585.1mb +++| MEPD VFD 18/0L1DS,6/0,2/0,1/0,3/0,6//1DS/IASF,12/0,12/0 00733 M01S00586.1mb +++| TITLE OS ACTION CODE PROCESSING ROUTINES. 00734 M01S00587.1mb +++| SPACE 4,10 00735 M01S00588.1mb +++|*** OS ACTION CODE PROCESSING ROUTINES. 00736 M01S00589.1mb +++|* 00737 M01S00590.1mb +++|* ENTRY (MB - MB+1) = ADDRESS OF M/R CONTROL WORD. 00738 M01S00591.1mb +++|* (DC - DC+3) = *DFT* CONTROL WORD. 00739 M01S00592.1mb +++|* (CN - CN+3) = M/R BUFFER CONTROL WORD. 00740 M01S00593.1mb +++|* 00741 M01S00594.1mb +++|* EXIT TO *MEP6* TO LOG MAINTENANCE REGISTERS. 00742 M01S00595.1mb +++|* TO *CSH* TO CHECKPOINT AND HANG. 00743 M01S00596.1mb +++| ENW SPACE 4,10 00744 M01S00597.1mb +++|** ENW - ENVIRONMENT WARNING. 00745 M01S00598.1mb +++|* 00746 M01S00599.1mb +++|* EXIT TO *WWC* TO WAIT FOR WARNING CLEAR. 00747 M01S00600.1mb +++|* 00748 M01S00601.1mb +++|* USES CM - CM+3. 00749 M01S00602.1mb +++|* 00750 M01S00603.1mb +++|* CALLS CCI, CCM, CKC, CKP, DOB, LMR, RSM. 00751 M01S00604.1mb +++| 00752 M01S00605.1mb +++| 00753 M01S00606.1mb +++| ENW BSS 0 ENTRY 00754 M01S00607.1mb +++| RJM CCM CREATE CONSOLE MESSAGE 00755 M01S00608.1mb +++| LDD SC+2 00756 M01S00609.1mb +++| NJN ENW1 IF *1CK* ALREADY CALLED 00757 M01S00610.1mb +++| RJM LMR LOG MAINTENANCE REGISTERS 00758 M01S00611.1mb +++| ENW1 LDN ZERL SET C170 ERROR FLAG 00759 M01S00612.1mb +++| CRDL CM 00760 M01S00613.1mb +++| AOD CM+3 00761 M01S00614.1mb +++| ERRNZ DCE7 CODE DEPENDS ON VALUE 00762 M01S00615.1mb +++| RJM DOB 00763 M01S00616.1mb +++| ADK DFCW 00764 M01S00617.1mb +++| RDSL CM 00765 M01S00618.1mb +++| RJM CCI CLEAR M/R CONTROL WORD INTERLOCK
| Line S00619 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2593 |
Seq # *Modification Id* Act ----------------------------+ 00766 M02S00619.ns2593 ---| LDN 10 SET *1CK* TO RECALL *1MB* 00767 M01S00003.ns2593 +++| ENWC LDN 10 SET *1CK* TO RECALL *1MB* 00768 M01S00004.ns2593 +++|* LDN 13 (LONG POWER WARNING) 00769 M01S00620.1mb +++| STM CKPA+2 00770 M01S00621.1mb +++| LDN SPLG SET *1MB* FUNCTION CODE 00771 M01S00622.1mb +++| STM CKPA+3 00772 M01S00623.1mb +++| RJM CKP LOAD AND EXECUTE *1CK* 00773 M01S00624.1mb +++| RJM CKC WAIT FOR *1CK* TO COMPLETE 00774 M01S00625.1mb +++| RJM RSM REQUEST STEP MODE 00775 M01S00626.1mb +++| LDD CP DISPLAY OPERATOR MESSAGE 00776 M01S00627.1mb +++| ADN MS2W 00777 M01S00628.1mb +++| CWM MSFS,TR 00778 M01S00629.1mb +++| LJM WWC WAIT FOR WARNING CLEAR 00779 M01S00630.1mb +++| LPW SPACE 4,10 00780 M01S00631.1mb +++|** LPW - LONG POWER WARNING.
| Line S00632 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2593 |
Seq # *Modification Id* Act ----------------------------+ 00781 M02S00632.ns2593 ---|*
| Line S00633 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2593 |
Seq # *Modification Id* Act ----------------------------+ 00782 M02S00633.ns2593 ---|* EXIT TO *SPW* IF ALL MASS STORAGE UNITS ARE NOT *ISD*-S.
| Line S00634 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2593 |
Seq # *Modification Id* Act ----------------------------+ 00783 M02S00634.ns2593 ---|* TO *ENW* IF ALL MASS STORAGE UNITS ARE *ISD*-S.
| Line S00635 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2593 |
Seq # *Modification Id* Act ----------------------------+ 00784 M02S00635.ns2593 ---|*
| Line S00636 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2593 |
Seq # *Modification Id* Act ----------------------------+ 00785 M02S00636.ns2593 ---|* USES CM - CM+4. 00786 M01S00637.1mb +++| 00787 M01S00638.1mb +++| 00788 M01S00639.1mb +++| LPW BSS 0 ENTRY
| Line S00640 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2593 |
Seq # *Modification Id* Act ----------------------------+ 00789 M02S00640.ns2593 ---| LDK CFGL CHECK ALL *ISD* FLAG
| Line S00641 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2593 |
Seq # *Modification Id* Act ----------------------------+ 00790 M02S00641.ns2593 ---| CRD CM
| Line S00642 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2593 |
Seq # *Modification Id* Act ----------------------------+ 00791 M02S00642.ns2593 ---| LDD CM+3
| Line S00643 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2593 |
Seq # *Modification Id* Act ----------------------------+ 00792 M02S00643.ns2593 ---| SHN 21-10
| Line S00644 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2593 |
Seq # *Modification Id* Act ----------------------------+ 00793 M02S00644.ns2593 ---| PJN SPW IF NOT ALL *ISD*-S 00794 M01S00005.ns2593 +++| LDN 13-10 CHANGE *1CK* CALL TO LONG POWER WARNING 00795 M01S00006.ns2593 +++| RAM ENWC 00796 M01S00645.1mb +++| LJM ENW PROCESS AS ENVIRONMENT WARNING 00797 M01S00646.1mb +++| SPW SPACE 4,10 00798 M01S00647.1mb +++|** SPW - SHORT POWER WARNING. 00799 M01S00648.1mb +++|* 00800 M01S00649.1mb +++|* EXIT TO *WWC* TO WAIT FOR WARNING CLEAR. 00801 M01S00650.1mb +++|* 00802 M01S00651.1mb +++|* CALLS CCM, LMR, RSM. 00803 M01S00652.1mb +++| 00804 M01S00653.1mb +++| 00805 M01S00654.1mb +++| SPW BSS 0 ENTRY 00806 M01S00655.1mb +++| RJM CCM CREATE CONSOLE MESSAGE 00807 M01S00656.1mb +++| RJM LMR LOG MAINTENANCE REGISTERS 00808 M01S00657.1mb +++| RJM RSM REQUEST STEP MODE 00809 M01S00658.1mb +++| LJM WWC WAIT FOR WARNING TO CLEAR 00810 M01S00659.1mb +++| WCL SPACE 4,10 00811 M01S00660.1mb +++|** WCL - WARNING CLEAR. 00812 M01S00661.1mb +++|* 00813 M01S00662.1mb +++|* EXIT TO *MEP6* TO LOG MAINTENANCE REGISTERS. 00814 M01S00663.1mb +++|* (SCRL) UPDATED. 00815 M01S00664.1mb +++|* 00816 M01S00665.1mb +++|* USES CM - CM+4, SC - SC+4. 00817 M01S00666.1mb +++|* 00818 M01S00667.1mb +++|* MACROS DELAY, MONITOR. 00819 M01S00668.1mb +++| 00820 M01S00669.1mb +++| 00821 M01S00670.1mb +++| WCL LDD CP DISPLAY *POWER/ENVIRONMENT NORMAL* 00822 M01S00671.1mb +++| ADN MS2W 00823 M01S00672.1mb +++| CWM MSPN,TR 00824 M01S00673.1mb +++| LDN SSTL CHECK AUTORESTART 00825 M01S00674.1mb +++| CRD CM 00826 M01S00675.1mb +++| LDD CM 00827 M01S00676.1mb +++| SHN 21-13 00828 M01S00677.1mb +++| MJN WCL2 IF AUTORESTART DISABLED 00829 M01S00678.1mb +++| LDD SC 00830 M01S00679.1mb +++| SHN 21-11 00831 M01S00680.1mb +++| MJN WCL1 IF *1MB* REQUEST BIT SET 00832 M01S00681.1mb +++| LDD TH 00833 M01S00682.1mb +++| RAD SC 00834 M01S00683.1mb +++| LDC SCRL STORE *SCRL* WITH REQUESTED FLAG SET 00835 M01S00684.1mb +++| CWD SC 00836 M01S00685.1mb +++| WCL1 LDN ZERL 00837 M01S00686.1mb +++| CRD CM 00838 M01S00687.1mb +++| LDN 4 SET *DSRM* SUBFUNCTION TO CLEAR STEP 00839 M01S00688.1mb +++| STD CM+1 00840 M01S00689.1mb +++| STM MEPA SET AUTORESTART PENDING 00841 M01S00690.1mb +++| MONITOR DSRM 00842 M01S00691.1mb +++| WCL2 LDC SCRL ENABLE *UNSTEP* COMMAND 00843 M01S00692.1mb +++| CRD SC 00844 M01S00693.1mb +++| LDD SC 00845 M01S00694.1mb +++| LPC 6777 00846 M01S00695.1mb +++| STD SC 00847 M01S00696.1mb +++| LDC SCRL 00848 M01S00697.1mb +++| CWD SC 00849 M01S00698.1mb +++| WCL3 DELAY 00850 M01S00699.1mb +++| LDC SCRL CHECK STEP MODE 00851 M01S00700.1mb +++| CRD SC 00852 M01S00701.1mb +++| LDD SC 00853 M01S00702.1mb +++| SHN 21-10 00854 M01S00703.1mb +++| MJN WCL3 IF STEP STILL SET 00855 M01S00704.1mb +++| LJM MEP6 LOG MAINTENANCE REGISTERS 00856 M01S00705.1mb +++| FIE SPACE 4,10 00857 M01S00706.1mb +++|** FIE - FATAL IOU ERROR. 00858 M01S00707.1mb +++|* 00859 M01S00708.1mb +++|* EXIT TO *CSH* TO CHECK POINT DEVICES AND THEN HANG. 00860 M01S00709.1mb +++|* 00861 M01S00710.1mb +++|* USES CM - CM+3. 00862 M01S00711.1mb +++|* 00863 M01S00712.1mb +++|* CALLS CCI, CCM, CSH, DOB. 00864 M01S00713.1mb +++| 00865 M01S00714.1mb +++| 00866 M01S00715.1mb +++| FIE BSS 0 ENTRY 00867 M01S00716.1mb +++| RJM CCM CREATE CONSOLE MESSAGE 00868 M01S00717.1mb +++| LDN 11 CHECK POINT DEVICES AND RECALL *1MB* 00869 M01S00718.1mb +++| STM CKPA+2 00870 M01S00719.1mb +++| LDN SPLG SET *1MB* FUNCTION CODE 00871 M01S00720.1mb +++| STM CKPA+3 00872 M01S00721.1mb +++| LDN ZERL SET C170 ERROR FLAG 00873 M01S00722.1mb +++| CRDL CM 00874 M01S00723.1mb +++| AOD CM+3 00875 M01S00724.1mb +++| ERRNZ DCE7 CODE DEPENDS ON VALUE 00876 M01S00725.1mb +++| RJM DOB 00877 M01S00726.1mb +++| ADK DFCW 00878 M01S00727.1mb +++| RDSL CM 00879 M01S00728.1mb +++| RJM CCI CLEAR M/R CONTROL WORD INTERLOCK 00880 M01S00729.1mb +++| RJM CSH CHECKPOINT AND HANG 00881 M01S00730.1mb +++| NIE SPACE 4,10 00882 M01S00731.1mb +++|** NIE - NOS/VE IOU ERROR. 00883 M01S00732.1mb +++|* 00884 M01S00733.1mb +++|* EXIT TO *MEP6* TO LOG MAINTENANCE REGISTERS. 00885 M01S00734.1mb +++|* 00886 M01S00735.1mb +++|* CALLS CCM. 00887 M01S00736.1mb +++| 00888 M01S00737.1mb +++| 00889 M01S00738.1mb +++| NIE BSS 0 ENTRY 00890 M01S00739.1mb +++| RJM CCM CREATE CONSOLE MESSAGE 00891 M01S00740.1mb +++| LJM MEP6 LOG MAINTENANCE REGISTERS 00892 M01S00741.1mb +++| MOB SPACE 4,10 00893 M01S00742.1mb +++|** MOB - MULTIPLE ODD BIT ERROR. 00894 M01S00743.1mb +++|* 00895 M01S00744.1mb +++|* CALLS CCI, CCM, RSM. 00896 M01S00745.1mb +++| 00897 M01S00746.1mb +++| MOB RJM CCI CLEAR M/R INTERLOCK 00898 M01S00747.1mb +++| RJM CCM CREATE CONSOLE MESSAGE 00899 M01S00748.1mb +++| RJM RSM REQUEST STEP MODE 00900 M01S00749.1mb +++| UJN * HANG 00901 M01S00750.1mb +++| TITLE OS ACTION CODE SUBROUTINES. 00902 M01S00751.1mb +++| CCI SPACE 4,10 00903 M01S00752.1mb +++|** CCI - CLEAR M/R CONTROL WORD INTERLOCK. 00904 M01S00753.1mb +++|* 00905 M01S00754.1mb +++|* ENTRY (MB - MB+1) = ADDRESS OF OLDEST M/R CONTROL WORD. 00906 M01S00755.1mb +++|* 00907 M01S00756.1mb +++|* USES CM - CM+3. 00908 M01S00757.1mb +++| 00909 M01S00758.1mb +++| 00910 M01S00759.1mb +++| CCI SUBR ENTRY/EXIT 00911 M01S00760.1mb +++| LCN 0 CLEAR M/R CONTROL WORD INTERLOCK 00912 M01S00761.1mb +++| STDL CM 00913 M01S00762.1mb +++| STDL CM+1 00914 M01S00763.1mb +++| STDL CM+3 00915 M01S00764.1mb +++| SCBN MRIL 00916 M01S00765.1mb +++| STDL CM+2 00917 M01S00766.1mb +++| LDD MB 00918 M01S00767.1mb +++| SHN 14 00919 M01S00768.1mb +++| LMD MB+1 00920 M01S00769.1mb +++| RDCL CM 00921 M01S00770.1mb +++| UJN CCIX RETURN 00922 M01S00771.1mb +++| CCM SPACE 4,15 00923 M01S00772.1mb +++|** CCM - CREATE CONSOLE MESSAGE. 00924 M01S00773.1mb +++|* 00925 M01S00774.1mb +++|* ENTRY (SSCW - SSCW+1) = ADDRESS OF SUPPORTIVE STATUS DATA. 00926 M01S00775.1mb +++|* (DFTV) = *DFT* VERSION. 00927 M01S00776.1mb +++|* (CN - CN+3) = M/R BUFFER CONTROL WORD. 00928 M01S00777.1mb +++|* 00929 M01S00778.1mb +++|* EXIT TIME AND FAULT SYMPTOM CODE BUILT INTO MESSAGE. 00930 M01S00779.1mb +++|* MESSAGE ISSUED TO SYSTEM CONTROL POINT. 00931 M01S00780.1mb +++|* 00932 M01S00781.1mb +++|* CALLS ACS, CTC, CTD, RER, SCM. 00933 M01S00782.1mb +++|* 00934 M01S00783.1mb +++|* USES T1, T3, T5, CM - CM+3. 00935 M01S00784.1mb +++| 00936 M01S00785.1mb +++| 00937 M01S00786.1mb +++| CCM SUBR ENTRY/EXIT 00938 M01S00787.1mb +++| LDM DFTV 00939 M01S00788.1mb +++| ZJN CCM1 IF NOT *DFT* VERSION 4 OR ABOVE 00940 M01S00789.1mb +++| LDN 2 00941 M01S00790.1mb +++| STD T1 00942 M01S00791.1mb +++| LDM SSCW 00943 M01S00792.1mb +++| SHN 14 00944 M01S00793.1mb +++| LMM SSCW+1 00945 M01S00794.1mb +++| ADN 1 00946 M01S00795.1mb +++| CRDL CM READ DATE/TIME 00947 M01S00796.1mb +++| ADN 1 00948 M01S00797.1mb +++| CRML CCMB,T1 READ FAULT SYMPTOM CODE 00949 M01S00798.1mb +++| LDD CM 00950 M01S00799.1mb +++| SHN 21-10 00951 M01S00800.1mb +++| MJN CCM1 IF NO VALID DATA 00952 M01S00801.1mb +++| NJN CCM2 IF NOT MODEL 20 IOU 00953 M01S00802.1mb +++| CCM1 LDK TIML GET TIME 00954 M01S00803.1mb +++| CRM MSFS,ON 00955 M01S00804.1mb +++| LDC MSFS+5 SET ADDRESS FOR ASSEMBLY 00956 M01S00805.1mb +++| STD T1 00957 M01S00806.1mb +++| LDN 0 SET END OF ASSEMBLY FOR *ACS* 00958 M01S00807.1mb +++| STM MSFS+5 00959 M01S00808.1mb +++| UJN CCM3 CONVERT FAULT SYMPTOM CODE 00960 M01S00809.1mb +++| 00961 M01S00810.1mb +++|* CONVERT TIME FROM SUPPORTIVE STATUS DATA. 00962 M01S00811.1mb +++| 00963 M01S00812.1mb +++| CCM2 LDC 2L . SET END OF STRING FOR *ACS* 00964 M01S00813.1mb +++| STD T5 00965 M01S00814.1mb +++| LDC 2L SET END OF ASSEMBLY FOR *ACS* 00966 M01S00815.1mb +++| STM MSFS 00967 M01S00816.1mb +++| LDC MSFS SET ADDRESS FOR ASSEMBLY 00968 M01S00817.1mb +++| STD T1 00969 M01S00818.1mb +++| LDDL CM+2 CONVERT HOURS 00970 M01S00819.1mb +++| SHN -10 00971 M01S00820.1mb +++| RJM CTD 00972 M01S00821.1mb +++| RJM ACS 00973 M01S00822.1mb +++| LDD CM+2 CONVERT MINUTES 00974 M01S00823.1mb +++| LPC 377 00975 M01S00824.1mb +++| RJM CTD 00976 M01S00825.1mb +++| RJM ACS 00977 M01S00826.1mb +++| LDDL CM+3 CONVERT SECONDS 00978 M01S00827.1mb +++| SHN -10 00979 M01S00828.1mb +++| RJM CTD 00980 M01S00829.1mb +++| RJM ACS 00981 M01S00830.1mb +++| CCM3 LDC CCMA ADD *ERR=* TO MESSAGE 00982 M01S00831.1mb +++| RJM ACS 00983 M01S00832.1mb +++| LDM MSFS+4 00984 M01S00833.1mb +++| SCN 77 00985 M01S00834.1mb +++| ADN 1R 00986 M01S00835.1mb +++| STM MSFS+4 00987 M01S00836.1mb +++| LDD CN+1 00988 M01S00837.1mb +++| LPC 3777 00989 M01S00838.1mb +++| SBK 0#707 00990 M01S00839.1mb +++| PJN CCM4 IF NOT WARNING 00991 M01S00840.1mb +++| ADK 0#707-0#701 00992 M01S00841.1mb +++| PJN CCM5 IF WARNING 00993 M01S00842.1mb +++| CCM4 LDM DFTV 00994 M01S00843.1mb +++| NJN CCM6 IF *DFT* VERSION 4 OR ABOVE 00995 M01S00844.1mb +++| 00996 M01S00845.1mb +++|* BUILD MESSAGE FOR ALL *DFT* VERSION 3 ERRORS, AND WARNING 00997 M01S00846.1mb +++|* ERRORS FOR *DFT* VERSION 4 AND ABOVE. 00998 M01S00847.1mb +++| 00999 M01S00848.1mb +++| CCM5 RJM RER READ *EID* REGISTER 01000 M01S00849.1mb +++| RJM SCM SET ANALYSIS CODE IN MESSAGE 01001 M01S00850.1mb +++| LDN 0 ADD TERMINATOR 01002 M01S00851.1mb +++| STM MSFS+13 01003 M01S00852.1mb +++| UJN CCM8 DISPLAY OPERATOR MESSAGE 01004 M01S00853.1mb +++| 01005 M01S00854.1mb +++|* CONVERT FAULT SYMPTOM CODE DATA FOR *DFT* VERSION 4 AND 01006 M01S00855.1mb +++|* ABOVE (EXCEPT FOR WARNING ERRORS). 01007 M01S00856.1mb +++| 01008 M01S00857.1mb +++| CCM6 LDN 0 SET END OF STRING FOR *ACS* 01009 M01S00858.1mb +++| STD T5 01010 M01S00859.1mb +++| LDC CCMB+2 SET START OF FAULT SYMPTOM CODE 01011 M01S00860.1mb +++| STD T3 01012 M01S00861.1mb +++| CCM7 RJM CTC CONVERT TWO CHARACTERS 01013 M01S00862.1mb +++| RJM ACS 01014 M01S00863.1mb +++| AOD T3 01015 M01S00864.1mb +++| LMC CCMB+10 01016 M01S00865.1mb +++| NJN CCM7 IF MORE TO CONVERT 01017 M01S00866.1mb +++| CCM8 LDD CP DISPLAY OPERATOR MESSAGE 01018 M01S00867.1mb +++| ADN MS2W 01019 M01S00868.1mb +++| CWM MSFS,TR * HH.MM.SS ERR=XXXXXXXXXXXX* 01020 M01S00869.1mb +++| LJM CCMX RETURN 01021 M01S00870.1mb +++| 01022 M01S00871.1mb +++| 01023 M01S00872.1mb +++| CCMA DATA C*ERR=* 01024 M01S00873.1mb +++| CCMB BSS 2*4 FAULT SYMPTOM CODE 01025 M01S00874.1mb +++| CHC SPACE 4,10 01026 M01S00875.1mb +++|** CHC - CONVERT HEXADECIMAL CHARACTER TO DISPLAY CODE. 01027 M01S00876.1mb +++|* 01028 M01S00877.1mb +++|* ENTRY (A) = VALUE TO CONVERT. 01029 M01S00878.1mb +++|* 01030 M01S00879.1mb +++|* EXIT (A) = DISPLAY CODE. 01031 M01S00880.1mb +++| 01032 M01S00881.1mb +++| 01033 M01S00882.1mb +++| CHC1 ADN 10D+1R0 CONVERT TO DISPLAY CODE 01034 M01S00883.1mb +++| 01035 M01S00884.1mb +++| CHC SUBR ENTRY/EXIT 01036 M01S00885.1mb +++| LPN 17 MASK ONE CHARACTER 01037 M01S00886.1mb +++| SBN 10D 01038 M01S00887.1mb +++| MJN CHC1 IF DECIMAL CHARACTER 01039 M01S00888.1mb +++| ADN 1RA SET HEX CHARACTER 01040 M01S00889.1mb +++| UJN CHCX RETURN 01041 M01S00890.1mb +++| CTC SPACE 4,10 01042 M01S00891.1mb +++|** CTC - CONVERT TWO CHARACTERS. 01043 M01S00892.1mb +++|* 01044 M01S00893.1mb +++|* ENTRY (T3) = ADDRESS OF TWO 8-BIT ASCII CHARACTERS. 01045 M01S00894.1mb +++|* 01046 M01S00895.1mb +++|* EXIT (A) = ADDRESS OF TWO DISPLAY CODE CHARACTERS. 01047 M01S00896.1mb +++|* (T4 - T5) = TWO CHARACTERS PLUS ZERO TERMINATOR. 01048 M01S00897.1mb +++|* 01049 M01S00898.1mb +++|* USES T4, T6. 01050 M01S00899.1mb +++| 01051 M01S00900.1mb +++| 01052 M01S00901.1mb +++| CTC SUBR ENTRY/EXIT 01053 M01S00902.1mb +++| LDIL T3 CONVERT FIRST CHARACTER 01054 M01S00903.1mb +++| SHN -10 01055 M01S00904.1mb +++| SBN 40 01056 M01S00905.1mb +++| STD T6 01057 M01S00906.1mb +++| LDM T8AD,T6 01058 M01S00907.1mb +++| SHN 6 01059 M01S00908.1mb +++| STD T4 01060 M01S00909.1mb +++| LDI T3 CONVERT SECOND CHARACTER 01061 M01S00910.1mb +++| LPC 377 01062 M01S00911.1mb +++| SBN 40 01063 M01S00912.1mb +++| STD T6 01064 M01S00913.1mb +++| LDM T8AD,T6 01065 M01S00914.1mb +++| RAD T4 01066 M01S00915.1mb +++| LDN T4 SET ADDRESS OF STRING 01067 M01S00916.1mb +++| UJN CTCX RETURN 01068 M01S00917.1mb +++| CTD SPACE 4,10 01069 M01S00918.1mb +++|** CTD - CONVERT TWO DIGITS. 01070 M01S00919.1mb +++|* 01071 M01S00920.1mb +++|* ENTRY (A) = TWO 4-BIT DIGITS. 01072 M01S00921.1mb +++|* 01073 M01S00922.1mb +++|* EXIT (A) = ADDRESS OF STRING TO ADD TO MESSAGE. 01074 M01S00923.1mb +++|* (T4) = STRING TO ADD TO MESSAGE. 01075 M01S00924.1mb +++|* (CALLER MUST SUPPLY TERMINATOR IF NECESSARY). 01076 M01S00925.1mb +++|* 01077 M01S00926.1mb +++|* USES T3, T4. 01078 M01S00927.1mb +++| 01079 M01S00928.1mb +++| 01080 M01S00929.1mb +++| CTD SUBR ENTRY/EXIT 01081 M01S00930.1mb +++| STD T3 01082 M01S00931.1mb +++| SHN -4 CONVERT FIRST CHARACTER 01083 M01S00932.1mb +++| ADN 1R0 01084 M01S00933.1mb +++| SHN 6 01085 M01S00934.1mb +++| STD T4 01086 M01S00935.1mb +++| LDD T3 CONVERT SECOND CHARACTER 01087 M01S00936.1mb +++| LPN 17 01088 M01S00937.1mb +++| ADN 1R0 01089 M01S00938.1mb +++| RAD T4 01090 M01S00939.1mb +++| LDN T4 SET ADDRESS OF STRING 01091 M01S00940.1mb +++| UJN CTDX RETURN 01092 M01S00941.1mb +++| RER SPACE 4,15 01093 M01S00942.1mb +++|** RER - READ *EID* REGISTER. 01094 M01S00943.1mb +++|* 01095 M01S00944.1mb +++|* ENTRY (CN - CN+3) = M/R BUFFER CONTROL WORD. 01096 M01S00945.1mb +++|* *DFT* INDICATES CPU 1 OR IOU 1 BY LOGGING ELEMENT CODE 01097 M01S00946.1mb +++|* 10(16) OR 12(16) IN THE *EID* REGISTER (INSTEAD OF 0 01098 M01S00947.1mb +++|* OR 2). 01099 M01S00001.1mb34 +++|* (MB - MB+1) = THE ADDRESS OF THE CURRENT NON REGISTER 01100 M01S00002.1mb34 +++|* STATUS BUFFER (*NRSB*) ENTRY. 01101 M01S00948.1mb +++|* 01102 M01S00949.1mb +++|* EXIT ELEMENT CODE AND MODEL NUMBER SET IN MESSAGE. 01103 M01S00950.1mb +++|* 01104 M01S00951.1mb +++|* USES T1, CM - CM+3. 01105 M01S00952.1mb +++|* 01106 M01S00953.1mb +++|* CALLS CTD, MRB. 01107 M01S00954.1mb +++| 01108 M01S00955.1mb +++| 01109 M01S00956.1mb +++| RER SUBR ENTRY/EXIT
| Line S00957 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 1mb34 |
Seq # *Modification Id* Act ----------------------------+ 01110 M02S00957.1mb34 ---| LDN 0 INITIALIZE OFFSET 01111 M01S00003.1mb34 +++| LDM IBMG CHECK FOR *DFT* VERSION 5 OR ABOVE 01112 M01S00004.1mb34 +++| SBN 5 01113 M01S00005.1mb34 +++| MJN RER0 IF LESS THAN VERSION 5 01114 M01S00006.1mb34 +++| 01115 M01S00007.1mb34 +++|* FOR *DFT* VERSION 5 OR ABOVE, GET THE ELEMENT ID (*EID*) 01116 M01S00008.1mb34 +++|* FROM THE *NRSB* ENTRY. 01117 M01S00009.1mb34 +++| 01118 M01S00010.1mb34 +++| LDD MB GET ADDRESS OF *NRSB* ENTRY 01119 M01S00011.1mb34 +++| SHN 14 01120 M01S00012.1mb34 +++| ADD MB+1 01121 M01S00013.1mb34 +++| ADN 5 OFFSET TO *EID* REGISTER ENTRY 01122 M01S00014.1mb34 +++| CRDL CM READ IN *EID* REGISTER 01123 M01S00015.1mb34 +++| UJN RER1.1 PROCESS THE *EID* 01124 M01S00016.1mb34 +++| 01125 M01S00017.1mb34 +++| RER0 LDN 0 INITIALIZE OFFSET 01126 M01S00958.1mb +++| STD T1 01127 M01S00959.1mb +++| RER1 AOD T1 01128 M01S00960.1mb +++| SBN 5 01129 M01S00961.1mb +++| ZJN RER1 IF SECOND HEADER WORD 01130 M01S00962.1mb +++| SBN 10-5 01131 M01S00963.1mb +++| ZJN RER2 IF END OF BUFFER (USE ZERO DATA) 01132 M01S00964.1mb +++| RJM MRB GET ADDRESS OF M/R BUFFERS 01133 M01S00965.1mb +++| ADD CN+3 ADD OFFSET 01134 M01S00966.1mb +++| ADD T1 SKIP TO NEXT WORD 01135 M01S00967.1mb +++| CRDL CM READ *EID* REGISTER 01136 M01S00968.1mb +++| LDDL CM 01137 M01S00969.1mb +++| ADDL CM+1 01138 M01S00970.1mb +++| ADDL CM+2 01139 M01S00971.1mb +++| ADDL CM+3 01140 M01S00972.1mb +++| ZJN RER1 IF *EID* NOT FOUND YET
| Line S00973 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 1mb34 |
Seq # *Modification Id* Act ----------------------------+ 01141 M02S00973.1mb34 ---| LDDL CM+2 GET ELEMENT CODE 01142 M01S00018.1mb34 +++| RER1.1 LDDL CM+2 GET ELEMENT CODE 01143 M01S00974.1mb +++| SHN -10 01144 M01S00975.1mb +++| ADN 1 01145 M01S00976.1mb +++| RER2 STD T1 01146 M01S00977.1mb +++| SHN -2 INCLUDE CPU 1/IOU 1 FLAG 01147 M01S00978.1mb +++| RAD T1 01148 M01S00979.1mb +++| LDM RERA,T1 GET MESSAGE CHARACTERS 01149 M01S00980.1mb +++| STM MSFS+7 01150 M01S00981.1mb +++| LDD CM+2 GET MODEL NUMBER 01151 M01S00982.1mb +++| LPC 377 01152 M01S00983.1mb +++| RJM CTD CONVERT DIGITS 01153 M01S00984.1mb +++| LDD T4 ADD MODEL NUMBER TO MESSAGE 01154 M01S00985.1mb +++| STM MSFS+10 01155 M01S00986.1mb +++| UJP RERX RETURN 01156 M01S00987.1mb +++| 01157 M01S00988.1mb +++| 01158 M01S00989.1mb +++|** RERA - TABLE OF MESSAGE CHARACTERS. 01159 M01S00990.1mb +++|* 01160 M01S00991.1mb +++|* INDEXED BY ELEMENT CODE. 01161 M01S00992.1mb +++| 01162 M01S00993.1mb +++| 01163 M01S00994.1mb +++| RERA BSS 0 01164 M01S00995.1mb +++| DATA 2R00 UNKNOWN ELEMENT 01165 M01S00996.1mb +++| DATA 2RDC PROCESSOR 0 01166 M01S00997.1mb +++| DATA 2RDM MEMORY 01167 M01S00998.1mb +++| DATA 2RDI IOU 0 01168 M01S00999.1mb +++| DATA 2R UNUSED 01169 M01S01000.1mb +++| DATA 2RDD PROCESSOR 1 01170 M01S01001.1mb +++| DATA 2R UNUSED 01171 M01S01002.1mb +++| DATA 2RDJ IOU 1 01172 M01S01003.1mb +++| 01173 M01S01004.1mb +++| SCM SPACE 4,15 01174 M01S01005.1mb +++|** SCM - SET ANALYSIS CODE IN MESSAGE. 01175 M01S01006.1mb +++|* 01176 M01S01007.1mb +++|* THE *DFT* ANALYSIS CODE FROM THE CONTROL WORD IS CONVERTED 01177 M01S01008.1mb +++|* TO HEXADECIMAL DISPLAY CODE AND PLACED IN THE CONSOLE 01178 M01S01009.1mb +++|* MESSAGE. 01179 M01S01010.1mb +++|* 01180 M01S01011.1mb +++|* ENTRY (CN - CN+3) = CONTROL WORD. 01181 M01S01012.1mb +++| 01182 M01S01013.1mb +++| 01183 M01S01014.1mb +++| SCM SUBR ENTRY/EXIT 01184 M01S01015.1mb +++| LDD CN+1 GET *DFT* ANALYSIS CODE 01185 M01S01016.1mb +++| RJM CHC CONVERT THIRD CHARACTER 01186 M01S01017.1mb +++| SHN 6 01187 M01S01018.1mb +++| STM MSFS+12 01188 M01S01019.1mb +++| LDD CN+1 CONVERT SECOND CHARACTER 01189 M01S01020.1mb +++| SHN -4 01190 M01S01021.1mb +++| RJM CHC 01191 M01S01022.1mb +++| STM MSFS+11 01192 M01S01023.1mb +++| LDD CN+1 CONVERT FIRST CHARACTER 01193 M01S01024.1mb +++| SHN -10 01194 M01S01025.1mb +++| RJM CHC 01195 M01S01026.1mb +++| SHN 6 01196 M01S01027.1mb +++| RAM MSFS+11 01197 M01S01028.1mb +++| UJP SCMX RETURN 01198 M01S01029.1mb +++| WWC SPACE 4,10 01199 M01S01030.1mb +++|** WWC - WAIT FOR WARNING CLEAR. 01200 M01S01031.1mb +++|* 01201 M01S01032.1mb +++|* EXIT TO *LED* TO LOAD *DFT* IF *DFT* NOT DEDICATED. 01202 M01S01033.1mb +++|* TO *WCL* TO PROCESS WARNING CLEAR IF *DFT* DEDICATED. 01203 M01S01034.1mb +++|* 01204 M01S01035.1mb +++|* USES CN - CN+3. 01205 M01S01036.1mb +++|* 01206 M01S01037.1mb +++|* CALLS CCI. 01207 M01S01038.1mb +++|* 01208 M01S01039.1mb +++|* MACROS DELAY. 01209 M01S01040.1mb +++| 01210 M01S01041.1mb +++| 01211 M01S01042.1mb +++| WWC RJM CCI CLEAR M/R CONTROL WORD INTERLOCK 01212 M01S01043.1mb +++| LDDL DC+3 CHECK IF DEDICATED *DFT* 01213 M01S01044.1mb +++| SHN 21-DCDM 01214 M01S01045.1mb +++| PJN WWC1 IF *DFT* DEDICATED 01215 M01S01046.1mb +++| LJM LED LOAD *DFT* 01216 M01S01047.1mb +++| 01217 M01S01048.1mb +++| WWC1 DELAY 01218 M01S01049.1mb +++| LDD MB READ M/R CONTROL WORD 01219 M01S01050.1mb +++| SHN 14 01220 M01S01051.1mb +++| LMD MB+1 01221 M01S01052.1mb +++| CRDL CN 01222 M01S01053.1mb +++| LDD CN CHECK FOR WARNING CLEAR 01223 M01S01054.1mb +++| LPC 377 01224 M01S01055.1mb +++| LMK WCAC 01225 M01S01056.1mb +++| ZJN WWC2 IF WARNING CLEAR 01226 M01S01057.1mb +++| LMK RSAC&WCAC 01227 M01S01058.1mb +++| ZJN WWC2 IF SYSTEM RESUME 01228 M01S01059.1mb +++| LMK USAC&RSAC 01229 M01S01060.1mb +++| NJN WWC1 IF NOT SYSTEM UNSTEP 01230 M01S01061.1mb +++| WWC2 LDD CN+1 PUT SYMPTOM CODE IN *BML* 01231 M01S01062.1mb +++| STM IBMF+1 01232 M01S01063.1mb +++| LJM WCL PROCESS WARNING CLEAR 01233 M01S01064.1mb +++| TITLE MAINTENANCE REGISTER PROCESSING SUBROUTINES. 01234 M01S01065.1mb +++| CBM SPACE 4,10 01235 M01S01066.1mb +++|** CBM - COMPLETE *BML* MESSAGES. 01236 M01S01067.1mb +++|* 01237 M01S01068.1mb +++|* ENTRY ALL DATA PRESENT IN *BML* BUFFER AND TRAILER WORD. 01238 M01S01069.1mb +++|* 01239 M01S01070.1mb +++|* EXIT *BML* BUFFER PADDED WITH SUFFICIENT ZERO WORDS. 01240 M01S01071.1mb +++|* THE BUFFER IS FLUSHED IF NECESSARY. 01241 M01S01072.1mb +++|* FINAL *BML* MESSAGE ISSUED. 01242 M01S01073.1mb +++|* 01243 M01S01074.1mb +++|* USES BP. 01244 M01S01075.1mb +++|* 01245 M01S01076.1mb +++|* CALLS PMB, WLB. 01246 M01S01077.1mb +++| 01247 M01S01078.1mb +++| 01248 M01S01079.1mb +++| CBM SUBR ENTRY/EXIT 01249 M01S01080.1mb +++| LDN ZERL 01250 M01S01081.1mb +++| CRML BDMR,ON USE ZERO AS REGISTER NUMBERS 01251 M01S01082.1mb +++| LDN ZERL 01252 M01S01083.1mb +++| CRM BCMR,ON CLEAR M/R BUFFER 01253 M01S01084.1mb +++| LDN ZERL 01254 M01S01085.1mb +++| CRM BCMR+7-4,ON 01255 M01S01086.1mb +++| CBM1 LDD T5 01256 M01S01087.1mb +++| ZJN CBM2 IF WRITE COMPLETE 01257 M01S01088.1mb +++| RJM PMB PACK AND WRITE FAKE M/R 01258 M01S01089.1mb +++| UJN CBM1 CONTINUE PROCESSING 01259 M01S01090.1mb +++| 01260 M01S01091.1mb +++| CBM2 LDN 5 UPDATE POINTER TO *BML* BUFFER 01261 M01S01092.1mb +++| RAD BP 01262 M01S01093.1mb +++| STM CBMA 01263 M01S01094.1mb +++| ADC -IBMHL 01264 M01S01095.1mb +++| PJN CBM3 IF READ COMPLETE 01265 M01S01096.1mb +++| LDN ZERL CLEAR BUFFER 01266 M01S01097.1mb +++| CRM **,ON 01267 M01S01098.1mb +++| CBMA EQU *-1 01268 M01S01099.1mb +++| UJN CBM2 CHECK AGAIN 01269 M01S01100.1mb +++| 01270 M01S01101.1mb +++| CBM3 LDN 6 SET MESSAGE LENGTH 01271 M01S01102.1mb +++| STD T4 01272 M01S01103.1mb +++| RJM WLB WRITE LAST *BML* MESSAGE 01273 M01S01104.1mb +++| UJP CBMX RETURN
| Line S01105 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01274 M02S01105.271l716 ---| CNR SPACE 4,15
| Line S01106 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01275 M02S01106.271l716 ---|** CNR - CHECK FOR NOS REQUEST.
| Line S01107 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01276 M02S01107.271l716 ---|*
| Line S01108 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01277 M02S01108.271l716 ---|* THIS ROUTINE IS CALLED IF *DFT* IS IN DEDICATED MODE AND
| Line S01109 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01278 M02S01109.271l716 ---|* THERE IS A NOS REQUEST PRESENT. IT RESERVES THE CIP
| Line S01110 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01279 M02S01110.271l716 ---|* CHANNEL, SETS THE REQUEST STATUS = *ACTIVE*, WAITS FOR THE
| Line S01111 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01280 M02S01111.271l716 ---|* REQUEST TO BE PROCESSED, AND RELEASES THE CIP CHANNEL.
| Line S01112 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01281 M02S01112.271l716 ---|*
| Line S01113 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01282 M02S01113.271l716 ---|* USES CM - CM+4, T1 - T1+4.
| Line S01114 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01283 M02S01114.271l716 ---|*
| Line S01115 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01284 M02S01115.271l716 ---|* CALLS CRQ, SDA.
| Line S01116 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01285 M02S01116.271l716 ---|*
| Line S01117 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01286 M02S01117.271l716 ---|* MACROS DCHAN, DELAY, RCHAN.
| Line S01118 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01287 M02S01118.271l716 ---|
| Line S01119 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01288 M02S01119.271l716 ---|
| Line S01120 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01289 M02S01120.271l716 ---| CNR SUBR ENTRY/EXIT
| Line S01121 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01290 M02S01121.271l716 ---| RJM SDA READ NOS REQUEST HEADER
| Line S01122 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01291 M02S01122.271l716 ---| CRD T1
| Line S01123 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01292 M02S01123.271l716 ---| LDD T1+4 CHECK REQUEST STATUS
| Line S01124 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01293 M02S01124.271l716 ---| LMN STRY
| Line S01125 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01294 M02S01125.271l716 ---| NJN CNRX IF NOT STATUS = *READY*
| Line S01126 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01295 M02S01126.271l716 ---| LDN DSAL LOCATE CIP CHANNEL
| Line S01127 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01296 M02S01127.271l716 ---| CRD CM
| Line S01128 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01297 M02S01128.271l716 ---| LDD CM+4 RESERVE CIP CHANNEL
| Line S01129 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01298 M02S01129.271l716 ---| LPN 77
| Line S01130 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01299 M02S01130.271l716 ---| STM CNRA
| Line S01131 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01300 M02S01131.271l716 ---| RCHAN
| Line S01132 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01301 M02S01132.271l716 ---| RJM CRQ CHECK REQUEST FOR SPECIAL PROCESSING
| Line S01133 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01302 M02S01133.271l716 ---| LDN STAC SET STATUS = *ACTIVE*
| Line S01134 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01303 M02S01134.271l716 ---| STD T1+4
| Line S01135 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01304 M02S01135.271l716 ---| RJM SDA REWRITE NOS REQUEST HEADER
| Line S01136 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01305 M02S01136.271l716 ---| CWD T1
| Line S01137 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01306 M02S01137.271l716 ---|
| Line S01138 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01307 M02S01138.271l716 ---|* WAIT FOR REQUEST TO BE PROCESSED BY *DFT*.
| Line S01139 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01308 M02S01139.271l716 ---|
| Line S01140 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01309 M02S01140.271l716 ---| CNR1 DELAY
| Line S01141 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01310 M02S01141.271l716 ---| RJM SDA READ NOS REQUEST HEADER
| Line S01142 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01311 M02S01142.271l716 ---| CRD T1
| Line S01143 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01312 M02S01143.271l716 ---| LDD T1+4
| Line S01144 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01313 M02S01144.271l716 ---| LMN STAC
| Line S01145 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01314 M02S01145.271l716 ---| ZJN CNR1 IF STATUS = *ACTIVE* STILL PRESENT
| Line S01146 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01315 M02S01146.271l716 ---| LDC ** RELEASE CIP CHANNEL
| Line S01147 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01316 M02S01147.271l716 ---| CNRA EQU *-1
| Line S01148 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01317 M02S01148.271l716 ---| DCHAN
| Line S01149 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01318 M02S01149.271l716 ---| LJM CNRX RETURN
| Line S01150 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01319 M02S01150.271l716 ---| CRQ SPACE 4,10
| Line S01151 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01320 M02S01151.271l716 ---|** CRQ - CHECK *DFT* REQUEST FOR SPECIAL PROCESSING.
| Line S01152 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01321 M02S01152.271l716 ---|*
| Line S01153 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01322 M02S01153.271l716 ---|* EXIT *UADM/FRAS* ISSUED IF NECESSARY.
| Line S01154 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01323 M02S01154.271l716 ---|*
| Line S01155 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01324 M02S01155.271l716 ---|* CALLS SDA.
| Line S01156 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01325 M02S01156.271l716 ---|*
| Line S01157 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01326 M02S01157.271l716 ---|* USES CM - CM+4.
| Line S01158 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01327 M02S01158.271l716 ---|*
| Line S01159 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01328 M02S01159.271l716 ---|* MACROS MONITOR.
| Line S01160 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01329 M02S01160.271l716 ---|
| Line S01161 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01330 M02S01161.271l716 ---| CRQ SUBR ENTRY/EXIT
| Line S01162 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01331 M02S01162.271l716 ---|
| Line S01163 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01332 M02S01163.271l716 ---|* THE FOLLOWING CODE ASSUMES THERE IS ONLY ONE REQUEST BUFFER
| Line S01164 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01333 M02S01164.271l716 ---|* WHICH IMMEDIATELY FOLLOWS THE REQUEST HEADER.
| Line S01165 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01334 M02S01165.271l716 ---|
| Line S01166 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01335 M02S01166.271l716 ---| RJM SDA READ REQUEST
| Line S01167 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01336 M02S01167.271l716 ---| ADN 1
| Line S01168 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01337 M02S01168.271l716 ---| CRM CRQA,ON
| Line S01169 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01338 M02S01169.271l716 ---| LDM CRQA CHECK REQUEST
| Line S01170 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01339 M02S01170.271l716 ---| LMN RQSF
| Line S01171 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01340 M02S01171.271l716 ---| NJN CRQX IF NO *UADM* NEEDED
| Line S01172 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01341 M02S01172.271l716 ---| LDC FRAS SET *UADM* SUBFUNCTION
| Line S01173 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01342 M02S01173.271l716 ---| STM CRQA
| Line S01174 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01343 M02S01174.271l716 ---| LDD MA WRITE REQUEST TO MESSAGE BUFFER
| Line S01175 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01344 M02S01175.271l716 ---| CWM CRQA,ON
| Line S01176 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01345 M02S01176.271l716 ---| LDN ZERL SET *UADM* PARAMETERS
| Line S01177 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01346 M02S01177.271l716 ---| CRD CM
| Line S01178 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01347 M02S01178.271l716 ---| LDN 1 SET REQUEST COUNT
| Line S01179 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01348 M02S01179.271l716 ---| STD CM+1
| Line S01180 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01349 M02S01180.271l716 ---|* STD CM+2 (NO DROP FLAG IGNORED)
| Line S01181 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01350 M02S01181.271l716 ---| MONITOR UADM ALERT *CPUMTR* OF PENDING *FRC* UPDATE
| Line S01182 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01351 M02S01182.271l716 ---| UJN CRQX RETURN
| Line S01183 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01352 M02S01183.271l716 ---|
| Line S01184 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01353 M02S01184.271l716 ---|
| Line S01185 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01354 M02S01185.271l716 ---| CRQA BSS 5 01355 M01S01186.1mb +++| CPM SPACE 4,10 01356 M01S01187.1mb +++|** CPM - CLEAR PP MEMORY. 01357 M01S01188.1mb +++|* 01358 M01S01189.1mb +++|* ENTRY (DC - DC+3) = *DFT* CONTROL WORD. 01359 M01S01190.1mb +++|* 01360 M01S01191.1mb +++|* USES T0. 01361 M01S01192.1mb +++|* 01362 M01S01193.1mb +++|* CLEARS ALL PP MEMORY FROM LWA OF *1MB* CODE TO THE END OF 01363 M01S01194.1mb +++|* THE PP. THIS INSURES THAT ALL 16-BIT INSTRUCTIONS USED BY 01364 M01S01195.1mb +++|* *DFT* ARE CLEARED BEFORE THE PP IS RETURNED TO NOS. 01365 M01S01196.1mb +++| 01366 M01S01197.1mb +++| 01367 M01S01198.1mb +++| CPM SUBR ENTRY/EXIT 01368 M01S01199.1mb +++| LDDL DC+3 01369 M01S01200.1mb +++| SHN 21-DCDM 01370 M01S01201.1mb +++| PJN CPMX IF DEDICATED *DFT* 01371 M01S01202.1mb +++| LDC L1MB FIRST WORD TO CLEAR 01372 M01S01203.1mb +++| STD T0 01373 M01S01204.1mb +++| LDN 0 01374 M01S01205.1mb +++| CPM1 STI T0 01375 M01S01206.1mb +++| AOD T0 01376 M01S01207.1mb +++| SHN -14 01377 M01S01208.1mb +++| ZJN CPM1 IF MORE MEMORY TO CLEAR 01378 M01S01209.1mb +++| UJN CPMX RETURN 01379 M01S01210.1mb +++| CTH SPACE 4,10 01380 M01S01211.1mb +++|** CTH - CHECK THRESHOLD EXCEEDED. 01381 M01S01212.1mb +++|* 01382 M01S01213.1mb +++|* ENTRY (CN - CN+3) = M/R BUFFER CONTROL WORD. 01383 M01S01214.1mb +++|* 01384 M01S01215.1mb +++|* USES CM - CM+4, T1, T2. 01385 M01S01216.1mb +++|* 01386 M01S01217.1mb +++|* CALLS DFM. 01387 M01S01218.1mb +++|* 01388 M01S01219.1mb +++|* MACROS MONITOR. 01389 M01S01220.1mb +++| 01390 M01S01221.1mb +++| 01391 M01S01222.1mb +++| CTH SUBR ENTRY/EXIT 01392 M01S01223.1mb +++| LDDL CN+2 01393 M01S01224.1mb +++| SHN 21-MRTH 01394 M01S01225.1mb +++| PJN CTHX IF NOT THRESHOLD EXCEEDED 01395 M01S01226.1mb +++| LDDL CN+1 GET *DFT* ANALYSIS CODE 01396 M01S01227.1mb +++| SHN 0-14 01397 M01S01228.1mb +++| LMN 3 01398 M01S01229.1mb +++| STD T1 (1 = CORRECTED, 0 = UNCORRECTED) 01399 M01S01230.1mb +++| LDD CN+1 GET TYPE OF ERROR 01400 M01S01231.1mb +++| SHN 0-10 01401 M01S01232.1mb +++| LPN 3 01402 M01S01233.1mb +++| SHN 1 01403 M01S01234.1mb +++| STD T2 (0 = IOU, 2 = CM, 4 = CPU) 01404 M01S01235.1mb +++| LDM CTHA,T2 BUILD APPROPRIATE MESSAGE TEXT 01405 M01S01236.1mb +++| STM CTHB,T1 01406 M01S01237.1mb +++| LDM CTHA+1,T2 01407 M01S01238.1mb +++| STM CTHB+1,T1 01408 M01S01239.1mb +++| LDC CTHB+ERLN ISSUE ERROR LOG MESSAGE 01409 M01S01240.1mb +++| ADD T1 01410 M01S01241.1mb +++| RJM DFM 01411 M01S01242.1mb +++| LDN ZERL ISSUE OPERATOR EVENT 01412 M01S01243.1mb +++| CRD CM 01413 M01S01244.1mb +++| LDK ELAE 01414 M01S01245.1mb +++| STM CM+4 01415 M01S01246.1mb +++| MONITOR EATM 01416 M01S01247.1mb +++| UJP CTHX RETURN 01417 M01S01248.1mb +++| 01418 M01S01249.1mb +++| CTHA DATA 4HIOU 01419 M01S01250.1mb +++| DATA 4HCM 01420 M01S01251.1mb +++| DATA 4HCPU 01421 M01S01252.1mb +++| CTHB DATA 6H UN 01422 M01S01253.1mb +++| DATA C*CORRECTED ERROR THRESHOLD EXCEEDED.* 01423 M01S01254.1mb +++| CTP SPACE 4,10 01424 M01S01255.1mb +++|** CTP - CHECK FOR TIME AND CHECKPOINT PROCESSING. 01425 M01S01256.1mb +++|* 01426 M01S01257.1mb +++|* ENTRY (IR+2) = FUNCTION CALL. 01427 M01S01258.1mb +++|* 01428 M01S01259.1mb +++|* EXIT TO *CSH* IF CHECKPOINT REQUEST. 01429 M01S01260.1mb +++|* TO *LED* IF TIME REQUEST AND *DFT* NOT DEDICATED. 01430 M01S01261.1mb +++|* TO *DPP* IF TIME REQUEST AND *DFT* DEDICATED. 01431 M01S01262.1mb +++|* 01432 M01S01263.1mb +++|* USES CM - CM+3, DC - DC+3, IR+2. 01433 M01S01264.1mb +++|* 01434 M01S01265.1mb +++|* CALLS CCO, CRC, CSH, DOB, PES, UCC, *2TH*. 01435 M01S01266.1mb +++|* 01436 M01S01267.1mb +++|* MACROS EXECUTE. 01437 M01S01268.1mb +++| 01438 M01S01269.1mb +++| 01439 M01S01270.1mb +++| CTP SUBR ENTRY/EXIT 01440 M01S01271.1mb +++| LDD IR+2 CHECK FOR TIME PROCESSING 01441 M01S01272.1mb +++| LPN SPCP 01442 M01S01273.1mb +++| NJP CTP2 IF CHECKPOINT REQUEST 01443 M01S01274.1mb +++| LMD IR+2 01444 M01S01275.1mb +++| LPN SPTP 01445 M01S01276.1mb +++| ZJN CTPX IF NOT TIME PROCESSING 01446 M01S01277.1mb +++| RJM UCC UPDATE CTI CLOCK 01447 M01S01278.1mb +++| EXECUTE 2TH LOAD TOP-OF-HOUR ROUTINES 01448 M01S01279.1mb +++| RJM /IHD/CRC CLEAR RELOAD COUNT IN CONTROLWARE TABLE 01449 M01S01280.1mb +++| RJM /IHD/CCO CLEAR COUNTS IN EST/MST ENTRIES 01450 M01S01281.1mb +++| RJM /IHD/PES PROCESS ESM SECDED LOGGING 01451 M01S01282.1mb +++| CTPA LDC ZERL SET LOG COUNTERS AND SECDED TABLE FLAG 01452 M01S01283.1mb +++|* LJM CTPX (IF NOS/VE LOGGING) 01453 M01S01284.1mb +++| CRDL CM 01454 M01S01285.1mb +++| LDBC DCZC 01455 M01S01286.1mb +++| STDL CM+3 01456 M01S01287.1mb +++| RJM DOB 01457 M01S01288.1mb +++| ADK DFCW 01458 M01S01289.1mb +++| RDSL CM 01459 M01S01290.1mb +++| CRDL DC 01460 M01S01291.1mb +++| LDDL DC+3 CHECK DEDICATED FLAG 01461 M01S01292.1mb +++| SHN 21-DCDM 01462 M01S01293.1mb +++| PJP DPP IF DEDICATED *DFT*
| Line S01294 Modification History | |
|---|---|
M01 (Added by) | 1mb |
M02 (Updated by) | ns2660 |
Seq # *Modification Id* Act ----------------------------+ 01463 M02S01294.ns2660 ---| LDN SPLG SET LOGGING FUNCTION CODE 01464 M01S00017.ns2660 +++| CTP1 LDN SPLG SET LOGGING FUNCTION CODE 01465 M01S00018.ns2660 +++| CTPB EQU *-1 01466 M01S00019.ns2660 +++|* LDN SPTH (IF TOP OF HOUR PART TWO) 01467 M01S01295.1mb +++| STD IR+2 01468 M01S01296.1mb +++| LDD IA 01469 M01S01297.1mb +++| CWD IR 01470 M01S01298.1mb +++| LJM LED LOAD *DFT* 01471 M01S01299.1mb +++| 01472 M01S01300.1mb +++| CTP2 LDN 10 SET *1CK* TO RECALL *1MB* 01473 M01S01301.1mb +++| STM CKPA+2 01474 M01S01302.1mb +++| LDN SPCP SET *1MB* FUNCTION CODE 01475 M01S01303.1mb +++| STM CKPA+3 01476 M01S01304.1mb +++| LDC MSCP *(204) FATAL CPU ERROR* 01477 M01S01305.1mb +++| STM CSHA 01478 M01S01306.1mb +++| STM CSHB 01479 M01S01307.1mb +++| RJM CSH CHECKPOINT AND HANG 01480 M01S01308.1mb +++| C9E SPACE 4,15 01481 M01S01309.1mb +++|** C9E - CHECK SPECIAL MODEL 990 ERRORS. 01482 M01S01310.1mb +++|* 01483 M01S01311.1mb +++|* ENTRY (IBMF+1) = *DFT* ANALYSIS CODE. 01484 M01S01312.1mb +++|* (T4) = CURRENT OFFSET INTO M/R BUFFER. 01485 M01S01313.1mb +++|* 01486 M01S01314.1mb +++|* EXIT (A) = 0, IF SPECIAL 990 ERROR PRESENT. 01487 M01S01315.1mb +++|* *BML* DATA PLACED IN BUFFER, IF (A) = 0. 01488 M01S01316.1mb +++|* 01489 M01S01317.1mb +++|* USES T4, T6. 01490 M01S01318.1mb +++|* 01491 M01S01319.1mb +++|* CALLS GPB, RMR. 01492 M01S01320.1mb +++| 01493 M01S01321.1mb +++| 01494 M01S01322.1mb +++| C9E SUBR ENTRY/EXIT 01495 M01S01323.1mb +++| LDM IBMF+1 01496 M01S01324.1mb +++| LPC 3777 MASK MULTIPLE OCCURRANCE FLAG 01497 M01S01325.1mb +++| LMC 0#206 01498 M01S01326.1mb +++| ZJN C9E1 IF REPAIRED ERROR 01499 M01S01327.1mb +++| LMK 0#207&0#206 01500 M01S01328.1mb +++| ZJN C9E1 IF UNREPAIRED ERROR 01501 M01S01329.1mb +++| LMK 0#205&0#207 01502 M01S01330.1mb +++| ZJN C9E1 IF RETRY IN PROGRESS ERROR 01503 M01S01331.1mb +++| LMK 0#21B&0#205 01504 M01S01332.1mb +++| ZJN C9E1 IF RETRY CONVERTED TO UNCORRECTED ERROR 01505 M01S01333.1mb +++| LMK 0#21C&0#21B 01506 M01S01334.1mb +++| ZJN C9E1 IF RETRY EXHAUSTED ERROR 01507 M01S01335.1mb +++| LMK 0#21D&0#21C 01508 M01S01336.1mb +++| NJN C9EX IF NOT RETRY EXHAUSTED ERROR 01509 M01S01337.1mb +++| C9E1 LDD T4 01510 M01S01338.1mb +++| SBN 5 01511 M01S01339.1mb +++| NJN C9EX IF NOT LAST M/R BUFFER 01512 M01S01340.1mb +++| STD T4 01513 M01S01341.1mb +++| STD T6 INITIALIZE SUMMARY STATUS FLAG 01514 M01S01342.1mb +++| 01515 M01S01343.1mb +++|* PROCESS LAST BUFFER FOR SPECIAL 990 ERRORS. 01516 M01S01344.1mb +++| 01517 M01S01345.1mb +++| RJM GPB READ DATA WORD INTO *BML* MESSAGE 01518 M01S01346.1mb +++| LDD BP 01519 M01S01347.1mb +++| STM C9EA 01520 M01S01348.1mb +++| LDD MS 01521 M01S01349.1mb +++| SHN 14 01522 M01S01350.1mb +++| LMD MS+1 01523 M01S01351.1mb +++| CRM **,ON 01524 M01S01352.1mb +++| C9EA EQU *-1 01525 M01S01353.1mb +++| LDC LDNI+0 SET *RMR* TO NOT USE *STATUS SUMMARY* FLAG 01526 M01S01354.1mb +++| STM RMRA 01527 M01S01355.1mb +++| LDN ZERL USE ZERO AS REGISTER NUMBERS 01528 M01S01356.1mb +++| CRML BDMR,ON 01529 M01S01357.1mb +++| RJM RMR LOG FAILING ADDRESS WORDS AS REGISTERS 01530 M01S01358.1mb +++| LDC LDNI+1 RESTORE *RMR* USE OF *STATUS SUMMARY* FLAG 01531 M01S01359.1mb +++| STM RMRA 01532 M01S01360.1mb +++| LDN 0 SET EXIT FLAG 01533 M01S01361.1mb +++| LJM C9EX RETURN 01534 M01S01362.1mb +++| DOA SPACE 4,10 01535 M01S01363.1mb +++|** DOA - DETERMINE OS ACTION. 01536 M01S01364.1mb +++|* 01537 M01S01365.1mb +++|* ENTRY (CN - CN+3) = CONTROL WORD. 01538 M01S01366.1mb +++|* 01539 M01S01367.1mb +++|* EXIT TO OS ACTION ROUTINE. 01540 M01S01368.1mb +++|* NORMAL RETURN, IF NO OS ACTION CODE OR VERSION 3 01541 M01S01369.1mb +++|* AND NO VALID OS ACTION CODE. 01542 M01S01370.1mb +++|* 01543 M01S01371.1mb +++|* USES T1, T2. 01544 M01S01372.1mb +++| 01545 M01S01373.1mb +++| 01546 M01S01374.1mb +++| DOA3 LDD T1 01547 M01S01375.1mb +++| SBN MXAC 01548 M01S01376.1mb +++| PJN DOAX IF NOT A VALID ACTION CODE 01549 M01S01377.1mb +++| LDM TOSC,T1 SET OS ACTION ROUTINE ADDRESS 01550 M01S01378.1mb +++| UJN DOA5 EXIT TO ROUTINE 01551 M01S01379.1mb +++| 01552 M01S01380.1mb +++| DOA4 LDC MOB ROUTINE FOR NO MATCH FOUND 01553 M01S01381.1mb +++| DOA5 STM DOAA 01554 M01S01382.1mb +++| LJM ** PROCESS OS ACTION 01555 M01S01383.1mb +++| DOAA EQU *-1 01556 M01S01384.1mb +++| 01557 M01S01385.1mb +++| DOA SUBR ENTRY/EXIT 01558 M01S01386.1mb +++| LDD CN 01559 M01S01387.1mb +++| LPC 377 01560 M01S01388.1mb +++| STD T1 01561 M01S01389.1mb +++| ZJN DOAX IF NO OS ACTION CODE 01562 M01S00001.1mb33 +++| LDD CN+2 CHECK VALID 170 DATA FLAG 01563 M01S00002.1mb33 +++| LPBC MRV7 01564 M01S00003.1mb33 +++| ZJN DOAX IF NO VALID 170 DATA FLAG 01565 M01S01390.1mb +++| LDM DFTV 01566 M01S01391.1mb +++| ZJN DOA3 IF *DFT* VERSION 3 01567 M01S01392.1mb +++| LDN 0 01568 M01S01393.1mb +++| STD T2 01569 M01S01394.1mb +++| UJN DOA2 ENTER LOOP 01570 M01S01395.1mb +++| 01571 M01S01396.1mb +++| DOA1 LDN 3 ADVANCE TO NEXT ENTRY 01572 M01S01397.1mb +++| RAD T2 01573 M01S01398.1mb +++| DOA2 LDD CN+1 GET *DFT* ANALYSIS CODE 01574 M01S01399.1mb +++| LPC 3777 01575 M01S01400.1mb +++| SBM TDFA,T2 01576 M01S01401.1mb +++| MJN DOA4 IF ENTRY NOT IN TABLE 01577 M01S01402.1mb +++| NJN DOA1 IF NO MATCH 01578 M01S01403.1mb +++| LDD T1 GET OS ACTION CODE 01579 M01S01404.1mb +++| LMM TDFA+1,T2 01580 M01S01405.1mb +++| NJN DOA1 IF ACTION CODE DOES NOT MATCH 01581 M01S01406.1mb +++| LDM TDFA+2,T2 SET OS ACTION CODE ADDRESS 01582 M01S01407.1mb +++| UJP DOA5 EXIT TO ROUTINE 01583 M01S01408.1mb +++| DOB SPACE 4,10 01584 M01S01409.1mb +++|** DOB - GET DFT/OS BUFFER ADDRESS. 01585 M01S01410.1mb +++|* 01586 M01S01411.1mb +++|* EXIT (A) = ADDRESS OF DFT/OS BUFFER. 01587 M01S01412.1mb +++| 01588 M01S01413.1mb +++| DOB SUBR ENTRY/EXIT 01589 M01S01414.1mb +++| DOBA LDC ** 01590 M01S01415.1mb +++| UJN DOBX RETURN 01591 M01S01416.1mb +++| DPR SPACE 4,10 01592 M01S01417.1mb +++|** DPR - DUMP PP REGISTERS. 01593 M01S01418.1mb +++|* 01594 M01S01419.1mb +++|* EXIT A, P, Q AND K REGISTERS OF EACH PP 01595 M01S01420.1mb +++|* DUMPED TO *PRGB*. 01596 M01S01421.1mb +++|* 01597 M01S01422.1mb +++|* USES EC, T2, T3, T4, CM - CM+4, CN - CN+4. 01598 M01S01423.1mb +++|* 01599 M01S01424.1mb +++|* MACROS EXITMR, LOCKMR, READMR, WRITMR. 01600 M01S01425.1mb +++| 01601 M01S01426.1mb +++| 01602 M01S01427.1mb +++| DPR SUBR ENTRY/EXIT 01603 M01S01428.1mb +++| EXITMR DPRX MODIFY ERROR EXIT ADDRESS 01604 M01S01429.1mb +++| LDK PPUL GET NUMBER OF PP-S 01605 M01S01430.1mb +++| CRD CN 01606 M01S01431.1mb +++| ADK EABL+2-PPUL GET IOU CONNECT CODE 01607 M01S01432.1mb +++| CRD CM 01608 M01S01433.1mb +++| LDD CM+3 01609 M01S01434.1mb +++| STD EC 01610 M01S01435.1mb +++| READMR BCMR,,DEMR READ EC REGISTER 01611 M01S01436.1mb +++| LDN 0 INITIALIZE BUFFER POINTER 01612 M01S01437.1mb +++| STD T3 01613 M01S01438.1mb +++| STD T4 INITIALIZE REGISTER NUMBER
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/1mb.txt · Last modified: by 127.0.0.1