cdc:nos2.source:opl.opl871:deck:1xy
Deck 1XY
Library Member Format: MODIFY
Listing Sections
- Deck 1XY Start
- Deck 1XY Part 1 (Line 1551)
- Deck 1XY Part 2 (Line 3360)
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M00S00001.1xy +++| IDENT 1XY,MXY 00002 M00S00002.1xy +++| 1XY TITLE 1XY - 7165/895 (CCC) DMA DRIVER. 00003 M00S00003.1xy +++| PERIPH 00004 M00S00004.1xy +++| BASE MIXED
| Line S00005 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00005 M01S00005.274l797 ---| SST
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00006 M01S00001.274l797 +++| SST OSTE,OSTP 00007 M00S00006.1xy +++|*COMMENT 1XY - 7165/895 (CCC) DMA DRIVER.
| Line S00007 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00008 M01S00007.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1985.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00009 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00010 M00S00008.1xy +++| 1XY SPACE 4,15 00011 M00S00009.1xy +++|*** 1XY - 7165/895 (CCC) DMA DRIVER. 00012 M00S00010.1xy +++|* 00013 M00S00011.1xy +++|* G. S. ANDERSON. 04/30/84. 00014 M00S00012.1xy +++|* R. M. DANISCH. 02/01/86. 00015 M00S00013.1xy +++|* S. L. BETH. 08/01/86. 00016 M00S00014.1xy +++| 1XY SPACE 4,15 00017 M00S00015.1xy +++|*** *1XY* IS THE CYBER CHANNEL COUPLER (CCC) DMA DRIVER FOR THE 00018 M00S00016.1xy +++|* 7165/895 DISK STORAGE SUBSYSTEM. 00019 M00S00017.1xy +++|* 00020 M00S00018.1xy +++|* THE 7165/895 DISK DRIVES ARE SUPPORTED AS BUFFERED I/O 00021 M00S00019.1xy +++|* DEVICES. THE REQUESTS THAT ARE PROCESSED BY *1XY* ARE 00022 M00S00020.1xy +++|* POSTED BY *CPUMTR* IN THE BUFFERED I/O TABLES IN *CMR*. 00023 M00S00021.1xy +++|* *1XY* INTERLOCKS THE UNITS, LINKS THE REQUESTS, AND COMPLETES 00024 M00S00022.1xy +++|* THE REQUESTS BY ISSUING APPROPRIATE *BIOM* REQUESTS. 00025 M00S00023.1xy +++|* 00026 M00S00024.1xy +++|* *1XY* SCANS THROUGH THE *PUT* ENTRIES IN A CIRCULAR FASHION 00027 M00S00025.1xy +++|* LOOKING FOR REQUESTS TO PROCESS. ONCE A REQUEST IS FOUND 00028 M00S00026.1xy +++|* AND LINKED *1XY* USES THE PHYSICAL DISK AND UEM ADDRESSES IN 00029 M00S00027.1xy +++|* THE CORRESPONDING *CBT* ENTRY TO DETERMINE THE ACTION TO BE 00030 M00S00028.1xy +++|* TAKEN. *1XY* WILL ATTEMPT TO PROCESS CONSECUTIVE SECTOR 00031 M00S00029.1xy +++|* REQUESTS ON THE CURRENT UNIT UNTIL THE END OF THE CYLINDER 00032 M00S00030.1xy +++|* OR A CONSECUTIVE SECTOR REQUEST WAS NOT FOUND. AT THIS 00033 M00S00031.1xy +++|* POINT *1XY* WILL RESUME ITS SEARCH THROUGH THE *PUT* WITH THE 00034 M00S00032.1xy +++|* *PUT* ENTRY IMMEDIATELY FOLLOWING THE ONE JUST PROCESSED. 00035 M00S00033.1xy +++| SPACE 4,10 00036 M00S00034.1xy +++|** MESSAGES. 00037 M00S00035.1xy +++|* 00038 M00S00036.1xy +++|* * 1XY - UNAUTHORIZED CALL.* 00039 M00S00037.1xy +++|* ISSUED TO THE SYSTEM DAYFILE IF *1XY* WAS NOT CALLED FROM 00040 M00S00038.1xy +++|* THE SYSTEM. 00041 M00S00039.1xy +++|* 00042 M00S00040.1xy +++|* * 1XY CHANNEL XX NOT RESPONDING.* 00043 M00S00041.1xy +++|* ISSUED TO INDICATE THE SELECTED CHANNEL DOES NOT RESPOND 00044 M00S00042.1xy +++|* TO BASIC CHANNEL FUNCTIONS. 00045 M00S00043.1xy +++| SPACE 4,10 00046 M00S00044.1xy +++|*** ERRLOG MESSAGES. 00047 M00S00045.1xy +++|* 00048 M00S00046.1xy +++|* *EQXXX,TKNNNN, MEDIA DEFECT ENCOUNTERED.* 00049 M00S00047.1xy +++|* 00050 M00S00048.1xy +++|* A MEDIA DEFECT HAS BEEN ENCOUNTERED ON EQUIPMENT WITH EST 00051 M00S00049.1xy +++|* ORDINAL ORD, LOGICAL TRACK NNNN. A REQUEST HAS BEEN ISSUED 00052 M00S00050.1xy +++|* TO AUTOMATICALLY FLAW THIS TRACK WHEN IT IS DROPPED. 00053 M00S00051.1xy +++|* 00054 M00S00052.1xy +++|* * CCHXX,MA464-DYY.* 00055 M00S00053.1xy +++|* 00056 M00S00054.1xy +++|* FIRMWARE THAT IS LOADED IN THE *CCC*. 00057 M00S00055.1xy +++|* XX = CONCURRENT CHANNEL NUMBER. 00058 M00S00056.1xy +++|* YY = LEVEL FOR FIRMWARE. 00059 M00S00057.1xy +++|* 00060 M00S00058.1xy +++|* *DCXXX, UYY,PS=ZZZZZZ.* 00061 M00S00059.1xy +++|* 00062 M00S00060.1xy +++|* PACK SERIAL NUMBER IDENTIFICATION. 00063 M00S00061.1xy +++|* XXX = EST ORDINAL. 00064 M00S00062.1xy +++|* YY = UNIT NUMBER. 00065 M00S00063.1xy +++|* ZZZZZZ = SERIAL NUMBER FOR HDA. 00066 M00S00064.1xy +++|*
| Line S00065 Modification History | |
|---|---|
M01 (Removed by) | 1xy3 |
Seq # *Modification Id* Act ----------------------------+ 00067 M01S00065.1xy3 ---|* * HUNG BUSY - GS = XXXX.*
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 1xy3 |
Seq # *Modification Id* Act ----------------------------+ 00068 M01S00001.1xy3 +++|* * CCHXX, DCYYY, FORMAT FAILURE.* 00069 M01S00002.1xy3 +++|* * HUNG BUSY - GS = ZZZZ.* 00070 M00S00066.1xy +++|* 00071 M00S00067.1xy +++|* CHANNEL HUNG BUSY DURING FORMAT OPERATION.
| Line S00068 Modification History | |
|---|---|
M01 (Removed by) | 1xy3 |
Seq # *Modification Id* Act ----------------------------+ 00072 M01S00068.1xy3 ---|* XXXX = THE GENERAL STATUS.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 1xy3 |
Seq # *Modification Id* Act ----------------------------+ 00073 M01S00003.1xy3 +++|* XX = CHANNEL NUMBER. 00074 M01S00004.1xy3 +++|* YYY = EST ORDINAL. 00075 M01S00005.1xy3 +++|* ZZZZ = THE GENERAL STATUS. 00076 M00S00069.1xy +++| 00077 M00S00070.1xy +++| 00078 M00S00071.1xy +++| SPACE 4,10 00079 M00S00072.1xy +++|*** ORGANIZATION OF 7165/895 (MEASUREMENTS IN DECIMAL). 00080 M00S00073.1xy +++|* 00081 M00S00074.1xy +++|* EQUIPMENT TYPE *DC* 00082 M00S00075.1xy +++|* 00083 M00S00076.1xy +++|* PHYSICAL ORGANIZATION: 00084 M00S00077.1xy +++|* 00085 M00S00078.1xy +++|* CM WORDS/PHYSICAL SECTOR 2048 00086 M00S00079.1xy +++|* PHYSICAL SECTORS/PHYSICAL TRACK 3 00087 M00S00080.1xy +++|* PHYSICAL TRACKS/CYLINDER 15 00088 M00S00081.1xy +++|* CYLINDERS/DEVICE 885 * N (0<N<3) 00089 M00S00082.1xy +++|* CM WORDS/DEVICE 79,749,120 * N 00090 M00S00083.1xy +++|* 00091 M00S00084.1xy +++|* LOGICAL ORGANIZATION: 00092 M00S00085.1xy +++|* 00093 M00S00086.1xy +++|* CM WORDS/LOGICAL SECTOR 64 00094 M00S00087.1xy +++|* LOGICAL SECTORS/PHYSICAL SECTOR 32 00095 M00S00088.1xy +++|* LOGICAL SECTORS/LOGICAL TRACK 704 * N 00096 M00S00089.1xy +++|* LOGICAL TRACKS/CYLINDER 2 00097 M00S00090.1xy +++|* LOGICAL TRACKS/DEVICE 1770 00098 M00S00091.1xy +++|* 00099 M00S00092.1xy +++|* MAXIMUM DATA RATE 400.00 K CM WORDS/SECOND 00100 M00S00093.1xy +++| EJECT 00101 M00S00094.1xy +++|*** SPECIAL PROGRAMMING NOTES. 00102 M00S00095.1xy +++|* 00103 M00S00096.1xy +++|* THE FOLLOWING IS A LIST OF SPECIAL NOTES THAT SHOULD BE 00104 M00S00097.1xy +++|* READ AND UNDERSTOOD BEFORE ANY MODIFICATIONS ARE MADE TO 00105 M00S00098.1xy +++|* THIS PROGRAM. 00106 M00S00099.1xy +++|* 00107 M00S00100.1xy +++|* 00108 M00S00101.1xy +++|* 1) *1XM*, *1XY* AND *1HP* ARE VERY SIMILAR IN DESIGN. MOST 00109 M00S00102.1xy +++|* FIXES APPLIED TO ONE OF THESE DRIVERS WILL ALSO APPLY TO 00110 M00S00103.1xy +++|* THE OTHERS. 00111 M00S00104.1xy +++|* 00112 M00S00105.1xy +++|* 2) WHERE POSSIBLE, *CMR* POINTERS HAVE BEEN PLUGGED BY THE 00113 M00S00106.1xy +++|* PRESET ROUTINE TO IMPROVE THE EXECUTION SPEED OF THE 00114 M00S00107.1xy +++|* PROGRAM AND TO MINIMIZE THE AMOUNT OF CODE. 00115 M00S00108.1xy +++|* 00116 M00S00109.1xy +++|* 3) BECAUSE *1XY* ISSUES ALL *BIOM* COMPLETION REQUESTS 00117 M00S00110.1xy +++|* WITHOUT WAITING FOR FUNCTION COMPLETION, THE *MONITOR* 00118 M00S00111.1xy +++|* MACRO HAS BEEN REDEFINED TO ENSURE THERE IS NO PENDING 00119 M00S00112.1xy +++|* MONITOR REQUEST AT THE TIME ANOTHER IS ABOUT TO BE 00120 M00S00113.1xy +++|* ISSUED. 00121 M00S00114.1xy +++| EJECT 00122 M00S00115.1xy +++| 00123 M00S00116.1xy +++|* COMMON DECKS. 00124 M00S00117.1xy +++| 00125 M00S00118.1xy +++| 00126 M00S00119.1xy +++|*CALL COMPMAC 00127 M00S00120.1xy +++| RICHI$ EQU 1 SELECT DEFERRED INSTRUCTION MODIFICATION 00128 M00S00121.1xy +++|*CALL COMPCHI 00129 M00S00122.1xy +++|*CALL COMPIOU 00130 M00S00123.1xy +++|*CALL COMSCPS 00131 M00S00124.1xy +++|*CALL COMSDFS 00132 M00S00125.1xy +++| LIST X 00133 M00S00126.1xy +++|*CALL COMSHIO 00134 M00S00127.1xy +++| LIST * 00135 M00S00128.1xy +++|*CALL COMSLSD 00136 M00S00129.1xy +++|*CALL COMSMSC 00137 M00S00130.1xy +++| LIST X 00138 M00S00131.1xy +++|*CALL COMSMSP 00139 M00S00132.1xy +++| LIST * 00140 M00S00133.1xy +++|*CALL COMSMST 00141 M00S00134.1xy +++|*CALL COMSPIM 00142 M00S00135.1xy +++|*CALL COMS1DS 00143 M00S00136.1xy +++| TITLE CONSTANTS, DEFINITIONS, AND MACROS. 00144 M00S00137.1xy +++| 1XY SPACE 4,10 00145 M00S00138.1xy +++|**** DIRECT CELL ASSIGNMENTS. 00146 M00S00139.1xy +++| 00147 M00S00140.1xy +++| 00148 M00S00141.1xy +++| BS EQU 15 BLOCK SIZE FOR DATA TRANSFER 00149 M00S00142.1xy +++| RS EQU 16 ERROR RECOVERY STATUS 00150 M00S00143.1xy +++| ER EQU 17 ERROR RECOVERY IN PROGRESS 00151 M00S00144.1xy +++| CC EQU 20 COMPLETION COUNT 00152 M00S00145.1xy +++| S1 EQU 21 SCRATCH 00153 M00S00146.1xy +++| EC EQU 22 ERROR CODE 00154 M00S00147.1xy +++| RW EQU 23 READ/WRITE FLAG 00155 M00S00148.1xy +++| IL EQU 24 *PUT* INTERLOCK FLAG 00156 M00S00149.1xy +++| SR EQU 25 - 31 SCRATCH (5 CELLS)
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00157 M01S00001.ns2769 +++| WB EQU SR - SR+4 FOR *COMP1MD* COMPATIBILITY 00158 M00S00150.1xy +++| PR EQU 32 *PUT* REQUEST PROCESSING ACTIVE 00159 M00S00151.1xy +++| CN EQU 33 - 37 SCRATCH (5 CELLS) 00160 M00S00152.1xy +++| SC EQU 40 UNUSED 00161 M00S00153.1xy +++| FU EQU 41 - 42 UEM FWA (2 CELLS) 00162 M00S00154.1xy +++| UA EQU 43 - 44 UEM ADDRESS (2 CELLS) 00163 M00S00155.1xy +++| EP EQU 45 ERROR ON PREVIOUS SECTOR 00164 M00S00156.1xy +++| CS EQU 46 CHANNEL STATUS 00165 M00S00157.1xy +++| NB EQU 47 NEXT BUFFER ORDINAL 00166 M00S00158.1xy +++| PB EQU 50 PREVIOUS BUFFER ORDINAL 00167 M00S00159.1xy +++| CB EQU 51 CURRENT BUFFER ORDINAL 00168 M00S00160.1xy +++| TB EQU 52 TOTAL CBT COUNT 00169 M00S00161.1xy +++| GS EQU 53 GENERAL STATUS 00170 M00S00162.1xy +++|* EQU 54 CHANNEL NUMBER (FROM INPUT REGISTER) 00171 M00S00163.1xy +++| TI EQU 57 *TPOR* INDEX 00172 M00S00164.1xy +++| CA EQU 60 - 64 CURRENT PHYSICAL ADDRESS (5 CELLS) 00173 M00S00165.1xy +++| RC EQU 65 RETRY COUNT 00174 M00S00166.1xy +++| PO EQU 66 CURRENT *PUT* ORDINAL 00175 M00S00167.1xy +++| S2 EQU 67 SCRATCH 00176 M00S00168.1xy +++| 1XY SPACE 4,10 00177 M00S00169.1xy +++|** DRIVER FUNCTION CODES. 00178 M00S00170.1xy +++| 00179 M00S00171.1xy +++| 00180 M00S00172.1xy +++| FCSK EQU 1 SEEK 1 TO 1 INTERLACE 00181 M00S00173.1xy +++| FCRD EQU 4 READ 00182 M00S00174.1xy +++| FCWR EQU 5 WRITE 00183 M00S00175.1xy +++| FCOC EQU 10 OPERATION COMPLETE 00184 M00S00176.1xy +++| FCGS EQU 12 GENERAL STATUS 00185 M00S00177.1xy +++| FCCO EQU 14 CONTINUE 00186 M00S00178.1xy +++| FCFP EQU 16 FORMAT PACK 00187 M00S00179.1xy +++| FCDS EQU 23 DETAILED STATUS 00188 M00S00180.1xy +++| FCRU EQU 31 READ UTILITY SECTOR 00189 M00S00181.1xy +++| FCRP EQU 34 READ PACK SERIAL NUMBER 00190 M00S00182.1xy +++| FCAL EQU 414 AUTOLOAD 00191 M00S00183.1xy +++| 1XY SPACE 4,10 00192 M00S00184.1xy +++|** 170 DMA ADAPTER FUNCTIONS. 00193 M00S00185.1xy +++| 00194 M00S00186.1xy +++| 00195 M00S00187.1xy +++| FCMC EQU 100000+1S17 MASTER CLEAR ADAPTER 00196 M00S00188.1xy +++| FCCT EQU 101000+1S17 CLEAR T REGISTERS 00197 M00S00189.1xy +++| FCDI EQU 102000+1S17 DMA INPUT 00198 M00S00190.1xy +++| FCDO EQU 103000+1S17 DMA OUTPUT 00199 M00S00191.1xy +++| FCCD EQU 104000+1S17 CLEAR DMA MODE 00200 M00S00192.1xy +++| FCDT EQU 106000+1S17 DISABLE TEST MODE 00201 M00S00193.1xy +++| FCET EQU 107000+1S17 ENABLE TEST MODE 00202 M00S00194.1xy +++| FCRC EQU 110000+1S17 READ CONTROL REGISTERS 00203 M00S00195.1xy +++| FCWC EQU 111000+1S17 WRITE CONTROL REGISTERS 00204 M00S00196.1xy +++| FCRE EQU 112000+1S17 READ ERROR STATUS REGISTER 00205 M00S00197.1xy +++| FCRO EQU 114000+1S17 READ OPERATIONAL STATUS REGISTER 00206 M00S00198.1xy +++| FCRT EQU 116000+1S17 READ T REGISTER 00207 M00S00199.1xy +++| FCWT EQU 117000+1S17 WRITE T PRIME REGISTER 00208 M00S00200.1xy +++| 00209 M00S00201.1xy +++| 00210 M00S00202.1xy +++|* 170 DMA OPERATIONAL STATUS. 00211 M00S00203.1xy +++| 00212 M00S00204.1xy +++| OSOF EQU 4000 OUTPUT BUFFER FULL 00213 M00S00205.1xy +++| OSIF EQU 2000 INPUT BUFFER FULL 00214 M00S00206.1xy +++| OSID EQU 1000 INPUT DATA AVAILABLE 00215 M00S00207.1xy +++| OSFT EQU 0400 FAST TRANSFER MODE 00216 M00S00208.1xy +++| OSEC EQU 0200 EXTERNAL CLOCK PRESENT 00217 M00S00209.1xy +++| OSTM EQU 0100 TEST MODE 00218 M00S00210.1xy +++| OSZC EQU 0040 PP WORD COUNT EQUAL ZERO 00219 M00S00211.1xy +++| OSDO EQU 0020 DMA OUTPUT 00220 M00S00212.1xy +++| OSDI EQU 0010 DMA INPUT 00221 M00S00213.1xy +++| OSTH EQU 0004 DMA TRANSFER HALTED 00222 M00S00214.1xy +++| OSTE EQU 0002 T PRIME REGISTER EMPTY 00223 M00S00215.1xy +++| OSTP EQU 0001 TRANSFER IN PROGRESS 00224 M00S00216.1xy +++| SPACE 4,15 00225 M00S00217.1xy +++|** DETAILED STATUS CONSTANTS. 00226 M00S00218.1xy +++| 00227 M00S00219.1xy +++|
| Line S00220 Modification History | |
|---|---|
M01 (Removed by) | ns2508 |
Seq # *Modification Id* Act ----------------------------+ 00228 M01S00220.ns2508 ---| SB7 EQU 4 SENSE BYTE 7
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2508 |
Seq # *Modification Id* Act ----------------------------+ 00229 M01S00001.ns2508 +++| SB0 EQU 0 SENSE BYTE 0
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2537 |
Seq # *Modification Id* Act ----------------------------+ 00230 M01S00001.ns2537 +++| SB7 EQU 4 SENSE BYTE 7 STATUS WORD OFFSET 00231 M00S00221.1xy +++| DCF EQU 1 DEVICE CHECK FORMAT
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2537 |
Seq # *Modification Id* Act ----------------------------+ 00232 M01S00002.ns2537 +++| FM6 EQU 6 FORMAT 6 MESSAGE
| Line S00222 Modification History | |
|---|---|
M01 (Removed by) | ns2508 |
Seq # *Modification Id* Act ----------------------------+ 00233 M01S00222.ns2508 ---| DNRM EQU 11 DEVICE NOT READY MESSAGE 00234 M00S00223.1xy +++| SPACE 4,15 00235 M00S00224.1xy +++|** ASSEMBLY CONSTANTS. 00236 M00S00225.1xy +++| 00237 M00S00226.1xy +++| 00238 M00S00227.1xy +++| BFRL EQU 10 *EMB* FLUSH RETRY LIMIT 00239 M00S00228.1xy +++| CH EQU 0 MASS STORAGE CHANNEL 00240 M00S00229.1xy +++| FCSKL EQU 4 SEEK PARAMETER WORD COUNT 00241 M00S00230.1xy +++| FPBL EQU 22 FORMAT PACK PARAMETER BLOCK LENGTH 00242 M00S00231.1xy +++| HLEN EQU 4*5 LENGTH OF SECTOR HEADER
| Line S00232 Modification History | |
|---|---|
M01 (Removed by) | ns2510 |
Seq # *Modification Id* Act ----------------------------+ 00243 M01S00232.ns2510 ---| MAXU EQU 16D MAXIMUM NUMBER OF UNITS PER CHANNEL
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2510 |
Seq # *Modification Id* Act ----------------------------+ 00244 M01S00001.ns2510 +++| MAXU EQU 64D MAXIMUM NUMBER OF UNITS PER CHANNEL 00245 M00S00233.1xy +++| MFRL EQU 10 MONITOR FUNCTION RETRY LIMIT 00246 M00S00234.1xy +++| MMXN EQU 10D MAXIMUM NUMBER OF EXCHANGE RETRIES 00247 M00S00235.1xy +++| PCRL EQU 10 PP CALL RETRY LIMIT 00248 M00S00236.1xy +++| PSLT EQU 26 PHYSICAL SECTORS PER LOGICAL TRACK 00249 M00S00237.1xy +++| PSPT EQU 3 PHYSICAL SECTORS PER PHYSICAL TRACK 00250 M00S00238.1xy +++| SSIZ EQU 1000 SECTOR SIZE FLAG FOR SEEK 00251 M00S00239.1xy +++| TPORE EQU 1 LENGTH OF *TPOR* ENTRY 00252 M00S00240.1xy +++|****
| Line S00241 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00253 M01S00241.ns2769 ---| CBRW SPACE 4,20
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00254 M01S00002.ns2769 +++| SPACE 4,20 00255 M00S00242.1xy +++|** MACROS.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00256 M01S00003.ns2769 +++| TBLM SPACE 4,10 00257 M01S00004.ns2769 +++|** TBLM - CREATE TABLE ENTRY MACRO. 00258 M01S00005.ns2769 +++|* 00259 M01S00006.ns2769 +++|*NAM TBLM 00260 M01S00007.ns2769 +++|* 00261 M01S00008.ns2769 +++|* ENTRY NAM = TABLE NAME. 00262 M01S00009.ns2769 +++|* 00263 M01S00010.ns2769 +++|* EXIT NAM_E MACRO DEFINED. 00264 M01S00011.ns2769 +++| 00265 M01S00012.ns2769 +++| 00266 M01S00013.ns2769 +++| PURGMAC TBLM 00267 M01S00014.ns2769 +++| 00268 M01S00015.ns2769 +++| MACRO TBLM,NAM 00269 M01S00016.ns2769 +++| PURGMAC NAM_E 00270 M01S00017.ns2769 +++| NAM_E MACRO ADDR 00271 M01S00018.ns2769 +++| LOCAL A 00272 M01S00019.ns2769 +++| MACREF NAM_E 00273 M01S00020.ns2769 +++| NOREF A 00274 M01S00021.ns2769 +++| A EQU ADDR 00275 M01S00022.ns2769 +++| T_NAM RMT 00276 M01S00023.ns2769 +++| CON A 00277 M01S00024.ns2769 +++| RMT 00278 M01S00025.ns2769 +++| TBLM ENDM 00279 M01S00026.ns2769 +++| CBTE SPACE 4,10 00280 M01S00027.ns2769 +++|** CBTE - CONTROL BUFFER TABLE ENTRY. 00281 M01S00028.ns2769 +++|* 00282 M01S00029.ns2769 +++|* THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TCBT* 00283 M01S00030.ns2769 +++|* THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH 00284 M01S00031.ns2769 +++|* REQUIRES THE FWA OF THE CONTROL BUFFER TABLE. 00285 M01S00032.ns2769 +++|* 00286 M01S00033.ns2769 +++|* CBTE ADDR 00287 M01S00034.ns2769 +++|* 00288 M01S00035.ns2769 +++|* ENTRY (ADDR) = ADDRESS OF INSTRUCTION. 00289 M01S00036.ns2769 +++|* 00290 M01S00037.ns2769 +++|* EXIT ADDRESS IS ADDED TO THE REMOTE BLOCK *TCBT*. 00291 M01S00038.ns2769 +++| 00292 M01S00039.ns2769 +++| 00293 M01S00040.ns2769 +++| CBT TBLM 00294 M00S00243.1xy +++| CCBA SPACE 4,15 00295 M00S00244.1xy +++|** CCBA - COMPUTE *CBT* ENTRY ADDRESS.
| Line S00041 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00296 M01S00041.ns2769 +++|* 00297 M01S00042.ns2769 +++|* THIS MACRO SETS (A) TO THE REQUESTED *CBT* ENTRY ADDRESS. 00298 M00S00245.1xy +++|* 00299 M00S00246.1xy +++|* CCBA W,A 00300 M00S00247.1xy +++|* 00301 M00S00248.1xy +++|* *W* - OPTIONAL WORD OFFSET TO BE ADDED TO ADDRESS. 00302 M00S00249.1xy +++|* *A* - IF NON-BLANK, BUFFER ORDINAL IS IN ACCUMULATOR. 00303 M00S00250.1xy +++|* 00304 M00S00251.1xy +++|* ENTRY (A) = BUFFER ORDINAL IF *A* PARAMETER IS NON-BLANK. 00305 M00S00252.1xy +++|* (CB) = CURRENT BUFFER ORDINAL. 00306 M00S00253.1xy +++|* 00307 M00S00254.1xy +++|* EXIT (A) = *CBT* ENTRY ADDRESS + WORD OFFSET. 00308 M00S00255.1xy +++| 00309 M00S00256.1xy +++| 00310 M00S00257.1xy +++| PURGMAC CCBA 00311 M00S00258.1xy +++| 00312 M00S00259.1xy +++| CCBA MACRO W,A
| Line S00260 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00313 M01S00260.ns2769 ---| LOCAL FWACB 00314 M00S00261.1xy +++| MACREF CCBA 00315 M00S00262.1xy +++| IFC EQ,$A$$,1 00316 M00S00263.1xy +++| LDD CB 00317 M00S00264.1xy +++| SHN CBTLS
| Line S00265 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00318 M01S00265.ns2769 ---| FWACB ADC W 00319 M01S00266.ns2769 ---| CBTA RMT
| Line S00267 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
M02 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00320 M02S00267.ns2769 ---| CON FWACB+1
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00321 M02S00001.ns2769 ---| CON FWACB
| Line S00268 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00322 M01S00268.ns2769 ---| CBTA RMT
| Line S00043 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00323 M01S00043.ns2769 +++| CBTE * 00324 M01S00044.ns2769 +++| ADC W 00325 M00S00269.1xy +++| CCBA ENDM
| Line S00045 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00326 M01S00045.ns2769 +++| PUTE SPACE 4,10 00327 M01S00046.ns2769 +++|** PUTE - PHYSICAL UNIT TABLE ENTRY. 00328 M01S00047.ns2769 +++|* 00329 M01S00048.ns2769 +++|* THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TPUT* 00330 M01S00049.ns2769 +++|* THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH 00331 M01S00050.ns2769 +++|* REQUIRES THE FWA OF THE PHYSICAL UNIT TABLE. 00332 M01S00051.ns2769 +++|* 00333 M01S00052.ns2769 +++|* PUTE ADDR 00334 M01S00053.ns2769 +++|* 00335 M01S00054.ns2769 +++|* ENTRY (ADDR) = ADDRESS OF INSTRUCTION. 00336 M01S00055.ns2769 +++|* 00337 M01S00056.ns2769 +++|* EXIT ADDRESS IS ADDED TO THE REMOTE BLOCK *TPUT*. 00338 M01S00057.ns2769 +++| 00339 M01S00058.ns2769 +++| 00340 M01S00059.ns2769 +++| PUT TBLM 00341 M00S00270.1xy +++| CPTA SPACE 4,10 00342 M00S00271.1xy +++|** CPTA - COMPUTE *PUT* ENTRY ADDRESS.
| Line S00060 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00343 M01S00060.ns2769 +++|* 00344 M01S00061.ns2769 +++|* THIS MACRO SETS (A) TO THE REQUESTED *PUT* ENTRY ADDRESS. 00345 M00S00272.1xy +++|* 00346 M00S00273.1xy +++|* CPTA W,A 00347 M00S00274.1xy +++|* 00348 M00S00275.1xy +++|* *W* - OPTIONAL WORD OFFSET TO BE ADDED TO ADDRESS. 00349 M00S00276.1xy +++|* *A* - IF NON-BLANK, *PUT* ORDINAL IS IN ACCUMULATOR. 00350 M00S00277.1xy +++|* 00351 M00S00278.1xy +++|* ENTRY (A) = *PUT* ORDINAL IF *A* PARAMETER IS NON-BLANK. 00352 M00S00279.1xy +++|* (PO) = *PUT* ORDINAL. 00353 M00S00280.1xy +++|* 00354 M00S00281.1xy +++|* EXIT (A) = *PUT* ENTRY ADDRESS + WORD OFFSET. 00355 M00S00282.1xy +++| 00356 M00S00283.1xy +++| 00357 M00S00284.1xy +++| PURGMAC CPTA 00358 M00S00285.1xy +++| 00359 M00S00286.1xy +++| CPTA MACRO W,A
| Line S00287 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00360 M01S00287.ns2769 ---| LOCAL FWAPUT 00361 M00S00288.1xy +++| MACREF CPTA 00362 M00S00289.1xy +++| IFC EQ,$A$$,1 00363 M00S00290.1xy +++| LDD PO 00364 M00S00291.1xy +++| SHN PUTLS
| Line S00292 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00365 M01S00292.ns2769 ---| FWAPUT ADC W 00366 M01S00293.ns2769 ---| PUTA RMT
| Line S00294 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
M02 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00367 M02S00294.ns2769 ---| CON FWAPUT+1
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00368 M02S00002.ns2769 ---| CON FWAPUT
| Line S00295 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00369 M01S00295.ns2769 ---| RMT
| Line S00062 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00370 M01S00062.ns2769 +++| PUTE * 00371 M01S00063.ns2769 +++| ADC W 00372 M00S00296.1xy +++| CPTA ENDM
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00373 M01S00003.271l716 +++| CSHN SPACE 4,10 00374 M01S00004.271l716 +++|** CSHN - GENERATE CALCULATED SHIFT INSTRUCTION. 00375 M01S00005.271l716 +++|* 00376 M01S00006.271l716 +++|* CSHN A 00377 M01S00007.271l716 +++|* 00378 M01S00008.271l716 +++|* *A* = MNEMONIC DEFINING BIT POSITION. 00379 M01S00009.271l716 +++|* 00380 M01S00010.271l716 +++|* ENTRY .M = SHIFT COUNT FROM PREVIOUS CALL. 00381 M01S00011.271l716 +++|* 00382 M01S00012.271l716 +++|* EXIT .M = SHIFT COUNT TO REALIGN ACCUMULATOR. 00383 M01S00013.271l716 +++|* .N = SHIFT TO MOVE *A* TO SIGN POSITION. 00384 M01S00014.271l716 +++| 00385 M01S00015.271l716 +++| 00386 M01S00016.271l716 +++| PURGMAC CSHN 00387 M01S00017.271l716 +++| 00388 M01S00018.271l716 +++| CSHN MACRO A 00389 M01S00019.271l716 +++| .N SET .M+21-A+A/12D*12D 00390 M01S00020.271l716 +++| .M SET .M+22-.N 00391 M01S00021.271l716 +++| IFGT .N,21,1 00392 M01S00022.271l716 +++| .N SET .N-22 00393 M01S00023.271l716 +++| SHN .N 00394 M01S00024.271l716 +++| CSHN ENDM
| Line S00064 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00395 M01S00064.ns2769 +++| EMBE SPACE 4,10 00396 M01S00065.ns2769 +++|** EMBE - ERROR MESSAGE TABLE ENTRY. 00397 M01S00066.ns2769 +++|* 00398 M01S00067.ns2769 +++|* THIS MACRO GENERATES AN ENTRY IN REMOTE LIST *TEMB* 00399 M01S00068.ns2769 +++|* THAT CONTAINS THE ADDRESS OF AN INSTRUCTION WHICH 00400 M01S00069.ns2769 +++|* REQUIRES THE FWA OF THE ERROR MESSAGE TABLE. 00401 M01S00070.ns2769 +++|* 00402 M01S00071.ns2769 +++|* EMBE ADDR 00403 M01S00072.ns2769 +++|* 00404 M01S00073.ns2769 +++|* ENTRY (ADDR) = ADDRESS OF INSTRUCTION. 00405 M01S00074.ns2769 +++|* 00406 M01S00075.ns2769 +++|* EXIT ADDRESS IS ADDED TO THE REMOTE BLOCK *TEMB*. 00407 M01S00076.ns2769 +++| 00408 M01S00077.ns2769 +++| 00409 M01S00078.ns2769 +++| EMB TBLM 00410 M00S00297.1xy +++| MONITOR SPACE 4,15 00411 M00S00298.1xy +++|** MONITOR - ISSUE MONITOR FUNCTION. 00412 M00S00299.1xy +++|* 00413 M00S00300.1xy +++|* THIS MACRO PROVIDES FUNCTIONALITY IDENTICAL TO THAT OF THE 00414 M00S00301.1xy +++|* *MONITOR* MACRO DEFINED IN *COMPMAC*, WHILE ENSURING ANY 00415 M00S00302.1xy +++|* PENDING *BIOM* MONITOR FUNCTION IS COMPLETED BEFORE THE NEXT 00416 M00S00303.1xy +++|* MONITOR FUNCTION IS ISSUED. 00417 M00S00304.1xy +++|* 00418 M00S00305.1xy +++|* MONITOR F 00419 M00S00306.1xy +++|* 00420 M00S00307.1xy +++|* *F* - MONITOR FUNCTION CODE. 00421 M00S00308.1xy +++|* 00422 M00S00309.1xy +++|* EXIT (A) = 0. 00423 M00S00310.1xy +++|* (CM - CM+4) = COMPLETED PP OUTPUT REGISTER IMAGE. 00424 M00S00311.1xy +++|* 00425 M00S00312.1xy +++|* CALLS IMF. 00426 M00S00313.1xy +++| 00427 M00S00314.1xy +++| 00428 M00S00315.1xy +++| PURGMAC MONITOR 00429 M00S00316.1xy +++| 00430 M00S00317.1xy +++| MONITOR MACRO F 00431 M00S00318.1xy +++| MACREF MONITOR 00432 M00S00319.1xy +++| LDK F 00433 M00S00320.1xy +++| RJM IMF 00434 M00S00321.1xy +++| MONITOR ENDM 00435 M00S00322.1xy +++| 1XY SPACE 4 00436 M00S00323.1xy +++| RICHI REDEFINE CHANNEL INSTRUCTIONS 00437 M00S00324.1xy +++| TITLE MAIN PROGRAM. 00438 M00S00325.1xy +++|** MXY - 895 DMA DRIVER. 00439 M00S00326.1xy +++| 00440 M00S00327.1xy +++| 00441 M00S00328.1xy +++| ORG PPFW 00442 M00S00329.1xy +++| MXY RJM PRS PRESET 00443 M00S00330.1xy +++| MXY SPACE 4 00444 M00S00331.1xy +++|** MST - MASTER MAIN PROGRAM. 00445 M00S00332.1xy +++| 00446 M00S00333.1xy +++| 00447 M00S00334.1xy +++| MST RJM CCR CHECK FOR CHANNEL REQUESTED/DOWN 00448 M00S00335.1xy +++| MJN MST1 IF CHANNEL GLOBALLY DOWN 00449 M00S00336.1xy +++| RJM SUQ SCAN UNIT QUEUE 00450 M00S00337.1xy +++| ZJN MST IF NO ELIGIBLE ENTRY FOUND 00451 M00S00338.1xy +++| RJM ISF ISSUE SEEK FUNCTION 00452 M00S00339.1xy +++| NJN MST IF UNIT NOT ON CYLINDER 00453 M00S00340.1xy +++| RJM PDT PERFORM DATA TRANSFER 00454 M00S00341.1xy +++| UJN MST LOOP 00455 M00S00342.1xy +++| 00456 M00S00343.1xy +++| MST1 RJM DCH RELEASE CHANNEL 00457 M00S00344.1xy +++| MONITOR DPPM DROP PP 00458 M00S00345.1xy +++| LJM PPR ENTER IDLE LOOP 00459 M00S00346.1xy +++| TPOR SPACE 4,10 00460 M00S00347.1xy +++|** TPOR - TABLE OF *PUT* ORDINALS. 00461 M00S00348.1xy +++|* 00462 M00S00349.1xy +++|* THIS TABLE CONTAINS THE ORDINALS OF THE *PUT* ENTRIES FOR ALL 00463 M00S00350.1xy +++|* UNITS ACCESSED BY THIS DRIVER-S CHANNEL. 00464 M00S00351.1xy +++|* 00465 M00S00352.1xy +++|* ENTRY = 1 WORD. 00466 M00S00353.1xy +++|*
| Line S00354 Modification History | |
|---|---|
M01 (Removed by) | ns2643 |
Seq # *Modification Id* Act ----------------------------+ 00467 M01S00354.ns2643 ---|*T 5/ 0, 1/ I, 6/ *PUT* ORDINAL
Figure
00468 M01S00355.ns2643 ---|* I EST CHANNEL BYTE INDEX.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2643 |
Seq # *Modification Id* Act ----------------------------+ 00469 M01S00001.ns2643 +++|*T 11/ PUT ,1/I
Figure
00470 M01S00002.ns2643 +++|* PUT *PUT* ORDINAL OF DEVICE. 00471 M01S00003.ns2643 +++|* I EST CHANNEL BYTE INDEX. 00472 M00S00356.1xy +++|* 00473 M00S00357.1xy +++|* TABLE IS TERMINATED BY A ZERO BYTE. 00474 M00S00358.1xy +++| 00475 M00S00359.1xy +++| 00476 M00S00360.1xy +++| TPOR BSSZ TPORE*MAXU 00477 M00S00361.1xy +++| CON 0 TERMINATE *TPOR* TABLE 00478 M00S00362.1xy +++| CCR SPACE 4,20 00479 M00S00363.1xy +++|** CCR - CHECK FOR CHANNEL REQUESTED OR DOWN. 00480 M00S00364.1xy +++|* 00481 M00S00365.1xy +++|* THIS ROUTINE CHECKS TO SEE IF THE CHANNEL TO WHICH THIS PP IS 00482 M00S00366.1xy +++|* DEDICATED IS BEING REQUESTED BY ANOTHER PP OR IS GLOBALLY 00483 M00S00367.1xy +++|* DOWN. IF THE CHANNEL IS REQUESTED BY ANOTHER PP, IT WILL BE 00484 M00S00368.1xy +++|* RELEASED AND WILL BE REQUESTED AGAIN FOLLOWING A ONE SECOND 00485 M00S00369.1xy +++|* DELAY. IF THE CHANNEL IS GLOBALLY DOWN, THE DRIVER DROP FLAG 00486 M00S00370.1xy +++|* WILL BE SET IN THE CONTROLWARE TABLE AND THE CHANNEL WILL BE 00487 M00S00371.1xy +++|* RELEASED. 00488 M00S00372.1xy +++|* 00489 M00S00373.1xy +++|* EXIT (A) .LT. 0 IF CHANNEL IS GLOBALLY DOWN. 00490 M00S00374.1xy +++|* 00491 M00S00375.1xy +++|* USES CM - CM+4. 00492 M00S00376.1xy +++|*
| Line S00377 Modification History | |
|---|---|
M01 (Removed by) | 1xy2 |
Seq # *Modification Id* Act ----------------------------+ 00493 M01S00377.1xy2 ---|* CALLS DCH, DFM, FNC, RCH, RCS, SCD.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 1xy2 |
Seq # *Modification Id* Act ----------------------------+ 00494 M01S00001.1xy2 +++|* CALLS DCH, FNC, RCH, SCD. 00495 M00S00378.1xy +++|* 00496 M00S00379.1xy +++|* MACROS DELAY. 00497 M00S00380.1xy +++| 00498 M00S00381.1xy +++| 00499 M00S00382.1xy +++| CCR4 RJM SCD SET DRIVER DROP FLAG 00500 M00S00383.1xy +++| LCN 0 SET DROPOUT REPLY 00501 M00S00384.1xy +++| 00502 M00S00385.1xy +++| CCR SUBR ENTRY/EXIT 00503 M00S00386.1xy +++| LDC ** READ CHANNEL TABLE 00504 M00S00387.1xy +++| CCRA EQU *-1 (CM ADDRESS OF ENTRY) 00505 M00S00388.1xy +++| CRD CM 00506 M00S00389.1xy +++| LDD CM+** CHECK REQUESTED FLAG 00507 M00S00390.1xy +++| CCRB EQU *-1 (BYTE ADDRESS OF ENTRY) 00508 M00S00391.1xy +++| SHN 21-5 00509 M00S00392.1xy +++| MJN CCR4 IF CHANNEL IS GLOBALLY DOWN 00510 M00S00393.1xy +++| SHN 22+5-13 00511 M00S00394.1xy +++| PJN CCRX IF CHANNEL NOT REQUESTED 00512 M00S00395.1xy +++| RJM DCH RELEASE CHANNEL 00513 M00S00396.1xy +++| CCR1 DELAY 00514 M00S00397.1xy +++| RJM RCH REQUEST CHANNEL 00515 M00S00398.1xy +++| ZJN CCR1 IF CHANNEL NOT ASSIGNED 00516 M00S00399.1xy +++| DCN CH+40 INSURE CHANNEL IN CORRECT STATE 00517 M00S00400.1xy +++| LDC FCCT CLEAR THE T REGISTER 00518 M00S00401.1xy +++| RJM FNN 00519 M00S00402.1xy +++| MJN CCR3 IF ERROR ON CHANNEL ACCESS 00520 M00S00403.1xy +++| LDC FCWC WRITE ADAPTER CONTROL REGISTER 00521 M00S00404.1xy +++| RJM FNC 00522 M00S00405.1xy +++| MJN CCR3 IF ERROR ON CHANNEL ACCESS
| Line S00406 Modification History | |
|---|---|
M01 (Removed by) | 1xy9 |
Seq # *Modification Id* Act ----------------------------+ 00523 M01S00406.1xy9 ---| LDC 20000 SELECT 60 BIT CM WORD ACCESS
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 1xy9 |
Seq # *Modification Id* Act ----------------------------+ 00524 M01S00001.1xy9 +++| LDC 20400 60 BIT CM WORD ACCESS AND NO ERROR CLEAR 00525 M00S00407.1xy +++| OAN CH 00526 M00S00408.1xy +++| CCR2 SBN 1 00527 M00S00409.1xy +++| ZJN CCR3 IF TIMEOUT ON CONTROL REGISTER WRITE 00528 M00S00410.1xy +++| FJM CCR2,CH IF DATA NOT ACCEPTED
| Line S00411 Modification History | |
|---|---|
M01 (Removed by) | 1xy2 |
Seq # *Modification Id* Act ----------------------------+ 00529 M01S00411.1xy2 ---| DCN CH+40
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 1xy2 |
Seq # *Modification Id* Act ----------------------------+ 00530 M01S00002.1xy2 +++| CCR2.1 DCN CH+40 00531 M00S00412.1xy +++| LJM CCRX RETURN 00532 M00S00413.1xy +++|
| Line S00414 Modification History | |
|---|---|
M01 (Removed by) | 1xy2 |
Seq # *Modification Id* Act ----------------------------+ 00533 M01S00414.1xy2 ---| CCR3 DCN CH+40
| Line S00415 Modification History | |
|---|---|
M01 (Removed by) | 1xy2 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 00534 M02S00415.271l716 ---| LDD IR+4 SET CHANNEL IN MESSAGE 00535 M02S00416.271l716 ---| RJM C2D 00536 M02S00417.271l716 ---| STM MSGA+7
| Line S00418 Modification History | |
|---|---|
M01 (Removed by) | 1xy2 |
Seq # *Modification Id* Act ----------------------------+ 00537 M01S00418.1xy2 ---| LDC MSGA+400000 00538 M01S00419.1xy2 ---| RJM DFM 00539 M01S00420.1xy2 ---|* LDN 0 00540 M01S00421.1xy2 ---| RJM RCS DOWN THE CHANNEL 00541 M01S00422.1xy2 ---| LJM CCR4 DROP THE DRIVER
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 1xy2 |
Seq # *Modification Id* Act ----------------------------+ 00542 M01S00003.1xy2 +++|* PREVENT ANY I/O FROM BEING PERFORMED ON THIS CHANNEL. THE 00543 M01S00004.1xy2 +++|* UNIT QUEUES MUST CONTINUE TO BE SERVICED BY THIS DRIVER TO 00544 M01S00005.1xy2 +++|* ENSURE THAT CHANNEL SPECIFIC REQUESTS ARE PROCESSED. 00545 M01S00006.1xy2 +++|* ALTHOUGH THIS DRIVER WILL BE FREE TO SELECT I/O REQUESTS, ANY 00546 M01S00007.1xy2 +++|* ATTEMPT TO ISSUE A CHANNEL FUNCTION WILL RESULT IN A *CHANNEL 00547 M01S00008.1xy2 +++|* FAILURE* ERROR. THE ERROR PROCESSOR WILL SET THE SUSPECT 00548 M01S00009.1xy2 +++|* FLAG, CAUSING *1MV* TO PERFORM A HARDWARE VERIFICATION. THE 00549 M01S00010.1xy2 +++|* EXPECTED RESULT OF THIS VERIFICATION IS THAT *1MV* WILL DOWN 00550 M01S00011.1xy2 +++|* THE CHANNEL ON THE DEVICE. 00551 M01S00012.1xy2 +++| 00552 M01S00013.1xy2 +++| CCR3 LDC UJNI+FNC5.1-FNCC 00553 M01S00014.1xy2 +++| ERRNG FNC5.1-FNCC CODE DEPENDS ON VALUE 00554 M01S00015.1xy2 +++| ERRPL FNC5.1-FNCC-40 CODE DEPENDS ON VALUE 00555 M01S00016.1xy2 +++| STM FNCC 00556 M01S00017.1xy2 +++| LDC UJNI+FNN5.1-FNNA 00557 M01S00018.1xy2 +++| ERRNG FNN5.1-FNNA CODE DEPENDS ON VALUE 00558 M01S00019.1xy2 +++| ERRPL FNN5.1-FNNA-40 CODE DEPENDS ON VALUE 00559 M01S00020.1xy2 +++| STM FNNA 00560 M01S00021.1xy2 +++| UJN CCR2.1 RETURN 00561 M00S00423.1xy +++| CCS SPACE 4,15 00562 M00S00424.1xy +++|** CCS - CHECK FOR CONSECUTIVE SECTOR REQUEST. 00563 M00S00425.1xy +++|* 00564 M00S00426.1xy +++|* THIS ROUTINE CHECKS THE NEXT BUFFER IN THE I/O QUEUE TO 00565 M00S00427.1xy +++|* DETERMINE IF IT IS CONSECUTIVE WITH THE REQUEST CURRENTLY 00566 M00S00428.1xy +++|* BEING PROCESSED. 00567 M00S00429.1xy +++|* 00568 M00S00430.1xy +++|* ENTRY (CB) = CURRENT BUFFER ORDINAL. 00569 M00S00431.1xy +++|* (NB) = NEXT BUFFER ORDINAL IF CONSECUTIVE REQUEST 00570 M00S00432.1xy +++|* ALREADY FOUND. 00571 M00S00433.1xy +++|* (RW) = READ/WRITE FLAG. 00572 M00S00434.1xy +++|* (TB) = TOTAL BUFFER COUNT. 00573 M00S00435.1xy +++|* 00574 M00S00436.1xy +++|* EXIT (NB) = NEXT BUFFER ORDINAL. 00575 M00S00437.1xy +++|* = 0 IF CONSECUTIVE TRANSFER NOT POSSIBLE. 00576 M00S00438.1xy +++|* (TB) = TOTAL BUFFER COUNT. 00577 M00S00439.1xy +++|* 00578 M00S00440.1xy +++|* USES NB, TB, CM - CM+4, CN - CN+4, TO - TO+4. 00579 M00S00441.1xy +++|* 00580 M00S00442.1xy +++|* MACROS CCBA. 00581 M00S00443.1xy +++| 00582 M00S00444.1xy +++| 00583 M00S00445.1xy +++| CCS3 LDN 0 INDICATE NO CONSECUTIVE REQUEST 00584 M00S00446.1xy +++| STD NB 00585 M00S00447.1xy +++| 00586 M00S00448.1xy +++| CCS SUBR ENTRY/EXIT 00587 M00S00449.1xy +++| LDD NB 00588 M00S00450.1xy +++| NJN CCSX IF NEXT REQUEST ALREADY FOUND 00589 M00S00451.1xy +++| CCBA PAD4 READ CURRENT *CBT* ENTRY 00590 M00S00452.1xy +++| CRD CM 00591 M00S00453.1xy +++| ADK IOLK-PAD4 00592 M00S00454.1xy +++| CRD CN 00593 M00S00455.1xy +++| LDD CN+2 NEXT BUFFER ORDINAL 00594 M00S00456.1xy +++| ZJN CCSX IF THIS BUFFER IS LAST IN QUEUE 00595 M00S00457.1xy +++| STD NB STORE NEW CURRENT BUFFER ORDINAL 00596 M00S00458.1xy +++| CCBA PAD1,A GET DISK ADDRESS FOR THIS BUFFER 00597 M00S00459.1xy +++| CRD CN 00598 M00S00460.1xy +++| ADK IOLK-PAD1 GET WRITE FLAG 00599 M00S00461.1xy +++| CRD T0 00600 M00S00462.1xy +++| LDD T0 00601 M00S00463.1xy +++| SHN 0-11 00602 M00S00464.1xy +++| LPN 1 00603 M00S00465.1xy +++| LMD RW 00604 M00S00466.1xy +++| NJN CCS3 IF TRANSFER NOT IN SAME DIRECTION 00605 M00S00467.1xy +++| LDD CM+1 00606 M00S00468.1xy +++| LMD CN+1 00607 M00S00469.1xy +++| CCS1 NJN CCS3 IF NO CYLINDER MATCH 00608 M00S00470.1xy +++| LDD CM+2 00609 M00S00471.1xy +++| ADN 1 00610 M00S00472.1xy +++| LMD CN+2 00611 M00S00473.1xy +++| ZJN CCS2 IF CONSECUTIVE SECTOR NOT ON SAME TRACK 00612 M00S00474.1xy +++| LDD CM+2 00613 M00S00475.1xy +++| ADD HN 00614 M00S00476.1xy +++| SCN 77 00615 M00S00477.1xy +++| LMD CN+2 00616 M00S00478.1xy +++| NJN CCS1 IF NOT FIRST SECTOR OF CONSECUTIVE TRACK 00617 M00S00479.1xy +++| LDD CM+2 00618 M00S00480.1xy +++| LPN 77 00619 M00S00481.1xy +++| LMN PSPT-1 00620 M00S00482.1xy +++| NJN CCS1 IF CONSECUTIVE REQUEST 00621 M00S00483.1xy +++| CCS2 AOD TB INCREMENT TOTAL BUFFER COUNT 00622 M00S00484.1xy +++| LJM CCSX RETURN 00623 M00S00485.1xy +++| CDS SPACE 4,20 00624 M00S00486.1xy +++|** CDS - CRACK DETAILED STATUS. 00625 M00S00487.1xy +++|* 00626 M00S00488.1xy +++|* THIS ROUTINE DETERMINES WHAT ERROR CODE TO SET BY EXAMINING 00627 M00S00489.1xy +++|* DETAILED STATUS. 00628 M00S00490.1xy +++|* 00629 M00S00491.1xy +++|* ENTRY (GS) = GENERAL STATUS. 00630 M00S00492.1xy +++|* (RW) = READ/WRITE FLAG. 00631 M00S00493.1xy +++|* 00632 M00S00494.1xy +++|* USES EC, RS, T1. 00633 M00S00495.1xy +++|* 00634 M00S00496.1xy +++|* CALLS FNC, GDS, GGS. 00635 M00S00497.1xy +++| 00636 M00S00498.1xy +++| 00637 M00S00499.1xy +++| CDS SUBR ENTRY/EXIT 00638 M00S00500.1xy +++| RJM GDS GET DETAILED STATUS 00639 M00S00501.1xy +++| MJN CDSX IF ERROR 00640 M00S00502.1xy +++| LDD GS 00641 M00S00503.1xy +++| SHN 21-10 00642 M00S00504.1xy +++| PJN CDS1 IF ERROR NOT RECOVERABLE BY SUBSYSTEM 00643 M00S00505.1xy +++| LDM CDSA,RW PREPARE FOR *CONTINUE* SEQUENCE 00644 M00S00506.1xy +++| STD T1 00645 M00S00507.1xy +++| LDC LDNI+FCCO 00646 M00S00508.1xy +++| STI T1 00647 M00S00509.1xy +++| LCN 1 INDICATE CONTROLLER RECOVERY IN PROGRESS 00648 M00S00510.1xy +++| STD RS 00649 M00S00511.1xy +++| UJN CDS1.1 SET STATUS ERROR CODE 00650 M00S00512.1xy +++| 00651 M00S00513.1xy +++| CDS1 SHN 10-13+22 00652 M00S00514.1xy +++| MJN CDS2 IF ABNORMAL TERMINATION 00653 M00S00515.1xy +++| LDD EC 00654 M00S00516.1xy +++| NJN CDSX IF ERROR CODE ALREADY SET 00655 M00S00517.1xy +++| CDS1.1 UJN CDS4 SET STATUS ERROR CODE 00656 M00S00518.1xy +++| 00657 M00S00519.1xy +++|* CHECK FOR *NOT READY* CONDITION. 00658 M00S00520.1xy +++| 00659 M00S00521.1xy +++| CDS2 SHN 13-4 00660 M00S00522.1xy +++| PJN CDS3 IF NOT *NOT READY*
| Line S00523 Modification History | |
|---|---|
M01 (Removed by) | ns2508 |
Seq # *Modification Id* Act ----------------------------+ 00661 M01S00523.ns2508 ---| LDM DST+SB7 00662 M01S00524.ns2508 ---| LPN 17 00663 M01S00525.ns2508 ---| LMN DCF 00664 M01S00526.ns2508 ---| NJN CDS3 IF NOT *NOT READY* 00665 M01S00527.ns2508 ---| LDM DST+SB7+1 00666 M01S00528.ns2508 ---| SHN 0-10 00667 M01S00529.ns2508 ---| LMN DNRM
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2508 |
Seq # *Modification Id* Act ----------------------------+ 00668 M01S00002.ns2508 +++| LDM DST+SB0 00669 M01S00003.ns2508 +++| SHN 0-12 00670 M01S00004.ns2508 +++| LPN 1 00671 M01S00005.ns2508 +++| LMN 1 00672 M00S00530.1xy +++| ZJN CDS5 IF DRIVE NOT READY
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2537 |
Seq # *Modification Id* Act ----------------------------+ 00673 M01S00003.ns2537 +++| 00674 M01S00004.ns2537 +++|* CHECK FOR STATISTICAL MESSAGE. THIS IS NOT A TRUE ERROR 00675 M01S00005.ns2537 +++|* CONDITION. 00676 M01S00006.ns2537 +++| 00677 M01S00007.ns2537 +++| LDM DST+SB7 00678 M01S00008.ns2537 +++| LPN 17 00679 M01S00009.ns2537 +++| LMN FM6 00680 M01S00010.ns2537 +++| ZJN CDS5.1 IF FORMAT 6 MESSAGE 00681 M00S00531.1xy +++| 00682 M00S00532.1xy +++|* CHECK FOR MEDIA ERROR. 00683 M00S00533.1xy +++| 00684 M00S00534.1xy +++| CDS3 LDM DST 00685 M00S00535.1xy +++| LPC 210 00686 M00S00536.1xy +++| LMC 210 00687 M00S00537.1xy +++| ZJN CDS6 IF MEDIA ERROR 00688 M00S00538.1xy +++| LDM DST+21 00689 M00S00539.1xy +++| SHN 21-6 00690 M00S00540.1xy +++| MJN CDS8 IF CHANNEL PARITY ERROR ON OUTPUT 00691 M00S00541.1xy +++| SHN 6-2 00692 M00S00542.1xy +++| MJN CDS9 IF DATA TRANSFER ERROR 00693 M00S00543.1xy +++| SHN 2-21+22 00694 M00S00544.1xy +++| LPN 50 00695 M00S00545.1xy +++| NJN CDS10 IF ADAPTOR MEMORY PARITY ERROR 00696 M00S00546.1xy +++| CDS4 LDK DSTE&NRDE
| Line S00547 Modification History | |
|---|---|
M01 (Removed by) | ns2537 |
Seq # *Modification Id* Act ----------------------------+ 00697 M01S00547.ns2537 ---| CDS5 LMK NRDE&PARE
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | ns2537 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00698 M02S00011.253l688 ---| CDS5 LMK NRDE&RDFE 00699 M02S00012.253l688 ---| CDS5.1 LMK RDFE&PARE
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 00700 M01S00001.253l688 +++| CDS5 LMK NRDE&STAE 00701 M01S00002.253l688 +++| CDS5.1 LMK STAE&PARE 00702 M00S00548.1xy +++| CDS6 LMK PARE 00703 M00S00549.1xy +++| CDS7 STD EC 00704 M00S00550.1xy +++| LJM CDSX RETURN 00705 M00S00551.1xy +++| 00706 M00S00552.1xy +++| CDS8 LDN CHPE SET *CHANNEL PARITY* ERROR CODE 00707 M00S00553.1xy +++| UJN CDS7 SET ERROR CODE 00708 M00S00554.1xy +++| 00709 M00S00555.1xy +++| CDS9 LDN IDTE SET *DATA TRANSFER* ERROR CODE 00710 M00S00556.1xy +++| UJN CDS7 SET ERROR CODE 00711 M00S00557.1xy +++| 00712 M00S00558.1xy +++| CDS10 LDN RAME SET *CONTROLLER MEMORY* ERROR CODE 00713 M00S00559.1xy +++| UJN CDS7 SET ERROR CODE 00714 M00S00560.1xy +++| 00715 M00S00561.1xy +++| 00716 M00S00562.1xy +++| CDSA BSS 0 00717 M00S00563.1xy +++| CON RIOA 00718 M00S00564.1xy +++| CON WIOA
| Line S00565 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00719 M01S00565.ns2769 ---| CMD SPACE 4,15 00720 M01S00566.ns2769 ---|** CMD - CALL *1MD*. 00721 M01S00567.ns2769 ---|* 00722 M01S00568.ns2769 ---|* ENTRY (CN - CN+4) = *EMB* HEADER WORD. 00723 M01S00569.ns2769 ---|* 00724 M01S00570.ns2769 ---|* EXIT (A) .EQ. 0 IF UNABLE TO CALL *1MD*. 00725 M01S00571.ns2769 ---|* .NE. 0 IF *1MD* HAS BEEN CALLED. 00726 M01S00572.ns2769 ---|* *1MD* CALLED FLAG IS SET IN CELL *SR+4* IF *1MD* WAS 00727 M01S00573.ns2769 ---|* CALLED. 00728 M01S00574.ns2769 ---|* 00729 M01S00575.ns2769 ---|* USES SR+4, S2, CM - CM+4. 00730 M01S00576.ns2769 ---|* 00731 M01S00577.ns2769 ---|* CALLS 1MD. 00732 M01S00578.ns2769 ---|* 00733 M01S00579.ns2769 ---|* MACROS EXECUTE, MONITOR. 00734 M01S00580.ns2769 ---| 00735 M01S00581.ns2769 ---| 00736 M01S00582.ns2769 ---| CMD2 LDN 2 SET *1MD* CALLED FLAG 00737 M01S00583.ns2769 ---| RAD SR+4 00738 M01S00584.ns2769 ---| 00739 M01S00585.ns2769 ---| CMD SUBR ENTRY/EXIT 00740 M01S00586.ns2769 ---| LDD SR+4 00741 M01S00587.ns2769 ---| LPN 2 00742 M01S00588.ns2769 ---| NJN CMDX IF *1MD* ALREADY CALLED 00743 M01S00589.ns2769 ---| STD S2 CLEAR *RPPM* RETRY COUNT 00744 M01S00590.ns2769 ---| LDD MA 00745 M01S00591.ns2769 ---| CWM CMDA,ON 00746 M01S00592.ns2769 ---| CMD1 LDK ZERL 00747 M01S00593.ns2769 ---| CRD CM 00748 M01S00594.ns2769 ---| EXECUTE 1MD,= 00749 M01S00595.ns2769 ---| MONITOR RPPM 00750 M01S00596.ns2769 ---| LDD CM+1 00751 M01S00597.ns2769 ---| NJN CMD2 IF PP ASSIGNED 00752 M01S00598.ns2769 ---| AOD S2 INCREMENT *RPPM* RETRY COUNT 00753 M01S00599.ns2769 ---| LMN MFRL 00754 M01S00600.ns2769 ---| ZJN CMDX IF RETRY LIMIT 00755 M01S00601.ns2769 ---| UJN CMD1 RETRY *RPPM* 00756 M01S00602.ns2769 ---| 00757 M01S00603.ns2769 ---| 00758 M01S00604.ns2769 ---| CMDA VFD 18/3L1MD,42/1 00759 M00S00605.1xy +++| CRL SPACE 4,15 00760 M00S00606.1xy +++|** CRL - CHECK FOR ERROR RETRY LIMIT REACHED. 00761 M00S00607.1xy +++|* 00762 M00S00608.1xy +++|* ENTRY (EC) = ERROR CODE. 00763 M00S00609.1xy +++|* (ER) = *RECOVERY IN PROGRESS* FLAG. 00764 M00S00610.1xy +++|* (RC) = RETRY COUNT.
| Line S00079 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00765 M01S00079.ns2769 +++|* (T5) = EST ORDINAL. 00766 M00S00611.1xy +++|* 00767 M00S00612.1xy +++|* EXIT (A) .GE. 0 IF RETRY LIMIT REACHED. 00768 M00S00613.1xy +++|* .LT. 0 IF NOT AT RETRY LIMIT.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2732a |
M02 (Removed by) | ns2732b |
Seq # *Modification Id* Act ----------------------------+ 00769 M02S00001.ns2732b ---|* (RC) INCREMENTED IF NOT AT LIMIT.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2732b |
Seq # *Modification Id* Act ----------------------------+ 00770 M01S00001.ns2732b +++|* (RC) INCREMENTED.
| Line S00080 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00771 M01S00080.ns2769 +++|* MESSAGE ISSUED TO *MS2W* OF SYSTEM CONTROL POINT FOR 00772 M01S00081.ns2769 +++|* B-DISPLAY PRESENTATION IF HALF WAY TO RETRY LIMIT.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 00773 M01S00002.ns2732a +++|* 00774 M01S00003.ns2732a +++|* USES RC.
| Line S00614 Modification History | |
|---|---|
M01 (Removed by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 00775 M01S00614.ns2732 ---|* (RC) = (RC) + 1. 00776 M01S00615.ns2732 ---|* 00777 M01S00616.ns2732 ---|* USES RC. 00778 M00S00617.1xy +++| 00779 M00S00618.1xy +++| 00780 M00S00619.1xy +++| CRL SUBR ENTRY/EXIT 00781 M00S00620.1xy +++| LDD ER 00782 M00S00621.1xy +++| LMC SHNI+1 00783 M00S00622.1xy +++| STM CRLA
| Line S00623 Modification History | |
|---|---|
M01 (Removed by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 00784 M01S00623.ns2732 ---| AOD RC INCREMENT RETRY COUNT
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
M02 (Removed by) | ns2732b |
Seq # *Modification Id* Act ----------------------------+ 00785 M02S00001.ns2732b ---| LDD RC RETRY COUNT
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2732b |
Seq # *Modification Id* Act ----------------------------+ 00786 M01S00002.ns2732b +++| AOD RC INCREMENT RETRY COUNT
| Line S00082 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00787 M01S00082.ns2769 +++| LDM TREC,EC 00788 M01S00083.ns2769 +++| SHN -1 00789 M01S00084.ns2769 +++| SBD RC 00790 M01S00085.ns2769 +++| PJN CRL1 IF TOO EARLY TO NOTIFY OPERATOR 00791 M01S00086.ns2769 +++| LDD T5 STORE EST ORDINAL IN MESSAGE 00792 M01S00087.ns2769 +++| SHN -3 00793 M01S00088.ns2769 +++| RJM C2D 00794 M01S00089.ns2769 +++| STM CRLB+1 00795 M01S00090.ns2769 +++| LDD T5 00796 M01S00091.ns2769 +++| LPN 7 00797 M01S00092.ns2769 +++| SHN 6 00798 M01S00093.ns2769 +++| ADC 2R0 00799 M01S00094.ns2769 +++| STM CRLB+2 00800 M01S00095.ns2769 +++| LDM TMNE,EC STORE ERROR MNEMONIC IN MESSAGE 00801 M01S00096.ns2769 +++| STM CRLB+3 00802 M01S00097.ns2769 +++| LDD CP 00803 M01S00098.ns2769 +++| ADK MS2W 00804 M01S00099.ns2769 +++| CWM CRLB,TR 00805 M01S00100.ns2769 +++| CRL1 LDD RC 00806 M00S00624.1xy +++| 00807 M00S00625.1xy +++|* IF *RECOVERY IN PROGRESS* IS NOT SET, THE RETRY COUNT IS 00808 M00S00626.1xy +++|* SHIFTED SO THAT THE LIMIT CHECK IS MADE AGAINST N/2 (WHERE N 00809 M00S00627.1xy +++|* IS THE RETRY LIMIT FOR THE ERROR TYPE IN CELL *EC*). THIS 00810 M00S00628.1xy +++|* CAUSES HALF OF THE RETRY ATTEMPTS TO BE PERFORMED ON EACH 00811 M00S00629.1xy +++|* CHANNEL, IF AN ALTERNATE ACCESS IS AVAILABLE. IF NO 00812 M00S00630.1xy +++|* ALTERNATE ACCESS IS AVAILABLE, ALL RETRIES WILL BE PERFORMED 00813 M00S00631.1xy +++|* ON THIS CHANNEL. 00814 M00S00632.1xy +++| 00815 M00S00633.1xy +++| SHN 0 00816 M00S00634.1xy +++|* SHN 1 (RECOVERY NOT IN PROGRESS) 00817 M00S00635.1xy +++| CRLA EQU *-1 00818 M00S00636.1xy +++| SBM TREC,EC
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
M02 (Removed by) | ns2732b |
Seq # *Modification Id* Act ----------------------------+ 00819 M02S00002.ns2732b ---| SBN 1
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2732a |
M02 (Removed by) | ns2732b |
Seq # *Modification Id* Act ----------------------------+ 00820 M02S00004.ns2732b ---| PJN CRLX IF RETRY LIMIT REACHED 00821 M02S00005.ns2732b ---| AOD RC INCREMENT RETRY COUNT
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2732b |
Seq # *Modification Id* Act ----------------------------+ 00822 M01S00003.ns2732b +++| SBN 2
| Line S00637 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00823 M01S00637.ns2769 ---| UJN CRLX RETURN
| Line S00101 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00824 M01S00101.ns2769 +++| UJP CRLX RETURN 00825 M01S00102.ns2769 +++| 00826 M01S00103.ns2769 +++| 00827 M01S00104.ns2769 +++| CRLB DATA C*EQ000 XX ERROR RETRY UNDERWAY.* 00828 M00S00638.1xy +++| CRQ SPACE 4,20 00829 M00S00639.1xy +++|** CRQ - CHECK REQUEST QUEUE. 00830 M00S00640.1xy +++|* 00831 M00S00641.1xy +++|* THIS ROUTINE ATTEMPTS TO CALL *CPUMTR* TO COMPLETE REQUESTS 00832 M00S00642.1xy +++|* IN THE UNIT QUEUE THAT HAVE ALREADY BEEN PROCESSED. 00833 M00S00643.1xy +++|* 00834 M00S00644.1xy +++|* ENTRY (CC) = COMPLETION REQUEST COUNT. 00835 M00S00645.1xy +++|* (PO) = *PUT* ORDINAL. 00836 M00S00646.1xy +++|* 00837 M00S00647.1xy +++|* EXIT (A) .EQ. 0 IF NO REQUESTS PRESENT. 00838 M00S00648.1xy +++|* .NE. 0 IF *CPUMTR* IS STILL BUSY WITH PREVIOUS 00839 M00S00649.1xy +++|* FUNCTION OR AN EXCHANGE WAS JUST ISSUED 00840 M00S00650.1xy +++|* FOR THE CURRENT FUNCTION. 00841 M00S00651.1xy +++|* 00842 M00S00652.1xy +++|* USES CC, CN - CN+4, T0 - T4. 00843 M00S00653.1xy +++| 00844 M00S00654.1xy +++| 00845 M00S00655.1xy +++| CRQ SUBR ENTRY/EXIT 00846 M00S00656.1xy +++| LDC ** READ XP 00847 M00S00657.1xy +++| CRQA EQU *-1 FWA OF XP 00848 M00S00658.1xy +++| CRD T0 00849 M00S00659.1xy +++| LDD OA READ OUTPUT REGISTER 00850 M00S00660.1xy +++| CRD CN 00851 M00S00661.1xy +++| LDD T0+4 (B0) 00852 M00S00662.1xy +++| NJN CRQ1 IF MISSED EXCHANGE 00853 M00S00663.1xy +++| STD CN+3 00854 M00S00664.1xy +++| LDD CN 00855 M00S00665.1xy +++| SHN 21-13 00856 M00S00666.1xy +++| MJN CRQ1 IF REISSUE REQUIRED 00857 M00S00667.1xy +++| NJN CRQX IF FUNCTION NOW BEING PROCESSED 00858 M00S00668.1xy +++| LDD CC 00859 M00S00669.1xy +++| ZJN CRQX IF NO PENDING COMPLETION REQUESTS 00860 M00S00670.1xy +++| LDC ** 00861 M00S00671.1xy +++| CRQE EQU *-1 00862 M00S00672.1xy +++| CRD T0 00863 M00S00673.1xy +++| LDD T0 00864 M00S00674.1xy +++| ADD T0+1 00865 M00S00675.1xy +++| NJN CRQX IF FUNCTION IN PROGRESS 00866 M00S00676.1xy +++| LDN DCBS SET *BIOM* SUBFUNCTION 00867 M00S00677.1xy +++| STD CN+1 00868 M00S00678.1xy +++| LDD PO 00869 M00S00679.1xy +++| STD CN+2 00870 M00S00680.1xy +++| CRQ1 LDD CC 00871 M00S00681.1xy +++| RAD CN+3 00872 M00S00682.1xy +++| LDN 0 00873 M00S00683.1xy +++| STD CC 00874 M00S00684.1xy +++| LDK BIOM 00875 M00S00685.1xy +++| STD CN 00876 M00S00686.1xy +++| LDD OA 00877 M00S00687.1xy +++| CWD CN 00878 M00S00688.1xy +++| LDC ** 00879 M00S00689.1xy +++| CRQB EQU *-1 ADDRESS OF EXCHANGE PACKAGE 00880 M00S00690.1xy +++| CWM CRQD,ON WRITE FIRST WORD 00881 M00S00691.1xy +++| SBN 1 SET EXCHANGE ADDRESS 00882 M00S00692.1xy +++| MXN 0 EXCHANGE CPU 00883 M00S00693.1xy +++| CRQC EQU *-1 CPU NUMBER 00884 M00S00694.1xy +++| UJP CRQX RETURN 00885 M00S00695.1xy +++| 00886 M00S00696.1xy +++| 00887 M00S00697.1xy +++| CRQD VFD 24/0 (P) 00888 M00S00698.1xy +++| VFD 18/0 (A0) 00889 M00S00699.1xy +++| VFD 18/0 (B0)
| Line S00700 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00890 M01S00700.ns2769 ---| C4D SPACE 4,15 00891 M01S00701.ns2769 ---|** C4D - CONVERT ONE PP WORD TO FOUR DISPLAY CODE CHARACTERS. 00892 M01S00702.ns2769 ---|* 00893 M01S00703.ns2769 ---|* ENTRY (A) = PP WORD TO CONVERT. 00894 M01S00704.ns2769 ---|* (T1) = ADDRESS OF FIRST OF TWO CONSECUTIVE PP WORDS IN 00895 M01S00705.ns2769 ---|* WHICH TO STORE THE DISPLAY CODE CHARACTERS. 00896 M01S00706.ns2769 ---|* 00897 M01S00707.ns2769 ---|* EXIT (A) = ADDRESS OF NEXT DISPLAY BUFFER WORD. 00898 M01S00708.ns2769 ---|* (T1) = (T1) + 2. 00899 M01S00709.ns2769 ---|* 00900 M01S00710.ns2769 ---|* USES CM, T1. 00901 M01S00711.ns2769 ---|* 00902 M01S00712.ns2769 ---|* CALLS C2D. 00903 M01S00713.ns2769 ---| 00904 M01S00714.ns2769 ---| 00905 M01S00715.ns2769 ---| C4D SUBR ENTRY/EXIT 00906 M01S00716.ns2769 ---| STD CM SAVE BINARY WORD 00907 M01S00717.ns2769 ---| SHN -6 CONVERT UPPER 6 BITS 00908 M01S00718.ns2769 ---| RJM C2D 00909 M01S00719.ns2769 ---| STI T1 STORE RESULT IN DISPLAY BUFFER 00910 M01S00720.ns2769 ---| AOD T1 ADVANCE TO NEXT DISPLAY BUFFER WORD 00911 M01S00721.ns2769 ---| LDD CM CONVERT LOWER 6 BITS 00912 M01S00722.ns2769 ---| LPN 77 00913 M01S00723.ns2769 ---| RJM C2D 00914 M01S00724.ns2769 ---| STI T1 STORE RESULT IN DISPLAY BUFFER 00915 M01S00725.ns2769 ---| AOD T1 ADVANCE TO NEXT DISPLAY BUFFER WORD 00916 M01S00726.ns2769 ---| UJN C4DX RETURN 00917 M00S00727.1xy +++| DCH SPACE 4,15 00918 M00S00728.1xy +++|** DCH - RELEASE CHANNEL. 00919 M00S00729.1xy +++|* 00920 M00S00730.1xy +++|* THIS ROUTINE RELEASES THE CHANNEL IF IT IS CURRENTLY 00921 M00S00731.1xy +++|* RESERVED. 00922 M00S00732.1xy +++|* 00923 M00S00733.1xy +++|* ENTRY (CS) = CHANNEL RESERVATION STATUS. 00924 M00S00734.1xy +++|* (IR+4) = CHANNEL NUMBER. 00925 M00S00735.1xy +++|* 00926 M00S00736.1xy +++|* EXIT (A) = (CS) = 0. 00927 M00S00737.1xy +++|* 00928 M00S00738.1xy +++|* USES CM+1, CS. 00929 M00S00739.1xy +++|* 00930 M00S00740.1xy +++|* MACROS MONITOR. 00931 M00S00741.1xy +++| 00932 M00S00742.1xy +++| 00933 M00S00743.1xy +++| DCH SUBR ENTRY/EXIT 00934 M00S00744.1xy +++| LDD CS 00935 M00S00745.1xy +++| LPN 1 00936 M00S00746.1xy +++| ZJN DCHX IF CHANNEL NOT RESERVED 00937 M00S00747.1xy +++| LDD IR+4 RELEASE CHANNEL 00938 M00S00748.1xy +++| STD CM+1 00939 M00S00749.1xy +++| MONITOR DCHM 00940 M00S00750.1xy +++| SOD CS CLEAR CHANNEL RESERVATION FLAG 00941 M00S00751.1xy +++| UJN DCHX RETURN 00942 M00S00752.1xy +++| ERR SPACE 4,20 00943 M00S00753.1xy +++|** ERR - PROCESS ERROR. 00944 M00S00754.1xy +++|* 00945 M00S00755.1xy +++|* THIS ROUTINE IS CALLED TO PERFORM ALL ERROR PROCESSING. 00946 M00S00756.1xy +++|* 00947 M00S00757.1xy +++|* ENTRY (EC) = 0 IF THIS IS THE FIRST RETRY OF A RECOVERY 00948 M00S00758.1xy +++|* SEQUENCE AND THE CALLER DID NOT SET THE ERROR 00949 M00S00759.1xy +++|* CODE. 00950 M00S00760.1xy +++|* = ERROR CODE IF NOT THE FIRST RETRY OF A RECOVERY 00951 M00S00761.1xy +++|* SEQUENCE AND NOT A CALLER SPECIFIED ERROR CODE. 00952 M00S00762.1xy +++|* = COMPLEMENT OF ERROR CODE IF SPECIFIED BY THE 00953 M00S00763.1xy +++|* CALLER. 00954 M00S00764.1xy +++|* (RC) = RETRY COUNT. 00955 M00S00765.1xy +++|* 00956 M00S00766.1xy +++|* EXIT (EC) = 0. 00957 M00S00767.1xy +++|* (RC) = 0.
| Line S00768 Modification History | |
|---|---|
M01 (Removed by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 00958 M01S00768.ns2732 ---|* TO *MST.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 00959 M01S00003.ns2732 +++|* TO *MST*. 00960 M00S00769.1xy +++|* 00961 M00S00770.1xy +++|* USES EC, RC, RS, T1. 00962 M00S00771.1xy +++|*
| Line S00772 Modification History | |
|---|---|
M01 (Removed by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 00963 M01S00772.ns2732 ---|* CALLS CDS, CRL, CRQ, FNN, GGS, IBD, IBM, IIC, ISF, PDT, PFR,
| Line S00773 Modification History | |
|---|---|
M01 (Removed by) | ns2507 |
M02 (Removed by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 00964 M02S00773.ns2732 ---|* PRE, RCS, SAS, SSF, TEP.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2507 |
M02 (Removed by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 00965 M02S00001.ns2732 ---|* PRE, SAS, SSF, TEP.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
M02 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00966 M02S00004.ns2769 ---|* CALLS CDS, CRL, CRQ, FNN, GGS, IBD, IBM, IIC, ISF, PDT,
| Line S00105 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 00967 M01S00105.ns2769 +++|* CALLS CDS, CRL, CRQ, FNN, GGS, IBM, IIC, ISF, PDT,
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 00968 M01S00005.ns2732 +++|* PFR, PRE, RLC, SAS, SSF, TEP. 00969 M00S00774.1xy +++| 00970 M00S00775.1xy +++| 00971 M00S00776.1xy +++| ERR SUBR ENTRY 00972 M00S00777.1xy +++| ERR1 RJM PRE PRESET ERROR PROCESSOR 00973 M00S00778.1xy +++| NJP ERR11 IF INTERLOCK/VERIFICATION FAILURE 00974 M00S00779.1xy +++| LDC FCCD CLEAR DMA MODE 00975 M00S00780.1xy +++| RJM FNN 00976 M00S00781.1xy +++| MJN ERR1.1 IF ERROR ENCOUNTERED
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 00977 M01S00006.ns2732 +++| DCN CH+40 00978 M00S00782.1xy +++| RJM GGS GET GENERAL STATUS 00979 M00S00783.1xy +++| MJN ERR1.1 IF GENERAL STATUS UNAVAILABLE 00980 M00S00784.1xy +++| RJM SAS SAVE ADAPTER STATUS 00981 M00S00785.1xy +++| MJN ERR1.1 IF ERROR ENCOUNTERED 00982 M00S00786.1xy +++| RJM CDS CHECK DETAILED STATUS 00983 M00S00787.1xy +++| ERR1.1 LDD RC
| Line S00788 Modification History | |
|---|---|
M01 (Removed by) | ns2560 |
Seq # *Modification Id* Act ----------------------------+ 00984 M01S00788.ns2560 ---| NJN ERR2 IF NOT FIRST RETRY 00985 M01S00789.ns2560 ---| LDD GS STORE INITIAL GENERAL STATUS
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2560 |
Seq # *Modification Id* Act ----------------------------+ 00986 M01S00001.ns2560 +++| ZJN ERR1.2 IF FIRST RETRY 00987 M01S00002.ns2560 +++| LDD ER 00988 M01S00003.ns2560 +++| ZJN ERR2 IF NOT RECOVERY IN PROGRESS 00989 M01S00004.ns2560 +++| AOM ERRA 00990 M01S00005.ns2560 +++| LMN 2 00991 M01S00006.ns2560 +++| NJN ERR2 IF NOT FIRST *ERR* CALL 00992 M01S00007.ns2560 +++| ERR1.2 LDD GS 00993 M00S00790.1xy +++| STM BMLGS
| Line S00791 Modification History | |
|---|---|
M01 (Removed by) | ns2749 |
Seq # *Modification Id* Act ----------------------------+ 00994 M01S00791.ns2749 ---| ERR2 LDD EC
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2749 |
Seq # *Modification Id* Act ----------------------------+ 00995 M01S00001.ns2749 +++| ERR2 LCN 0 00996 M01S00002.ns2749 +++| LMD EC 00997 M01S00003.ns2749 +++| STD EC 00998 M00S00792.1xy +++| SHN 21-13
| Line S00793 Modification History | |
|---|---|
M01 (Removed by) | ns2749 |
Seq # *Modification Id* Act ----------------------------+ 00999 M01S00793.ns2749 ---| PJN ERR4 IF NOT COMPLEMENTED ERROR CODE
| Line S00794 Modification History | |
|---|---|
M01 (Removed by) | ns2507 |
M02 (Removed by) | ns2749 |
Seq # *Modification Id* Act ----------------------------+ 01000 M02S00794.ns2749 ---| ERR3 LCN 0
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2507 |
M02 (Removed by) | ns2749 |
Seq # *Modification Id* Act ----------------------------+ 01001 M02S00002.ns2749 ---| LCN 0
| Line S00795 Modification History | |
|---|---|
M01 (Removed by) | ns2749 |
Seq # *Modification Id* Act ----------------------------+ 01002 M01S00795.ns2749 ---| LMD EC 01003 M01S00796.ns2749 ---| STD EC 01004 M01S00797.ns2749 ---| ERR4 LDD TH FORCE IMMEDIATE COMPLETION
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2749 |
Seq # *Modification Id* Act ----------------------------+ 01005 M01S00004.ns2749 +++| MJN ERR2 IF COMPLEMENTED ERROR CODE 01006 M01S00005.ns2749 +++| LDD TH FORCE IMMEDIATE COMPLETION 01007 M00S00798.1xy +++| ERRNZ SHNI-1000 CODE DEPENDS ON VALUE 01008 M00S00799.1xy +++| STM IICA 01009 M00S00800.1xy +++| RJM IIC ISSUE I/O COMPLETION REQUEST 01010 M00S00801.1xy +++| ERR4.1 RJM CRQ ENSURE COMPLETION OF PENDING REQUEST 01011 M00S00802.1xy +++| NJN ERR4.1 IF FUNCTION STILL PENDING 01012 M00S00803.1xy +++| RJM IBM ISSUE BML MESSAGE IF NECESSARY 01013 M00S00804.1xy +++| AOD RS INCREMENT RECOVERY STATUS 01014 M00S00805.1xy +++| SHN 21-13
| Line S00806 Modification History | |
|---|---|
M01 (Removed by) | ns2507 |
Seq # *Modification Id* Act ----------------------------+ 01015 M01S00806.ns2507 ---| MJP ERR10 IF CONTROLLER ERROR RECOVERY IN PROGRESS
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2507 |
Seq # *Modification Id* Act ----------------------------+ 01016 M01S00003.ns2507 +++| MJN ERR10 IF *CCC* ERROR RECOVERY IN PROGRESS
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 01017 M01S00007.ns2732 +++| 01018 M01S00008.ns2732 +++|* SET THE SUSPECT FLAG IF APPROPRIATE FOR THIS ERROR TYPE. 01019 M01S00009.ns2732 +++|
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | ns2749 |
Seq # *Modification Id* Act ----------------------------+ 01020 M01S00006.ns2749 +++| LDK STAE 01021 M01S00007.ns2749 +++| LMD EC 01022 M01S00008.ns2749 +++| ZJN ERR7 IF STATISTICAL DATA (NOT AN ERROR)
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 01023 M01S00010.ns2732 +++| RJM SSF SET SUSPECT FLAG (IF APPROPRIATE)
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
M02 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01024 M02S00011.ns2769 ---| RJM IBD ISSUE B-DISPLAY MESSAGE 01025 M00S00807.1xy +++| RJM CRL CHECK FOR RETRY LIMIT REACHED 01026 M00S00808.1xy +++| MJN ERR7 IF RETRY LIMIT NOT REACHED
| Line S00809 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01027 M01S00809.ns2769 ---| RJM IBD ISSUE B-DISPLAY MESSAGE
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2732b |
Seq # *Modification Id* Act ----------------------------+ 01028 M01S00004.ns2732b +++| SOD RC ADJUST FINAL RETRY COUNT
| Line S00810 Modification History | |
|---|---|
M01 (Removed by) | ns2507 |
Seq # *Modification Id* Act ----------------------------+ 01029 M01S00810.ns2507 ---| 01030 M01S00811.ns2507 ---|* DOWN THE CHANNEL IF APPROPRIATE FOR THIS ERROR TYPE. 01031 M01S00812.ns2507 ---|
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2497 |
M02 (Removed by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 01032 M02S00001.ns2732a ---| SOD RC ALIGN RETRY COUNT FOR FINAL MESSAGE
| Line S00813 Modification History | |
|---|---|
M01 (Removed by) | ns2507 |
Seq # *Modification Id* Act ----------------------------+ 01033 M01S00813.ns2507 ---| LDD GS 01034 M01S00814.ns2507 ---| LMC 7777 01035 M01S00815.ns2507 ---| NJN ERR6 IF GENERAL STATUS OBTAINED 01036 M01S00816.ns2507 ---| LDM TEPF,EC 01037 M01S00817.ns2507 ---| SHN 21-6 01038 M01S00818.ns2507 ---| PJN ERR6 IF DOWNING CHANNEL INAPPROPRIATE 01039 M01S00819.ns2507 ---| LDD T5 DOWN CHANNEL ON DEVICE 01040 M01S00820.ns2507 ---| RJM RCS 01041 M00S00821.1xy +++| ERR6 AOD RS SET RECOVERY STATUS 01042 M00S00822.1xy +++| UJN ERR11 TERMINATE ERROR PROCESSING 01043 M00S00823.1xy +++|
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 01044 M01S00012.ns2732 +++|* CHECK FOR CONTROLWARE RELOAD. 01045 M01S00013.ns2732 +++| 01046 M01S00014.ns2732 +++| ERR7 RJM RHR RELEASE HARDWARE RESERVE 01047 M01S00015.ns2732 +++| RJM RLC LOAD CONTROLWARE IF NECESSARY
| Line S00824 Modification History | |
|---|---|
M01 (Removed by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 01048 M01S00824.ns2732 ---|* SET THE SUSPECT FLAG IF APPROPRIATE FOR THIS ERROR TYPE. 01049 M01S00825.ns2732 ---| 01050 M01S00826.ns2732 ---| ERR7 RJM SSF SET SUSPECT FLAG (IF APPROPRIATE) 01051 M01S00827.ns2732 ---| RJM IBD ISSUE B-DISPLAY MESSAGE 01052 M00S00828.1xy +++| 01053 M00S00829.1xy +++|* RETRY I/O SEQUENCE. 01054 M00S00830.1xy +++| 01055 M00S00831.1xy +++| ERR9 RJM ISF ISSUE SEEK FUNCTION 01056 M00S00832.1xy +++| ZJN ERR10 IF ON CYLINDER AND NO ERROR 01057 M00S00833.1xy +++| LDD GS 01058 M00S00834.1xy +++| LMN 2 01059 M00S00835.1xy +++| ZJN ERR9 IF POSITIONER BUSY
| Line S00836 Modification History | |
|---|---|
M01 (Removed by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 01060 M01S00836.ns2732 ---| LMN 10&2 01061 M01S00837.ns2732 ---| ZJN ERR6 IF DRIVE RESERVED ON OTHER ACCESS 01062 M00S00838.1xy +++| UJP ERR1 RESTART ERROR PROCESSING 01063 M00S00839.1xy +++| 01064 M00S00840.1xy +++| ERR10 RJM PFR PREPARE FOR RETRY ATTEMPT 01065 M00S00841.1xy +++| RJM PDT PERFORM READ/WRITE OPERATION 01066 M00S00842.1xy +++| 01067 M00S00843.1xy +++|* CONTROL RETURNS TO THIS POINT ONLY IF THE ERROR WAS 01068 M00S00844.1xy +++|* RECOVERED. 01069 M00S00845.1xy +++| 01070 M00S00846.1xy +++| ERR11 AOD RS SET RECOVERY STATUS
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 01071 M01S00006.ns2732a +++| SHN 6 01072 M01S00007.ns2732a +++| RAD RC ADJUST FOR CONTROLLER RECOVERY 01073 M00S00847.1xy +++| 01074 M00S00848.1xy +++|* TERMINATE ERROR PROCESSING. INSTRUCTIONS MODIFIED FOR ERROR 01075 M00S00849.1xy +++|* PROCESSING WILL BE RESTORED TO THEIR ORIGINAL VALUES, VARIOUS 01076 M00S00850.1xy +++|* DATA CELLS WILL BE RESTORED TO THEIR INITIAL STATES, ETC. 01077 M00S00851.1xy +++| 01078 M00S00852.1xy +++| RJM TEP TERMINATE ERROR PROCESSING 01079 M00S00853.1xy +++| LJM MST EXIT ERROR PROCESSOR
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | ns2560 |
Seq # *Modification Id* Act ----------------------------+ 01080 M01S00008.ns2560 +++| 01081 M01S00009.ns2560 +++| 01082 M01S00010.ns2560 +++| ERRA CON 0 RECOVERY IN PROGRESS PASS COUNTER 01083 M00S00854.1xy +++| TEPF SPACE 4,30 01084 M00S00855.1xy +++|** TEPF - TABLE OF ERROR PROCESSING FLAGS. 01085 M00S00856.1xy +++|* 01086 M00S00857.1xy +++|* THIS TABLE CONTAINS INFORMATION RELATED TO EACH ERROR TYPE. 01087 M00S00858.1xy +++|* EACH ENTRY HAS THE FOLLOWING FORMAT - 01088 M00S00859.1xy +++|* VFD 2/ERROR COUNT INCREMENT, BML MESSAGE INDICATOR 01089 M00S00860.1xy +++|* 0 DO NOT INCREMENT ERROR COUNTS AND DO 01090 M00S00861.1xy +++|* NOT ISSUE BML MESSAGE. 01091 M00S00862.1xy +++|* 1 INCREMENT ERROR COUNTS AND ISSUE BML 01092 M00S00863.1xy +++|* MESSAGE. 01093 M00S00864.1xy +++|* 2 INCREMENT ERROR COUNTS AND ISSUE BML 01094 M00S00865.1xy +++|* MESSAGE IF UNRECOVERED ERROR.
| Line S00866 Modification History | |
|---|---|
M01 (Removed by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 01095 M01S00866.ns2732 ---|* VFD 2/ERROR LOG MESSAGE INDICATOR 01096 M01S00867.ns2732 ---|* 0 DO NOT ISSUE ERROR LOG MESSAGE. 01097 M01S00868.ns2732 ---|* 1 ISSUE ERROR LOG MESSAGE WITH DETAILED 01098 M01S00869.ns2732 ---|* STATUS. 01099 M01S00870.ns2732 ---|* 2 ISSUE ERROR LOG MESSAGE WITHOUT 01100 M01S00871.ns2732 ---|* DETAILED STATUS.
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 01101 M01S00016.ns2732 +++|* VFD 2/UNUSED (ZERO) 01102 M00S00872.1xy +++|* VFD 1/SUSPECT FLAG 01103 M00S00873.1xy +++|* 0 DO NOT SET SUSPECT FLAG. 01104 M00S00874.1xy +++|* 1 SET SUSPECT FLAG.
| Line S00875 Modification History | |
|---|---|
M01 (Removed by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 01105 M01S00875.ns2732 ---|* VFD 1/DOWN CHANNEL FLAG 01106 M01S00876.ns2732 ---|* 0 DO NOT DOWN CHANNEL. 01107 M01S00877.ns2732 ---|* 1 DOWN CHANNEL. 01108 M01S00878.ns2732 ---|* VFD 1/CONTROLLER RELOAD FLAG 01109 M01S00879.ns2732 ---|* 0 DO NOT RELOAD CONTROLLER. 01110 M01S00880.ns2732 ---|* 1 RELOAD CONTROLLER. 01111 M01S00881.ns2732 ---|* VFD 5/UNUSED (ZERO)
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
Seq # *Modification Id* Act
----------------------------+
01112 M01S00017.ns2732 +++|* VFD 7/UNUSED (ZERO)
01113 M00S00882.1xy +++|
01114 M00S00883.1xy +++|
01115 M00S00884.1xy +++| LIST G
01116 M00S00885.1xy +++| TEPF EQU *-1
01117 M00S00886.1xy +++| ECHO 1,EC=("DREC")
| Line S00887 Modification History | |
|---|---|
M01 (Removed by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 01118 M01S00887.ns2732 ---| VFD 2/IEC._EC,2/IEM._EC,1/SUS._EC,1/IDC._EC,1/CWR._EC,5/0
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
Seq # *Modification Id* Act
----------------------------+
01119 M01S00018.ns2732 +++| VFD 2/IEC._EC,2/0,1/SUS._EC,7/0
01120 M00S00888.1xy +++| LIST *
01121 M00S00889.1xy +++| TMNE SPACE 4,10
01122 M00S00890.1xy +++|** TMNE - TABLE OF ERROR CODE MNEMONICS.
01123 M00S00891.1xy +++|
01124 M00S00892.1xy +++|
01125 M00S00893.1xy +++| LIST G
01126 M00S00894.1xy +++| TMNE EQU *-1
01127 M00S00895.1xy +++| ECHO 1,ERRCODE=("DREC")
01128 M00S00896.1xy +++| CON EMN._ERRCODE "TXT._ERRCODE" ERROR
01129 M00S00897.1xy +++| LIST *
01130 M00S00898.1xy +++| TREC SPACE 4,10
01131 M00S00899.1xy +++|** TREC - TABLE OF RETRY COUNTS.
01132 M00S00900.1xy +++|
01133 M00S00901.1xy +++|
01134 M00S00902.1xy +++| LIST G
01135 M00S00903.1xy +++| TREC EQU *-1
01136 M00S00904.1xy +++| ECHO 1,ERRCODE=("DREC")
01137 M00S00905.1xy +++| CON RTC._ERRCODE "TXT._ERRCODE" ERROR
01138 M00S00906.1xy +++| LIST *
01139 M00S00907.1xy +++| TSYM SPACE 4,10
01140 M00S00908.1xy +++|** TSYM - TABLE OF BML SYMPTOM CODES.
01141 M00S00909.1xy +++|
01142 M00S00910.1xy +++|
01143 M00S00911.1xy +++| LIST G
01144 M00S00912.1xy +++| TSYM EQU *-1
01145 M00S00913.1xy +++| ECHO 1,ERRCODE=("DREC")
01146 M00S00914.1xy +++| CON SYM._ERRCODE "TXT._ERRCODE" ERROR
01147 M00S00915.1xy +++| LIST *
01148 M00S00916.1xy +++| FNC SPACE 4,10
01149 M00S00917.1xy +++|** FNC - FUNCTION CHANNEL.
01150 M00S00918.1xy +++|*
01151 M00S00919.1xy +++|* ENTRY (A) = FUNCTION CODE.
01152 M00S00920.1xy +++|*
01153 M00S00921.1xy +++|* EXIT (A) .LT. 0 IF CHANNEL ACTIVE UPON ENTRY OR FUNCTION
01154 M00S00922.1xy +++|* TIMEOUT. (EC) = COMPLEMENT OF ERROR CODE.
01155 M00S00923.1xy +++|* .EQ. 0 IF NO ERROR, CHANNEL ACTIVE.
01156 M00S00924.1xy +++|*
01157 M00S00925.1xy +++|* USES EC.
01158 M00S00926.1xy +++|
01159 M00S00927.1xy +++|
01160 M00S00928.1xy +++| FNC6 ACN CH ACTIVATE CHANNEL
01161 M00S00929.1xy +++| LDN 0 SET REPLY STATUS
01162 M00S00930.1xy +++|
01163 M00S00931.1xy +++| FNC SUBR ENTRY/EXIT
01164 M00S00932.1xy +++| PJN FNC0 IF CONTROLLER FUNCTION
01165 M00S00933.1xy +++| LPC 177777
01166 M00S00934.1xy +++| STML FNCB
01167 M00S00935.1xy +++| UJN FNC0.1 CONTINUE
01168 M00S00936.1xy +++|
01169 M00S00937.1xy +++| FNC0 STM FNCA SAVE FUNCTION CODE
01170 M00S00938.1xy +++| FNC0.1 AJM FNC5,CH IF CHANNEL IS STILL ACTIVE
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | 1xy2 |
Seq # *Modification Id* Act ----------------------------+ 01171 M01S00022.1xy2 +++|* UJN FNC5.1 (CHANNEL INITIALIZATION ERROR) 01172 M01S00023.1xy2 +++| FNCC EQU *-2 01173 M00S00939.1xy +++| FAN CH FUNCTION CHANNEL 01174 M00S00940.1xy +++| 01175 M00S00941.1xy +++|* THE DRIVER MUST WAIT AT LEAST 300 MS BEFORE TIMING OUT THE 01176 M00S00942.1xy +++|* FUNCTION. 01177 M00S00943.1xy +++| 01178 M00S00944.1xy +++| FNC1 ADD ON 01179 M00S00945.1xy +++| IJM FNC6,CH IF FUNCTION ACCEPTED 01180 M00S00946.1xy +++| NJN FNC1 IF NOT TIMEOUT YET 01181 M00S00947.1xy +++| LCN FTOE 01182 M00S00948.1xy +++| FNC3 STD EC 01183 M00S00949.1xy +++| EJM FNC4,CH IF CHANNEL IS EMPTY 01184 M00S00950.1xy +++| LDN 1 SAVE LAST FUNCTION ISSUED 01185 M00S00951.1xy +++| IAM FNCA,CH 01186 M00S00952.1xy +++| FNC4 LCN 0 SET ERROR REPLY STATUS 01187 M00S00953.1xy +++| DCN CH+40 01188 M00S00954.1xy +++| UJN FNCX RETURN 01189 M00S00955.1xy +++| 01190 M00S00956.1xy +++| FNC5 LCN CHFE SET *CHANNEL FAILURE* ERROR CODE 01191 M00S00957.1xy +++| UJN FNC3 INPUT DATA/FUNCTION FROM CHANNEL
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | 1xy2 |
Seq # *Modification Id* Act ----------------------------+ 01192 M01S00024.1xy2 +++| 01193 M01S00025.1xy2 +++| FNC5.1 LCN CHFE SET *CHANNEL FAILURE* ERROR CODE 01194 M01S00026.1xy2 +++| STD EC 01195 M01S00027.1xy2 +++| UJN FNCX RETURN 01196 M00S00958.1xy +++| 01197 M00S00959.1xy +++| 01198 M00S00960.1xy +++| FNCA CON -0 CURRENT FUNCTION 01199 M00S00961.1xy +++| FNCB CON -0 CURRENT ADAPTER FUNCTION 01200 M00S00962.1xy +++| FNN SPACE 4,10 01201 M00S00963.1xy +++|** FNN - FUNCTION CHANNEL NO ACTIVATE. 01202 M00S00964.1xy +++|* 01203 M00S00965.1xy +++|* ENTRY (A) = FUNCTION CODE. 01204 M00S00966.1xy +++|* 01205 M00S00967.1xy +++|* EXIT (A) .LT. 0 IF CHANNEL ACTIVE UPON ENTRY OR FUNCTION 01206 M00S00968.1xy +++|* TIMEOUT. (EC) = COMPLEMENT OF ERROR CODE. 01207 M00S00969.1xy +++|* .GE. 0 IF NO ERROR. 01208 M00S00970.1xy +++|* 01209 M00S00971.1xy +++|* USES EC. 01210 M00S00972.1xy +++| 01211 M00S00973.1xy +++| 01212 M00S00974.1xy +++| FNN6 LDN 0 SET REPLY STATUS 01213 M00S00975.1xy +++| 01214 M00S00976.1xy +++| FNN SUBR ENTRY/EXIT 01215 M00S00977.1xy +++| PJN FNN0 IF CONTROLLER FUNCTION 01216 M00S00978.1xy +++| LPC 177777 01217 M00S00979.1xy +++| STML FNCB 01218 M00S00980.1xy +++| UJN FNN0.1 CONTINUE 01219 M00S00981.1xy +++| 01220 M00S00982.1xy +++| FNN0 STM FNCA SAVE FUNCTION CODE 01221 M00S00983.1xy +++| FNN0.1 AJM FNN5,CH IF CHANNEL IS STILL ACTIVE
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | 1xy2 |
Seq # *Modification Id* Act ----------------------------+ 01222 M01S00028.1xy2 +++|* UJN FNN5.1 (CHANNEL INITIALIZATION ERROR) 01223 M01S00029.1xy2 +++| FNNA EQU *-2 01224 M00S00984.1xy +++| FAN CH FUNCTION CHANNEL 01225 M00S00985.1xy +++| 01226 M00S00986.1xy +++|* THE DRIVER MUST WAIT AT LEAST 300 MS BEFORE TIMING OUT THE 01227 M00S00987.1xy +++|* FUNCTION. 01228 M00S00988.1xy +++| 01229 M00S00989.1xy +++| FNN1 ADD ON 01230 M00S00990.1xy +++| IJM FNN6,CH IF FUNCTION ACCEPTED 01231 M00S00991.1xy +++| NJN FNN1 IF NOT TIMEOUT YET 01232 M00S00992.1xy +++| LCN FTOE SET COMPLEMENT OF *FTOE* ERROR CODE 01233 M00S00993.1xy +++| FNN3 STD EC 01234 M00S00994.1xy +++| EJM FNN4,CH IF CHANNEL IS EMPTY 01235 M00S00995.1xy +++| LDN 1 SAVE LAST FUNCTION ISSUED 01236 M00S00996.1xy +++| IAM FNCA,CH 01237 M00S00997.1xy +++| FNN4 LCN 0 SET ERROR REPLY STATUS 01238 M00S00998.1xy +++| DCN CH+40 01239 M00S00999.1xy +++| UJN FNNX RETURN 01240 M00S01000.1xy +++| 01241 M00S01001.1xy +++| FNN5 LCN CHFE SET *CHANNEL FAILURE* ERROR CODE 01242 M00S01002.1xy +++| UJN FNN3 INPUT DATA/FUNCTION FROM CHANNEL
| Line S00030 Modification History | |
|---|---|
M01 (Added by) | 1xy2 |
Seq # *Modification Id* Act ----------------------------+ 01243 M01S00030.1xy2 +++| 01244 M01S00031.1xy2 +++| FNN5.1 LCN CHFE SET *CHANNEL FAILURE* ERROR CODE 01245 M01S00032.1xy2 +++| STD EC 01246 M01S00033.1xy2 +++| UJN FNNX RETURN 01247 M00S01003.1xy +++| GDS SPACE 4,15 01248 M00S01004.1xy +++|** GDS - GET DETAILED STATUS. 01249 M00S01005.1xy +++|* 01250 M00S01006.1xy +++|* THIS ROUTINE OBTAINS THE DETAILED STATUS FROM THE CONTROLLER. 01251 M00S01007.1xy +++|* 01252 M00S01008.1xy +++|* EXIT (A) .EQ. 0 IF STATUS OBTAINED. 01253 M00S01009.1xy +++|* .LT. 0 IF STATUS NOT OBTAINED. 01254 M00S01010.1xy +++|* (EC) = COMPLEMENT OF ERROR CODE IF STATUS NOT 01255 M00S01011.1xy +++|* OBTAINED. 01256 M00S01012.1xy +++|* 01257 M00S01013.1xy +++|* USES EC, T1. 01258 M00S01014.1xy +++|* 01259 M00S01015.1xy +++|* CALLS FNC. 01260 M00S01016.1xy +++| 01261 M00S01017.1xy +++| 01262 M00S01018.1xy +++| GDS2 LCN IDTE SET *INCOMPLETE DATA TRANSFER* ERROR CODE 01263 M00S01019.1xy +++| GDS3 STD EC 01264 M00S01020.1xy +++| GDS4 LDN MXSL-1 INVALIDATE DETAILED STATUS 01265 M00S01021.1xy +++| STD T1 01266 M00S01022.1xy +++| GDS5 LCN 0 01267 M00S01023.1xy +++| STM DST,T1 01268 M00S01024.1xy +++| SOD T1 01269 M00S01025.1xy +++| PJN GDS5 IF MORE BYTES 01270 M00S01026.1xy +++| GDS6 DCN CH+40 01271 M00S01027.1xy +++| 01272 M00S01028.1xy +++| GDS SUBR ENTRY/EXIT 01273 M00S01029.1xy +++| LDN FCDS ISSUE DETAILED STATUS FUNCTION 01274 M00S01030.1xy +++| RJM FNC 01275 M00S01031.1xy +++| MJN GDS4 IF ERROR 01276 M00S01032.1xy +++| LDN MXSL 01277 M00S01033.1xy +++| IAM DST,CH INPUT DETAILED STATUS 01278 M00S01034.1xy +++| NJN GDS2 IF INCOMPLETE DATA TRANSFER 01279 M00S01035.1xy +++| SFM GDS1,CH IF CHANNEL PARITY ERROR 01280 M00S01036.1xy +++| UJN GDS6 RETURN 01281 M00S01037.1xy +++| 01282 M00S01038.1xy +++| GDS1 LCN CHPE SET *CHANNEL PARITY* ERROR CODE 01283 M00S01039.1xy +++| UJN GDS3 SET ERROR CODE 01284 M00S01040.1xy +++| GGS SPACE 4,20 01285 M00S01041.1xy +++|** GGS - GET GENERAL STATUS. 01286 M00S01042.1xy +++|* 01287 M00S01043.1xy +++|* THIS ROUTINE OBTAINS GENERAL STATUS FROM THE CONTROLLER. 01288 M00S01044.1xy +++|* 01289 M00S01045.1xy +++|* EXIT (A) .EQ. 0 IF GENERAL STATUS OBTAINED. (GS) = STATUS. 01290 M00S01046.1xy +++|* .LT. 0 IF STATUS NOT OBTAINED. (GS) = 7777. 01291 M00S01047.1xy +++|* (EC) = COMPLEMENT OF *IDET* ERROR CODE IF INCOMPLETE 01292 M00S01048.1xy +++|* DATA TRANSFER OCCURRED. 01293 M00S01049.1xy +++|* = COMPLEMENT OF *CHPE* ERROR CODE IF CHANNEL 01294 M00S01050.1xy +++|* PARITY ERROR OCCURRED. 01295 M00S01051.1xy +++|* 01296 M00S01052.1xy +++|* USES EC, GS. 01297 M00S01053.1xy +++|* 01298 M00S01054.1xy +++|* CALLS FNC. 01299 M00S01055.1xy +++| 01300 M00S01056.1xy +++| 01301 M00S01057.1xy +++| GGS1 LCN CHPE SET *CHANNEL PARITY* ERROR CODE 01302 M00S01058.1xy +++| UJN GGS3 SET ERROR CODE 01303 M00S01059.1xy +++| 01304 M00S01060.1xy +++| GGS2 LCN IDTE SET *INCOMPLETE DATA TRANSFER* ERROR CODE 01305 M00S01061.1xy +++| GGS3 STD EC 01306 M00S01062.1xy +++| GGS4 LCN 0 INVALIDATE GENERAL STATUS 01307 M00S01063.1xy +++| STD GS 01308 M00S01064.1xy +++| GGS5 DCN CH+40 01309 M00S01065.1xy +++| 01310 M00S01066.1xy +++| GGS SUBR ENTRY/EXIT 01311 M00S01067.1xy +++| LDN FCGS ISSUE GENERAL STATUS FUNCTION 01312 M00S01068.1xy +++| RJM FNC 01313 M00S01069.1xy +++| MJN GGS4 IF FUNCTION TIMEOUT 01314 M00S01070.1xy +++| LDN 1 INPUT STATUS 01315 M00S01071.1xy +++| IAM GS,CH 01316 M00S01072.1xy +++| NJN GGS2 IF INCOMPLETE TRANSFER 01317 M00S01073.1xy +++| SFM GGS1,CH IF CHANNEL PARITY ERROR 01318 M00S01074.1xy +++| LDD GS 01319 M00S01075.1xy +++| UJN GGS5 RETURN
| Line S01076 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01320 M01S01076.ns2769 ---| IBD SPACE 4,15 01321 M01S01077.ns2769 ---|** IBD - ISSUE B-DISPLAY MESSAGE. 01322 M01S01078.ns2769 ---|* 01323 M01S01079.ns2769 ---|* THIS ROUTINE ISSUES A MESSAGE TO *MS2W* OF THE SYSTEM CONTROL 01324 M01S01080.ns2769 ---|* POINT FOR PRESENTATION ON B-DISPLAY. 01325 M01S01081.ns2769 ---|* 01326 M01S01082.ns2769 ---|* ENTRY (EC) = ERROR CODE. 01327 M01S01083.ns2769 ---|* (RC) = RETRY COUNT. 01328 M01S01084.ns2769 ---|* (T5) = EST ORDINAL. 01329 M01S01085.ns2769 ---|* 01330 M01S01086.ns2769 ---|* CALLS C2D.
| Line S01087 Modification History | |
|---|---|
M01 (Removed by) | ns2558 |
M02 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01331 M02S01087.ns2769 ---|* 01332 M02S01088.ns2769 ---|* MACROS DELAY.
| Line S01089 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01333 M01S01089.ns2769 ---| 01334 M01S01090.ns2769 ---| 01335 M01S01091.ns2769 ---| IBD SUBR ENTRY/EXIT 01336 M01S01092.ns2769 ---| LDM TREC,EC
| Line S01093 Modification History | |
|---|---|
M01 (Removed by) | ns2732 |
M02 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01337 M02S01093.ns2769 ---| SHN -2
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
M02 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01338 M02S00019.ns2769 ---| SHN -1
| Line S01094 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01339 M01S01094.ns2769 ---| SBD RC 01340 M01S01095.ns2769 ---| PJN IBDX IF TOO EARLY TO NOTIFY OPERATOR 01341 M01S01096.ns2769 ---| LDD T5 STORE EST ORDINAL IN MESSAGE 01342 M01S01097.ns2769 ---| SHN -3 01343 M01S01098.ns2769 ---| RJM C2D 01344 M01S01099.ns2769 ---| STM IBDA+1 01345 M01S01100.ns2769 ---| LDD T5 01346 M01S01101.ns2769 ---| LPN 7 01347 M01S01102.ns2769 ---| SHN 6 01348 M01S01103.ns2769 ---| ADC 2R0 01349 M01S01104.ns2769 ---| STM IBDA+2 01350 M01S01105.ns2769 ---| LDM TMNE,EC STORE ERROR MNEMONIC IN MESSAGE 01351 M01S01106.ns2769 ---| STM IBDA+3 01352 M01S01107.ns2769 ---| LDD CP 01353 M01S01108.ns2769 ---| ADK MS2W 01354 M01S01109.ns2769 ---| CWM IBDA,TR
| Line S01110 Modification History | |
|---|---|
M01 (Removed by) | ns2558 |
M02 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01355 M02S01110.ns2769 ---| DELAY 200D*8D DELAY FOR 200 MILLISECONDS
| Line S01111 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01356 M01S01111.ns2769 ---| UJP IBDX RETURN 01357 M01S01112.ns2769 ---| 01358 M01S01113.ns2769 ---| 01359 M01S01114.ns2769 ---| IBDA DATA C*EQ000 XX ERROR RETRY UNDERWAY.* 01360 M00S01115.1xy +++| IBM SPACE 4,25 01361 M00S01116.1xy +++|** IBM - ISSUE BML MESSAGE. 01362 M00S01117.1xy +++|*
| Line S01118 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01363 M01S01118.ns2769 ---|* THIS ROUTINE BUILDS A BML MESSAGE AND CALLS ROUTINE *IMS* TO
| Line S00106 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01364 M01S00106.ns2769 +++|* THIS ROUTINE BUILDS A BML MESSAGE AND CALLS ROUTINE *IMB* TO 01365 M00S01119.1xy +++|* ISSUE THE MESSAGE TO THE BML. 01366 M00S01120.1xy +++|* 01367 M00S01121.1xy +++|* ENTRY (CA - CA+3) = SEEK PARAMETERS. 01368 M00S01122.1xy +++|* (EC) = ERROR CODE. 01369 M00S01123.1xy +++|* (ER) = RECOVERY IN PROGRESS FLAG. 01370 M00S01124.1xy +++|* (RC) = RETRY COUNT. 01371 M00S01125.1xy +++|* (RS) = RECOVERY STATUS. 01372 M00S01126.1xy +++|* 777X INITIAL RETRY. 01373 M00S01127.1xy +++|* 0 RECOVERED BY CONTROLLER. 01374 M00S01128.1xy +++|* 1 RECOVERED BY DRIVER. 01375 M00S01129.1xy +++|* 2 UNRESOLVED. 01376 M00S01130.1xy +++|* 3 UNRECOVERED. 01377 M00S01131.1xy +++|* (RW) = READ/WRITE FLAG. 01378 M00S01132.1xy +++|* (T5) = EST ORDINAL. 01379 M00S01133.1xy +++|* (BMLGS) = GENERAL STATUS. 01380 M00S01134.1xy +++|* (DST - DST+23) = DETAILED STATUS IF APPLICABLE. 01381 M00S01135.1xy +++|*
| Line S01136 Modification History | |
|---|---|
M01 (Removed by) | ns2507 |
Seq # *Modification Id* Act ----------------------------+ 01382 M01S01136.ns2507 ---|* USES T1, T2.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2507 |
M02 (Removed by) | ns2519 |
Seq # *Modification Id* Act ----------------------------+ 01383 M02S00004.ns2519 ---|* USES T1.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2519 |
M02 (Removed by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 01384 M02S00001.ns2732 ---|* USES S2, T1.
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
M02 (Removed by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 01385 M02S00020.ns2732a ---|* EXIT (RC) INCREMENTED.
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 01386 M01S00008.ns2732a +++|* EXIT (RC) INCREMENTED IF FIRST RETRY.
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 01387 M01S00021.ns2732 +++|*
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
M02 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01388 M02S00022.ns2769 ---|* USES RC, T1.
| Line S00107 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01389 M01S00107.ns2769 +++|* USES RC, T1, CM+1 - CM+3. 01390 M00S01137.1xy +++|*
| Line S01138 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01391 M01S01138.ns2769 ---|* CALLS IEC, IMS.
| Line S00108 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01392 M01S00108.ns2769 +++|* CALLS IMB. 01393 M01S00109.ns2769 +++|* 01394 M01S00110.ns2769 +++|* MACROS MONITOR. 01395 M00S01139.1xy +++| 01396 M00S01140.1xy +++| 01397 M00S01141.1xy +++| IBM SUBR ENTRY/EXIT
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
M02 (Removed by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 01398 M02S00023.ns2732a ---| AOD RC INCREMENT RETRY COUNT 01399 M00S01142.1xy +++| LDM TEPF,EC 01400 M00S01143.1xy +++| SHN 0-12 01401 M00S01144.1xy +++| ZJN IBMX IF NO BML MESSAGE/ERROR COUNT INCREMENT
| Line S01145 Modification History | |
|---|---|
M01 (Removed by) | ns2562 |
Seq # *Modification Id* Act ----------------------------+ 01402 M01S01145.ns2562 ---| SHN 12-13 01403 M01S01146.ns2562 ---| ZJN IBM1 IF BML MESSAGE MAY BE ISSUED 01404 M01S01147.ns2562 ---| LDD RS 01405 M01S01148.ns2562 ---| LMN 3 01406 M01S01149.ns2562 ---| NJN IBMX IF NOT UNRECOVERED ERROR
| Line S01150 Modification History | |
|---|---|
M01 (Removed by) | ns2507 |
M02 (Removed by) | ns2562 |
Seq # *Modification Id* Act ----------------------------+ 01407 M02S01150.ns2562 ---| IBM1 STD T2 01408 M02S01151.ns2562 ---| LDD RS
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns2507 |
M02 (Removed by) | ns2519 |
M03 (Removed by) | ns2562 |
Seq # *Modification Id* Act ----------------------------+ 01409 M03S00005.ns2562 ---| IBM1 LDD RS
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2519 |
M02 (Removed by) | ns2562 |
Seq # *Modification Id* Act ----------------------------+ 01410 M02S00002.ns2562 ---| IBM1 STD S2
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2562 |
M02 (Removed by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 01411 M02S00001.ns2732 ---| LDN 0 01412 M02S00002.ns2732 ---| STD S2
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2519 |
Seq # *Modification Id* Act ----------------------------+ 01413 M01S00003.ns2519 +++| LDD RS 01414 M00S01152.1xy +++| LMN 2 01415 M00S01153.1xy +++| ZJN IBMX IF UNRESOLVED ERROR 01416 M00S01154.1xy +++| SHN 21-13
| Line S01155 Modification History | |
|---|---|
M01 (Removed by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 01417 M01S01155.ns2732 ---| PJN IBM2 IF FINAL RETRY
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 01418 M01S00024.ns2732 +++| PJN IBM1 IF FINAL RETRY 01419 M00S01156.1xy +++| LDD RC
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
M02 (Removed by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 01420 M02S00025.ns2732a ---| LMN 1 01421 M00S01157.1xy +++| NJN IBMX IF NOT INITIAL RETRY
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | ns2732a |
Seq # *Modification Id* Act ----------------------------+ 01422 M01S00009.ns2732a +++| AOD RC INCREMENT RETRY COUNT
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2519 |
M02 (Removed by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 01423 M02S00004.ns2732 ---| AOD S2
| Line S01158 Modification History | |
|---|---|
M01 (Removed by) | ns2507 |
Seq # *Modification Id* Act ----------------------------+ 01424 M01S01158.ns2507 ---| AOD T2 01425 M00S01159.1xy +++| UJN IBM3 CONTINUE 01426 M00S01160.1xy +++|
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 01427 M01S00026.ns2732 +++| IBM1 SHN 13-1 01428 M01S00027.ns2732 +++| PJN IBM2 IF UNRECOVERED 01429 M01S00028.ns2732 +++| LDN 2 01430 M01S00029.ns2732 +++| SBD RC 01431 M01S00030.ns2732 +++| MJN IBM2 IF NOT RECOVERED ON FIRST RETRY 01432 M01S00031.ns2732 +++| LDK STAE 01433 M01S00032.ns2732 +++| LMD EC 01434 M01S00033.ns2732 +++| ZJN IBM3 IF ERROR NOT TO BE COUNTED
| Line S01161 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01435 M01S01161.ns2769 ---| IBM2 RJM IEC INCREMENT ERROR COUNTER
| Line S00111 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01436 M01S00111.ns2769 +++| 01437 M01S00112.ns2769 +++|* INCREMENT ERROR COUNTER. 01438 M01S00113.ns2769 +++| 01439 M01S00114.ns2769 +++| IBM2 LDD T5 SET EST ORDINAL 01440 M01S00115.ns2769 +++| STD CM+1 01441 M01S00116.ns2769 +++| LDD RS SET BYTE NUMBER 01442 M01S00117.ns2769 +++| SHN -1 01443 M01S00118.ns2769 +++| ADN 3 01444 M01S00119.ns2769 +++| STD CM+2 01445 M01S00120.ns2769 +++| LDK ICTS SET SUBFUNCTION 01446 M01S00121.ns2769 +++| STD CM+3 01447 M01S00122.ns2769 +++| MONITOR SMDM
| Line S01162 Modification History | |
|---|---|
M01 (Removed by) | ns2497 |
Seq # *Modification Id* Act ----------------------------+ 01448 M01S01162.ns2497 ---| SOD RC 01449 M00S01163.1xy +++| IBM3 LDD RS SET RECOVERED/UNRECOVERED FLAG 01450 M00S01164.1xy +++| ADN 5 01451 M00S01165.1xy +++| SHN -3 01452 M00S01166.1xy +++| LPN 1 01453 M00S01167.1xy +++| STD T1 01454 M00S01168.1xy +++| LDC /COMSDFS/D1XY*400 STORE SYMPTOM CODE 01455 M00S01169.1xy +++| LMM TSYM,EC 01456 M00S01170.1xy +++| STM BMLSC 01457 M00S01171.1xy +++| LMK /COMSDFS/HS0040+/COMSDFS/D1XY*400 01458 M00S01172.1xy +++| NJN IBM4 IF NOT A MEDIA ERROR 01459 M00S01173.1xy +++| LDD RW 01460 M00S01174.1xy +++| ERRNZ /COMSDFS/HS0041-/COMSDFS/HS0040-1 ERROR 01461 M00S01175.1xy +++| RAM BMLSC 01462 M00S01176.1xy +++| IBM4 LDD RC STORE RETRY COUNT
| Line S01177 Modification History | |
|---|---|
M01 (Removed by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 01463 M01S01177.ns2732 ---| ADN 1 01464 M00S01178.1xy +++| SHN 6-1 01465 M00S01179.1xy +++| ADD RW ADD READ/WRITE FLAG 01466 M00S01180.1xy +++| SHN 1 01467 M00S01181.1xy +++| ADD T1 ADD RECOVERY STATUS 01468 M00S01182.1xy +++| STM BMLRC
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns2519 |
M02 (Removed by) | ns2732 |
Seq # *Modification Id* Act ----------------------------+ 01469 M02S00005.ns2732 ---| LDD S2 SET RETRY COUNT = 1 IF INITIAL RETRY 01470 M02S00006.ns2732 ---| RAD RC
| Line S01183 Modification History | |
|---|---|
M01 (Removed by) | ns2507 |
Seq # *Modification Id* Act ----------------------------+ 01471 M01S01183.ns2507 ---| LDD T2 01472 M01S01184.ns2507 ---| RAD RC 01473 M00S01185.1xy +++| LDD CA UNIT NUMBER 01474 M00S01186.1xy +++| LPN 77 01475 M00S01187.1xy +++| STM BMLUN 01476 M00S01188.1xy +++| LDD T5 EST ORDINAL 01477 M00S01189.1xy +++| STM BMLEO 01478 M00S01190.1xy +++| LDD EC ERROR CODE 01479 M00S01191.1xy +++| STM BMLEC 01480 M00S01192.1xy +++| LDD CA+1 CYLINDER 01481 M00S01193.1xy +++| STM BMLCY 01482 M00S01194.1xy +++| LDD CA+2 TRACK AND SECTOR 01483 M00S01195.1xy +++| SHN 6 01484 M00S01196.1xy +++| LMD CA+3 01485 M00S01197.1xy +++| STM BMLTS
| Line S01198 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01486 M01S01198.ns2769 ---| LDC BMS1LC*10000+BML ISSUE MESSAGE
| Line S00123 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01487 M01S00123.ns2769 +++| LDC BML ISSUE *BML* MESSAGE 01488 M01S00124.ns2769 +++| RJM IMB ISSUE MESSAGE TO BUFFER
| Line S01199 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 01489 M01S01199.ns2769 ---| RJM IMS 01490 M00S01200.1xy +++| UJP IBMX RETURN 01491 M00S01201.1xy +++| BML SPACE 4,10 01492 M00S01202.1xy +++|* BINARY MAINTENANCE LOG MESSAGE. 01493 M00S01203.1xy +++| 01494 M00S01204.1xy +++| BML BSS 0 01495 M00S01205.1xy +++| 01496 M00S01206.1xy +++| HDR1 VFD 36/0 RESERVED 01497 M00S01207.1xy +++| VFD 12/BMS1LC LENGTH OF MESSAGE 01498 M00S01208.1xy +++| VFD 12/MLDY MESSAGE TYPE 01499 M00S01209.1xy +++| 01500 M00S01210.1xy +++| VFD 12//COMSDFS/RM0115 MESSAGE ID 01501 M00S01211.1xy +++| 01502 M00S01212.1xy +++| BMLSC VFD 4//COMSDFS/D1XY DRIVER TYPE 01503 M00S01213.1xy +++| VFD 1/0 RESERVED 01504 M00S01214.1xy +++| VFD 7/0 SYMPTOM CODE 01505 M00S01215.1xy +++| 01506 M00S01216.1xy +++| BMLPP VFD 6/ PP NUMBER 01507 M00S01217.1xy +++| VFD 6/ CHANNEL NUMBER 01508 M00S01218.1xy +++| 01509 M00S01219.1xy +++| BMLUN VFD 6/0 EQUIPMENT NUMBER 01510 M00S01220.1xy +++| VFD 6/ UNIT NUMBER 01511 M00S01221.1xy +++| 01512 M00S01222.1xy +++| VFD 12/0 RESERVED 01513 M00S01223.1xy +++| 01514 M00S01224.1xy +++| BMLEO VFD 12/ EST ORDINAL 01515 M00S01225.1xy +++| 01516 M00S01226.1xy +++| BMLRC VFD 6/ RETRY COUNT 01517 M00S01227.1xy +++| VFD 4/0 RESERVED 01518 M00S01228.1xy +++| VFD 1/0 READ OPERATION 01519 M00S01229.1xy +++|* VFD 1/1 WRITE OPERATION 01520 M00S01230.1xy +++| VFD 1/0 RECOVERED ERROR 01521 M00S01231.1xy +++|* VFD 1/1 UNRECOVERED ERROR 01522 M00S01232.1xy +++| 01523 M00S01233.1xy +++| BMLCR VFD 6/ CHANNEL USED FOR RECOVERY 01524 M00S01234.1xy +++| VFD 6/0 RESERVED 01525 M00S01235.1xy +++| 01526 M00S01236.1xy +++| BMLMF VFD 12/ MAINFRAME ID 01527 M00S01237.1xy +++| 01528 M00S01238.1xy +++| VFD 12/0 RESERVED 01529 M00S01239.1xy +++| 01530 M00S01240.1xy +++| HDR1L EQU *-HDR1 HEADER LENGTH (PP WORDS) 01531 M00S01241.1xy +++| HDR1LC EQU HDR1L/5 HEADER LENGTH (CM WORDS) 01532 M00S01242.1xy +++| 01533 M00S01243.1xy +++| BMLEC VFD 12/ ERROR CODE 01534 M00S01244.1xy +++| 01535 M00S01245.1xy +++| BMLCY VFD 12/ CYLINDER 01536 M00S01246.1xy +++| 01537 M00S01247.1xy +++| BMLTS VFD 12/ TRACK AND SECTOR 01538 M00S01248.1xy +++| 01539 M00S01249.1xy +++| BMLLF VFD 12/ LAST FUNCTION 01540 M00S01250.1xy +++| 01541 M00S01251.1xy +++| BMLGS VFD 12/ GENERAL STATUS 01542 M00S01252.1xy +++| 01543 M00S01253.1xy +++|* DETAILED STATUS. 01544 M00S01254.1xy +++| 01545 M00S01255.1xy +++| DST BSS MXSL 01546 M00S01256.1xy +++| 01547 M00S01257.1xy +++| 01548 M00S01258.1xy +++|* ADAPTER STATUS. 01549 M00S01259.1xy +++| 01550 M00S01260.1xy +++| BMLAS VFD 6/ UPPER BITS OF FUNCTION CODE
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/1xy.txt · Last modified: (external edit)