cdc:nos2.source:opl.opl871:deck:1hy.002
Deck 1HY Part 002
12 Modifications
Listing Sections
- Deck 1HY Start
- Deck 1HY Part 1 (Line 1697)
- Deck 1HY Part 2 (Line 3144)
Source
Seq # *Modification Id* Act ----------------------------+ 03144 M00S02823.1hy +++| ADD HN 03145 M00S02824.1hy +++| SBM SFRB,DT CHECK NEXT SECTOR 03146 M00S02825.1hy +++| LMD NR+2 03147 M00S02826.1hy +++| NJN SFR1 IF NOT NEXT SECTOR ON CONSECUTIVE TRACKS 03148 M00S02827.1hy +++| SFR6 LDD NB 03149 M00S02828.1hy +++| UJN SFR2 RETURN 03150 M00S02829.1hy +++| 03151 M00S02830.1hy +++| 03152 M00S02831.1hy +++| SFRA BSS 0 PHYSICAL SECTORS PER I/O BUFFER 03153 M00S02832.1hy +++| CON PSBFDF 03154 M00S02833.1hy +++| CON PSBFDH 03155 M00S02834.1hy +++| 03156 M00S02835.1hy +++| SFRB BSS 0 FACTOR FOR NEXT SECTOR CALCULATION 03157 M00S02836.1hy +++| CON PSPTDF-PSBFDF 03158 M00S02837.1hy +++| CON PSPTDH-PSBFDH 03159 M00S02838.1hy +++| SLB SPACE 4,15 03160 M00S02839.1hy +++|** SLB - SET LINKAGE BITS. 03161 M00S02840.1hy +++|* 03162 M00S02841.1hy +++|* ENTRY (PB) = *CBT* ORDINAL. 03163 M00S02842.1hy +++|* (RW) = READ / WRITE STATUS. 03164 M00S02843.1hy +++|* 03165 M00S02844.1hy +++|* EXIT LINKAGE BITS SET IN *CBT* ENTRY / UEM BUFFER. 03166 M00S02845.1hy +++|* 03167 M00S02846.1hy +++|* USES CM - CM+4, T0 - T6, UA - UA+1. 03168 M00S02847.1hy +++|* 03169 M00S02848.1hy +++|* CALLS RLB, SUA, WLB. 03170 M00S02849.1hy +++|* 03171 M00S02850.1hy +++|* MACROS CBTE. 03172 M00S02851.1hy +++| 03173 M00S02852.1hy +++| 03174 M00S02853.1hy +++| SLB SUBR ENTRY/EXIT 03175 M00S02854.1hy +++| LDD PB 03176 M00S02855.1hy +++| RJM SUA SET UEM ADDRESS 03177 M00S02856.1hy +++| LDN PAD1 03178 M00S02857.1hy +++| STD T2 03179 M00S02858.1hy +++| SRD T3 03180 M00S02859.1hy +++| LDN 5 UEM WORD COUNT 03181 M00S02860.1hy +++| STD T5 03182 M00S02861.1hy +++| LDM SLBB,RW SET PROCESSOR ADDRESS 03183 M00S02862.1hy +++| STM SLBA 03184 M00S02863.1hy +++| SLB1 LRD UA LOAD *R* REGISTER 03185 M00S02864.1hy +++| LDD PB 03186 M00S02865.1hy +++| SHN CBTLS READ CONTROL BUFFER WORD 03187 M00S02866.1hy +++| CBTE * 03188 M00S02867.1hy +++| ADC 0 FWA OF *CBT* 03189 M00S02868.1hy +++| ADD T2 03190 M00S02869.1hy +++| CRD CM 03191 M00S02870.1hy +++| LDC SBUF-4 SET BUFFER ADDRESS 03192 M00S02871.1hy +++| STD T1 03193 M00S02872.1hy +++| LDC 1S17 READ START OF BUFFER SEGMENT 03194 M00S02873.1hy +++| CRML SBUF,T5 03195 M00S02874.1hy +++| LDN CM+3 SET *CBT* ENTRY ADDRESS 03196 M00S02875.1hy +++| STD T6 03197 M00S02876.1hy +++| RJM 0 MOVE LINKAGE BITS 03198 M00S02877.1hy +++| SLBA EQU *-1 03199 M00S02878.1hy +++| LDN 10 ADVANCE *R* REGISTER IMAGE 03200 M00S02879.1hy +++| RAD UA+1 03201 M00S02880.1hy +++| SHN -14 03202 M00S02881.1hy +++| RAD UA 03203 M00S02882.1hy +++| AOD T2 ADVANCE CONTROL BUFFER WORD 03204 M00S02883.1hy +++| LMN PAD4+1 03205 M00S02884.1hy +++| NJN SLB1 IF NOT COMPLETE 03206 M00S02885.1hy +++| LRD T3 03207 M00S02886.1hy +++| UJP SLBX RETURN 03208 M00S02887.1hy +++| 03209 M00S02888.1hy +++| 03210 M00S02889.1hy +++| SLBB CON RLB 03211 M00S02890.1hy +++| CON WLB 03212 M00S02891.1hy +++| SRF SPACE 4,10 03213 M00S02892.1hy +++|** SRF - SET DRIVER RELOAD FLAG. 03214 M00S02893.1hy +++|* 03215 M00S02894.1hy +++|* EXIT (A) = 0. 03216 M00S02895.1hy +++|* 03217 M00S02896.1hy +++|* USES CM - CM+4. 03218 M00S02897.1hy +++|* 03219 M00S02898.1hy +++|* CALLS CMC, DCR. 03220 M00S02899.1hy +++|* 03221 M00S02900.1hy +++|* MACROS CHTE, MONITOR. 03222 M00S02901.1hy +++| 03223 M00S02902.1hy +++| 03224 M00S02903.1hy +++| SRF SUBR ENTRY/EXIT 03225 M00S02904.1hy +++| RJM CMC 03226 M00S02905.1hy +++| RJM DCR DROP CHANNEL RESERVATION 03227 M00S02906.1hy +++|* LDN 0 03228 M00S02907.1hy +++| STD CM+2 CLEAR UNUSED BYTE 03229 M00S02908.1hy +++| CHTE * 03230 M00S02909.1hy +++| LDC CTALL*2 ADDRESS OF CHANNEL CONTROLWARE TABLE ENTRY 03231 M00S02910.1hy +++| STD CM+4 03232 M00S02911.1hy +++| SHN -14 03233 M00S02912.1hy +++| STD CM+3 03234 M00S02913.1hy +++| LDN 1 SET NUMBER OF REQUESTS 03235 M00S02914.1hy +++| STD CM+1 03236 M00S02915.1hy +++| LDD MA STORE REQUEST IN MESSAGE BUFFER 03237 M00S02916.1hy +++| CWM SRFA,CM+1 03238 M00S02917.1hy +++| MONITOR UTEM SET RELOAD FLAG 03239 M00S02918.1hy +++|* LDN 0 03240 M00S02919.1hy +++| UJN SRFX RETURN 03241 M00S02920.1hy +++| 03242 M00S02921.1hy +++| 03243 M00S02922.1hy +++| SRFA VFD 1/0,5/0,6/1,6/,42/1 03244 M00S02923.1hy +++| SSD SPACE 4,15 03245 M00S02924.1hy +++|** SSD - SELECT SLAVE DEVICE. 03246 M00S02925.1hy +++|* 03247 M00S02926.1hy +++|* ENTRY (SF) = 1 IF DEVICE PREVIOUSLY SELECTED. 03248 M00S02927.1hy +++|* (UN) = UNIT NUMBER. 03249 M00S02928.1hy +++|* 03250 M00S02929.1hy +++|* EXIT (A) .NE. 0 IF DEVICE SELECTED. 03251 M00S02930.1hy +++|* (SF) = 1 IF DEVICE SELECTED. 03252 M00S02931.1hy +++|* 03253 M00S02932.1hy +++|* ERROR TO *ERR* IF SELECT REJECT. 03254 M00S02933.1hy +++|*
| Line S02934 Modification History | |
|---|---|
M01 (Removed by) | 1hy7 |
Seq # *Modification Id* Act ----------------------------+ 03255 M01S02934.1hy7 ---|* USES T2, T3. 03256 M01S02935.1hy7 ---|* 03257 M01S02936.1hy7 ---|* CALLS R1B, SAP, WFW. 03258 M01S02937.1hy7 ---|* 03259 M01S02938.1hy7 ---|* MACROS DELAY.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 1hy7 |
Seq # *Modification Id* Act ----------------------------+ 03260 M01S00004.1hy7 +++|* USES T2. 03261 M01S00005.1hy7 +++|* 03262 M01S00006.1hy7 +++|* CALLS FCN, R1B, SAP, WFW. 03263 M00S02939.1hy +++| 03264 M00S02940.1hy +++| 03265 M00S02941.1hy +++| SSD4 AOD SF SET DEVICE SELECTED 03266 M00S02942.1hy +++| 03267 M00S02943.1hy +++| SSD SUBR ENTRY/EXIT 03268 M00S02944.1hy +++| LDD SF 03269 M00S02945.1hy +++| NJN SSDX IF DEVICE PREVIOUSLY SELECTED 03270 M00S02946.1hy +++| LDN DSRC 03271 M00S02947.1hy +++| STD T2 03272 M00S02948.1hy +++| RJM SAP SELECT ADAPTOR PORT 03273 M00S02949.1hy +++| SSD1 LDD UN 03274 M00S02950.1hy +++| LMC FWBS WRITE FUNCTION WORD 03275 M00S02951.1hy +++| RJM WFW
| Line S02952 Modification History | |
|---|---|
M01 (Removed by) | 1hy7 |
Seq # *Modification Id* Act ----------------------------+ 03276 M01S02952.1hy7 ---| LDN 50D SET LOCAL TIMEOUT = 50 MILLISECONDS 03277 M01S02953.1hy7 ---| STD T3 03278 M00S02954.1hy +++| SSD2 LDC FCRO GET OPERATIONAL STATUS 03279 M00S02955.1hy +++| RJM R1B 03280 M00S02956.1hy +++| SHN 0-11 03281 M00S02957.1hy +++| LPN 35 EXTRACT PAUSE, SYNC IN/OUT, SELECT ACTIVE 03282 M00S02958.1hy +++| LMN 1 03283 M00S02959.1hy +++| ZJN SSD4 IF DEVICE SELECTED
| Line S02960 Modification History | |
|---|---|
M01 (Removed by) | 1hy7 |
Seq # *Modification Id* Act ----------------------------+ 03284 M01S02960.1hy7 ---| DELAY 7 03285 M01S02961.1hy7 ---| SOD T3 03286 M01S02962.1hy7 ---| NJN SSD2 IF NOT TIMED OUT
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | 1hy7 |
Seq # *Modification Id* Act ----------------------------+ 03287 M01S00007.1hy7 +++| LDC FCCH 03288 M01S00008.1hy7 +++| RJM FCN CLEAR SELECT HOLD 03289 M00S02963.1hy +++| SOD T2 03290 M00S02964.1hy +++| NJN SSD1 IF RETRY COUNT NOT EXHAUSTED 03291 M00S02965.1hy +++| LDC FCIS 03292 M00S02966.1hy +++| RJM R1B CHECK IDLE STATUS 03293 M00S02967.1hy +++| SHN -10 03294 M00S02968.1hy +++| LPML TMSK,UN 03295 M00S02969.1hy +++| ZJN SSD3 IF DRIVE NOT BUSY 03296 M00S02970.1hy +++| LDN EDRA&ETSL 03297 M00S02971.1hy +++| SSD3 LMN ETSL 03298 M00S02972.1hy +++| RJM ERR PROCESS ERROR 03299 M00S02973.1hy +++| STF SPACE 4,15 03300 M00S02974.1hy +++|** STF - REQUEST TRACK FLAW. 03301 M00S02975.1hy +++|* 03302 M00S02976.1hy +++|* ENTRY (CB) = CURRENT *CBT* ORDINAL. 03303 M00S02977.1hy +++|* (EO) = EST ORDINAL. 03304 M00S02978.1hy +++|* 03305 M00S02979.1hy +++|* USES CM - CM+4, T3 - T3+4. 03306 M00S02980.1hy +++|*
| Line S02981 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03307 M01S02981.271l716 ---|* CALLS CMC, DFM.
| Line S00072 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03308 M01S00072.271l716 +++|* CALLS CMC, C2D, IBM. 03309 M00S02982.1hy +++|* 03310 M00S02983.1hy +++|* MACROS CBTE, MONITOR. 03311 M00S02984.1hy +++| 03312 M00S02985.1hy +++| 03313 M00S02986.1hy +++| STF SUBR ENTRY/EXIT 03314 M00S02987.1hy +++| RJM CMC 03315 M00S02988.1hy +++| LDD EO CONVERT EST ORDINAL 03316 M00S02989.1hy +++| SHN -3 03317 M00S02990.1hy +++| RJM C2D
| Line S02991 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03318 M01S02991.271l716 ---| STM STFA+1 SET ORDINAL IN MESSAGE
| Line S00073 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03319 M01S00073.271l716 +++| STM STFB+1 SET ORDINAL IN MESSAGE 03320 M00S02992.1hy +++| LDD EO 03321 M00S02993.1hy +++| STD CM+1 03322 M00S02994.1hy +++| LPN 7 03323 M00S02995.1hy +++| SHN 6 03324 M00S02996.1hy +++| ADC 2R0,
| Line S02997 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03325 M01S02997.271l716 ---| STM STFA+2
| Line S00074 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03326 M01S00074.271l716 +++| STM STFB+2 03327 M00S02998.1hy +++| LDD CB FETCH *CBT* INFORMATION 03328 M00S02999.1hy +++| SHN CBTLS 03329 M00S03000.1hy +++| CBTE * 03330 M00S03001.1hy +++| ADC PAD1 03331 M00S03002.1hy +++| CRD T3 03332 M00S03003.1hy +++| LDD T3+1 DETERMINE LOGICAL TRACK NUMBER 03333 M00S03004.1hy +++| SHN 1 03334 M00S03005.1hy +++| ERRNZ LTCYDF-2 CODE DEPENDS ON VALUE 03335 M00S03006.1hy +++| ADC 4000 03336 M00S03007.1hy +++| ERRNZ LTCYDH-LTCYDF CODE DEPENDS ON VALUE 03337 M00S03008.1hy +++| STD CM+2 03338 M00S03009.1hy +++| LDD T3+2 03339 M00S03010.1hy +++| ERRNZ PTCYDF-4 CODE DEPENDS ON VALUE 03340 M00S03011.1hy +++| SHN -7 03341 M00S03012.1hy +++| ERRNZ PTCYDH-PTCYDF CODE DEPENDS ON VALUE 03342 M00S03013.1hy +++| RAD CM+2 03343 M00S03014.1hy +++| RJM C2D CONVERT TRACK NUMBER FOR MESSAGE
| Line S03015 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03344 M01S03015.271l716 ---| STM STFA+5
| Line S00075 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03345 M01S00075.271l716 +++| STM STFB+5 03346 M00S03016.1hy +++| LDD CM+2 03347 M00S03017.1hy +++| SHN -6 03348 M00S03018.1hy +++| RJM C2D
| Line S03019 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03349 M01S03019.271l716 ---| STM STFA+4
| Line S00076 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03350 M01S00076.271l716 +++| STM STFB+4 03351 M00S03020.1hy +++| LDK SFTS INSERT SUBFUNCTION 03352 M00S03021.1hy +++| STD CM+3
| Line S03022 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 03353 M01S03022.253l688 ---| MONITOR STBM SET TRACK FLAW REQUEST IN MST
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 03354 M01S00014.253l688 +++| MONITOR SMDM SET TRACK FLAW REQUEST IN MST 03355 M00S03023.1hy +++| LDD CM+1 03356 M00S03024.1hy +++| NJN STF2 IF THIS FLAW ALREADY REQUESTED
| Line S03025 Modification History | |
|---|---|
M01 (Removed by) | ns2596 |
Seq # *Modification Id* Act ----------------------------+ 03357 M01S03025.ns2596 ---| LDC STFA+ERLN
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2596 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03358 M02S00001.271l716 ---| LDC STFA+ERLN+400000
| Line S03026 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03359 M01S03026.271l716 ---| RJM DFM
| Line S00077 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03360 M01S00077.271l716 +++| LDC STFA 03361 M01S00078.271l716 +++| STM MAD1 ISSUE ERROR LOG MESSAGE 03362 M01S00079.271l716 +++| RJM IBM 03363 M00S03027.1hy +++| STF2 LJM STFX RETURN 03364 M00S03028.1hy +++| 03365 M00S03029.1hy +++|
| Line S03030 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03366 M01S03030.271l716 ---| STFA DATA C*EQXXX,TKNNNN, MEDIA DEFECT ENCOUNTERED.*
| Line S00080 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03367 M01S00080.271l716 +++| STFA VFD 24/0 RESERVED 03368 M01S00081.271l716 +++| VFD 12/1 ERRLOG ALERT FLAG 03369 M01S00082.271l716 +++| VFD 12/STFAL MESSAGE LENGTH 03370 M01S00083.271l716 +++| VFD 12/ELDY ERRLOG DAYFILE 03371 M01S00084.271l716 +++| 03372 M01S00085.271l716 +++| STFB DATA C*EQXXX,TKNNNN, MEDIA DEFECT ENCOUNTERED.* 03373 M01S00086.271l716 +++| 03374 M01S00087.271l716 +++| .1 SET *-STFA+4 03375 M01S00088.271l716 +++| STFAL EQU .1/5 03376 M00S03031.1hy +++| STO SPACE 4,10 03377 M00S03032.1hy +++|** STO - SET TIMEOUT. 03378 M00S03033.1hy +++|* 03379 M00S03034.1hy +++|* ENTRY (A) = TIMEOUT VALUE (IN SECONDS). 03380 M00S03035.1hy +++|* (PO) = *PUT* ORDINAL. 03381 M00S03036.1hy +++|* 03382 M00S03037.1hy +++|* USES T5, T6, T7, CM - CM+4. 03383 M00S03038.1hy +++|* 03384 M00S03039.1hy +++|* MACROS FTTE. 03385 M00S03040.1hy +++| 03386 M00S03041.1hy +++| 03387 M00S03042.1hy +++| STO SUBR ENTRY/EXIT 03388 M00S03043.1hy +++| STD T6 03389 M00S03044.1hy +++| LDC RTCL FETCH CURRENT TIME 03390 M00S03045.1hy +++| CRD CM 03391 M00S03046.1hy +++| LDD T6 03392 M00S03047.1hy +++| RAD CM+1 SET TIME LIMIT 03393 M00S03048.1hy +++| SHN -14 03394 M00S03049.1hy +++| RAD CM 03395 M00S03050.1hy +++| LDM STO SET CALLERS ADDRESS 03396 M00S03051.1hy +++| STD T7 03397 M00S03052.1hy +++| LDN 0 03398 M00S03053.1hy +++| STD T5 03399 M00S03054.1hy +++| LDD PO STORE TABLE ENTRY 03400 M00S03055.1hy +++| SHK FTTLS 03401 M00S03056.1hy +++| FTTE * 03402 M00S03057.1hy +++| ADC 0 03403 M00S03058.1hy +++| CWD T5 03404 M00S03059.1hy +++| UJN STOX RETURN 03405 M00S03060.1hy +++| SUA SPACE 4,10 03406 M00S03061.1hy +++|** SUA - SET UEM ADDRESS. 03407 M00S03062.1hy +++|* 03408 M00S03063.1hy +++|* ENTRY (A) = *CBT* ORDINAL. 03409 M00S03064.1hy +++|* 03410 M00S03065.1hy +++|* EXIT (UA - UA+1) = UEM ADDRESS / 100. 03411 M00S03066.1hy +++|* 03412 M00S03067.1hy +++|* USES CM - CM+4. 03413 M00S03068.1hy +++|* 03414 M00S03069.1hy +++|* MACROS CBTE. 03415 M00S03070.1hy +++| 03416 M00S03071.1hy +++| 03417 M00S03072.1hy +++| SUA SUBR ENTRY/EXIT 03418 M00S03073.1hy +++| SHN CBTLS 03419 M00S03074.1hy +++| CBTE * 03420 M00S03075.1hy +++| ADC IOLK READ *CBT* ENTRY 03421 M00S03076.1hy +++| CRD CM 03422 M00S03077.1hy +++| LDD CM+4 EXTRACT RELATIVE UEM ADDRESS 03423 M00S03078.1hy +++| ADC 0 03424 M00S03079.1hy +++| SUAA EQU *-1 03425 M00S03080.1hy +++| SHN -6 03426 M00S03081.1hy +++| STD UA+1 SET ABSOLUTE ADDRESS / 100 03427 M00S03082.1hy +++| LDD CM+3 03428 M00S03083.1hy +++| ADC 0 03429 M00S03084.1hy +++| SUAB EQU *-1 03430 M00S03085.1hy +++| SHN 6 03431 M00S03086.1hy +++| RAD UA+1 03432 M00S03087.1hy +++| SHN -14 03433 M00S03088.1hy +++| STD UA 03434 M00S03089.1hy +++| UJN SUAX RETURN 03435 M00S03090.1hy +++| SUI SPACE 4,15 03436 M00S03091.1hy +++|** SUI - SET UNIT INTERLOCK. 03437 M00S03092.1hy +++|* 03438 M00S03093.1hy +++|* ENTRY (PO) = *PUT ORDINAL. 03439 M00S03094.1hy +++|* 03440 M00S03095.1hy +++|* EXIT (A) = 0 IF *PUT* ENTRY INTERLOCKED. 03441 M00S03096.1hy +++|* (UC) = UNIT ACTIVITY COUNT INCREMENTED. 03442 M00S03097.1hy +++|* 03443 M00S03098.1hy +++|* USES CM - CM+4. 03444 M00S03099.1hy +++|* 03445 M00S03100.1hy +++|* CALLS CMC. 03446 M00S03101.1hy +++|* 03447 M00S03102.1hy +++|* MACROS MONITOR. 03448 M00S03103.1hy +++| 03449 M00S03104.1hy +++| 03450 M00S03105.1hy +++| SUI1 AOD UC ADVANCE UNIT ASSIGNED COUNT 03451 M00S03106.1hy +++| LDN 0 03452 M00S03107.1hy +++| 03453 M00S03108.1hy +++| SUI SUBR ENTRY/EXIT 03454 M00S03109.1hy +++| RJM CMC 03455 M00S03110.1hy +++| LDD PO SET *PUT* ORDINAL 03456 M00S03111.1hy +++| STD CM+2 03457 M00S03112.1hy +++| LDN SUIS SET SUBFUNCTION 03458 M00S03113.1hy +++| STD CM+1 03459 M00S03114.1hy +++| MONITOR BIOM INTERLOCK DEVICE 03460 M00S03115.1hy +++| LDD CM+1 03461 M00S03116.1hy +++| ZJN SUI1 IF INTERLOCK ACQUIRED 03462 M00S03117.1hy +++| LMD OA 03463 M00S03118.1hy +++| UJN SUIX RETURN 03464 M00S03119.1hy +++| TMSE SPACE 4,10 03465 M00S03120.1hy +++|** TMSE - TABLE OF MASS STORAGE ERROR CODES. 03466 M00S03121.1hy +++|* 03467 M00S03122.1hy +++|* INDEXED BY FAULT CODE / 4. 03468 M00S03123.1hy +++| 03469 M00S03124.1hy +++| 03470 M00S03125.1hy +++| TMSE BSS 0 03471 M00S03126.1hy +++| LOC 0 03472 M00S03127.1hy +++| 03473 M00S03128.1hy +++| CON CHPE CHANNEL PARITY 03474 M00S03129.1hy +++| CON CHFE CHANNEL FAILURE 03475 M00S03130.1hy +++| CON FTOE FUNCTION TIMEOUT 03476 M00S03131.1hy +++| CON PARE DATA PARITY (MEDIA) 03477 M00S03132.1hy +++| CON NRDE DEVICE NOT READY 03478 M00S03133.1hy +++| CON IDTE DATA TRANSFER 03479 M00S03134.1hy +++| CON DSTE DEVICE STATUS 03480 M00S03135.1hy +++| CON DSTE DEVICE STATUS 03481 M00S03136.1hy +++| CON DSTE DEVICE STATUS 03482 M00S03137.1hy +++| CON DSTE DEVICE STATUS 03483 M00S03138.1hy +++| CON DDFE DIAGNOSTIC FAILURE 03484 M00S03139.1hy +++| CON DRVE DRIVE RESERVED 03485 M00S03140.1hy +++| LOC *O 03486 M00S03141.1hy +++| TMSK SPACE 4,10 03487 M00S03142.1hy +++|** TMSK - TABLE OF UNIT MASKS. 03488 M00S03143.1hy +++|* 03489 M00S03144.1hy +++|* INDEXED BY UNIT NUMBER. 03490 M00S03145.1hy +++| 03491 M00S03146.1hy +++| 03492 M00S03147.1hy +++| TMSK BSS 0 03493 M00S03148.1hy +++| LOC 0 03494 M00S03149.1hy +++| 03495 M00S03150.1hy +++| CON 200 03496 M00S03151.1hy +++| CON 100 03497 M00S03152.1hy +++| CON 040 03498 M00S03153.1hy +++| CON 020 03499 M00S03154.1hy +++| CON 010 03500 M00S03155.1hy +++| CON 004 03501 M00S03156.1hy +++| CON 002 03502 M00S03157.1hy +++| CON 001 03503 M00S03158.1hy +++| LOC *O 03504 M00S03159.1hy +++| UEC SPACE 4,15 03505 M00S03160.1hy +++|** UEC - UPDATE MST ERROR COUNT. 03506 M00S03161.1hy +++|* 03507 M00S03162.1hy +++|* ENTRY (EO) = EST ORDINAL. 03508 M00S03163.1hy +++|* (BMLM+2) = BML MESSAGE SYMPTOM CODE. 03509 M00S03164.1hy +++|* (MISC - BIT 0) = 1 IF UNRECOVERED ERROR. 03510 M00S03165.1hy +++|* 03511 M00S03166.1hy +++|* USES CM - CM+4. 03512 M00S03167.1hy +++|* 03513 M00S03168.1hy +++|* MACROS MONITOR. 03514 M00S03169.1hy +++| 03515 M00S03170.1hy +++| 03516 M00S03171.1hy +++| UEC SUBR ENTRY/EXIT 03517 M00S03172.1hy +++| LDM BMLM+1
| Line S03173 Modification History | |
|---|---|
M01 (Removed by) | ns2714 |
Seq # *Modification Id* Act ----------------------------+ 03518 M01S03173.ns2714 ---| LMC HD0105
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2714 |
M02 (Removed by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 03519 M02S00001.272l774 ---| LMC D1HY*400+HD0105
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 03520 M01S00002.272l774 +++| LMC D1HY*400+HD0111 03521 M00S03174.1hy +++| NJN UECX IF NOT COMPLETION MESSAGE 03522 M00S03175.1hy +++| LDD EO 03523 M00S03176.1hy +++| STD CM+1 SET EST ORDINAL 03524 M00S03177.1hy +++| LDM MISC 03525 M00S03178.1hy +++| LPN 1 SET BYTE NUMBER 03526 M00S03179.1hy +++| ADN 3 03527 M00S03180.1hy +++| STD CM+2 03528 M00S03181.1hy +++| LDN ICTS INCREMENT ERROR COUNT 03529 M00S03182.1hy +++| STD CM+3
| Line S03183 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 03530 M01S03183.253l688 ---| MONITOR STBM
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 03531 M01S00015.253l688 +++| MONITOR SMDM 03532 M00S03184.1hy +++| UJN UECX RETURN 03533 M00S03185.1hy +++| UHD SPACE 4,15 03534 M00S03186.1hy +++|** UHD - UNPACK HEX DATA. 03535 M00S03187.1hy +++|* 03536 M00S03188.1hy +++|* ENTRY (A) = 6/ BC, 12/ SA 03537 M00S03189.1hy +++|* BC = BYTE COUNT OF HEX DATA. 03538 M00S03190.1hy +++|* SA = SOURCE DATA ADDRESS. 03539 M00S03191.1hy +++|* (T3) = DESTINATION DATA ADDRESS. 03540 M00S03192.1hy +++|* 03541 M00S03193.1hy +++|* EXIT (A) = CM WORD COUNT OF 12 BIT DATA. 03542 M00S03194.1hy +++|* 03543 M00S03195.1hy +++|* USES T2, T4, T5. 03544 M00S03196.1hy +++|* 03545 M00S03197.1hy +++|* CALLS DV5. 03546 M00S03198.1hy +++| 03547 M00S03199.1hy +++| 03548 M00S03200.1hy +++| UHD3 AOD T3 SET END OF 12 BIT DATA 03549 M00S03201.1hy +++| STM UHDA 03550 M00S03202.1hy +++| LDN ZERL ENSURE ZERO FILL TO CM WORD BOUNDARY 03551 M00S03203.1hy +++| CRM *,ON 03552 M00S03204.1hy +++| UHDA EQU *-1 03553 M00S03205.1hy +++| LDD T3 SET BYTE COUNT OF 12 BIT DATA 03554 M00S03206.1hy +++| SBD T5 03555 M00S03207.1hy +++| RJM DV5 CONVERT TO CM WORD COUNT 03556 M00S03208.1hy +++| 03557 M00S03209.1hy +++| UHD SUBR ENTRY/EXIT 03558 M00S03210.1hy +++| STD T2 03559 M00S03211.1hy +++| SHN -14 SET BYTE COUNT 03560 M00S03212.1hy +++| STD T4 03561 M00S03213.1hy +++| LDD T3 PRESERVE DESTINATION BUFFER ADDRESS 03562 M00S03214.1hy +++| STD T5 03563 M00S03215.1hy +++| UHD1 LDIL T2 UNPACK N+3RD BYTE 03564 M00S03216.1hy +++| SHN 16 03565 M00S03217.1hy +++| STI T3 03566 M00S03218.1hy +++| SHN -6 03567 M00S03219.1hy +++| SCN 77 03568 M00S03220.1hy +++| STM 1,T3 03569 M00S03221.1hy +++| AOD T3 03570 M00S03222.1hy +++| SOD T4 03571 M00S03223.1hy +++| UHD2 ZJN UHD3 IF END OF HEX DATA 03572 M00S03224.1hy +++| AOD T2 03573 M00S03225.1hy +++| LDIL T2 UNPACK N+4TH BYTE 03574 M00S03226.1hy +++| SHN -10 03575 M00S03227.1hy +++| RAI T3 03576 M00S03228.1hy +++| AOD T3 03577 M00S03229.1hy +++| LDIL T2 03578 M00S03230.1hy +++| SHN 4 03579 M00S03231.1hy +++| SCN 17 03580 M00S03232.1hy +++| STI T3 03581 M00S03233.1hy +++| SOD T4 03582 M00S03234.1hy +++| ZJN UHD2 IF END OF HEX DATA 03583 M00S03235.1hy +++| AOD T2 03584 M00S03236.1hy +++| LDIL T2 UNPACK N+5TH BYTE 03585 M00S03237.1hy +++| STM 1,T3 03586 M00S03238.1hy +++| SHN -14 03587 M00S03239.1hy +++| RAI T3 03588 M00S03240.1hy +++| AOD T3 03589 M00S03241.1hy +++| SOD T4 03590 M00S03242.1hy +++| ZJN UHD2 IF END OF HEX DATA 03591 M00S03243.1hy +++| AOD T2 03592 M00S03244.1hy +++| AOD T3 03593 M00S03245.1hy +++| UJP UHD1 CONTINUE UNPACK 03594 M00S03246.1hy +++| WBD SPACE 4,10 03595 M00S03247.1hy +++|** WBD - WRITE BUFFERED DISK. 03596 M00S03248.1hy +++|* 03597 M00S03249.1hy +++|* ENTRY (CB) = CURRENT *CBT* ORDINAL. 03598 M00S03250.1hy +++|* 03599 M00S03251.1hy +++|* EXIT (A) = *ETTR* IF *T* REGISTER EMPTY TIMEOUT. 03600 M00S03252.1hy +++|* 03601 M00S03253.1hy +++|* CALLS COS, EIO, SFR, WTR. 03602 M00S03254.1hy +++| 03603 M00S03255.1hy +++| 03604 M00S03256.1hy +++| WBD2 RJM WTR WRITE *T* REGISTER 03605 M00S03257.1hy +++| RJM SFR 03606 M00S03258.1hy +++| NJN WBD1 IF CONSECUTIVE REQUEST FOUND 03607 M00S03259.1hy +++| 03608 M00S03260.1hy +++| WBD SUBR ENTRY/EXIT 03609 M00S03261.1hy +++| LDD CB 03610 M00S03262.1hy +++| WBD1 STD CB ENTER REQUEST IN I/O QUEUE 03611 M00S03263.1hy +++| RJM EIO 03612 M00S03264.1hy +++| LDN 2 CHECK OPERATIONAL STATUS 03613 M00S03265.1hy +++| RJM COS 03614 M00S03266.1hy +++| ZJN WBD2 IF *T* REGISTER EMPTY 03615 M00S03267.1hy +++| LDN ETTR 03616 M00S03268.1hy +++| UJN WBDX RETURN ERROR 03617 M00S03269.1hy +++| WCB SPACE 4,15 03618 M00S03270.1hy +++|** WCB - WRITE COMMAND BLOCK. 03619 M00S03271.1hy +++|* 03620 M00S03272.1hy +++|* ENTRY (A) = 1/ CA, 1/, 16/ CC 03621 M00S03273.1hy +++|* CA = 1 IF NOT CLEARING ATTENTION. 03622 M00S03274.1hy +++|* CC = COMMAND CODE. 03623 M00S03275.1hy +++|* (TO) = TIMEOUT VALUE FOR *FTT*. 03624 M00S03276.1hy +++|* 03625 M00S03277.1hy +++|* USES T3. 03626 M00S03278.1hy +++|* 03627 M00S03279.1hy +++|* CALLS FCN, R1B, STO, WFW, WTC. 03628 M00S03280.1hy +++| 03629 M00S03281.1hy +++| 03630 M00S03282.1hy +++| WCB SUBR ENTRY/EXIT 03631 M00S03283.1hy +++| STML WCBA+7
| Line S03284 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 03632 M01S03284.ns2769 ---| STML LCMD
| Line S00129 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 03633 M01S00129.ns2769 +++| STML LCMD,DI 03634 M00S03285.1hy +++| SHN 0-21 EXTRACT *CLEAR ATTENTION* STATUS 03635 M00S03286.1hy +++| SHN 14-0 03636 M00S03287.1hy +++| LMC FWCB INITIATE COMMAND BLOCK WRITE 03637 M00S03288.1hy +++| WCB1 RJM WFW 03638 M00S03289.1hy +++| LDN 10 SET LENGTH OF BLOCK 03639 M00S03290.1hy +++| ACN CH 03640 M00S03291.1hy +++| OAM WCBA,CH OUTPUT COMMAND BLOCK 03641 M00S03292.1hy +++| RJM WTC 03642 M00S03293.1hy +++| LDC 250D SET LOCAL TIMEOUT 03643 M00S03294.1hy +++| STD T3 03644 M00S03295.1hy +++| WCB2 LDC FCRO GET OPERATIONAL STATUS 03645 M00S03296.1hy +++| RJM R1B 03646 M00S03297.1hy +++| LPN 1 03647 M00S03298.1hy +++| NJN WCB4 IF COMMAND BLOCK TRANSFER INCOMPLETE 03648 M00S03299.1hy +++|* LDN 0 03649 M00S03300.1hy +++| STM WCBA+4 CLEAR PARAMETER WORD 03650 M00S03301.1hy +++| LDC FCCS 03651 M00S03302.1hy +++| RJM FCN CLEAR COMMAND SEQUENCE 03652 M00S03303.1hy +++| LDD TO 03653 M00S03304.1hy +++| RJM STO SET REQUEST TIMEOUT 03654 M00S03305.1hy +++| WCB3 UJP WCBX RETURN 03655 M00S03306.1hy +++| 03656 M00S03307.1hy +++| WCB4 DELAY 7 WAIT AWHILE 03657 M00S03308.1hy +++| SOD T3 03658 M00S03309.1hy +++| NJN WCB2 IF NOT TIMEOUT 03659 M00S03310.1hy +++| LDN ETCB 03660 M00S03311.1hy +++| RJM ERR PROCESS ERROR 03661 M00S03312.1hy +++| 03662 M00S03313.1hy +++| 03663 M00S03314.1hy +++| WCBA BSS 10 COMMAND BLOCK 03664 M00S03315.1hy +++| WFC SPACE 4,10 03665 M00S03316.1hy +++|** WFC - WRITE FUNCTION WORD AND CLEAR. 03666 M00S03317.1hy +++|* 03667 M00S03318.1hy +++|* ENTRY (A) = FUNCTION WORD. 03668 M00S03319.1hy +++|* 03669 M00S03320.1hy +++|* CALLS FCN, WFW. 03670 M00S03321.1hy +++| 03671 M00S03322.1hy +++| 03672 M00S03323.1hy +++| WFC SUBR ENTRY/EXIT 03673 M00S03324.1hy +++| RJM WFW WRITE FUNCTION WORD 03674 M00S03325.1hy +++| LDC FCCS CLEAR COMMAND SEQUENCE 03675 M00S03326.1hy +++| RJM FCN 03676 M00S03327.1hy +++| UJN WFCX RETURN 03677 M00S03328.1hy +++| WFW SPACE 4,10 03678 M00S03329.1hy +++|** WFW - WRITE FUNCTION WORD. 03679 M00S03330.1hy +++|* 03680 M00S03331.1hy +++|* ENTRY (A) = FUNCTION WORD. 03681 M00S03332.1hy +++|* 03682 M00S03333.1hy +++|* CALLS FCN, WTC. 03683 M00S03334.1hy +++| 03684 M00S03335.1hy +++| 03685 M00S03336.1hy +++| WFW SUBR ENTRY/EXIT 03686 M00S03337.1hy +++| STML WFWA 03687 M00S03338.1hy +++| LDC FCCS CLEAR COMMAND SEQUENCE 03688 M00S03339.1hy +++| RJM FCN 03689 M00S03340.1hy +++| LDC FCSS SET COMMAND SEQUENCE / SELECT HOLD 03690 M00S03341.1hy +++| RJM FCN 03691 M00S03342.1hy +++| LDN 1 SET BYTE COUNT 03692 M00S03343.1hy +++| ACN CH 03693 M00S03344.1hy +++| OAM WFWA,CH OUTPUT FUNCTION WORD 03694 M00S03345.1hy +++| RJM WTC 03695 M00S03346.1hy +++| UJN WFWX RETURN 03696 M00S03347.1hy +++| 03697 M00S03348.1hy +++| 03698 M00S03349.1hy +++| WFWA CON 0 FUNCTION WORD BUFFER 03699 M00S03350.1hy +++| WLB SPACE 4,10 03700 M00S03351.1hy +++|** WLB - WRITE LINKAGE BITS. 03701 M00S03352.1hy +++|* 03702 M00S03353.1hy +++|* ENTRY (A) = (T6) = ADDRESS FOR LINKAGE IN (CM - CM+4). 03703 M00S03354.1hy +++|* (T1) = DATA BUFFER ADDRESS. 03704 M00S03355.1hy +++|* (T5) = NUMBER OF WORDS TO WRITE. 03705 M00S03356.1hy +++|* (CM - CM+4) = *PAD* WORD OF *CBT* ENTRY. 03706 M00S03357.1hy +++|* 03707 M00S03358.1hy +++|* EXIT SECTOR LINKAGE SET IN DATA BUFFER. 03708 M00S03359.1hy +++|* 03709 M00S03360.1hy +++|* USES T6. 03710 M00S03361.1hy +++| 03711 M00S03362.1hy +++| 03712 M00S03363.1hy +++| WLB1 LDN 10+4 ADVANCE BUFFER ADDRESS 03713 M00S03364.1hy +++| RAD T1 03714 M00S03365.1hy +++| LDI T6 EXTRACT LINKAGE FROM *CBT* ENTRY 03715 M00S03366.1hy +++| SHN -10 03716 M00S03367.1hy +++|* LPN 17 03717 M00S03368.1hy +++| SHN 14 POSITION FOR DATA BUFFER 03718 M00S03369.1hy +++| LMI T1 03719 M00S03370.1hy +++| STIL T1 03720 M00S03371.1hy +++| WLB2 LDI T6 EXTRACT LINKAGE FROM *CBT* ENTRY 03721 M00S03372.1hy +++| SHN -4 03722 M00S03373.1hy +++| LPN 17 03723 M00S03374.1hy +++| SHN 14 POSITION FOR DATA BUFFER 03724 M00S03375.1hy +++| LMM 4,T1 03725 M00S03376.1hy +++| STML 4,T1 03726 M00S03377.1hy +++| LDI T6 EXTRACT LINKAGE FROM *CBT* ENTRY 03727 M00S03378.1hy +++|* SHN 0 03728 M00S03379.1hy +++| LPN 17 03729 M00S03380.1hy +++| SHN 14 POSITION FOR DATA BUFFER 03730 M00S03381.1hy +++| LMM 10,T1 03731 M00S03382.1hy +++| STML 10,T1 03732 M00S03383.1hy +++| AOD T6 ADVANCE *CBT* WORD ADDRESS 03733 M00S03384.1hy +++| LMN CM+5 03734 M00S03385.1hy +++| NJN WLB1 IF MORE LINKAGE 03735 M00S03386.1hy +++| LDC 1S17 03736 M00S03387.1hy +++| CWML SBUF,T5 UPDATE DATA BUFFER 03737 M00S03388.1hy +++| 03738 M00S03389.1hy +++| WLB SUBR ENTRY/EXIT 03739 M00S03390.1hy +++|* LDD T6 03740 M00S03391.1hy +++| UJN WLB2 MOVE SECTOR LINKAGE 03741 M00S03392.1hy +++| WMC SPACE 4,10 03742 M00S03393.1hy +++|** WMC - WAIT MAINTENANCE CHANNEL EMPTY. 03743 M00S03394.1hy +++|* 03744 M00S03395.1hy +++|* ENTRY (A) = 0 IF TRANSFER COMPLETE. 03745 M00S03396.1hy +++|* (T5) = 0 IF INITIAL ENTRY. 03746 M00S03397.1hy +++|* 03747 M00S03398.1hy +++|* EXIT (A) = 0 IF CHANNEL EMPTY. 03748 M00S03399.1hy +++|* = (T5) IF CHANNEL HUNG FULL. 03749 M00S03400.1hy +++|* 03750 M00S03401.1hy +++|* USES CM - CM+4. 03751 M00S03402.1hy +++| 03752 M00S03403.1hy +++| 03753 M00S03404.1hy +++| WMC3 LDD T5 03754 M00S03405.1hy +++| ZJN WMCX IF NO ERRORS 03755 M00S03406.1hy +++| LDN ZERL 03756 M00S03407.1hy +++| CRD CM CLEAR BUFFER 03757 M00S03408.1hy +++| LDD CP 03758 M00S03409.1hy +++| ADN MS2W CLEAR CP MESSAGE 03759 M00S03410.1hy +++| CWD CM 03760 M00S03411.1hy +++| LDN 0 INDICATE CHANNEL EMPTY 03761 M00S03412.1hy +++| 03762 M00S03413.1hy +++| WMC SUBR ENTRY/EXIT 03763 M00S03414.1hy +++| NJN WMC2 IF INCOMPLETE TRANSFER 03764 M00S03415.1hy +++| LDD TH 03765 M00S03416.1hy +++| WMC1 EJM. WMC3,MR IF TRANSMISSION COMPLETE 03766 M00S03417.1hy +++| SBN 1 03767 M00S03418.1hy +++| NJN WMC1 IF NOT TIMED OUT 03768 M00S03419.1hy +++| WMC2 DCN. MR+40 03769 M00S03420.1hy +++| CCF. *+2,MR CLEAR CHANNEL FLAG 03770 M00S03421.1hy +++| LDD CP 03771 M00S03422.1hy +++| ADN MS2W STORE CP MESSAGE 03772 M00S03423.1hy +++| CWM WMCA,TR 03773 M00S03424.1hy +++| STD T5 03774 M00S03425.1hy +++| UJN WMCX RETURN 03775 M00S03426.1hy +++| 03776 M00S03427.1hy +++| 03777 M00S03428.1hy +++| WMCA DATA C*MR ERROR.* 03778 M00S03429.1hy +++| WTC SPACE 4,10 03779 M00S03430.1hy +++|** WTC - WAIT TRANSMISSION COMPLETE. 03780 M00S03431.1hy +++|* 03781 M00S03432.1hy +++|* EXIT (A) = 0. 03782 M00S03433.1hy +++|* 03783 M00S03434.1hy +++|* ERROR TO *ERR*. 03784 M00S03435.1hy +++|* 03785 M00S03436.1hy +++|* USES T1. 03786 M00S03437.1hy +++|* 03787 M00S03438.1hy +++|* CALLS CFE. 03788 M00S03439.1hy +++| 03789 M00S03440.1hy +++| 03790 M00S03441.1hy +++| WTC3 LDD T1 CHECK FOR I/O ERROR 03791 M00S03442.1hy +++| RJM CFE 03792 M00S03443.1hy +++|* LDN 0 EXIT CONDITION FROM *CFE* 03793 M00S03444.1hy +++| 03794 M00S03445.1hy +++| WTC SUBR ENTRY/EXIT 03795 M00S03446.1hy +++| STD T1 03796 M00S03447.1hy +++| LDN 5 SET TIMEOUT = 5*262 MILLISECONDS 03797 M00S03448.1hy +++| STD T0 03798 M00S03449.1hy +++| WTC1 LDN 0 03799 M00S03450.1hy +++| WTC2 EJM WTC3,CH IF LAST BYTE TAKEN OFF CHANNEL 03800 M00S03451.1hy +++| SBN 1 03801 M00S03452.1hy +++| NJN WTC2 IF NOT TIMED OUT 03802 M00S03453.1hy +++| SOD T0 03803 M00S03454.1hy +++| NJN WTC1 IF NOT TIMEOUT 03804 M00S03455.1hy +++| DCN CH+40 03805 M00S03456.1hy +++| LDN ECHF 03806 M00S03457.1hy +++| RJM ERR PROCESS CHANNEL ERROR 03807 M00S03458.1hy +++| WTR SPACE 4,10 03808 M00S03459.1hy +++|** WTR - WRITE *T* REGISTER. 03809 M00S03460.1hy +++|* 03810 M00S03461.1hy +++|* ENTRY (CB) = *CBT* ORDINAL. 03811 M00S03462.1hy +++|* (TO) = TIMEOUT VALUE FOR *FTT*. 03812 M00S03463.1hy +++|* 03813 M00S03464.1hy +++|* CALLS FCN, STO, SUA, WTC. 03814 M00S03465.1hy +++| 03815 M00S03466.1hy +++| 03816 M00S03467.1hy +++| WTR SUBR ENTRY/EXIT 03817 M00S03468.1hy +++| LDD CB 03818 M00S03469.1hy +++| RJM SUA SET UEM ADDRESS 03819 M00S03470.1hy +++| LDD UA+1 03820 M00S03471.1hy +++| SHN 11 03821 M00S03472.1hy +++| SCN 7 03822 M00S03473.1hy +++| STML WTRA+2 FORM ABSOLUTE UEM ADDRESS 03823 M00S03474.1hy +++| LDD UA 03824 M00S03475.1hy +++| SHN 14 03825 M00S03476.1hy +++| LMD UA+1 03826 M00S03477.1hy +++| SHN 11-20 SET IN *T* REGISTER 03827 M00S03478.1hy +++| STM WTRA+1 03828 M00S03479.1hy +++| LDC FCWT ISSUE WRITE *T* REGISTER FUNCTION 03829 M00S03480.1hy +++| RJM FCN 03830 M00S03481.1hy +++| LDN 3 SET BLOCK LENGTH 03831 M00S03482.1hy +++| ACN CH 03832 M00S03483.1hy +++| OAM WTRA,CH OUTPUT BUFFER PARAMETERS 03833 M00S03484.1hy +++| RJM WTC 03834 M00S03485.1hy +++| LDD TO SET REQUEST TIMEOUT 03835 M00S03486.1hy +++| RJM STO 03836 M00S03487.1hy +++| UJP WTRX RETURN 03837 M00S03488.1hy +++| 03838 M00S03489.1hy +++| 03839 M00S03490.1hy +++| WTRA BSS 0 *T* REGISTER BUFFER 03840 M00S03491.1hy +++| CONL 40000 BYTE LENGTH OF I/O TRANSFER 03841 M00S03492.1hy +++| CONL 0,0 UEM ADDRESS OF BUFFER 03842 M00S03493.1hy +++| TITLE MISCELLANEOUS. 03843 M00S03494.1hy +++| SPACE 4,10 03844 M00S03495.1hy +++|** COMMON DECKS. 03845 M00S03496.1hy +++| 03846 M00S03497.1hy +++| 03847 M00S03498.1hy +++|*CALL COMPC2D 03848 M00S03499.1hy +++| RND$ EQU 0 DEFINE ROUNDING FOR *COMPDV5* 03849 M00S03500.1hy +++|*CALL COMPDV5
| Line S00130 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 03850 M01S00130.ns2769 +++| M8K$ EQU 1 USE LONG INSTRUCTIONS 03851 M01S00131.ns2769 +++|*CALL COMPIMB 03852 M00S03501.1hy +++|*CALL COMPSES 03853 M00S03502.1hy +++| SPACE 4,10 03854 M00S03503.1hy +++|** BUFFERS. 03855 M00S03504.1hy +++| 03856 M00S03505.1hy +++| 03857 M00S03506.1hy +++| SLST BSS 0 SLAVE STATUS 03858 M00S03507.1hy +++| DVST EQU SLST+SLSTL DEVICE STATUS 03859 M00S03508.1hy +++|
| Line S03509 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 03860 M01S03509.ns2769 ---| EBUF EQU DVST+DVSTL ERROR MESSAGE ASSEMBLY BUFFER
| Line S00132 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 03861 M01S00132.ns2769 +++| EHDR EQU DVST+DVSTL ERROR MESSAGE HEADER BUFFER 03862 M01S00133.ns2769 +++| EBUF EQU EHDR+5*3 ERROR MESSAGE ASSEMBLY BUFFER 03863 M00S03510.1hy +++| CODE EQU EBUF INITIAL FAULT CODE 03864 M00S03511.1hy +++| FCS1 EQU EBUF+1 FAULT CODE - ERROR STEP 1 03865 M00S03512.1hy +++| FCS2 EQU EBUF+2 FAULT CODE - ERROR STEP 2 03866 M00S03513.1hy +++| FCS3 EQU EBUF+3 FAULT CODE - ERROR STEP 3 03867 M00S03514.1hy +++| FALT EQU EBUF+4 FINAL FAULT CODE 03868 M00S03515.1hy +++| RSVD EQU EBUF+5 RESERVED 03869 M00S03516.1hy +++| RBCT EQU EBUF+6 RESIDUAL BYTE COUNT 03870 M00S03517.1hy +++| STCT EQU EBUF+7 SECTORS TRANSFERED COUNT 03871 M00S03518.1hy +++| ICYL EQU EBUF+10 CYLINDER ON INITIAL SEEK 03872 M00S03519.1hy +++| ITAS EQU EBUF+11 TRACK + SECTOR ON INITIAL SEEK 03873 M00S03520.1hy +++| 03874 M00S03521.1hy +++| DBUF EQU EBUF+EBUFL DATA BUFFER 03875 M00S03522.1hy +++| EXST EQU DBUF EXECUTION STATUS 03876 M00S03523.1hy +++| IDST EQU DBUF+1 IDLE STATUS 03877 M00S03524.1hy +++| BSRN EQU DBUF+2 BIT SIGNIFICANT RESPONSE 03878 M00S03525.1hy +++| LSCC EQU DBUF+3 LAST SLAVE COMMAND 03879 M00S03526.1hy +++| LCFN EQU DBUF+4 LAST CHANNEL FUNCTION 03880 M00S03527.1hy +++| RBUF EQU DBUF+5 REGISTER BUFFER 03881 M00S03528.1hy +++|
| Line S03529 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 03882 M01S03529.ns2769 ---| MBUF EQU DBUF+DBUFL MESSAGE ASSEMBLY BUFFER
| Line S00134 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 03883 M01S00134.ns2769 +++| SBUF EQU DBUF+DBUFL SCRATCH BUFFER 03884 M00S03530.1hy +++|
| Line S03531 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 03885 M01S03531.ns2769 ---| SBUF EQU MBUF-5*3 SCRATCH BUFFER
| Line S00135 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 03886 M01S00135.ns2769 +++| MBUF EQU SBUF+5*3 MESSAGE ASSEMBLY BUFFER 03887 M00S03532.1hy +++| TITLE PRESET ROUTINES. 03888 M00S03533.1hy +++| CCP SPACE 4,10 03889 M00S03534.1hy +++|** CCP - CHECK CALLING PROGRAM. 03890 M00S03535.1hy +++|* 03891 M00S03536.1hy +++|* EXIT (A) = 0. 03892 M00S03537.1hy +++|* 03893 M00S03538.1hy +++|* USES CM - CM+4. 03894 M00S03539.1hy +++|* 03895 M00S03540.1hy +++|* CALLS DFM. 03896 M00S03541.1hy +++|* 03897 M00S03542.1hy +++|* MACROS MONITOR. 03898 M00S03543.1hy +++| 03899 M00S03544.1hy +++| 03900 M00S03545.1hy +++| CCP SUBR ENTRY/EXIT 03901 M00S03546.1hy +++| LDK NCPL 03902 M00S03547.1hy +++| CRD CM GET NUMBER OF CONTROL POINTS 03903 M00S03548.1hy +++| AOD CM+1 03904 M00S03549.1hy +++| SHN 7 03905 M00S03550.1hy +++| LMD CP 03906 M00S03551.1hy +++| ZJN CCPX IF DRIVER AT SYSTEM CP 03907 M00S03552.1hy +++| LDC CCPA 03908 M00S03553.1hy +++| RJM DFM ISSUE DAYFILE MESSAGE 03909 M00S03554.1hy +++| MONITOR ABTM 03910 M00S03555.1hy +++| LJM PPR EXIT TO PP RESIDENT 03911 M00S03556.1hy +++| 03912 M00S03557.1hy +++| 03913 M00S03558.1hy +++| CCPA DATA C* 1HY - UNAUTHORIZED CALL.* 03914 M00S03559.1hy +++| IST SPACE 4,15 03915 M00S03560.1hy +++|** IST - INITIALIZE DEVICE STATE TABLE. 03916 M00S03561.1hy +++|* 03917 M00S03562.1hy +++|* ENTRY (PO) = 0. 03918 M00S03563.1hy +++|* (RC) = NUMBER OF ENTRIES IN *PUT*. 03919 M00S03564.1hy +++|* 03920 M00S03565.1hy +++|* EXIT (A) = 0 IF NO DEVICES FOR THIS DRIVER. 03921 M00S03566.1hy +++|* 03922 M00S03567.1hy +++|* USES DI, PO, CM - CM+4. 03923 M00S03568.1hy +++|* 03924 M00S03569.1hy +++|* MACROS PUTE, SFA. 03925 M00S03570.1hy +++| 03926 M00S03571.1hy +++| 03927 M00S03572.1hy +++| IST6 LDD DI DEFINE END OF DEVICES 03928 M00S03573.1hy +++| STM HYDA 03929 M00S03574.1hy +++| LMC DSTB SET EXIT CONDITION 03930 M00S03575.1hy +++| 03931 M00S03576.1hy +++| IST SUBR ENTRY/EXIT 03932 M00S03577.1hy +++| LDC DSTBL-1 03933 M00S03578.1hy +++| STD DI 03934 M00S03579.1hy +++| IST1 LDN 0 CLEAR DEVICE STATE TABLE 03935 M00S03580.1hy +++| STI DI 03936 M00S03581.1hy +++| SOD DI 03937 M00S03582.1hy +++| LMC DSTB 03938 M00S03583.1hy +++| NJN IST1 IF MORE TO CLEAR 03939 M00S03584.1hy +++| IST2 AOD PO 03940 M00S03585.1hy +++| LMD RC 03941 M00S03586.1hy +++| ZJN IST6 IF END OF PHYSICAL UNIT TABLE 03942 M00S03587.1hy +++| LDD PO 03943 M00S03588.1hy +++| SHN PUTLS READ *PUT* ENTRY 03944 M00S03589.1hy +++| PUTE * 03945 M00S03590.1hy +++| ADC UNCT GET UNIT CONTROL WORD 03946 M00S03591.1hy +++| CRD CM 03947 M00S03592.1hy +++| SFA EST,CM+1 FETCH EST ENTRY 03948 M00S03593.1hy +++| ADK EQDE 03949 M00S03594.1hy +++| CRD CM 03950 M00S03595.1hy +++| LDN CM INITIALIZE CHANNEL BYTE ADDRESS 03951 M00S03596.1hy +++| STD CM 03952 M00S03597.1hy +++| IST3 AOD CM ADVANCE PATH DESCRIPTOR ADDRESS 03953 M00S03598.1hy +++| LMN CM+3 03954 M00S03599.1hy +++| ZJN IST2 IF TWO POSSIBLE CHANNELS CHECKED 03955 M00S03600.1hy +++| LDI CM 03956 M00S03601.1hy +++| ZJN IST3 IF NULL ACCESS 03957 M00S03602.1hy +++| LMD IR+4 03958 M00S03603.1hy +++| LPN 77 03959 M00S03604.1hy +++| IST4 NJN IST3 IF NOT THIS DRIVERS CHANNEL 03960 M00S03605.1hy +++| 03961 M00S03606.1hy +++| IST5 LDD PO SET *PUT* ORDINAL IN STATE TABLE 03962 M00S03607.1hy +++| STI DI 03963 M00S03608.1hy +++| ERRNZ PUTO CODE DEPENDS ON VALUE 03964 M00S03609.1hy +++| LDI CM 03965 M00S03610.1hy +++| LPC 200 SET PORT SELECT IN CONTROL REGISTER 03966 M00S03611.1hy +++| SHN 16-7
| Line S03612 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 03967 M01S03612.ns2769 ---| STML CREG
| Line S00136 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 03968 M01S00136.ns2769 +++| STML CREG,DI 03969 M00S03613.1hy +++| LDN DSTBE ADVANCE STATE TABLE ADDRESS 03970 M00S03614.1hy +++| RAD DI 03971 M00S03615.1hy +++| LMC DSTBL 03972 M00S03616.1hy +++| NJN IST4 IF NOT AT BLOCK LIMIT 03973 M00S03617.1hy +++| LJM IST6 SET INITIAL STATE TABLE ADDRESS 03974 M00S03618.1hy +++| MCI SPACE 4,10 03975 M00S03619.1hy +++|** MCI - MODIFY CHANNEL INSTRUCTIONS. 03976 M00S03620.1hy +++|* 03977 M00S03621.1hy +++|* ENTRY (IR+4) = CONCURRENT CHANNEL NUMBER. 03978 M00S03622.1hy +++|* 03979 M00S03623.1hy +++|* EXIT (A) = 0. 03980 M00S03624.1hy +++|* 03981 M00S03625.1hy +++|* USES T1, T2. 03982 M00S03626.1hy +++| 03983 M00S03627.1hy +++| 03984 M00S03628.1hy +++| MCI1 RAIL T2 MODIFY CHANNEL INSTRUCTION 03985 M00S03629.1hy +++| AOD T1 03986 M00S03630.1hy +++| MCI2 LDM TCHA,T1 EXTRACT NEXT ADDRESS 03987 M00S03631.1hy +++| STD T2 03988 M00S03632.1hy +++| LDD T0 CHECK END OF LIST 03989 M00S03633.1hy +++| CHTL * 03990 M00S03634.1hy +++| SBN CH 03991 M00S03635.1hy +++| NJN MCI1 IF MORE INSTRUCTIONS TO MODIFY 03992 M00S03636.1hy +++| 03993 M00S03637.1hy +++| MCI SUBR ENTRY/EXIT 03994 M00S03638.1hy +++| LDD IR+4 03995 M00S03639.1hy +++| LPN 37 EXTRACT CHANNEL NUMBER 03996 M00S03640.1hy +++| STD T0 03997 M00S03641.1hy +++| LDN 0 INITIALIZE REMOTE TABLE INDEX 03998 M00S03642.1hy +++| STD T1 03999 M00S03643.1hy +++| UJN MCI2 ENTER LOOP 04000 M00S03644.1hy +++| TCHA SPACE 4,10 04001 M00S03645.1hy +++|** TABLE OF CHANNEL INSTRUCTIONS ADDRESSES. 04002 M00S03646.1hy +++| 04003 M00S03647.1hy +++| 04004 M00S03648.1hy +++| TCHA CHTB 04005 M00S03649.1hy +++| RSTC RESTORE CHANNEL INSTRUCTIONS 04006 M00S03650.1hy +++| TCBT SPACE 4,10 04007 M00S03651.1hy +++|** TABLE OF INSTRUCTIONS REQUIRING FWA OF *CBT*. 04008 M00S03652.1hy +++| 04009 M00S03653.1hy +++| 04010 M00S03654.1hy +++| TCBT BSS 0 04011 M00S03655.1hy +++| TCBT HERE 04012 M00S03656.1hy +++| CON 0 TERMINATE TABLE 04013 M00S03657.1hy +++| TCCT SPACE 4,10 04014 M00S03658.1hy +++|** TABLE OF INSTRUCTIONS REQUIRING ADDRESS OF *CCT* ENTRY. 04015 M00S03659.1hy +++| 04016 M00S03660.1hy +++| 04017 M00S03661.1hy +++| TCCT BSS 0 04018 M00S03662.1hy +++| TCCT HERE 04019 M00S03663.1hy +++| CON 0 TERMINATE TABLE 04020 M00S03664.1hy +++| TCHT SPACE 4,10 04021 M00S03665.1hy +++|** TABLE OF INSTRUCTIONS REQUIRING FWA OF CHANNEL TABLE. 04022 M00S03666.1hy +++| 04023 M00S03667.1hy +++| 04024 M00S03668.1hy +++| TCHT BSS 0 04025 M00S03669.1hy +++| TCHT HERE 04026 M00S03670.1hy +++| CON 0 TERMINATE TABLE 04027 M00S03671.1hy +++| TEMB SPACE 4,10 04028 M00S03672.1hy +++|** TABLE OF INSTRUCTIONS REQUIRING FWA OF *EMB*. 04029 M00S03673.1hy +++| 04030 M00S03674.1hy +++| 04031 M00S03675.1hy +++| TEMB BSS 0
| Line S00137 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 04032 M01S00137.ns2769 +++| QUAL COMPIMB 04033 M00S03676.1hy +++| TEMB HERE
| Line S00138 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 04034 M01S00138.ns2769 +++| QUAL * 04035 M00S03677.1hy +++| CON 0 TERMINATE TABLE 04036 M00S03678.1hy +++| TEXP SPACE 4,10 04037 M00S03679.1hy +++|** TABLE OF INSTRUCTIONS REQUIRING FWA OF PP EXCHANGE PACKAGE. 04038 M00S03680.1hy +++| 04039 M00S03681.1hy +++| 04040 M00S03682.1hy +++| TEXP BSS 0 04041 M00S03683.1hy +++| TEXP HERE 04042 M00S03684.1hy +++| CON 0 TERMINATE TABLE 04043 M00S03685.1hy +++| TFTT SPACE 4,10 04044 M00S03686.1hy +++|** TABLE OF INSTRUCTIONS REQUIRING FWA OF *FTT*. 04045 M00S03687.1hy +++| 04046 M00S03688.1hy +++| 04047 M00S03689.1hy +++| TFTT BSS 0 04048 M00S03690.1hy +++| TFTT HERE 04049 M00S03691.1hy +++| CON 0 TERMINATE TABLE 04050 M00S03692.1hy +++| TPUT SPACE 4,10 04051 M00S03693.1hy +++|** TABLE OF INSTRUCTIONS REQUIRING FWA OF *PUT*. 04052 M00S03694.1hy +++| 04053 M00S03695.1hy +++| 04054 M00S03696.1hy +++| TPUT BSS 0 04055 M00S03697.1hy +++| TPUT HERE 04056 M00S03698.1hy +++| CON 0 TERMINATE TABLE 04057 M00S03699.1hy +++| SPACE 4,10 04058 M00S03700.1hy +++| ERRPL *-10000 CODE DEPENDS ON VALUE 04059 M00S03701.1hy +++| PRS SPACE 4,20 04060 M00S03702.1hy +++|** PRS - PRESET *1HY* FOR PROCESSING. 04061 M00S03703.1hy +++|* 04062 M00S03704.1hy +++|* EXIT (UC) = 0. 04063 M00S03705.1hy +++|* 04064 M00S03706.1hy +++|* CALLS CCP, CCR, MCI, IST, PCT, RCR, SPA, STA. 04065 M00S03707.1hy +++| 04066 M00S03708.1hy +++| 04067 M00S03709.1hy +++| PRS RJM CCP CHECK CALLING PROGRAM 04068 M00S03710.1hy +++|* LDN 0 04069 M00S03711.1hy +++| STD UC SET NO UNITS RESERVED 04070 M00S03712.1hy +++| STD PO 04071 M00S03713.1hy +++| RJM MCI MODIFY CHANNEL INSTRUCTIONS 04072 M00S03714.1hy +++| STD CR 04073 M00S03715.1hy +++| RJM SPA SET PP EXCHANGE PACKAGE ADDRESSES 04074 M00S03716.1hy +++| PRS1 RJM SCT SET CHANNEL TABLE ADDRESSES 04075 M00S03717.1hy +++| LDK BIOL 04076 M00S03718.1hy +++| CRD CM READ BUFFERED I/O POINTERS 04077 M00S03719.1hy +++| LDD CM+1 04078 M00S03720.1hy +++| SHN 14 04079 M00S03721.1hy +++| LMD CM+2 04080 M00S03722.1hy +++| ADN FTTP READ *FTT* POINTER 04081 M00S03723.1hy +++| CRD T6 04082 M00S03724.1hy +++| SBN FTTP-CCTP READ *CCT* POINTER 04083 M00S03725.1hy +++| CRD T4 04084 M00S03726.1hy +++| ADN PUTP-CCTP READ *PUT* POINTER 04085 M00S03727.1hy +++| CRD T2 04086 M00S03728.1hy +++| ADN CBTP-PUTP READ *CBT* POINTER 04087 M00S03729.1hy +++| CRD WB 04088 M00S03730.1hy +++| AOD T2 SET NUMBER OF *PUT* ENTRIES 04089 M00S03731.1hy +++| STD RC 04090 M00S03732.1hy +++| LDC T5*10000+TPUT SET *PUT* ADDRESSES 04091 M00S03733.1hy +++| RJM STA 04092 M00S03734.1hy +++| LDD IR+2 ADJUST CHANNEL CONTROL TABLE POINTER 04093 M00S03735.1hy +++| SHN CCTLS-6 04094 M00S03736.1hy +++| RAD CM 04095 M00S03737.1hy +++| SHN -14 04096 M00S03738.1hy +++| RAD T7 04097 M00S03739.1hy +++| LDC T7*10000+TCCT SET *CCT* ADDRESSES 04098 M00S03740.1hy +++| RJM STA 04099 M00S03741.1hy +++| .CM1 EQU CM+1 04100 M00S03742.1hy +++| LDC .CM1*10000+TFTT SET *FTT* ADDRESSES 04101 M00S03743.1hy +++| RJM STA 04102 M00S03744.1hy +++| .WB3 EQU WB+3 04103 M00S03745.1hy +++| LDC .WB3*10000+TCBT SET *CBT* ADDRESSES 04104 M00S03746.1hy +++| RJM STA 04105 M00S03747.1hy +++| LDN EMBP FETCH *EMB* POINTER 04106 M00S03748.1hy +++| CRD CM 04107 M00S03749.1hy +++| LDC .CM1*10000+TEMB SET *EMB* ADDRESSES 04108 M00S03750.1hy +++| RJM STA 04109 M00S03751.1hy +++| LDK UEML 04110 M00S03752.1hy +++| CRD CM READ UEM POINTERS 04111 M00S03753.1hy +++| LDD CM 04112 M00S03754.1hy +++| PRSA SHN 11 04113 M00S03755.1hy +++|* SHN 11+EMSC 04114 M00S03756.1hy +++| SCN 77 04115 M00S03757.1hy +++| STM SUAA SET FWA OF UEM 04116 M00S03758.1hy +++| LDD CM 04117 M00S03759.1hy +++| PRSB SHN -3 04118 M00S03760.1hy +++|* SHN EMSC-3 04119 M00S03761.1hy +++| STM SUAB 04120 M00S03762.1hy +++| LDK MMFL FETCH MACHINE ID 04121 M00S03763.1hy +++| CRD CM 04122 M00S03764.1hy +++| LDD CM SET MAINFRAME ID FOR BML MESSAGES 04123 M00S03765.1hy +++| STM MFID 04124 M00S03766.1hy +++| LDC PRS3 SET RETURN ADDRESS 04125 M00S03767.1hy +++| STM CCR 04126 M00S03768.1hy +++| RJM IST INITIALIZE DEVICE STATE TABLE 04127 M00S03769.1hy +++| ZJN PRS4 IF NO DEVICES FOR THIS DRIVER 04128 M00S03770.1hy +++| LDN 0 CLEAR RESIDUAL BYTE COUNT 04129 M00S03771.1hy +++| STM RBCT 04130 M00S03772.1hy +++| LJM CCR2 RESERVE CHANNEL 04131 M00S03773.1hy +++| 04132 M00S03774.1hy +++| PRS3 NJP RCR+1 IF CHANNEL NOT DOWN 04133 M00S03775.1hy +++| PRS4 LJM HYD8 DROP CPP 04134 M00S03776.1hy +++| SCT SPACE 4,10 04135 M00S03777.1hy +++|** SCT - SET CHANNEL TABLE ENTRY ADDRESSES. 04136 M00S03778.1hy +++|* 04137 M00S03779.1hy +++|* ENTRY (IR+4) = CHANNEL NUMBER. 04138 M00S03780.1hy +++|* 04139 M00S03781.1hy +++|* USES T1, T2, CM - CM+4. 04140 M00S03782.1hy +++|* 04141 M00S03783.1hy +++|* CALLS STA. 04142 M00S03784.1hy +++| 04143 M00S03785.1hy +++| 04144 M00S03786.1hy +++| SCT SUBR ENTRY/EXIT 04145 M00S03787.1hy +++| LDD IR+4 04146 M00S03788.1hy +++| STD T1 SET CHANNEL NUMBER 04147 M00S03789.1hy +++| STM RCSA+3 04148 M00S03790.1hy +++| RAM BMLM+2 04149 M00S03791.1hy +++|* SHN 6 SAVE RECOVERY CHANNEL FOR *BML* 04150 M00S03792.1hy +++|* STM BMLM+7 04151 M00S03793.1hy +++| LCN 0 WORD OFFSET 04152 M00S03794.1hy +++| STD T2 04153 M00S03795.1hy +++| SCT1 AOD T2 INCREMENT WORD OFFSET 04154 M00S03796.1hy +++| LCN 5 04155 M00S03797.1hy +++| RAD T1 04156 M00S03798.1hy +++| PJN SCT1 IF CHANNEL NOT IN THIS WORD 04157 M00S03799.1hy +++| ADN 5 04158 M00S03800.1hy +++| STD T1 04159 M00S03801.1hy +++| RAM RCTA SET BYTE OFFSET 04160 M00S03802.1hy +++| LDD T1 04161 M00S03803.1hy +++| SHN 1 BYTE OFFSET * 2 04162 M00S03804.1hy +++| ADD T1 BYTE OFFSET * 3 04163 M00S03805.1hy +++| SHN 2 BYTE OFFSET * 12 04164 M00S03806.1hy +++| SBN 59D (BYTE OFFSET * 12) - 59 04165 M00S03807.1hy +++| LMC -0 59 - (BYTE OFFSET * 12) 04166 M00S03808.1hy +++| SBN 2 04167 M00S03809.1hy +++| SHN 6 04168 M00S03810.1hy +++| STM SRFA+1 SET DRIVER FLAG BIT POSITION 04169 M00S03811.1hy +++| LDK CHTP 04170 M00S03812.1hy +++| CRD CM 04171 M00S03813.1hy +++| LDD T2 SET ADDRESS OF WORD IN CHANNEL TABLE 04172 M00S03814.1hy +++| RAD CM+3 04173 M00S03815.1hy +++| SHN -14 04174 M00S03816.1hy +++| RAD CM+2 04175 M00S03817.1hy +++| .CM2 EQU CM+2 04176 M00S03818.1hy +++| LDC .CM2*10000+TCHT SET CHANNEL TABLE ADDRESSES 04177 M00S03819.1hy +++| RJM STA 04178 M00S03820.1hy +++| LJM SCTX RETURN 04179 M00S03821.1hy +++| SPA SPACE 4,10 04180 M00S03822.1hy +++|** SPA - SET PP EXCHANGE PACKAGE ADDRESSES. 04181 M00S03823.1hy +++|* 04182 M00S03824.1hy +++|* USES T1 - T5, CM - CM+4. 04183 M00S03825.1hy +++|* 04184 M00S03826.1hy +++|* CALLS STA. 04185 M00S03827.1hy +++| 04186 M00S03828.1hy +++| 04187 M00S03829.1hy +++| SPA SUBR ENTRY/EXIT 04188 M00S03830.1hy +++| LDN PXPP 04189 M00S03831.1hy +++| CRD CM FETCH FWA OF PP EXCHANGE PACKAGE AREA 04190 M00S03832.1hy +++| ADN 1 04191 M00S03833.1hy +++| CRM AMEA,ON SET FIRST WORD OF PP EXCHANGE PACKAGE 04192 M00S03834.1hy +++| ADN PPCP-PXPP-2 04193 M00S03835.1hy +++| CRD T1 READ PP COMMUNICATION AREA POINTER 04194 M00S03836.1hy +++| LDD IA 04195 M00S03837.1hy +++| STM AMEA+4 SET (B0) NON-ZERO FOR EXCHANGE TEST 04196 M00S03838.1hy +++| SBD T1+4 04197 M00S03839.1hy +++| SHN -3 (A) = CPP NUMBER 04198 M00S03840.1hy +++| SBN 24 04199 M00S03841.1hy +++| SHN 6 04200 M00S03842.1hy +++| STM BMLM+2 INSERT CPP NUMBER IN BML MESSAGE 04201 M00S03843.1hy +++| SHN -6 04202 M00S03844.1hy +++| ADN 24-2 04203 M00S03845.1hy +++| STD T1 CPP NUMBER - 2 04204 M00S03846.1hy +++| SHN 4 04205 M00S03847.1hy +++| ADD T1 (CPP NUMBER - 2) * 21B 04206 M00S03848.1hy +++| RAD CM+4 04207 M00S03849.1hy +++| SHN -14 04208 M00S03850.1hy +++| RAD CM+3 04209 M00S03851.1hy +++| .CM3 EQU CM+3 04210 M00S03852.1hy +++| LDC .CM3*10000+TEXP SET EXCHANGE PACKAGE ADDRESSES 04211 M00S03853.1hy +++| RJM STA 04212 M00S03854.1hy +++| LJM SPAX RETURN 04213 M00S03855.1hy +++| STA SPACE 4,10
| Line S03856 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 04214 M01S03856.ns2769 ---|** STA - SET BUFFERED DEVICE TABLE ADDRESSES.
| Line S00139 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 04215 M01S00139.ns2769 +++|** STA - SET TABLE ADDRESSES. 04216 M00S03857.1hy +++|* 04217 M00S03858.1hy +++|* ENTRY (A) = 6/ TP, 12/ TA
| Line S03859 Modification History | |
|---|---|
M01 (Removed by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 04218 M01S03859.ns2769 ---|* TP = BUFFERED DEVICE TABLE POINTER.
| Line S00140 Modification History | |
|---|---|
M01 (Added by) | ns2769 |
Seq # *Modification Id* Act ----------------------------+ 04219 M01S00140.ns2769 +++|* TP = TABLE POINTER. 04220 M00S03860.1hy +++|* TA = INSTRUCTION TABLE ADDRESS. 04221 M00S03861.1hy +++|* 04222 M00S03862.1hy +++|* EXIT (A) = 0. 04223 M00S03863.1hy +++|* 04224 M00S03864.1hy +++|* USES T1, T2, T3. 04225 M00S03865.1hy +++| 04226 M00S03866.1hy +++| 04227 M00S03867.1hy +++| STA1 STD T2 SET INSTRUCTION ADDRESS 04228 M00S03868.1hy +++| LDM 1,T1 04229 M00S03869.1hy +++| RAM 1,T2 SET LOWER 12 BITS OF ADDRESS 04230 M00S03870.1hy +++| SHN -14 04231 M00S03871.1hy +++| ADI T1 SET UPPER 6 BITS OF ADDRESS
| Line S00089 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 04232 M01S00089.271l716 +++| LPN 37 04233 M00S03872.1hy +++| RAI T2 04234 M00S03873.1hy +++| AOD T3 ADVANCE INSTRUCTION LIST 04235 M00S03874.1hy +++| STA2 LDI T3 04236 M00S03875.1hy +++| NJN STA1 IF NOT END OF TABLE 04237 M00S03876.1hy +++| 04238 M00S03877.1hy +++| STA SUBR ENTRY/EXIT 04239 M00S03878.1hy +++| STD T3 04240 M00S03879.1hy +++| SHN -14 SET ADDRESS POINTER 04241 M00S03880.1hy +++| STD T1 04242 M00S03881.1hy +++| UJN STA2 ENTER LOOP 04243 M00S03882.1hy +++| 04244 M00S03883.1hy +++|
| Line S03884 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 04245 M01S03884.271l716 ---| OVERFLOW OHYD
| Line S00090 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 04246 M01S00090.271l716 +++| OVERFLOW OHYD,20000 04247 M00S03885.1hy +++| 04248 M00S03886.1hy +++| END
cdc/nos2.source/opl.opl871/deck/1hy.002.txt · Last modified: by 127.0.0.1