cdc:nos2.source:opl.opl871:deck:1hp
Deck 1HP
23 Modifications
Listing Sections
- Deck 1HP Start
- Deck 1HP Part 1 (Line 1269)
- Deck 1HP Part 2 (Line 1764)
- Deck 1HP Part 3 (Line 2801)
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M01S00001.1hp +++| IDENT 1HP,FHP 00002 M01S00002.1hp +++| 1HP TITLE 1HP - 885-42 DRIVER. 00003 M01S00003.1hp +++| PERIPH 00004 M01S00004.1hp +++| BASE MIXED 00005 M01S00005.1hp +++| SST 00006 M01S00006.1hp +++|*COMMENT 1HP - 885-42 DRIVER.
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00007 M02S00007.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1982. 00008 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00009 M01S00008.1hp +++| 1HP SPACE 4,10 00010 M01S00009.1hp +++|*** 1HP - 885-42 DRIVER. 00011 M01S00010.1hp +++|* 00012 M01S00011.1hp +++|* P. T. BARNETT. 83/09/04. 00013 M01S00012.1hp +++|* R. M. DANISCH. 85/12/23. 00014 M01S00013.1hp +++| 1HP SPACE 4,10 00015 M01S00014.1hp +++|*** 1HP PROVIDES THE CAPABILITY TO ACCESS THE 885-42 DRIVE 00016 M01S00015.1hp +++|* THROUGH THE 7155-401 (FA211-C) CONTROLLER. 1HP IS A 00017 M01S00016.1hp +++|* DEDICATED PROGRAM THAT IS INITIATED AT DEADSTART AND REMAINS 00018 M01S00017.1hp +++|* ACTIVE AS LONG AS ITS CHANNEL IS UP AND FUNCTIONAL. 1HP USES 00019 M01S00018.1hp +++|* THE *BIOM* MONITOR FUNCTION TO COMMUNICATE WITH *CPUMTR*. 00020 M01S00019.1hp +++| 1HP SPACE 4,10 00021 M01S00020.1hp +++|*** CALL FORMAT - 00022 M01S00021.1hp +++|* 00023 M01S00022.1hp +++|*T,IR 18/*1HP*, 1/0, 5/CP, 6/CCTO, 18/0, 12/CH
Figure IR
00024 M01S00023.1hp +++|* 00025 M01S00024.1hp +++|* CP CONTROL POINT NUMBER (MUST BE SYSTEM CP). 00026 M01S00025.1hp +++|* 00027 M01S00026.1hp +++|* CCTO CCT ORDINAL. 00028 M01S00027.1hp +++|* CH CHANNEL NUMBER. 00029 M01S00028.1hp +++| 1HP SPACE 4,35 00030 M01S00029.1hp +++|*** ORGANIZATION OF 885-42. 00031 M01S00030.1hp +++|* 00032 M01S00031.1hp +++|* UP TO THREE 885-42 UNITS CAN BE COMBINED TO FORM 00033 M01S00032.1hp +++|* A LOGICAL DEVICE. 00034 M01S00033.1hp +++|* 00035 M01S00034.1hp +++|* EQUIPMENT TYPE = *DB*. 00036 M01S00035.1hp +++|* 00037 M01S00036.1hp +++|* SECTORS/TRACK = 640 LOGICAL / 160 PHYSICAL. 00038 M01S00037.1hp +++|* (4 LOGICAL SECTORS FORM 1 PHYSICAL SECTOR) 00039 M01S00038.1hp +++|* 00040 M01S00039.1hp +++|* CM WORDS/PHYSICAL SECTOR = 400B. 00041 M01S00040.1hp +++|* 00042 M01S00041.1hp +++|* LOGICAL SECTORS/PHYSICAL SECTOR = 4. 00043 M01S00042.1hp +++|* 00044 M01S00043.1hp +++|* LOGICAL SECTORS/LOGICAL TRACK = 1200B (640D). 00045 M01S00044.1hp +++|* 00046 M01S00045.1hp +++|* LOGICAL SECTORS/BUFFER = 40B. 00047 M01S00046.1hp +++|* 00048 M01S00047.1hp +++|* TRACKS/UNIT = 3222B (1682D). 00049 M01S00048.1hp +++|* 00050 M01S00049.1hp +++|* WORDS/UNIT = 68,894,720. 00051 M01S00050.1hp +++|* 00052 M01S00051.1hp +++|* UNITS/DEVICE = 1-3. 00053 M01S00052.1hp +++|* 00054 M01S00053.1hp +++|* WORDS/DEVICE = 68,894,720 - 206,684,160. 00055 M01S00054.1hp +++|* 00056 M01S00055.1hp +++|* MAXIMUM DATA RATE = 491.52 K WORDS/SECOND. 00057 M01S00056.1hp +++| 1HP SPACE 4,20 00058 M01S00057.1hp +++|** MESSAGES. 00059 M01S00058.1hp +++|* 00060 M01S00059.1hp +++|* * EQXXX CC ERROR RETRY UNDERWAY.* 00061 M01S00060.1hp +++|* ISSUED TO THE SYSTEM CONTROL POINT FOR PRESENTATION ON THE 00062 M01S00061.1hp +++|* B-DISPLAY TO ALERT THE OPERATOR THAT ERROR RECOVERY IS BEING 00063 M01S00062.1hp +++|* PERFORMED ON THE DEVICE WHOSE EST ORDINAL IS XXX. THE TWO 00064 M01S00063.1hp +++|* CHARACTER MNEMONIC CC DESCRIBES THE ERROR TYPE. 00065 M01S00064.1hp +++|* 00066 M01S00065.1hp +++|* * 1HP - UNAUTHORIZED CALL.* 00067 M01S00066.1hp +++|* ISSUED TO THE SYSTEM DAYFILE IF 1HP WAS NOT CALLED FROM 00068 M01S00067.1hp +++|* THE SYSTEM. 00069 M01S00068.1hp +++| 1HP SPACE 4,65 00070 M01S00069.1hp +++|** IMPLEMENTATION NOTES. 00071 M01S00070.1hp +++|* 00072 M01S00071.1hp +++|* THE 7155-401 CONTROLLER IS CONNECTED TO ESM THROUGH A LOW 00073 M01S00072.1hp +++|* SPEED PORT, AND THE DATA TRANSFER IS DONE THROUGH THAT 00074 M01S00073.1hp +++|* CONNECTION. THEREFORE, UPON ISSUING A READ OR WRITE 00075 M01S00074.1hp +++|* FUNCTION, A 2-BYTE ESM ADDRESS IS SENT TO THE CONTROLLER 00076 M01S00075.1hp +++|* THROUGH THE CHANNEL, AND THEN THE CHANNEL IS DISCONNECTED. 00077 M01S00076.1hp +++|* *1HP* IS THEN FREE TO DO AS IT PLEASES WHILE THE CONTROLLER 00078 M01S00077.1hp +++|* READS/WRITES THE DATA FROM/TO ESM. SOMETIME BEFORE ISSUING 00079 M01S00078.1hp +++|* THE NEXT READ/WRITE FUNCTION *1HP* WILL ISSUE A GENERAL 00080 M01S00079.1hp +++|* STATUS FUNCTION. THE CONTROLLER WILL PROVIDE STATUS ONLY 00081 M01S00080.1hp +++|* AFTER COMPLETION OF THE DATA TRANSFER. 00082 M01S00081.1hp +++|* 00083 M01S00082.1hp +++|* IN ORDER TO MAXIMIZE THE TRANSFER RATE, *1HP* WILL SCAN THE 00084 M01S00083.1hp +++|* UNIT QUEUE WHILE WAITING FOR I/O COMPLETION TO SEE IF THE 00085 M01S00084.1hp +++|* CURRENT TRANSFER CAN BE CONTINUED. IF THE 10B SECTORS 00086 M01S00085.1hp +++|* IMMEDIATELY FOLLOWING THE CURRENT 10B SECTORS ARE TO 00087 M01S00086.1hp +++|* BE USED IN THE SAME TRANSFER DIRECTION, *1HP* WILL CONTINUE 00088 M01S00087.1hp +++|* THE OPERATION, WITHOUT LOSING A DISK REVOLUTION. 00089 M01S00088.1hp +++|* DURING THE SUCCEEDING TRANSFER, *1HP* WILL ATTEMPT TO NOTIFY 00090 M01S00089.1hp +++|* *CPUMTR* OF COMPLETION ON THE PREVIOUS BUFFER. 00091 M01S00090.1hp +++| 1HP SPACE 4,10 00092 M01S00091.1hp +++|* COMMON DECKS. 00093 M01S00092.1hp +++| 00094 M01S00093.1hp +++|*CALL COMPMAC 00095 M01S00094.1hp +++| RICHI$ EQU 1 SELECT DEFERRED INSTRUCTION REDEFINITION 00096 M01S00095.1hp +++|*CALL COMPCHI 00097 M01S00096.1hp +++|*CALL COMSCPS 00098 M01S00097.1hp +++|*CALL COMSDFS 00099 M01S00098.1hp +++| LIST X 00100 M01S00099.1hp +++|*CALL COMSHIO 00101 M01S00100.1hp +++| LIST * 00102 M01S00101.1hp +++|*CALL COMSLSD 00103 M01S00001.252l678 +++|*CALL COMSMSC 00104 M01S00102.1hp +++| LIST X 00105 M01S00103.1hp +++|*CALL COMSMSP 00106 M01S00104.1hp +++| LIST * 00107 M01S00105.1hp +++|*CALL COMSPIM 00108 M01S00106.1hp +++|*CALL COMS1DS 00109 M01S00107.1hp +++| TITLE CONSTANTS, DEFINITIONS, AND MACROS. 00110 M01S00108.1hp +++| 1HP SPACE 4,10 00111 M01S00109.1hp +++|** DIRECT CELL ASSIGNMENTS. 00112 M01S00110.1hp +++| 00113 M01S00111.1hp +++| 00114 M01S00112.1hp +++| RS EQU 16 ERROR RECOVERY STATUS 00115 M01S00113.1hp +++| ER EQU 17 ERROR RECOVERY IN PROGRESS 00116 M01S00114.1hp +++| CC EQU 20 COMPLETION REQUEST COUNT 00117 M01S00115.1hp +++| S1 EQU 21 SCRATCH 00118 M01S00116.1hp +++| EC EQU 22 ERROR CODE 00119 M01S00117.1hp +++| RW EQU 23 READ/WRITE FLAG 00120 M01S00118.1hp +++| IL EQU 24 *PUT* INTERLOCK FLAG 00121 M01S00119.1hp +++| SR EQU 25 - 31 SCRATCH 00122 M01S00001.ns2769 +++| WB EQU SR - SR+4 FOR *COMPIMB* COMPATIBILITY 00123 M01S00120.1hp +++| PI EQU 32 *PADN* WORD INDEX 00124 M01S00121.1hp +++| CN EQU 33 - 37 SCRATCH (5 CELLS) 00125 M01S00122.1hp +++| CD EQU 40 - 45 CURRENT DATA (6 CELLS) 00126 M01S00123.1hp +++| CS EQU 46 CHANNEL STATUS 00127 M01S00124.1hp +++| NB EQU 47 NEXT BUFFER ORDINAL 00128 M01S00125.1hp +++| PB EQU 50 PREVIOUS BUFFER ORDINAL 00129 M01S00126.1hp +++| CB EQU 51 CURRENT BUFFER ORDINAL 00130 M01S00127.1hp +++| TB EQU 52 TOTAL CBT COUNT 00131 M01S00128.1hp +++| GS EQU 53 GENERAL STATUS 00132 M01S00129.1hp +++|* EQU 54 CHANNEL NUMBER (FROM INPUT REGISTER) 00133 M01S00130.1hp +++| TI EQU 57 *TPOR* INDEX 00134 M01S00131.1hp +++| CA EQU 60 - 64 CURRENT PHYSICAL ADDRESS (5 CELLS) 00135 M01S00132.1hp +++| RC EQU 65 RETRY COUNT 00136 M01S00133.1hp +++| PO EQU 66 *PUT* ORDINAL 00137 M01S00134.1hp +++| S2 EQU 67 SCRATCH 00138 M01S00135.1hp +++| 1HP SPACE 4,10 00139 M01S00136.1hp +++|** DRIVER FUNCTION CODES. 00140 M01S00137.1hp +++| 00141 M01S00138.1hp +++| 00142 M01S00139.1hp +++| FCSK EQU 1 SEEK 1 TO 1 INTERLACE 00143 M01S00140.1hp +++| FCRD EQU 4 READ 00144 M01S00141.1hp +++| FCWR EQU 5 WRITE 00145 M01S00142.1hp +++| FCOC EQU 10 OPERATION COMPLETE 00146 M01S00143.1hp +++| FCCO EQU 14 CONTINUE 00147 M01S00144.1hp +++| FCDS EQU 23 DETAILED STATUS 00148 M01S00145.1hp +++| FCES EQU 66 EXTENDED GENERAL STATUS 00149 M01S00146.1hp +++| FCAL EQU 414 AUTOLOAD 00150 M01S00147.1hp +++| 1HP SPACE 4,10 00151 M01S00148.1hp +++|** STATUS AND CONTROL REGISTER FUNCTION CODE(S). 00152 M01S00149.1hp +++| 00153 M01S00150.1hp +++| FCTC EQU 3000 TEST AND CLEAR *SCR* BIT 00154 M01S00151.1hp +++| 1HP SPACE 4,10 00155 M01S00152.1hp +++|** ASSEMBLY CONSTANTS. 00156 M01S00153.1hp +++| 00157 M01S00154.1hp +++| 00158 M01S00155.1hp +++| BFRL EQU 10 *EMB* FLUSH RETRY COUNT 00159 M01S00156.1hp +++| CH EQU 0 MASS STORAGE CHANNEL 00160 M01S00157.1hp +++| EMAI EQU 400 EXTENDED MEMORY ADDRESS INCREMENT 00161 M01S00158.1hp +++| FCESL EQU 5 LENGTH OF EXTENDED GENERAL STATUS 00162 M01S00159.1hp +++| FCRDL EQU 2 NUMBER OF PARAMETER BYTES FOR READ 00163 M01S00160.1hp +++| FCSKL EQU 4 NUMBER OF PARAMETER BYTES FOR SEEK 00164 M01S00161.1hp +++| FCWRL EQU 6 NUMBER OF PARAMETER BYTES FOR WRITE
| Line S00162 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 1hp12 |
Seq # *Modification Id* Act ----------------------------+ 00165 M02S00162.1hp12 ---| MAXU EQU 10 MAXIMUM NUMBER OF UNITS PER CHANNEL 00166 M01S00001.1hp12 +++| MAXU EQU 16D MAXIMUM NUMBER OF UNITS PER CHANNEL 00167 M01S00001.ns2446 +++| PCRL EQU 10 PP CALL RETRY LIMIT 00168 M01S00163.1hp +++| MFRL EQU 10 MONITOR FUNCTION RETRY LIMIT 00169 M01S00164.1hp +++| PPSLB EQU 10 PHYSICAL SECTORS PER BUFFER 00170 M01S00165.1hp +++| PSPT EQU 40 PHYSICAL SECTORS PER PHYSICAL TRACK 00171 M01S00166.1hp +++| SOSF EQU 100 SEEK OPTION SELECT FLAGS 00172 M01S00167.1hp +++| TPORE EQU 1 LENGTH OF *TPOR* ENTRY 00173 M01S00168.1hp +++| SPACE 4,10 00174 M01S00169.1hp +++|** MACROS. 00175 M01S00002.ns2769 +++| TBLM SPACE 4,10 00176 M01S00003.ns2769 +++|** TBLM - CREATE TABLE ENTRY MACRO. 00177 M01S00004.ns2769 +++|* 00178 M01S00005.ns2769 +++|*NAM TBLM 00179 M01S00006.ns2769 +++|* 00180 M01S00007.ns2769 +++|* ENTRY NAM = TABLE NAME. 00181 M01S00008.ns2769 +++|* 00182 M01S00009.ns2769 +++|* EXIT NAM_E MACRO DEFINED. 00183 M01S00010.ns2769 +++| 00184 M01S00011.ns2769 +++| 00185 M01S00012.ns2769 +++| PURGMAC TBLM 00186 M01S00013.ns2769 +++| 00187 M01S00014.ns2769 +++| MACRO TBLM,NAM 00188 M01S00015.ns2769 +++| PURGMAC NAM_E 00189 M01S00016.ns2769 +++| NAM_E MACRO ADDR 00190 M01S00017.ns2769 +++| LOCAL A 00191 M01S00018.ns2769 +++| MACREF NAM_E 00192 M01S00019.ns2769 +++| NOREF A 00193 M01S00020.ns2769 +++| A EQU ADDR 00194 M01S00021.ns2769 +++| T_NAM RMT 00195 M01S00022.ns2769 +++| CON A 00196 M01S00023.ns2769 +++| RMT 00197 M01S00024.ns2769 +++| TBLM ENDM 00198 M01S00025.ns2769 +++| CBTE SPACE 4,10 00199 M01S00026.ns2769 +++|** CBTE - CONTROL BUFFER TABLE ENTRY. 00200 M01S00027.ns2769 +++|* 00201 M01S00028.ns2769 +++|* THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TCBT* 00202 M01S00029.ns2769 +++|* THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH 00203 M01S00030.ns2769 +++|* REQUIRES THE FWA OF THE CONTROL BUFFER TABLE. 00204 M01S00031.ns2769 +++|* 00205 M01S00032.ns2769 +++|* CBTE ADDR 00206 M01S00033.ns2769 +++|* 00207 M01S00034.ns2769 +++|* ENTRY (ADDR) = ADDRESS OF INSTRUCTION. 00208 M01S00035.ns2769 +++|* 00209 M01S00036.ns2769 +++|* EXIT ADDRESS IS ADDED TO THE REMOTE BLOCK *TCBT*. 00210 M01S00037.ns2769 +++| 00211 M01S00038.ns2769 +++| 00212 M01S00039.ns2769 +++| CBT TBLM 00213 M01S00170.1hp +++| CCBA SPACE 4,15 00214 M01S00171.1hp +++|** CCBA - COMPUTE *CBT* ENTRY ADDRESS. 00215 M01S00172.1hp +++|* 00216 M01S00040.ns2769 +++|* THIS MACRO SETS (A) TO THE REQUESTED *CBT* ENTRY ADDRESS. 00217 M01S00041.ns2769 +++|* 00218 M01S00173.1hp +++|* CCBA W,A 00219 M01S00174.1hp +++|* 00220 M01S00175.1hp +++|* W - OPTIONAL WORD OFFSET TO BE ADDED TO ADDRESS. 00221 M01S00176.1hp +++|* A - IF NON-BLANK, BUFFER ORDINAL IS IN ACCUMULATOR. 00222 M01S00177.1hp +++|* 00223 M01S00178.1hp +++|* ENTRY (A) = BUFFER ORDINAL IF *A* PARAMETER IS NON-BLANK. 00224 M01S00179.1hp +++|* (CB) = CURRENT BUFFER ORDINAL. 00225 M01S00180.1hp +++|* 00226 M01S00181.1hp +++|* EXIT (A) = *CBT* ENTRY ADDRESS + WORD OFFSET. 00227 M01S00182.1hp +++| 00228 M01S00183.1hp +++| 00229 M01S00184.1hp +++| PURGMAC CCBA 00230 M01S00185.1hp +++| 00231 M01S00186.1hp +++| CCBA MACRO W,A
| Line S00187 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00232 M02S00187.ns2769 ---| LOCAL FWACB 00233 M01S00188.1hp +++| MACREF CCBA 00234 M01S00189.1hp +++| IFC EQ,$A$$,1 00235 M01S00190.1hp +++| LDD CB 00236 M01S00191.1hp +++| SHN CBTLS
| Line S00192 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00237 M02S00192.ns2769 ---| FWACB ADC W
| Line S00193 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00238 M02S00193.ns2769 ---| CBTA RMT
| Line S00194 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 271l716 |
M03 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00239 M03S00194.ns2769 ---| CON FWACB+1
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00240 M02S00001.ns2769 ---| CON FWACB
| Line S00195 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00241 M02S00195.ns2769 ---| CBTA RMT 00242 M01S00042.ns2769 +++| CBTE * 00243 M01S00043.ns2769 +++| ADC W 00244 M01S00196.1hp +++| CCBA ENDM 00245 M01S00044.ns2769 +++| PUTE SPACE 4,10 00246 M01S00045.ns2769 +++|** PUTE - PHYSICAL UNIT TABLE ENTRY. 00247 M01S00046.ns2769 +++|* 00248 M01S00047.ns2769 +++|* THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TPUT* 00249 M01S00048.ns2769 +++|* THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH 00250 M01S00049.ns2769 +++|* REQUIRES THE FWA OF THE PHYSICAL UNIT TABLE. 00251 M01S00050.ns2769 +++|* 00252 M01S00051.ns2769 +++|* PUTE ADDR 00253 M01S00052.ns2769 +++|* 00254 M01S00053.ns2769 +++|* ENTRY (ADDR) = ADDRESS OF INSTRUCTION. 00255 M01S00054.ns2769 +++|* 00256 M01S00055.ns2769 +++|* EXIT ADDRESS IS ADDED TO THE REMOTE BLOCK *TPUT*. 00257 M01S00056.ns2769 +++| 00258 M01S00057.ns2769 +++| 00259 M01S00058.ns2769 +++| PUT TBLM 00260 M01S00197.1hp +++| CPTA SPACE 4,10 00261 M01S00198.1hp +++|** CPTA - COMPUTE *PUT* ENTRY ADDRESS. 00262 M01S00199.1hp +++|* 00263 M01S00059.ns2769 +++|* THIS MACRO SETS (A) TO THE REQUESTED *PUT* ENTRY ADDRESS. 00264 M01S00060.ns2769 +++|* 00265 M01S00200.1hp +++|* CPTA W,A 00266 M01S00201.1hp +++|* 00267 M01S00202.1hp +++|* W - OPTIONAL WORD OFFSET TO BE ADDED TO ADDRESS. 00268 M01S00203.1hp +++|* A - IF NON-BLANK, *PUT* ORDINAL IS IN ACCUMULATOR. 00269 M01S00204.1hp +++|* 00270 M01S00205.1hp +++|* ENTRY (A) = *PUT* ORDINAL IF *A* PARAMETER IS NON-BLANK. 00271 M01S00206.1hp +++|* (PO) = *PUT* ORDINAL. 00272 M01S00207.1hp +++|* 00273 M01S00208.1hp +++|* EXIT (A) = *PUT* ENTRY ADDRESS + WORD OFFSET. 00274 M01S00209.1hp +++| 00275 M01S00210.1hp +++| 00276 M01S00211.1hp +++| PURGMAC CPTA 00277 M01S00212.1hp +++| 00278 M01S00213.1hp +++| CPTA MACRO W,A
| Line S00214 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00279 M02S00214.ns2769 ---| LOCAL FWAPUT 00280 M01S00215.1hp +++| MACREF CPTA 00281 M01S00216.1hp +++| IFC EQ,$A$$,1 00282 M01S00217.1hp +++| LDD PO 00283 M01S00218.1hp +++| SHN PUTLS
| Line S00219 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00284 M02S00219.ns2769 ---| FWAPUT ADC W
| Line S00220 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00285 M02S00220.ns2769 ---| PUTA RMT
| Line S00221 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 271l716 |
M03 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00286 M03S00221.ns2769 ---| CON FWAPUT+1
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00287 M02S00002.ns2769 ---| CON FWAPUT
| Line S00222 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00288 M02S00222.ns2769 ---| RMT 00289 M01S00061.ns2769 +++| PUTE * 00290 M01S00062.ns2769 +++| ADC W 00291 M01S00223.1hp +++| CPTA ENDM 00292 M01S00063.ns2769 +++| EMBE SPACE 4,10 00293 M01S00064.ns2769 +++|** EMBE - ERROR MESSAGE TABLE ENTRY. 00294 M01S00065.ns2769 +++|* 00295 M01S00066.ns2769 +++|* THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TEMB* 00296 M01S00067.ns2769 +++|* THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH 00297 M01S00068.ns2769 +++|* REQUIRES THE FWA OF THE ERROR MESSAGE TABLE. 00298 M01S00069.ns2769 +++|* 00299 M01S00070.ns2769 +++|* EMBE ADDR 00300 M01S00071.ns2769 +++|* 00301 M01S00072.ns2769 +++|* ENTRY (ADDR) = ADDRESS OF INSTRUCTION. 00302 M01S00073.ns2769 +++|* 00303 M01S00074.ns2769 +++|* EXIT ADDRESS IS ADDED TO THE REMOTE BLOCK *TEMB*. 00304 M01S00075.ns2769 +++| 00305 M01S00076.ns2769 +++| 00306 M01S00077.ns2769 +++| EMB TBLM 00307 M01S00224.1hp +++| MONITOR SPACE 4,15 00308 M01S00225.1hp +++|** MONITOR - ISSUE MONITOR FUNCTION. 00309 M01S00226.1hp +++|* 00310 M01S00227.1hp +++|* THIS MACRO PROVIDES FUNCTIONALITY IDENTICAL TO THAT OF THE 00311 M01S00228.1hp +++|* *MONITOR* MACRO DEFINED IN *COMPMAC*, WHILE ENSURING ANY 00312 M01S00229.1hp +++|* PENDING *BIOM* MONITOR FUNCTION IS COMPLETED BEFORE THE NEXT 00313 M01S00230.1hp +++|* MONITOR FUNCTION IS ISSUED. 00314 M01S00231.1hp +++|* 00315 M01S00232.1hp +++|* MONITOR F 00316 M01S00233.1hp +++|* 00317 M01S00234.1hp +++|* F - MONITOR FUNCTION CODE. 00318 M01S00235.1hp +++|* 00319 M01S00236.1hp +++|* EXIT (A) = 0. 00320 M01S00237.1hp +++|* (CM - CM+4) = COMPLETED PP OUTPUT REGISTER IMAGE. 00321 M01S00238.1hp +++|* 00322 M01S00239.1hp +++|* CALLS IMF. 00323 M01S00240.1hp +++| 00324 M01S00241.1hp +++| 00325 M01S00242.1hp +++| PURGMAC MONITOR 00326 M01S00243.1hp +++| 00327 M01S00244.1hp +++| MONITOR MACRO F 00328 M01S00245.1hp +++| MACREF MONITOR 00329 M01S00246.1hp +++| LDK F 00330 M01S00247.1hp +++| RJM IMF 00331 M01S00248.1hp +++| MONITOR ENDM 00332 M01S00249.1hp +++| 1HP SPACE 4 00333 M01S00250.1hp +++| TITLE MAIN PROGRAM. 00334 M01S00251.1hp +++| FHP SPACE 4,10 00335 M01S00252.1hp +++|** FHP - 885-42 DRIVER. 00336 M01S00253.1hp +++| 00337 M01S00254.1hp +++| 00338 M01S00255.1hp +++| ORG PPFW 00339 M01S00256.1hp +++| FHP RJM PRS PRESET 00340 M01S00257.1hp +++| MST SPACE 4,10 00341 M01S00258.1hp +++|** MST - MAIN PROGRAM. 00342 M01S00259.1hp +++| 00343 M01S00260.1hp +++| 00344 M01S00261.1hp +++| MST RJM CCR CHECK FOR CHANNEL REQUESTED/DOWN 00345 M01S00262.1hp +++| MJN MST1 IF CHANNEL GLOBALLY DOWN 00346 M01S00263.1hp +++| RJM SUQ SCAN UNIT QUEUE 00347 M01S00264.1hp +++| ZJN MST IF NO ELIGIBLE ENTRY FOUND 00348 M01S00265.1hp +++| RJM ISF ISSUE SEEK FUNCTION 00349 M01S00266.1hp +++| NJN MST IF UNIT NOT ON CYLINDER 00350 M01S00267.1hp +++| RJM PDT PERFORM DATA TRANSFER 00351 M01S00268.1hp +++| UJN MST LOOP 00352 M01S00269.1hp +++| 00353 M01S00270.1hp +++| MST1 RJM DCH RELEASE CHANNEL 00354 M01S00271.1hp +++| MONITOR DPPM DROP PP 00355 M01S00272.1hp +++| LJM PPR ENTER IDLE LOOP 00356 M01S00273.1hp +++| TPOR SPACE 4,10 00357 M01S00274.1hp +++|** TPOR - TABLE OF *PUT* ORDINALS. 00358 M01S00275.1hp +++|* 00359 M01S00276.1hp +++|* THIS TABLE CONTAINS THE ORDINALS OF THE *PUT* ENTRIES FOR ALL 00360 M01S00277.1hp +++|* UNITS ACCESSED BY THIS DRIVER-S CHANNEL. 00361 M01S00278.1hp +++|* 00362 M01S00279.1hp +++|* ENTRY = 1 WORD. 00363 M01S00280.1hp +++|*
| Line S00281 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00364 M02S00281.252l678 ---|*T 12/ *PUT* ORDINAL
Figure
00365 M01S00002.252l678 +++|*T 5/ 0, 1/ I, 6/ *PUT* ORDINAL
Figure
00366 M01S00003.252l678 +++|* I EST CHANNEL BYTE INDEX. 00367 M01S00282.1hp +++|* 00368 M01S00283.1hp +++|* TABLE IS TERMINATED BY A ZERO BYTE. 00369 M01S00284.1hp +++| 00370 M01S00285.1hp +++| 00371 M01S00286.1hp +++| TPOR BSSZ TPORE*MAXU 00372 M01S00287.1hp +++| CON 0 TERMINATE *TPOR* TABLE 00373 M01S00288.1hp +++| TITLE SUBROUTINES. 00374 M01S00289.1hp +++| CCP SPACE 4,10 00375 M01S00290.1hp +++|** CCP - CHECK FOR CHANNEL PARITY ERROR. 00376 M01S00291.1hp +++|* 00377 M01S00292.1hp +++|* EXIT (A) .EQ. 0 IF NO CHANNEL PARITY ERROR. 00378 M01S00293.1hp +++|* .LT. 0 = COMPLEMENT OF *CHPE* ERROR CODE IF 00379 M01S00294.1hp +++|* CHANNEL PARITY ERROR. 00380 M01S00295.1hp +++| 00381 M01S00296.1hp +++| 00382 M01S00297.1hp +++| CCP1 LDN 0 00383 M01S00298.1hp +++| 00384 M01S00299.1hp +++| CCP SUBR ENTRY/EXIT 00385 M01S00300.1hp +++| LDC FCTC+30 TEST AND CLEAR SCR BIT 00386 M01S00301.1hp +++| CCPA EQU *-1 (BIT NUMBER)
| Line S00302 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 1hp10 |
Seq # *Modification Id* Act ----------------------------+ 00387 M02S00302.1hp10 ---| FJM CCP1,CH IF MAINTENANCE CHANNEL IN USE 00388 M01S00001.1hp10 +++| FJM CCP1,CHSC IF MAINTENANCE CHANNEL IN USE 00389 M01S00002.1hp10 +++| CCPB EQU *-2 00390 M01S00303.1hp +++| OAN CHSC ISSUE REQUEST
| Line S00304 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 1hp10 |
Seq # *Modification Id* Act ----------------------------+ 00391 M02S00304.1hp10 ---| CCPB EQU *-1 00392 M01S00003.1hp10 +++| CCPC EQU *-1 00393 M01S00305.1hp +++| IAN CHSC INPUT RESULT
| Line S00306 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 1hp10 |
Seq # *Modification Id* Act ----------------------------+ 00394 M02S00306.1hp10 ---| CCPC EQU *-1 00395 M01S00004.1hp10 +++| CCPD EQU *-1 00396 M01S00307.1hp +++| ZJN CCPX IF NO CHANNEL PARITY ERROR 00397 M01S00308.1hp +++| LCN CHPE 00398 M01S00309.1hp +++| UJN CCPX RETURN 00399 M01S00310.1hp +++| 1HP SPACE 4 00400 M01S00311.1hp +++| RICHI REDEFINE CHANNEL INSTRUCTIONS 00401 M01S00312.1hp +++| CCR SPACE 4,20 00402 M01S00313.1hp +++|** CCR - CHECK FOR CHANNEL REQUESTED OR DOWN. 00403 M01S00314.1hp +++|* 00404 M01S00315.1hp +++|* THIS ROUTINE CHECKS TO SEE IF THE CHANNEL TO WHICH THIS PP IS 00405 M01S00316.1hp +++|* DEDICATED IS BEING REQUESTED BY ANOTHER PP OR IS GLOBALLY 00406 M01S00317.1hp +++|* DOWN. IF THE CHANNEL IS REQUESTED BY ANOTHER PP, IT WILL BE 00407 M01S00318.1hp +++|* RELEASED AND WILL BE REQUESTED AGAIN FOLLOWING A ONE SECOND 00408 M01S00319.1hp +++|* DELAY. IF THE CHANNEL IS GLOBALLY DOWN, THE DRIVER DROP FLAG 00409 M01S00320.1hp +++|* WILL BE SET IN THE CONTROLWARE TABLE AND THE CHANNEL WILL BE 00410 M01S00321.1hp +++|* RELEASED. 00411 M01S00322.1hp +++|* 00412 M01S00323.1hp +++|* EXIT (A) .LT. 0 IF CHANNEL IS GLOBALLY DOWN. 00413 M01S00324.1hp +++|* 00414 M01S00325.1hp +++|* USES CM - CM+4. 00415 M01S00326.1hp +++|* 00416 M01S00327.1hp +++|* CALLS DCH, RCH, SCD. 00417 M01S00328.1hp +++|* 00418 M01S00329.1hp +++|* MACROS DELAY. 00419 M01S00330.1hp +++| 00420 M01S00331.1hp +++| 00421 M01S00332.1hp +++| CCR2 RJM SCD SET DRIVER DROP FLAG 00422 M01S00333.1hp +++| LCN 0 SET DROPOUT REPLY 00423 M01S00334.1hp +++| 00424 M01S00335.1hp +++| CCR SUBR ENTRY/EXIT 00425 M01S00336.1hp +++| LDC ** READ CHANNEL TABLE 00426 M01S00337.1hp +++| CCRA EQU *-1 (CM ADDRESS OF ENTRY) 00427 M01S00338.1hp +++| CRD CM 00428 M01S00339.1hp +++| LDD CM+** CHECK REQUESTED FLAG 00429 M01S00340.1hp +++| CCRB EQU *-1 (BYTE ADDRESS OF ENTRY) 00430 M01S00341.1hp +++| SHN 21-5 00431 M01S00342.1hp +++| MJN CCR2 IF CHANNEL IS GLOBALLY DOWN 00432 M01S00343.1hp +++| SHN 22+5-13 00433 M01S00344.1hp +++| PJN CCRX IF CHANNEL NOT REQUESTED 00434 M01S00345.1hp +++| RJM DCH RELEASE CHANNEL
| Line S00346 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00435 M02S00346.252l678 ---|
| Line S00347 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00436 M02S00347.252l678 ---|* THE FOLLOWING DELAY MUST BE LONG ENOUGH TO ENSURE THAT ON A
| Line S00348 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00437 M02S00348.252l678 ---|* DOWN CHANNEL REQUEST (*1DS* HAS REQUESTED THE CHANNEL) ENOUGH
| Line S00349 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00438 M02S00349.252l678 ---|* TIME HAS ELAPSED TO ALLOW *MTR* TO LOOP THROUGH THE PP
| Line S00350 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00439 M02S00350.252l678 ---|* FUNCTION REQUESTS AND COMPLETE THE *1DS* DOWN CHANNEL
| Line S00351 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00440 M02S00351.252l678 ---|* REQUEST. OTHERWISE, A DEADLOCK BETWEEN *1HP* AND *1DS* WILL
| Line S00352 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00441 M02S00352.252l678 ---|* OCCUR IN WHICH *1DS* CANNOT COMPLETE BECAUSE THE GLOBAL DOWN
| Line S00353 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00442 M02S00353.252l678 ---|* BIT CANNOT BE SET WHILE A PP HAS AN OUTSTANDING REQUEST FOR
| Line S00354 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00443 M02S00354.252l678 ---|* THE CHANNEL AND *1HP* WILL NEVER GET THE CHANNEL.
| Line S00355 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00444 M02S00355.252l678 ---|
| Line S00356 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 00445 M02S00356.252l678 ---| CCR1 DELAY 8D*1000D DELAY FOR ONE SECOND 00446 M01S00004.252l678 +++| CCR1 DELAY 00447 M01S00357.1hp +++| RJM RCH REQUEST CHANNEL 00448 M01S00358.1hp +++| ZJN CCR1 IF CHANNEL NOT ASSIGNED 00449 M01S00359.1hp +++| UJN CCRX RETURN 00450 M01S00360.1hp +++| CCS SPACE 4,15 00451 M01S00361.1hp +++|** CCS - CHECK CONSECUTIVE SECTORS. 00452 M01S00362.1hp +++|* 00453 M01S00363.1hp +++|* THIS ROUTINE CHECKS THE NEXT BUFFER IN THE I/O QUEUE TO 00454 M01S00364.1hp +++|* DETERMINE IF IT IS CONSECUTIVE WITH THE REQUEST CURRENTLY 00455 M01S00365.1hp +++|* BEING PROCESSED. 00456 M01S00366.1hp +++|* 00457 M01S00367.1hp +++|* ENTRY (CB) = CURRENT BUFFER ORDINAL. 00458 M01S00368.1hp +++|* (NB) = NEXT BUFFER ORDINAL IF CONSECUTIVE REQUEST 00459 M01S00369.1hp +++|* ALREADY FOUND. 00460 M01S00370.1hp +++|* (TB) = TOTAL BUFFER COUNT. 00461 M01S00371.1hp +++|* 00462 M01S00372.1hp +++|* EXIT (NB) = NEXT BUFFER ORDINAL. 00463 M01S00373.1hp +++|* = 0 IF CONSECUTIVE TRANSFER NOT POSSIBLE. 00464 M01S00374.1hp +++|* (TB) = TOTAL BUFFER COUNT. 00465 M01S00375.1hp +++|* 00466 M01S00376.1hp +++|* USES NB, TB, CM - CM+4, CN - CN+4, T0 - T4. 00467 M01S00377.1hp +++|* 00468 M01S00378.1hp +++|* MACROS CCBA. 00469 M01S00379.1hp +++| 00470 M01S00380.1hp +++| 00471 M01S00381.1hp +++| CCS3 LDN 0 INDICATE NO CONSECUTIVE REQUEST 00472 M01S00382.1hp +++| STD NB 00473 M01S00383.1hp +++| 00474 M01S00384.1hp +++| CCS SUBR ENTRY/EXIT 00475 M01S00385.1hp +++| LDD NB 00476 M01S00386.1hp +++| NJN CCSX IF NEXT REQUEST ALREADY FOUND 00477 M01S00387.1hp +++| CCBA PAD4 READ CURRENT *CBT* ENTRY 00478 M01S00388.1hp +++| CRD CM 00479 M01S00389.1hp +++| ADK IOLK-PAD4 00480 M01S00390.1hp +++| CRD CN 00481 M01S00391.1hp +++| LDD CN+2 NEXT BUFFER ORDINAL 00482 M01S00392.1hp +++| ZJN CCSX IF NO BUFFER 00483 M01S00393.1hp +++| STD NB STORE BUFFER ORDINAL OF NEXT REQUEST 00484 M01S00394.1hp +++| CCBA PAD1,A GET DISK ADDRESS FOR THIS BUFFER 00485 M01S00395.1hp +++| CRD CN 00486 M01S00396.1hp +++| ADK IOLK-PAD1 GET WRITE FLAG 00487 M01S00397.1hp +++| CRD T0 00488 M01S00398.1hp +++| LDD T0 00489 M01S00399.1hp +++| SHN 0-11 00490 M01S00400.1hp +++| LPN 1 00491 M01S00401.1hp +++| LMD RW 00492 M01S00402.1hp +++| NJN CCS3 IF TRANSFER NOT IN SAME DIRECTION 00493 M01S00403.1hp +++| LDD CM+1 00494 M01S00404.1hp +++| LMD CN+1 00495 M01S00405.1hp +++| CCS1 NJN CCS3 IF NO CYLINDER MATCH 00496 M01S00406.1hp +++| LDD CM+2 00497 M01S00407.1hp +++| ADN 2 00498 M01S00408.1hp +++| LMD CN+2 00499 M01S00409.1hp +++| ZJN CCS2 IF CONSECTUTIVE SECTOR ON SAME TRACK 00500 M01S00410.1hp +++| LDD CM+2 00501 M01S00411.1hp +++| ADD HN 00502 M01S00412.1hp +++| SCN 77 00503 M01S00413.1hp +++| LMD CN+2 00504 M01S00414.1hp +++| NJN CCS1 IF NOT FIRST SECTOR ON CONSECUTIVE TRACK 00505 M01S00415.1hp +++| LDD CM+2 00506 M01S00416.1hp +++| LPN 77 00507 M01S00417.1hp +++| SBN PSPT-2 00508 M01S00418.1hp +++| NJN CCS1 IF NOT CONSECUTIVE REQUEST 00509 M01S00419.1hp +++| CCS2 AOD TB INCREMENT TOTAL BUFFER COUNT 00510 M01S00420.1hp +++| LJM CCSX RETURN 00511 M01S00421.1hp +++| CDS SPACE 4,25 00512 M01S00422.1hp +++|** CDS - CRACK DETAILED STATUS. 00513 M01S00423.1hp +++|* 00514 M01S00424.1hp +++|* THIS ROUTINE DETERMINES WHAT ERROR CODE TO SET BY EXAMINING 00515 M01S00425.1hp +++|* DETAILED STATUS. IT WILL ALSO ATTEMPT TO RECOVER BY ISSUING 00516 M01S00426.1hp +++|* A *CONTINUE* FUNCTION IF GENERAL STATUS INDICATES THE ERROR 00517 M01S00427.1hp +++|* IS RECOVERABLE BY THE CONTROLLER. 00518 M01S00428.1hp +++|* 00519 M01S00429.1hp +++|* ENTRY (EC) = ERROR CODE. 00520 M01S00430.1hp +++|* (GS) = GENERAL STATUS. 00521 M01S00431.1hp +++|* (RW) = READ/WRITE FLAG. 00522 M01S00432.1hp +++|* (T7) = SECTOR COUNT. 00523 M01S00433.1hp +++|* 00524 M01S00434.1hp +++|* EXIT (A) .EQ. 0 IF ERROR WAS RECOVERED BY CONTROLLER. 00525 M01S00435.1hp +++|* .LT. 0 IF A FUNCTION TIMEOUT, CHANNEL PARITY 00526 M01S00436.1hp +++|* ERROR, OR DATA TRANSFER ERROR OCCURRED 00527 M01S00437.1hp +++|* WHILE TRYING TO OBTAIN STATUS. 00528 M01S00438.1hp +++|* .GT. 0 OTHERWISE. 00529 M01S00439.1hp +++|* (EC) = ERROR CODE. 00530 M01S00440.1hp +++|* 00531 M01S00441.1hp +++|* USES CB, EC, PB, RS. 00532 M01S00442.1hp +++|* 00533 M01S00443.1hp +++|* CALLS GDS, GGS, PCH. 00534 M01S00444.1hp +++| 00535 M01S00445.1hp +++| 00536 M01S00446.1hp +++| CDS SUBR ENTRY/EXIT 00537 M01S00447.1hp +++| CDS1 RJM GDS GET DETAILED STATUS 00538 M01S00448.1hp +++| MJN CDSX IF ERROR
| Line S00449 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2509 |
Seq # *Modification Id* Act ----------------------------+ 00539 M02S00449.ns2509 ---| LDM DST+21
| Line S00450 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2509 |
Seq # *Modification Id* Act ----------------------------+ 00540 M02S00450.ns2509 ---| LPN 20
| Line S00451 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2509 |
Seq # *Modification Id* Act ----------------------------+ 00541 M02S00451.ns2509 ---| NJN CDS2 IF INVALID STATUS 00542 M01S00452.1hp +++| LDD GS 00543 M01S00453.1hp +++| SHN 21-13
| Line S00454 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2509 |
Seq # *Modification Id* Act ----------------------------+ 00544 M02S00454.ns2509 ---| CDS2 PJP CDS6 IF NOT ABNORMAL TERMINATION 00545 M01S00001.ns2509 +++| PJP CDS6 IF NOT ABNORMAL TERMINATION 00546 M01S00455.1hp +++| SHN 13-10 00547 M01S00456.1hp +++| PJN CDS3 IF ERROR NOT RECOVERABLE BY CONTROLLER 00548 M01S00457.1hp +++| 00549 M01S00458.1hp +++|* ATTEMPT CONTROLLER RECOVERY. 00550 M01S00459.1hp +++| 00551 M01S00460.1hp +++| LDK FCCO ISSUE *CONTINUE* FUNCTION 00552 M01S00461.1hp +++| RJM PCH 00553 M01S00462.1hp +++| MJN CDSX IF TIMEOUT/DATA TRANSFER ERROR 00554 M01S00463.1hp +++| RJM GGS GET GENERAL STATUS 00555 M01S00464.1hp +++| MJN CDSX IF STATUS NOT OBTAINED 00556 M01S00465.1hp +++| NJN CDS1 IF NOT YET RECOVERED 00557 M01S00466.1hp +++| LCN 1 INDICATE CONTROLLER RECOVERY 00558 M01S00467.1hp +++| STD RS 00559 M01S00468.1hp +++| LDN 0 00560 M01S00469.1hp +++| UJN CDSX RETURN 00561 M01S00470.1hp +++| 00562 M01S00471.1hp +++|* CHECK FOR *NOT READY* CONDITION. 00563 M01S00472.1hp +++| 00564 M01S00473.1hp +++| CDS3 SHN 10-4 00565 M01S00474.1hp +++| PJN CDS4 IF NOT *NOT READY* 00566 M01S00475.1hp +++| LDM DST+7 00567 M01S00476.1hp +++| LPN 1 00568 M01S00477.1hp +++| NJN CDS4 IF NOT *NOT READY* 00569 M01S00478.1hp +++| LDM DST+10 00570 M01S00479.1hp +++| SHN 0-7 00571 M01S00480.1hp +++| LPN 1 00572 M01S00481.1hp +++| ZJP CDS8 IF DRIVE *NOT READY* 00573 M01S00482.1hp +++| 00574 M01S00483.1hp +++|* DURING SPINUP, THE STATUS OF THE DRIVE CHANGES SO AS TO 00575 M01S00484.1hp +++|* APPEAR NOT TO BE A *NOT READY* CONDITION. TO AVOID 00576 M01S00485.1hp +++|* MISHANDLING THIS SITUATION THE ERROR PROCESSOR CHECKS FOR 00577 M01S00486.1hp +++|* PRIOR DETECTION OF *NOT READY* AND ASSUMES NO CHANGE IN 00578 M01S00487.1hp +++|* THE SITUATION UNTIL GENERAL STATUS BECOMES ZERO. 00579 M01S00488.1hp +++| 00580 M01S00489.1hp +++| CDS4 LDD EC 00581 M01S00490.1hp +++| LMK NRDE 00582 M01S00491.1hp +++| ZJP CDS8 IF *NOT READY* ALREADY DETECTED 00583 M01S00492.1hp +++| 00584 M01S00493.1hp +++|* CHECK FOR *BUFFER TO DISK* ERROR. 00585 M01S00494.1hp +++| 00586 M01S00495.1hp +++| LDD RW 00587 M01S00496.1hp +++| ZJN CDS5 IF READ OPERATION 00588 M01S00497.1hp +++| LDM DST+14 00589 M01S00498.1hp +++| SHN 21-13 00590 M01S00499.1hp +++| PJN CDS5 IF NOT ERROR ON PREVIOUS SECTOR 00591 M01S00500.1hp +++| LDD T7 00592 M01S00501.1hp +++| LMK PPSLB-1 00593 M01S00502.1hp +++| NJN CDS5 IF NOT AT BUFFER BOUNDARY 00594 M01S00503.1hp +++| LDD PB BACKUP TO PREVIOUS BUFFER 00595 M01S00504.1hp +++| STD CB 00596 M01S00505.1hp +++| LDN 0 00597 M01S00506.1hp +++| STD PB 00598 M01S00507.1hp +++| UJN CDS6 SET ERROR CODE 00599 M01S00508.1hp +++| 00600 M01S00509.1hp +++|* CHECK FOR MEDIA ERROR. 00601 M01S00510.1hp +++| 00602 M01S00511.1hp +++| CDS5 LDM DST+17 00603 M01S00512.1hp +++| LPN 40 00604 M01S00513.1hp +++| NJN CDS6 IF PROCESSOR INSTRUCTION TIMEOUT 00605 M01S00514.1hp +++| LDM DST 00606 M01S00515.1hp +++| LPN 17 00607 M01S00516.1hp +++| LMN 10 00608 M01S00517.1hp +++| ZJN CDS7 IF MEDIA ERROR 00609 M01S00518.1hp +++| LDM DST+1 00610 M01S00519.1hp +++| SHN 21-13 00611 M01S00520.1hp +++| MJN CDS7 IF MEDIA ERROR 00612 M01S00521.1hp +++| SHN 13-11 00613 M01S00522.1hp +++| MJN CDS7 IF MEDIA ERROR 00614 M01S00523.1hp +++| LDM DST+20 00615 M01S00524.1hp +++| SHN 21-10 00616 M01S00525.1hp +++| MJN CDS7 IF MEDIA ERROR 00617 M01S00526.1hp +++| LDM DST+17 00618 M01S00527.1hp +++| SHN 21-6 00619 M01S00528.1hp +++| MJN CDS9 IF CHANNEL PARITY ERROR ON OUTPUT 00620 M01S00529.1hp +++| CDS6 LDN DSTE 00621 M01S00530.1hp +++| UJN CDS10 SET ERROR CODE 00622 M01S00531.1hp +++| 00623 M01S00532.1hp +++| CDS7 LDK PARE&NRDE 00624 M01S00533.1hp +++| CDS8 LMK NRDE 00625 M01S00534.1hp +++| UJN CDS10 SET ERROR CODE 00626 M01S00535.1hp +++| 00627 M01S00536.1hp +++| CDS9 LDN CHPE SET ERROR CODE 00628 M01S00537.1hp +++| CDS10 STD EC 00629 M01S00538.1hp +++| LJM CDSX RETURN
| Line S00539 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00630 M02S00539.ns2769 ---| CMD SPACE 4,10
| Line S00540 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00631 M02S00540.ns2769 ---|** CMD - CALL *1MD*.
| Line S00541 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00632 M02S00541.ns2769 ---|*
| Line S00542 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00633 M02S00542.ns2769 ---|* ENTRY (CN - CN+4) = *EMB* HEADER WORD.
| Line S00543 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00634 M02S00543.ns2769 ---|*
| Line S00544 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00635 M02S00544.ns2769 ---|* EXIT (A) .EQ. 0 IF UNABLE TO CALL *1MD*.
| Line S00545 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00636 M02S00545.ns2769 ---|* .NE. 0 IF *1MD* HAS BEEN CALLED.
| Line S00546 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00637 M02S00546.ns2769 ---|* *1MD* CALLED FLAG IS SET IN CELL *SR+4* IF *1MD* WAS
| Line S00547 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00638 M02S00547.ns2769 ---|* CALLED.
| Line S00548 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00639 M02S00548.ns2769 ---|*
| Line S00549 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00640 M02S00549.ns2769 ---|* USES SR+4, S2, CM - CM+4.
| Line S00550 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00641 M02S00550.ns2769 ---|*
| Line S00551 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00642 M02S00551.ns2769 ---|* CALLS 1MD.
| Line S00552 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00643 M02S00552.ns2769 ---|*
| Line S00553 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00644 M02S00553.ns2769 ---|* MACROS DELAY, EXECUTE, MONITOR.
| Line S00554 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00645 M02S00554.ns2769 ---|
| Line S00555 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00646 M02S00555.ns2769 ---|
| Line S00556 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00647 M02S00556.ns2769 ---| CMD2 LDN 2 SET *1MD* CALLED FLAG
| Line S00557 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00648 M02S00557.ns2769 ---| RAD SR+4
| Line S00558 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00649 M02S00558.ns2769 ---|
| Line S00559 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00650 M02S00559.ns2769 ---| CMD SUBR ENTRY/EXIT
| Line S00560 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00651 M02S00560.ns2769 ---| LDD SR+4
| Line S00561 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00652 M02S00561.ns2769 ---| LPN 2
| Line S00562 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00653 M02S00562.ns2769 ---| NJN CMDX IF *1MD* ALREADY CALLED
| Line S00563 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00654 M02S00563.ns2769 ---| STD S2 CLEAR *RPPM* RETRY COUNT
| Line S00564 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00655 M02S00564.ns2769 ---| LDD MA
| Line S00565 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00656 M02S00565.ns2769 ---| CWM CMDA,ON
| Line S00566 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00657 M02S00566.ns2769 ---| CMD1 LDK ZERL
| Line S00567 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00658 M02S00567.ns2769 ---| CRD CM
| Line S00568 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00659 M02S00568.ns2769 ---| EXECUTE 1MD,=
| Line S00569 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00660 M02S00569.ns2769 ---| MONITOR RPPM
| Line S00570 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00661 M02S00570.ns2769 ---| LDD CM+1
| Line S00571 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00662 M02S00571.ns2769 ---| NJN CMD2 IF PP ASSIGNED
| Line S00572 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00663 M02S00572.ns2769 ---| AOD S2 INCREMENT *RPPM* RETRY COUNT
| Line S00573 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00664 M02S00573.ns2769 ---| LMN MFRL
| Line S00574 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00665 M02S00574.ns2769 ---| ZJN CMDX IF RETRY LIMIT
| Line S00575 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00666 M02S00575.ns2769 ---| DELAY 10D*8D DELAY FOR 10 MILLISECONDS
| Line S00576 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00667 M02S00576.ns2769 ---| UJN CMD1 RETRY *RPPM*
| Line S00577 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00668 M02S00577.ns2769 ---|
| Line S00578 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00669 M02S00578.ns2769 ---| CMDA VFD 18/3L1MD,42/1 00670 M01S00579.1hp +++| CRL SPACE 4,10 00671 M01S00580.1hp +++|** CRL - CHECK FOR ERROR RETRY LIMIT REACHED. 00672 M01S00581.1hp +++|* 00673 M01S00582.1hp +++|* ENTRY (EC) = ERROR CODE. 00674 M01S00583.1hp +++|* (ER) = *RECOVERY IN PROGRESS* FLAG. 00675 M01S00584.1hp +++|* (RC) = RETRY COUNT. 00676 M01S00078.ns2769 +++|* (T5) = EST ORDINAL. 00677 M01S00585.1hp +++|* 00678 M01S00586.1hp +++|* EXIT (A) .GE. 0 IF RETRY LIMIT REACHED. 00679 M01S00587.1hp +++|* .LT. 0 IF NOT AT RETRY LIMIT.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2732a |
M02 (Updated by) | ns2732b |
Seq # *Modification Id* Act ----------------------------+ 00680 M02S00001.ns2732b ---|* (RC) INCREMENTED IF NOT AT LIMIT. 00681 M01S00001.ns2732b +++|* (RC) INCREMENTED. 00682 M01S00079.ns2769 +++|* MESSAGE ISSUED TO *MS2W* OF SYSTEM CONTROL POINT FOR 00683 M01S00080.ns2769 +++|* B-DISPLAY PRESENTATION IF HALF WAY TO RETRY LIMIT. 00684 M01S00002.ns2732a +++|* 00685 M01S00003.ns2732a +++|* USES RC.
| Line S00588 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 00686 M02S00588.ns2732 ---|* (RC) = (RC) + 1.
| Line S00589 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 00687 M02S00589.ns2732 ---|*
| Line S00590 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 00688 M02S00590.ns2732 ---|* USES RC. 00689 M01S00591.1hp +++| 00690 M01S00592.1hp +++| 00691 M01S00593.1hp +++| CRL SUBR ENTRY/EXIT 00692 M01S00594.1hp +++| LDD ER 00693 M01S00595.1hp +++| LMC SHNI+1 00694 M01S00596.1hp +++| STM CRLA
| Line S00597 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 00695 M02S00597.ns2732 ---| AOD RC INCREMENT RETRY COUNT
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
M02 (Updated by) | ns2732b |
Seq # *Modification Id* Act ----------------------------+ 00696 M02S00001.ns2732b ---| LDD RC RETRY COUNT 00697 M01S00002.ns2732b +++| AOD RC INCREMENT RETRY COUNT 00698 M01S00081.ns2769 +++| LDM TREC,EC 00699 M01S00082.ns2769 +++| SHN -1 00700 M01S00083.ns2769 +++| SBD RC 00701 M01S00084.ns2769 +++| PJN CRL1 IF TOO EARLY TO NOTIFY OPERATOR 00702 M01S00085.ns2769 +++| LDD T5 STORE EST ORDINAL IN MESSAGE 00703 M01S00086.ns2769 +++| SHN -3 00704 M01S00087.ns2769 +++| RJM C2D 00705 M01S00088.ns2769 +++| STM CRLB+1 00706 M01S00089.ns2769 +++| LDD T5 00707 M01S00090.ns2769 +++| LPN 7 00708 M01S00091.ns2769 +++| SHN 6 00709 M01S00092.ns2769 +++| ADC 2R0 00710 M01S00093.ns2769 +++| STM CRLB+2 00711 M01S00094.ns2769 +++| LDM TMNE,EC STORE ERROR MNEMONIC IN MESSAGE 00712 M01S00095.ns2769 +++| STM CRLB+3 00713 M01S00096.ns2769 +++| LDD CP 00714 M01S00097.ns2769 +++| ADK MS2W 00715 M01S00098.ns2769 +++| CWM CRLB,TR 00716 M01S00099.ns2769 +++| CRL1 LDD RC 00717 M01S00598.1hp +++| 00718 M01S00599.1hp +++|* IF *RECOVERY IN PROGRESS* IS NOT SET, THE RETRY COUNT IS 00719 M01S00600.1hp +++|* SHIFTED SO THAT THE LIMIT CHECK IS MADE AGAINST N/2 (WHERE N 00720 M01S00601.1hp +++|* IS THE RETRY LIMIT FOR THE ERROR TYPE IN CELL *EC*). THIS 00721 M01S00602.1hp +++|* CAUSES HALF OF THE RETRY ATTEMPTS TO BE PERFORMED ON EACH 00722 M01S00603.1hp +++|* CHANNEL, IF AN ALTERNATE ACCESS IS AVAILABLE. IF NO 00723 M01S00604.1hp +++|* ALTERNATE ACCESS IS AVAILABLE, ALL RETRIES WILL BE PERFORMED 00724 M01S00605.1hp +++|* ON THIS CHANNEL. 00725 M01S00606.1hp +++| 00726 M01S00607.1hp +++| SHN 0 00727 M01S00608.1hp +++|* SHN 1 (RECOVERY NOT IN PROGRESS) 00728 M01S00609.1hp +++| CRLA EQU *-1 00729 M01S00610.1hp +++| SBM TREC,EC
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2732a |
M02 (Updated by) | ns2732b |
Seq # *Modification Id* Act ----------------------------+ 00730 M02S00004.ns2732b ---| PJN CRLX IF RETRY LIMIT REACHED
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns2732a |
M02 (Updated by) | ns2732b |
Seq # *Modification Id* Act ----------------------------+ 00731 M02S00005.ns2732b ---| AOD RC INCREMENT RETRY COUNT 00732 M01S00003.ns2732b +++| SBN 1
| Line S00611 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00733 M02S00611.ns2769 ---| UJN CRLX RETURN 00734 M01S00100.ns2769 +++| UJP CRLX RETURN 00735 M01S00101.ns2769 +++| 00736 M01S00102.ns2769 +++| 00737 M01S00103.ns2769 +++| CRLB DATA C*EQ000 XX ERROR RETRY UNDERWAY.* 00738 M01S00612.1hp +++| CRQ SPACE 4,20 00739 M01S00613.1hp +++|** CRQ - CHECK REQUEST QUEUE. 00740 M01S00614.1hp +++|* 00741 M01S00615.1hp +++|* THIS ROUTINE ATTEMPTS TO CALL *CPUMTR* TO COMPLETE REQUESTS 00742 M01S00616.1hp +++|* IN THE UNIT QUEUE THAT HAVE ALREADY BEEN PROCESSED. 00743 M01S00617.1hp +++|* 00744 M01S00618.1hp +++|* ENTRY (CC) = COMPLETION REQUEST COUNT. 00745 M01S00619.1hp +++|* (PO) = *PUT* ORDINAL. 00746 M01S00620.1hp +++|* 00747 M01S00621.1hp +++|* EXIT (A) .EQ. 0 IF NO REQUESTS PRESENT. 00748 M01S00622.1hp +++|* .NE. 0 IF *CPUMTR* IS STILL BUSY WITH PREVIOUS 00749 M01S00623.1hp +++|* FUNCTION OR AN EXCHANGE WAS JUST ISSUED 00750 M01S00624.1hp +++|* FOR THE CURRENT FUNCTION. 00751 M01S00625.1hp +++|* 00752 M01S00626.1hp +++|* USES CC, CN - CN+4, T0 - T4. 00753 M01S00627.1hp +++| 00754 M01S00628.1hp +++| 00755 M01S00629.1hp +++| CRQ SUBR ENTRY/EXIT 00756 M01S00630.1hp +++| LDC ** READ XP 00757 M01S00631.1hp +++| CRQA EQU *-1 FWA OF XP 00758 M01S00632.1hp +++| CRD T0 00759 M01S00633.1hp +++| LDD OA READ OUTPUT REGISTER 00760 M01S00634.1hp +++| CRD CN 00761 M01S00635.1hp +++| LDD T0+4 (B0) 00762 M01S00636.1hp +++| NJN CRQ1 IF MISSED EXCHANGE 00763 M01S00637.1hp +++| STD CN+3 00764 M01S00638.1hp +++| LDD CN 00765 M01S00001.ns2454 +++| SHN 21-13 00766 M01S00002.ns2454 +++| MJN CRQ1 IF REISSUE REQUIRED 00767 M01S00639.1hp +++| NJN CRQX IF FUNCTION NOW BEING PROCESSED 00768 M01S00640.1hp +++| LDD CC 00769 M01S00641.1hp +++| ZJN CRQX IF NO PENDING COMPLETION REQUESTS 00770 M01S00642.1hp +++| LDC ** 00771 M01S00643.1hp +++| CRQE EQU *-1 00772 M01S00644.1hp +++| CRD T0 00773 M01S00645.1hp +++| LDD T0 00774 M01S00646.1hp +++| ADD T0+1 00775 M01S00647.1hp +++| NJN CRQX IF FUNCTION IN PROGRESS 00776 M01S00648.1hp +++| LDN DCBS SET *BIOM* SUBFUNCTION 00777 M01S00649.1hp +++| STD CN+1 00778 M01S00650.1hp +++| LDD PO 00779 M01S00651.1hp +++| STD CN+2 00780 M01S00652.1hp +++| CRQ1 LDD CC 00781 M01S00653.1hp +++| RAD CN+3 00782 M01S00654.1hp +++| LDN 0 00783 M01S00655.1hp +++| STD CC 00784 M01S00656.1hp +++| LDK BIOM 00785 M01S00657.1hp +++| STD CN 00786 M01S00658.1hp +++| LDD OA 00787 M01S00659.1hp +++| CWD CN 00788 M01S00660.1hp +++| LDC ** 00789 M01S00661.1hp +++| CRQB EQU *-1 ADDRESS OF EXCHANGE PACKAGE 00790 M01S00662.1hp +++| CWM CRQD,ON WRITE FIRST WORD 00791 M01S00663.1hp +++| SBN 1 SET EXCHANGE ADDRESS 00792 M01S00664.1hp +++| MXN 0 EXCHANGE CPU 00793 M01S00665.1hp +++| CRQC EQU *-1 CPU NUMBER 00794 M01S00666.1hp +++| UJP CRQX RETURN 00795 M01S00667.1hp +++| 00796 M01S00668.1hp +++| CRQD VFD 24/0 (P) 00797 M01S00669.1hp +++| VFD 18/0 (A0) 00798 M01S00670.1hp +++| VFD 18/0 (B0)
| Line S00671 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00799 M02S00671.ns2769 ---| C4D SPACE 4,15
| Line S00672 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00800 M02S00672.ns2769 ---|** C4D - CONVERT ONE PP WORD TO FOUR DISPLAY CODE CHARACTERS.
| Line S00673 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00801 M02S00673.ns2769 ---|*
| Line S00674 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00802 M02S00674.ns2769 ---|* ENTRY (A) = PP WORD TO CONVERT.
| Line S00675 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00803 M02S00675.ns2769 ---|* (T1) = ADDRESS OF FIRST OF TWO CONSECUTIVE PP WORDS IN
| Line S00676 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00804 M02S00676.ns2769 ---|* WHICH TO STORE THE DISPLAY CODE CHARACTERS.
| Line S00677 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00805 M02S00677.ns2769 ---|*
| Line S00678 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00806 M02S00678.ns2769 ---|* EXIT (A) = ADDRESS OF NEXT DISPLAY BUFFER WORD.
| Line S00679 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00807 M02S00679.ns2769 ---|* (T1) = (T1) + 2.
| Line S00680 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00808 M02S00680.ns2769 ---|*
| Line S00681 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00809 M02S00681.ns2769 ---|* USES CM, T1.
| Line S00682 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00810 M02S00682.ns2769 ---|*
| Line S00683 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00811 M02S00683.ns2769 ---|* CALLS C2D.
| Line S00684 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00812 M02S00684.ns2769 ---|
| Line S00685 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00813 M02S00685.ns2769 ---|
| Line S00686 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00814 M02S00686.ns2769 ---| C4D SUBR ENTRY/EXIT
| Line S00687 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00815 M02S00687.ns2769 ---| STD CM SAVE BINARY WORD
| Line S00688 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00816 M02S00688.ns2769 ---| SHN -6 CONVERT UPPER 6 BITS
| Line S00689 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00817 M02S00689.ns2769 ---| RJM C2D
| Line S00690 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00818 M02S00690.ns2769 ---| STI T1 STORE RESULT IN DISPLAY BUFFER
| Line S00691 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00819 M02S00691.ns2769 ---| AOD T1 ADVANCE TO NEXT DISPLAY BUFFER WORD
| Line S00692 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00820 M02S00692.ns2769 ---| LDD CM CONVERT LOWER 6 BITS
| Line S00693 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00821 M02S00693.ns2769 ---| LPN 77
| Line S00694 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00822 M02S00694.ns2769 ---| RJM C2D
| Line S00695 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00823 M02S00695.ns2769 ---| STI T1 STORE RESULT IN DISPLAY BUFFER
| Line S00696 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00824 M02S00696.ns2769 ---| AOD T1 ADVANCE TO NEXT DISPLAY BUFFER WORD
| Line S00697 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00825 M02S00697.ns2769 ---| UJN C4DX RETURN 00826 M01S00698.1hp +++| DCH SPACE 4,15 00827 M01S00699.1hp +++|** DCH - RELEASE CHANNEL. 00828 M01S00700.1hp +++|* 00829 M01S00701.1hp +++|* THIS ROUTINE RELEASES THE CHANNEL IF IT IS CURRENTLY 00830 M01S00702.1hp +++|* RESERVED. 00831 M01S00703.1hp +++|* 00832 M01S00704.1hp +++|* ENTRY (IR+4) = CHANNEL NUMBER. 00833 M01S00705.1hp +++|* (CS) = CHANNEL RESERVATION STATUS. 00834 M01S00706.1hp +++|* 00835 M01S00707.1hp +++|* EXIT (A) = (CS) = 0. 00836 M01S00708.1hp +++|* 00837 M01S00709.1hp +++|* USES CM+1, CS. 00838 M01S00710.1hp +++|* 00839 M01S00711.1hp +++|* MACROS MONITOR. 00840 M01S00712.1hp +++| 00841 M01S00713.1hp +++| 00842 M01S00714.1hp +++| DCH SUBR ENTRY/EXIT 00843 M01S00715.1hp +++| LDD CS 00844 M01S00716.1hp +++| LPN 1 00845 M01S00717.1hp +++| ZJN DCHX IF CHANNEL NOT RESERVED 00846 M01S00718.1hp +++| LDD IR+4 RELEASE CHANNEL 00847 M01S00719.1hp +++| STD CM+1 00848 M01S00720.1hp +++| MONITOR DCHM 00849 M01S00721.1hp +++| SOD CS 00850 M01S00722.1hp +++| UJN DCHX RETURN 00851 M01S00723.1hp +++| ERR SPACE 4,30 00852 M01S00724.1hp +++|** ERR - PROCESS ERROR. 00853 M01S00725.1hp +++|* 00854 M01S00726.1hp +++|* THIS ROUTINE IS CALLED TO PERFORM ERROR PROCESSING. 00855 M01S00727.1hp +++|* 00856 M01S00728.1hp +++|* ENTRY (EC) = 0 IF THIS IS THE FIRST RETRY OF A RECOVERY 00857 M01S00729.1hp +++|* SEQUENCE AND THE CALLER DID NOT SET THE ERROR 00858 M01S00730.1hp +++|* CODE. 00859 M01S00731.1hp +++|* = ERROR CODE IF NOT THE FIRST RETRY OF A RECOVERY 00860 M01S00732.1hp +++|* SEQUENCE AND NOT A CALLER SPECIFIED ERROR CODE. 00861 M01S00733.1hp +++|* = COMPLEMENT OF ERROR CODE IF SPECIFIED BY THE 00862 M01S00734.1hp +++|* CALLER. 00863 M01S00735.1hp +++|* (RC) = RETRY COUNT. 00864 M01S00736.1hp +++|* 00865 M01S00737.1hp +++|* EXIT (EC) = 0. 00866 M01S00738.1hp +++|* (RC) = 0. 00867 M01S00739.1hp +++|* TO THE POINT OF CALL IF THE ERROR WAS RECOVERED BY THE 00868 M01S00740.1hp +++|* CONTROLLER. 00869 M01S00741.1hp +++|* TO *MST* IN ALL OTHER CASES. 00870 M01S00742.1hp +++|* 00871 M01S00743.1hp +++|* USES EC, RC, RS, T1. 00872 M01S00744.1hp +++|*
| Line S00745 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00873 M02S00745.ns2769 ---|* CALLS CDS, CRL, CRQ, GGS, IBM, IBD, ISF, PDT, PFR, PRE, 00874 M01S00104.ns2769 +++|* CALLS CDS, CRL, CRQ, GGS, IBM, ISF, PDT, PFR, PRE,
| Line S00746 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act ----------------------------+ 00875 M02S00746.ns2507 ---|* RCS, RLC, SSF, TEP. 00876 M01S00001.ns2507 +++|* RLC, SSF, TEP. 00877 M01S00747.1hp +++| 00878 M01S00748.1hp +++| 00879 M01S00749.1hp +++| ERR SUBR ENTRY/EXIT 00880 M01S00750.1hp +++| RJM PRE PRESET ERROR PROCESSOR 00881 M01S00751.1hp +++| NJP ERR11 IF INTERLOCK/VERIFICATION FAILURE 00882 M01S00752.1hp +++| LDD EC 00883 M01S00753.1hp +++| SHN 21-13 00884 M01S00754.1hp +++| PJN ERR3 IF ERROR CODE NOT SET BY CALLER 00885 M01S00755.1hp +++| ERR2 LCN 0 STORE ERROR CODE 00886 M01S00756.1hp +++| LMD EC 00887 M01S00757.1hp +++| STD EC
| Line S00758 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 1hp13 |
Seq # *Modification Id* Act ----------------------------+ 00888 M02S00758.1hp13 ---| UJN ERR4 CHECK FOR RETRY LIMIT 00889 M01S00001.1hp13 +++| UJN ERR3.1 CHECK FOR RETRY LIMIT 00890 M01S00759.1hp +++| 00891 M01S00760.1hp +++| ERR3 RJM GGS GET GENERAL STATUS 00892 M01S00761.1hp +++| MJN ERR2 IF STATUS NOT OBTAINED
| Line S00762 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 1hp13 |
Seq # *Modification Id* Act ----------------------------+ 00893 M02S00762.1hp13 ---| LDD RC
| Line S00763 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 1hp13 |
Seq # *Modification Id* Act ----------------------------+ 00894 M02S00763.1hp13 ---| NJN ERR3.1 IF NOT FIRST RETRY
| Line S00764 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 1hp13 |
Seq # *Modification Id* Act ----------------------------+ 00895 M02S00764.1hp13 ---| LDD GS SAVE INITIAL GENERAL STATUS
| Line S00765 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 1hp13 |
Seq # *Modification Id* Act ----------------------------+ 00896 M02S00765.1hp13 ---| STM BMLGS
| Line S00766 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 1hp13 |
Seq # *Modification Id* Act ----------------------------+ 00897 M02S00766.1hp13 ---| ERR3.1 RJM CDS CRACK DETAILED STATUS 00898 M01S00002.1hp13 +++| RJM CDS CRACK DETAILED STATUS 00899 M01S00767.1hp +++| MJN ERR2 IF STATUS NOT OBTAINED 00900 M01S00003.1hp13 +++| ERR3.1 LDD RC 00901 M01S00004.1hp13 +++| NJN ERR4 IF NOT FIRST RETRY 00902 M01S00005.1hp13 +++| LDD GS SAVE INITIAL GENERAL STATUS 00903 M01S00006.1hp13 +++| STM BMLGS 00904 M01S00768.1hp +++| ERR4 LDD TH FORCE IMMEDIATE COMPLETION 00905 M01S00769.1hp +++| ERRNZ SHNI-1000 CODE DEPENDS ON VALUE 00906 M01S00770.1hp +++| STM IICA 00907 M01S00771.1hp +++| RJM IIC ISSUE I/O COMPLETION REQUEST 00908 M01S00772.1hp +++| ERR4.1 RJM CRQ ENSURE NO PENDING MONITOR FUNCTION 00909 M01S00773.1hp +++| NJN ERR4.1 IF FUNCTION STILL PENDING 00910 M01S00774.1hp +++| RJM IBM ISSUE BML MESSAGE IF FIRST RETRY 00911 M01S00775.1hp +++| AOD RS 00912 M01S00776.1hp +++| SHN 21-13 00913 M01S00777.1hp +++| MJN ERR6.1 IF ERROR RECOVERED BY CONTROLLER 00914 M01S00778.1hp +++| RJM CRL CHECK FOR RETRY LIMIT REACHED 00915 M01S00779.1hp +++| MJN ERR7 IF RETRY LIMIT NOT REACHED
| Line S00780 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00916 M02S00780.ns2769 ---| RJM IBD ISSUE B-DISPLAY MESSAGE 00917 M01S00781.1hp +++| 00918 M01S00782.1hp +++|* ATTEMPT TO RELOAD THE CONTROLLER IF THE ERROR TYPE IS 00919 M01S00783.1hp +++|* APPROPRIATE FOR SUCH AN ACTION. 00920 M01S00784.1hp +++| 00921 M01S00785.1hp +++| LDM TEPF,EC 00922 M01S00786.1hp +++| SHN 21-5 00923 M01S00787.1hp +++| PJN ERR5 IF RELOAD INAPPROPRIATE FOR ERROR TYPE 00924 M01S00788.1hp +++| RJM RLC RELOAD CONTROLLER
| Line S00789 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act ----------------------------+ 00925 M02S00789.ns2507 ---| NJN ERR5 IF RELOAD ATTEMPT FAILED
| Line S00790 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act ----------------------------+ 00926 M02S00790.ns2507 ---| STD RC CLEAR RETRY COUNT
| Line S00791 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act ----------------------------+ 00927 M02S00791.ns2507 ---| UJN ERR9 RETRY WITH RELOADED CONTROLWARE
| Line S00792 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act ----------------------------+ 00928 M02S00792.ns2507 ---|
| Line S00793 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act ----------------------------+ 00929 M02S00793.ns2507 ---|* DOWN THE CHANNEL IF APPROPRIATE FOR THIS ERROR TYPE.
| Line S00794 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act ----------------------------+ 00930 M02S00794.ns2507 ---|
| Line S00795 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2497 |
Seq # *Modification Id* Act ----------------------------+ 00931 M02S00795.ns2497 ---| ERR5 LDM TEPF,EC
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2497 |
M02 (Updated by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 00932 M02S00001.ns2732a ---| ERR5 SOD RC ALIGN RETRY COUNT FOR FINAL MESSAGE
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2497 |
M02 (Updated by) | ns2507 |
M03 (Updated by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 00933 M03S00002.ns2732a ---| LDM TEPF,EC
| Line S00796 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2507 |
M03 (Updated by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 00934 M03S00796.ns2732a ---| SHN 21-6
| Line S00797 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2507 |
M03 (Updated by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 00935 M03S00797.ns2732a ---| PJN ERR6 IF DOWNING CHANNEL INAPPROPRIATE
| Line S00798 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2507 |
M03 (Updated by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 00936 M03S00798.ns2732a ---| RJM RCS REMOVE CHANNEL FROM SYSTEM USE
| Line S00799 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2507 |
M03 (Updated by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 00937 M03S00799.ns2732a ---| ERR6 AOD RS SET RECOVERY STATUS
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2507 |
M02 (Updated by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 00938 M02S00002.ns2732a ---| AOD RS SET RECOVERY STATUS
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | ns2732a |
M02 (Updated by) | ns2732b |
Seq # *Modification Id* Act ----------------------------+ 00939 M02S00006.ns2732b ---| ERR5 AOD RS SET RECOVERY STATUS 00940 M01S00004.ns2732b +++| ERR5 SOD RC ADJUST FINAL RETRY COUNT 00941 M01S00005.ns2732b +++| AOD RS SET RECOVERY STATUS 00942 M01S00800.1hp +++| ERR6.1 UJN ERR11 TERMINATE ERROR PROCESSING 00943 M01S00801.1hp +++| 00944 M01S00802.1hp +++|* SET THE SUSPECT FLAG IF APPROPRIATE FOR THIS ERROR TYPE. 00945 M01S00803.1hp +++| 00946 M01S00804.1hp +++| ERR7 RJM SSF SET SUSPECT FLAG (IF APPROPRIATE)
| Line S00805 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00947 M02S00805.ns2769 ---| RJM IBD ISSUE B-DISPLAY MESSAGE 00948 M01S00806.1hp +++| 00949 M01S00807.1hp +++|* RETRY I/O SEQUENCE. 00950 M01S00808.1hp +++| 00951 M01S00809.1hp +++| ERR9 RJM ISF ISSUE SEEK FUNCTION 00952 M01S00810.1hp +++| ZJN ERR10 IF ON CYLINDER AND NO ERROR 00953 M01S00811.1hp +++| LDD GS 00954 M01S00812.1hp +++| LMN 2 00955 M01S00813.1hp +++| ZJN ERR9 IF POSITIONER BUSY 00956 M01S00814.1hp +++| LMN 10&2
| Line S00815 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2446 |
Seq # *Modification Id* Act ----------------------------+ 00957 M02S00815.ns2446 ---| ZJN ERR11 IF DRIVE RESERVED ON OTHER ACCESS
| Line S00816 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2446 |
Seq # *Modification Id* Act
----------------------------+
00958 M02S00816.ns2446 ---| LDD CS
00959 M01S00002.ns2446 +++| NJN ERR9.1 IF DRIVE NOT RESERVED ON OTHER CHANNEL
00960 M01S00003.ns2446 +++| LDC 4000 CAUSE PRIORITY OVERRIDE ON SEEK
00961 M01S00004.ns2446 +++| RAM ISFA
00962 M01S00005.ns2446 +++| UJN ERR9 REISSUE SEEK
00963 M01S00006.ns2446 +++|
00964 M01S00007.ns2446 +++| ERR9.1 LDD CS
00965 M01S00817.1hp +++| LPN 10
00966 M01S00818.1hp +++| ZJN ERR11 IF CONTROLLER WAS NOT CONNECTED
00967 M01S00819.1hp +++| LDK DSTE SET ERROR CODE FOR LOST CONTROLLER RESERVE
00968 M01S00820.1hp +++| STD EC
00969 M01S00821.1hp +++| UJP ERR4 RETRY OPERATION
00970 M01S00822.1hp +++|
00971 M01S00823.1hp +++| ERR10 RJM PFR PREPARE FOR RETRY ATTEMPT
00972 M01S00824.1hp +++| RJM PDT PERFORM READ/WRITE OPERATION
00973 M01S00825.1hp +++|
00974 M01S00826.1hp +++|* CONTROL RETURNS TO THIS POINT ONLY IF THE ERROR WAS
00975 M01S00827.1hp +++|* RECOVERED.
00976 M01S00828.1hp +++|
00977 M01S00829.1hp +++| ERR11 AOD RS SET RECOVERY STATUS
00978 M01S00007.ns2732a +++| SHN 6
00979 M01S00008.ns2732a +++| RAD RC ADJUST FOR CONTROLLER RECOVERY
00980 M01S00830.1hp +++|
00981 M01S00831.1hp +++|* TERMINATE ERROR PROCESSING. INSTRUCTIONS MODIFIED FOR ERROR
00982 M01S00832.1hp +++|* PROCESSING WILL BE RESTORED TO THEIR ORIGINAL VALUES, VARIOUS
00983 M01S00833.1hp +++|* DATA CELLS WILL BE RESTORED TO THEIR INITIAL STATES, ETC.
00984 M01S00834.1hp +++|
00985 M01S00835.1hp +++| RJM TEP TERMINATE ERROR PROCESSING
00986 M01S00836.1hp +++| LDM ERRA,RS
00987 M01S00837.1hp +++| STD T1
00988 M01S00838.1hp +++| LJM 0,T1 EXIT ERROR PROCESSOR
00989 M01S00839.1hp +++|
00990 M01S00840.1hp +++| ERRA INDEX TABLE OF EXIT ADDRESSES
00991 M01S00841.1hp +++| INDEX 0,ERRX
00992 M01S00842.1hp +++| INDEX 1,MST
00993 M01S00843.1hp +++| INDEX 2,MST
00994 M01S00844.1hp +++| INDEX 3,MST
00995 M01S00845.1hp +++| INDEX 4
00996 M01S00846.1hp +++| TEPF SPACE 4,25
00997 M01S00847.1hp +++|** TEPF - TABLE OF ERROR PROCESSING FLAGS.
00998 M01S00848.1hp +++|*
00999 M01S00849.1hp +++|* THIS TABLE CONTAINS INFORMATION RELATED TO EACH ERROR TYPE.
01000 M01S00850.1hp +++|* EACH ENTRY HAS THE FOLLOWING FORMAT -
01001 M01S00851.1hp +++|* VFD 2/ERROR COUNT INCREMENT, BML MESSAGE INDICATOR
01002 M01S00852.1hp +++|* 0 DO NOT INCREMENT ERROR COUNTS AND DO
01003 M01S00853.1hp +++|* NOT ISSUE BML MESSAGE.
01004 M01S00854.1hp +++|* 1 INCREMENT ERROR COUNTS AND ISSUE BML
01005 M01S00855.1hp +++|* MESSAGE.
01006 M01S00856.1hp +++|* 2 INCREMENT ERROR COUNTS AND ISSUE BML
01007 M01S00857.1hp +++|* MESSAGE IF UNRECOVERED ERROR.
01008 M01S00858.1hp +++|* VFD 2/ERROR LOG MESSAGE INDICATOR
01009 M01S00859.1hp +++|* 0 DO NOT ISSUE ERROR LOG MESSAGE.
01010 M01S00860.1hp +++|* 1 ISSUE ERROR LOG MESSAGE WITH DETAILED
01011 M01S00861.1hp +++|* STATUS.
01012 M01S00862.1hp +++|* 2 ISSUE ERROR LOG MESSAGE WITHOUT
01013 M01S00863.1hp +++|* DETAILED STATUS.
01014 M01S00864.1hp +++|* VFD 1/SUSPECT FLAG
01015 M01S00865.1hp +++|* 0 DO NOT SET SUSPECT FLAG.
01016 M01S00866.1hp +++|* 1 SET SUSPECT FLAG.
01017 M01S00867.1hp +++|* VFD 1/DOWN CHANNEL FLAG
01018 M01S00868.1hp +++|* 0 DO NOT DOWN CHANNEL.
01019 M01S00869.1hp +++|* 1 DOWN CHANNEL.
01020 M01S00870.1hp +++|* VFD 1/CONTROLLER RELOAD FLAG
01021 M01S00871.1hp +++|* 0 DO NOT RELOAD CONTROLLER.
01022 M01S00872.1hp +++|* 1 RELOAD CONTROLLER.
01023 M01S00873.1hp +++|* VFD 5/UNUSED (ZERO)
01024 M01S00874.1hp +++|
01025 M01S00875.1hp +++| LIST G
01026 M01S00876.1hp +++| TEPF EQU *-1
01027 M01S00877.1hp +++| ECHO 1,EC=("DREC")
01028 M01S00878.1hp +++| VFD 2/IEC._EC,2/IEM._EC,1/SUS._EC,1/IDC._EC,1/CWR._EC,5/0
01029 M01S00879.1hp +++| LIST *
01030 M01S00880.1hp +++| TEPO SPACE 4,10
01031 M01S00881.1hp +++|** TEPO - TABLE OF IMMEDIATE RETURN ERROR PROCESSING OPTIONS.
01032 M01S00882.1hp +++|
01033 M01S00883.1hp +++| LIST G
01034 M01S00884.1hp +++| TEPO EQU *-1
01035 M01S00885.1hp +++| ECHO 1,ERRCODE=("DREC")
01036 M01S00886.1hp +++| CON EPO._ERRCODE "TXT._ERRCODE" ERROR
01037 M01S00887.1hp +++| LIST *
01038 M01S00888.1hp +++| TMNE SPACE 4,10
01039 M01S00889.1hp +++|** TMNE - TABLE OF ERROR CODE MNEMONICS.
01040 M01S00890.1hp +++|
01041 M01S00891.1hp +++| LIST G
01042 M01S00892.1hp +++| TMNE EQU *-1
01043 M01S00893.1hp +++| ECHO 1,ERRCODE=("DREC")
01044 M01S00894.1hp +++| CON EMN._ERRCODE "TXT._ERRCODE" ERROR
01045 M01S00895.1hp +++| LIST *
01046 M01S00896.1hp +++| TREC SPACE 4,10
01047 M01S00897.1hp +++|** TREC - TABLE OF RETRY COUNTS.
01048 M01S00898.1hp +++|
01049 M01S00899.1hp +++| LIST G
01050 M01S00900.1hp +++| TREC EQU *-1
01051 M01S00901.1hp +++| ECHO 1,ERRCODE=("DREC")
01052 M01S00902.1hp +++| CON RTC._ERRCODE "TXT._ERRCODE" ERROR
01053 M01S00903.1hp +++| LIST *
01054 M01S00904.1hp +++| TSYM SPACE 4,10
01055 M01S00905.1hp +++|** TSYM - TABLE OF BML SYMPTOM CODES.
01056 M01S00906.1hp +++|
01057 M01S00907.1hp +++| LIST G
01058 M01S00908.1hp +++| TSYM EQU *-1
01059 M01S00909.1hp +++| ECHO 1,ERRCODE=("DREC")
01060 M01S00910.1hp +++| CON SYM._ERRCODE "TXT._ERRCODE" ERROR
01061 M01S00911.1hp +++| LIST *
01062 M01S00912.1hp +++| FNC SPACE 4,10
01063 M01S00913.1hp +++|** FNC - FUNCTION CHANNEL.
01064 M01S00914.1hp +++|*
01065 M01S00915.1hp +++|* ENTRY (A) = FUNCTION CODE.
01066 M01S00916.1hp +++|*
01067 M01S00917.1hp +++|* EXIT (A) .LT. 0 IF CHANNEL ACTIVE UPON ENTRY OR FUNCTION
01068 M01S00918.1hp +++|* TIMEOUT. (EC) = COMPLEMENT OF ERROR CODE.
01069 M01S00919.1hp +++|* .GE. 0 IF NO ERROR.
01070 M01S00920.1hp +++|*
01071 M01S00921.1hp +++|* USES EC.
01072 M01S00922.1hp +++|
01073 M01S00923.1hp +++|
01074 M01S00924.1hp +++| FNC6 ACN CH ACTIVATE CHANNEL
01075 M01S00925.1hp +++| LDN 0 SET REPLY STATUS
01076 M01S00926.1hp +++|
01077 M01S00927.1hp +++| FNC SUBR ENTRY/EXIT
01078 M01S00928.1hp +++| STM FNCA SAVE FUNCTION CODE
01079 M01S00929.1hp +++| AJM FNC5,CH IF CHANNEL IS STILL ACTIVE
01080 M01S00930.1hp +++| FAN CH FUNCTION CHANNEL
01081 M01S00931.1hp +++|
01082 M01S00932.1hp +++|* THE DRIVER MUST WAIT AT LEAST 300 MS BEFORE TIMING OUT THE
01083 M01S00933.1hp +++|* FUNCTION.
01084 M01S00934.1hp +++|
01085 M01S00935.1hp +++| FNC1 ADD ON
01086 M01S00936.1hp +++| IJM FNC6,CH IF FUNCTION ACCEPTED
01087 M01S00937.1hp +++| NJN FNC1 IF NOT TIMEOUT YET
01088 M01S00938.1hp +++| FNC2 LCN FTOE SET COMPLEMENT OF *FTOE* ERROR CODE
01089 M01S00939.1hp +++| FNC3 STD EC
01090 M01S00940.1hp +++| EJM FNC4,CH IF CHANNEL IS EMPTY
01091 M01S00941.1hp +++| LDN 1 SAVE LAST FUNCTION ISSUED
01092 M01S00942.1hp +++| IAM FNCA,CH
01093 M01S00943.1hp +++| FNC4 LCN 0 SET ERROR REPLY STATUS
01094 M01S00944.1hp +++| DCN CH+40
01095 M01S00945.1hp +++| UJN FNCX RETURN
01096 M01S00946.1hp +++|
01097 M01S00947.1hp +++| FNC5 LCN CHFE SET *CHANNEL FAILURE* ERROR CODE
01098 M01S00948.1hp +++| UJN FNC3 INPUT DATA/FUNCTION FROM CHANNEL
01099 M01S00949.1hp +++|
01100 M01S00950.1hp +++|
01101 M01S00951.1hp +++| FNCA CON -0 CURRENT FUNCTION
01102 M01S00952.1hp +++| GDS SPACE 4,15
01103 M01S00953.1hp +++|** GDS - GET DETAILED STATUS.
01104 M01S00954.1hp +++|*
01105 M01S00955.1hp +++|* THIS ROUTINE OBTAINS THE DETAILED STATUS FROM THE CONTROLLER.
01106 M01S00956.1hp +++|*
01107 M01S00957.1hp +++|* EXIT (A) .EQ. 0 IF STATUS OBTAINED.
01108 M01S00958.1hp +++|* .LT. 0 IF STATUS NOT OBTAINED.
01109 M01S00959.1hp +++|* (EC) = COMPLEMENT OF *IDTE* ERROR CODE IF INCOMPLETE
01110 M01S00960.1hp +++|* TRANSFER OCCURS.
01111 M01S00961.1hp +++|*
01112 M01S00962.1hp +++|* USES EC, T1.
01113 M01S00963.1hp +++|*
01114 M01S00964.1hp +++|* CALLS CCP, FNC.
01115 M01S00965.1hp +++|
01116 M01S00966.1hp +++|
01117 M01S00967.1hp +++| GDS1 LCN IDTE SET *INCOMPLETE DATA TRANSFER* ERROR CODE
01118 M01S00968.1hp +++| GDS2 STD EC
01119 M01S00969.1hp +++| GDS3 LDN MXSL-1 INVALIDATE DETAILED STATUS
01120 M01S00970.1hp +++| STD T1
01121 M01S00971.1hp +++| GDS4 LCN 0
01122 M01S00972.1hp +++| STM DST,T1
01123 M01S00973.1hp +++| SOD T1
01124 M01S00974.1hp +++| PJN GDS4 IF MORE BYTES
01125 M01S00975.1hp +++|
01126 M01S00976.1hp +++| GDS SUBR ENTRY/EXIT
01127 M01S00977.1hp +++| LDN FCDS ISSUE DETAILED STATUS FUNCTION
01128 M01S00978.1hp +++| RJM FNC
01129 M01S00979.1hp +++| MJN GDS3 IF ERROR
01130 M01S00980.1hp +++| LDN MXSL
01131 M01S00981.1hp +++| IAM DST,CH INPUT DETAILED STATUS
01132 M01S00982.1hp +++| NJN GDS1 IF INCOMPLETE DATA TRANSFER
01133 M01S00983.1hp +++| RJM CCP CHECK FOR CHANNEL PARITY ERROR
01134 M01S00984.1hp +++| ZJN GDSX IF NO CHANNEL PARITY ERROR
01135 M01S00985.1hp +++| UJN GDS2 INVALIDATE STATUS AND RETURN
01136 M01S00986.1hp +++| GGS SPACE 4,15
01137 M01S00987.1hp +++|** GGS - GET GENERAL STATUS.
01138 M01S00988.1hp +++|*
01139 M01S00989.1hp +++|* THIS ROUTINE OBTAINS THE EXTENDED GENERAL STATUS FROM THE
01140 M01S00990.1hp +++|* CONTROLLER.
01141 M01S00991.1hp +++|*
01142 M01S00992.1hp +++|* EXIT (A) .GE. 0 IF GENERAL STATUS OBTAINED. (GS) = STATUS.
01143 M01S00993.1hp +++|* .LT. 0 IF STATUS NOT OBTAINED. (GS) = 7777.
01144 M01S00994.1hp +++|* (EC) = COMPLEMENT OF *IDTE* ERROR CODE IF INCOMPLETE
01145 M01S00995.1hp +++|* TRANSFER OCCURRED.
01146 M01S00996.1hp +++|* = COMPLEMENT OF *CHPE* ERROR CODE IF CHANNEL
01147 M01S00997.1hp +++|* ERROR OCCURRED.
01148 M01S00998.1hp +++|*
01149 M01S00999.1hp +++|* USES EC, GS, T1.
01150 M01S01000.1hp +++|*
01151 M01S01001.1hp +++|* CALLS CCP, FNC.
01152 M01S01002.1hp +++|
01153 M01S01003.1hp +++|
01154 M01S01004.1hp +++| GGS1 LCN IDTE SET *INCOMPLETE DATA TRANSFER* ERROR CODE
01155 M01S01005.1hp +++| GGS2 STD EC
01156 M01S01006.1hp +++| GGS3 LDN FCESL-1 INVALIDATE EXTENDED GENERAL STATUS
01157 M01S01007.1hp +++| STD T1
01158 M01S01008.1hp +++| GGS4 LCN 0
01159 M01S01009.1hp +++| STM GGSA,T1
01160 M01S01010.1hp +++| SOD T1
01161 M01S01011.1hp +++| PJN GGS4 IF MORE BYTES
01162 M01S01012.1hp +++| LCN 0 INVALIDATE GENERAL STATUS
01163 M01S01013.1hp +++| GGS5 STD GS
01164 M01S01014.1hp +++|
01165 M01S01015.1hp +++| GGS SUBR ENTRY/EXIT
01166 M01S01016.1hp +++| LDM FNCA SAVE FUNCTION BEFORE GENERAL STATUS
01167 M01S01017.1hp +++| STM GGSB
01168 M01S01018.1hp +++| LDN FCES ISSUE EXTENDED GENERAL STATUS FUNCTION
01169 M01S01019.1hp +++| RJM FNC
01170 M01S01020.1hp +++| MJN GGS3 IF ERROR
01171 M01S01021.1hp +++| LDN FCESL
01172 M01S01022.1hp +++| IAM GGSA,CH
01173 M01S01023.1hp +++| NJN GGS1 IF INCOMPLETE TRANSFER
01174 M01S01024.1hp +++| RJM CCP CHECK FOR CHANNEL PARITY ERROR
01175 M01S01025.1hp +++| MJN GGS2 IF CHANNEL PARITY ERROR
01176 M01S01026.1hp +++| LDM GGSB RESTORE LAST FUNCTION FOR ERROR PROCESSOR
01177 M01S01027.1hp +++| STM FNCA
01178 M01S01028.1hp +++| LDM GGSA
01179 M01S01029.1hp +++| UJN GGS5 SAVE FIRST STATUS BYTE
01180 M01S01030.1hp +++|
01181 M01S01031.1hp +++| GGSA BSS FCESL EXTENDED GENERAL STATUS BUFFER
01182 M01S01032.1hp +++| GGSB BSS 1 LAST FUNCTION BEFORE GENERAL STATUS
| Line S01033 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01183 M02S01033.ns2769 ---| IBD SPACE 4,10
| Line S01034 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01184 M02S01034.ns2769 ---|** IBD - ISSUE B-DISPLAY MESSAGE.
| Line S01035 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01185 M02S01035.ns2769 ---|*
| Line S01036 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01186 M02S01036.ns2769 ---|* THIS ROUTINE ISSUES A MESSAGE TO *MS2W* OF THE SYSTEM CONTROL
| Line S01037 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01187 M02S01037.ns2769 ---|* POINT FOR PRESENTATION ON B-DISPLAY.
| Line S01038 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01188 M02S01038.ns2769 ---|*
| Line S01039 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01189 M02S01039.ns2769 ---|* ENTRY (EC) = ERROR CODE.
| Line S01040 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01190 M02S01040.ns2769 ---|* (RC) = RETRY COUNT.
| Line S01041 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01191 M02S01041.ns2769 ---|* (T5) = EST ORDINAL.
| Line S01042 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01192 M02S01042.ns2769 ---|*
| Line S01043 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01193 M02S01043.ns2769 ---|* CALLS C2D.
| Line S01044 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01194 M02S01044.ns2769 ---|*
| Line S01045 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01195 M02S01045.ns2769 ---|* MACROS DELAY.
| Line S01046 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01196 M02S01046.ns2769 ---|
| Line S01047 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01197 M02S01047.ns2769 ---|
| Line S01048 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01198 M02S01048.ns2769 ---| IBD SUBR ENTRY/EXIT
| Line S01049 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01199 M02S01049.ns2769 ---| LDM TREC,EC
| Line S01050 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01200 M02S01050.ns2769 ---| SHN -2
| Line S01051 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01201 M02S01051.ns2769 ---| SBD RC
| Line S01052 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01202 M02S01052.ns2769 ---| PJN IBDX IF TOO EARLY TO NOTIFY OPERATOR
| Line S01053 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01203 M02S01053.ns2769 ---| LDD T5 STORE EST ORDINAL IN MESSAGE
| Line S01054 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01204 M02S01054.ns2769 ---| SHN -3
| Line S01055 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01205 M02S01055.ns2769 ---| RJM C2D
| Line S01056 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01206 M02S01056.ns2769 ---| STM IBDA+1
| Line S01057 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01207 M02S01057.ns2769 ---| LDD T5
| Line S01058 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01208 M02S01058.ns2769 ---| LPN 7
| Line S01059 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01209 M02S01059.ns2769 ---| SHN 6
| Line S01060 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01210 M02S01060.ns2769 ---| ADC 2R0
| Line S01061 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01211 M02S01061.ns2769 ---| STM IBDA+2
| Line S01062 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01212 M02S01062.ns2769 ---| LDM TMNE,EC STORE ERROR MNEMONIC IN MESSAGE
| Line S01063 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01213 M02S01063.ns2769 ---| STM IBDA+3
| Line S01064 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01214 M02S01064.ns2769 ---| LDD CP
| Line S01065 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01215 M02S01065.ns2769 ---| ADK MS2W
| Line S01066 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01216 M02S01066.ns2769 ---| CWM IBDA,TR
| Line S01067 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 252l678 |
M03 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01217 M03S01067.ns2769 ---| DELAY 100D*8D DELAY FOR 100 MILLISECONDS
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | 252l678 |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01218 M02S00005.ns2769 ---| DELAY 200D*8D DELAY FOR 200 MILLISECONDS
| Line S01068 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01219 M02S01068.ns2769 ---| UJP IBDX RETURN
| Line S01069 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01220 M02S01069.ns2769 ---|
| Line S01070 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01221 M02S01070.ns2769 ---| IBDA DATA C*EQ000 XX ERROR RETRY UNDERWAY.* 01222 M01S01071.1hp +++| IBM SPACE 4,25 01223 M01S01072.1hp +++|** IBM - ISSUE BML MESSAGE. 01224 M01S01073.1hp +++|*
| Line S01074 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01225 M02S01074.ns2769 ---|* THIS ROUTINE BUILDS A BML MESSAGE AND CALLS ROUTINE *IMS* TO 01226 M01S00105.ns2769 +++|* THIS ROUTINE BUILDS A BML MESSAGE AND CALLS ROUTINE *IMB* TO 01227 M01S01075.1hp +++|* ISSUE THE MESSAGE TO THE BML. 01228 M01S01076.1hp +++|*
| Line S01077 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | 252l678 |
Seq # *Modification Id* Act ----------------------------+ 01229 M02S01077.252l678 ---|* ENTRY (CA) = UNIT NUMBER. 01230 M01S00006.252l678 +++|* ENTRY (CA - CA+3) = SEEK PARAMETERS. 01231 M01S01078.1hp +++|* (EC) = ERROR CODE. 01232 M01S01079.1hp +++|* (ER) = RECOVERY IN PROGRESS FLAG. 01233 M01S01080.1hp +++|* (RC) = RETRY COUNT. 01234 M01S01081.1hp +++|* (RS) = RECOVERY STATUS. 01235 M01S01082.1hp +++|* 777X INITIAL RETRY. 01236 M01S01083.1hp +++|* 0 RECOVERED BY CONTROLLER. 01237 M01S01084.1hp +++|* 1 RECOVERED BY DRIVER. 01238 M01S01085.1hp +++|* 2 UNRESOLVED. 01239 M01S01086.1hp +++|* 3 UNRECOVERED. 01240 M01S01087.1hp +++|* (RW) = READ/WRITE FLAG. 01241 M01S01088.1hp +++|* (T5) = EST ORDINAL. 01242 M01S01089.1hp +++|* (BMLGS) = GENERAL STATUS. 01243 M01S01090.1hp +++|* (DST - DST+23) = DETAILED STATUS IF APPLICABLE. 01244 M01S01091.1hp +++|*
| Line S01092 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2475 |
Seq # *Modification Id* Act ----------------------------+ 01245 M02S01092.ns2475 ---|* USES T1.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2475 |
M02 (Updated by) | ns2507 |
Seq # *Modification Id* Act ----------------------------+ 01246 M02S00001.ns2507 ---|* USES T1, T2.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2507 |
M02 (Updated by) | ns2519 |
Seq # *Modification Id* Act ----------------------------+ 01247 M02S00003.ns2519 ---|* USES T1.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2519 |
M02 (Updated by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 01248 M02S00001.ns2732 ---|* USES S2, T1.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
M02 (Updated by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 01249 M02S00002.ns2732a ---|* EXIT (RC) INCREMENTED. 01250 M01S00009.ns2732a +++|* EXIT (RC) INCREMENTED IF FIRST RETRY. 01251 M01S00003.ns2732 +++|*
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01252 M02S00004.ns2769 ---|* USES RC, T1. 01253 M01S00106.ns2769 +++|* USES RC, T1, CM+1 - CM+3. 01254 M01S01093.1hp +++|*
| Line S01094 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01255 M02S01094.ns2769 ---|* CALLS IEC, IMS. 01256 M01S00107.ns2769 +++|* CALLS IMB. 01257 M01S00108.ns2769 +++|* 01258 M01S00109.ns2769 +++|* MACROS MONITOR. 01259 M01S01095.1hp +++| 01260 M01S01096.1hp +++| 01261 M01S01097.1hp +++| IBM SUBR ENTRY/EXIT
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
M02 (Updated by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 01262 M02S00005.ns2732a ---| AOD RC INCREMENT RETRY COUNT 01263 M01S01098.1hp +++| LDM TEPF,EC 01264 M01S01099.1hp +++| SHN 0-12 01265 M01S01100.1hp +++| ZJN IBMX IF NO BML MESSAGE/ERROR COUNT INCREMENT
| Line S01101 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2562 |
Seq # *Modification Id* Act ----------------------------+ 01266 M02S01101.ns2562 ---| SHN 12-13
| Line S01102 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2562 |
Seq # *Modification Id* Act ----------------------------+ 01267 M02S01102.ns2562 ---| ZJN IBM1 IF BML MESSAGE MAY BE ISSUED
| Line S01103 Modification History | |
|---|---|
M01 (Added by) | 1hp |
M02 (Updated by) | ns2562 |
Seq # *Modification Id* Act ----------------------------+ 01268 M02S01103.ns2562 ---| LDD RS
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/1hp.txt · Last modified: by 127.0.0.1