cdc:nos2.source:opl.opl871:deck:1mt.012
Deck 1MT Part 012
92 Modifications
Listing Sections
- Deck 1MT Start
- Deck 1MT Part 1 (Line 1462)
- Deck 1MT Part 2 (Line 2674)
- Deck 1MT Part 3 (Line 4017)
- Deck 1MT Part 4 (Line 5073)
- Deck 1MT Part 5 (Line 6369)
- Deck 1MT Part 6 (Line 7796)
- Deck 1MT Part 7 (Line 9269)
- Deck 1MT Part 8 (Line 10478)
- Deck 1MT Part 9 (Line 11579)
- Deck 1MT Part 10 (Line 12640)
- Deck 1MT Part 11 (Line 13801)
- Deck 1MT Part 12 (Line 15216)
- Deck 1MT Part 13 (Line 16607)
- Deck 1MT Part 14 (Line 18062)
- Deck 1MT Part 15 (Line 19541)
- Deck 1MT Part 16 (Line 20933)
- Deck 1MT Part 17 (Line 22793)
- Deck 1MT Part 18 (Line 24082)
- Deck 1MT Part 19 (Line 25232)
- Deck 1MT Part 20 (Line 26664)
- Deck 1MT Part 21 (Line 28010)
- Deck 1MT Part 22 (Line 28907)
- Deck 1MT Part 23 (Line 30276)
- Deck 1MT Part 24 (Line 31850)
- Deck 1MT Part 25 (Line 33112)
- Deck 1MT Part 26 (Line 34430)
- Deck 1MT Part 27 (Line 35774)
- Deck 1MT Part 28 (Line 37108)
Source
Seq # *Modification Id* Act ----------------------------+ 15216 M01S00002.1mt48 +++| CON /SKP/IDFE
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | 1mt41 |
Seq # *Modification Id* Act ----------------------------+ 15217 M01S00013.1mt41 +++| RCT6.1 ACN CH
| Line S02936 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15218 M01S02936.274l797 +++| LJM RCT1 READ THE DATA AGAIN 15219 M01S02937.274l797 +++| 15220 M01S02938.274l797 +++| RCT7 RJM /RLB/CRA READ *1LT* INTERFACE WORD 15221 M01S02939.274l797 +++| NJN RCT7 IF *1LT* TRANSFER TO CM NOT COMPLETE 15222 M01S02940.274l797 +++| ACN CH 15223 M01S02941.274l797 +++| LDM /RLB/BCWC BACK UP POINTERS 15224 M01S02942.274l797 +++| STD CN+3 15225 M01S02943.274l797 +++| LDM /RLB/BCWD 15226 M01S02944.274l797 +++| STD CN+4 15227 M01S02945.274l797 +++| LJM /RLB/CLB1 RESEND THE DATA 15228 M01S02946.274l797 +++| 15229 M01S02947.274l797 +++| RCT8 STM RCTH 15230 M01S02948.274l797 +++| LDD FN 15231 M01S02949.274l797 +++| LMN /MTX/RDF 15232 M01S02950.274l797 +++| NJN RCT10 IF NOT READ 15233 M01S02951.274l797 +++| LDD MD 15234 M01S02952.274l797 +++| SHN 21-6 15235 M01S02953.274l797 +++| PJN RCT10 IF NOT CODED 15236 M01S02954.274l797 +++| LDD BY 15237 M01S02955.274l797 +++| ZJN RCT10 IF NO DATA READ 15238 M01S02956.274l797 +++| LMN CLBL 15239 M01S02957.274l797 +++| NJN RCT9 IF BLOCK TOO SHORT 15240 M01S02958.274l797 +++| LDC LPNI 15241 M01S02959.274l797 +++| STM RCTI TO INDICATE NO FILL STATUS 15242 M01S02960.274l797 +++| CALL CCL CODE CONVERT LABEL 15243 M01S02961.274l797 +++| LDN LABL LABEL LENGTH AFTER CONVERSION 15244 M01S02962.274l797 +++| STD BY 15245 M01S02963.274l797 +++| LDD DS 15246 M01S02964.274l797 +++| LPN 40 15247 M01S02965.274l797 +++| NJN RCT10 IF FILL STATUS 15248 M01S02966.274l797 +++| RCT9 LDN /MTX/BTL BLOCK LENGTH ERROR 15249 M01S02967.274l797 +++| STD EC 15250 M01S02968.274l797 +++| RCT10 LDD BY 15251 M01S02969.274l797 +++| ZJN RCT11 IF NO DATA READ 15252 M01S02970.274l797 +++| SBN 2 I FORMAT 15253 M01S02971.274l797 +++| RCTE EQU *-1 15254 M01S02972.274l797 +++|* PSN (SI FORMAT) 15255 M01S02973.274l797 +++|* ADN 4 (ALL OTHER FORMATS) 15256 M01S02974.274l797 +++| STD T2 15257 M01S02975.274l797 +++| 15258 M01S02976.274l797 +++|* CALCULATE WORD COUNT. 15259 M01S02977.274l797 +++| 15260 M01S02978.274l797 +++| SHN 1 13*BYTES 15261 M01S02979.274l797 +++| ADD T2 15262 M01S02980.274l797 +++| SHN 2 15263 M01S02981.274l797 +++| ADD T2 15264 M01S02982.274l797 +++| SHN 14 (-6) (13*BYTES)/64 15265 M01S02983.274l797 +++| STD T0 15266 M01S02984.274l797 +++| SHN 6+2 4*13*BYTES (52*BYTES) 15267 M01S02985.274l797 +++| SBD T2 51*BYTES 15268 M01S02986.274l797 +++| ADD T0 (51*BYTES)+((13*BYTES)/64) 15269 M01S02987.274l797 +++| SHN -8D WORDS = ((51*BYTES)+((13*BYTES)/64))/256 15270 M01S02988.274l797 +++| RCT11 STD WC 15271 M01S02989.274l797 +++| LPN 1 15272 M01S02990.274l797 +++| UJN RCT12 CHECK AND CONVERT DATA (CODED) 15273 M01S02991.274l797 +++| RCTF EQU *-1 15274 M01S02992.274l797 +++|* ZJN RCT12 (I FORMAT) 15275 M01S02993.274l797 +++| SOD BY 15276 M01S02994.274l797 +++| 15277 M01S02995.274l797 +++|* CHECK AND CONVERT DATA. 15278 M01S02996.274l797 +++| 15279 M01S02997.274l797 +++| RCT12 RJM VDA VALIDATE DATA (I FORMAT) 15280 M01S02998.274l797 +++| RCTG EQU *-2 15281 M01S02999.274l797 +++|* UJN *+2 ALL OTHER FORMATS 15282 M01S03000.274l797 +++| RJM CDO CHECK DROP OUT FLAG 15283 M01S03001.274l797 +++| LDC * ERROR STATUS FROM *WFE* 15284 M01S03002.274l797 +++| RCTH EQU *-1 15285 M01S03003.274l797 +++| RCT13 ZJN RCT15 IF NO ERROR 15286 M01S03004.274l797 +++| SHN 21-4 15287 M01S03005.274l797 +++| PJN RCT14 IF NOT TAPE MARK 15288 M01S03006.274l797 +++| LDN 3 SET STOP TO EOI 15289 M01S03007.274l797 +++| STD TB 15290 M01S03008.274l797 +++| LDN 17 SET LEVEL NUMBER 15291 M01S03009.274l797 +++| STM LNUM 15292 M01S03010.274l797 +++| LDN 0 CLEAR WORD AND BYTE COUNTS 15293 M01S03011.274l797 +++| STD ES 15294 M01S03012.274l797 +++| STD WC 15295 M01S03013.274l797 +++| STD BY 15296 M01S03014.274l797 +++| LDN /MTX/BEI SET EOI 15297 M01S03015.274l797 +++| STD EC 15298 M01S03016.274l797 +++| UJN RCT16 PROCESS DATA 15299 M01S03017.274l797 +++| 15300 M01S03018.274l797 +++| RCT14 LDN /MTX/STE 15301 M01S03019.274l797 +++| STD EC STATUS ERROR 15302 M01S03020.274l797 +++| RCT15 LDD DS 15303 M01S03021.274l797 +++| LPN 40 15304 M01S03022.274l797 +++| RCTI EQU *-1 15305 M01S03023.274l797 +++|* LPN 0 S FORMAT READ 15306 M01S03024.274l797 +++| STD ES 15307 M01S03025.274l797 +++| UJN RCT16 SET FET+6 ADDRESS 15308 M01S03026.274l797 +++| RCTJ EQU *-1 15309 M01S03027.274l797 +++|* ZJN RCT16 IF NO FILL STATUS (I FORMAT) 15310 M01S03028.274l797 +++| LDN /MTX/STE 15311 M01S03029.274l797 +++| STD EC STATUS ERROR 15312 M01S03030.274l797 +++|* SADT .FE,,6,A 15313 M01S03031.274l797 +++| RCT16 LDC * SET FET+6 ADDRESS (FOR BCW) 15314 M01S03032.274l797 +++| RCTK EQU *-2 15315 M01S03033.274l797 +++| RJM PDA PROCESS DATA (I AND SI FORMAT) 15316 M01S03034.274l797 +++| RCTL EQU *-2 15317 M01S03035.274l797 +++|* RJM BCW BUILD CONTROL WORD (S AND SOME F) 15318 M01S03036.274l797 +++|* RJM /3M /BCW (L FORMAT AND LONG BLOCKS IN F FORMAT) 15319 M01S03037.274l797 +++|* UJN RCT17 (NOT READ DATA) 15320 M01S03038.274l797 +++| ERRNZ MRD18-MRDO-RCT17+RCTL IF MODIFYING WRONG ADDRESS 15321 M01S03039.274l797 +++| RCT17 LJM RCTX RETURN 15322 M01S03040.274l797 +++| ERRMI OVLS-* 15323 M01S03041.274l797 +++| LOC *O 15324 M01S03042.274l797 +++| .RCTL EQU *-.RCT LENGTH OF *RCT* 15325 M01S03043.274l797 +++| 15326 M01S03044.274l797 +++|.RCTA CHTB CHANNEL TABLE 15327 M01S03045.274l797 +++| OVERLAY (READ LONG BLOCK PROCESSOR.),(BUFC+5),,RLB 15328 M00S09351.1mt +++| .IM SET 1 SET FOR ADDRESS MODIFICATION ON ERRORS 15329 M00S09352.1mt +++| RLB SPACE 4,10 15330 M00S09353.1mt +++|** RLB - READ LONG BLOCK. 15331 M00S09354.1mt +++|* 15332 M00S09355.1mt +++|* CALLS ADP, /READ/CIB, CRA, FCN, ITM, /READ/MRD, SRQ, 15333 M00S09356.1mt +++|* /READ/TDA, WDA. 15334 M00S09357.1mt +++|* 15335 M00S09358.1mt +++|* MACROS SADT. 15336 M00S09359.1mt +++| 15337 M00S09360.1mt +++| 15338 M00S09361.1mt +++| ENTRY RLB
| Line S09362 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15339 M01S09362.274l797 ---| 15340 M00S09363.1mt +++| RLB RJM /READ/CIB CHECK INPUT BUFFER 15341 M00S09364.1mt +++| SADT .BS,C 15342 M00S09365.1mt +++| ADC -* (-MAXIMUM BLOCK SIZE) 15343 M00S09366.1mt +++| RLBA PJN RLB1 IF ENOUGH ROOM IN BUFFER 15344 M00S09367.1mt +++|* UJN RLB1 READ SKIP 15345 M00S09368.1mt +++| LDN 1 15346 M00S09369.1mt +++| LJM RET SET FET COMPLETE 15347 M00S09370.1mt +++|
| Line S09371 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15348 M01S09371.274l797 ---| RLB1 LDD CN+3 SAVE STARTING POINTER IN POINTER
| Line S03046 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15349 M01S03046.274l797 +++| RLB1 LDD CN+3 SAVE STARTING IN POINTER 15350 M00S09372.1mt +++| STM BCWC 15351 M00S09373.1mt +++| LDD CN+4 15352 M00S09374.1mt +++| STM BCWD
| Line S03047 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15353 M01S03047.274l797 +++| 15354 M01S03048.274l797 +++|* THE FOLLOWING CODE IS OVERLAYED WITH *CLB* FOR CTS. 15355 M01S03049.274l797 +++| 15356 M00S09375.1mt +++| RLBB LDN 0 ALLOW FOR CONTROL WORDS 15357 M00S09376.1mt +++|* LDN 1 (200/260 READ CODE) 15358 M00S09377.1mt +++| RJM ADP 15359 M00S09378.1mt +++| LDN 0 15360 M00S09379.1mt +++| STM RLBH CLEAR SHUTDOWN ENABLED FLAG 15361 M00S09380.1mt +++| STM BCWA 15362 M00S09381.1mt +++| STM .BYC 15363 M00S09382.1mt +++| STD EC CLEAR ERROR CODE AND TERMINATION STATUS 15364 M00S09383.1mt +++| STD TB
| Line S09384 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15365 M01S09384.1mt51 ---| LDD HP 15366 M01S09385.1mt51 ---| SHN 21-5 15367 M01S09386.1mt51 ---| MJN RLB2 IF MTS CONTROLLER 15368 M01S09387.1mt51 ---| LDC NJNI+.RLB12-.RLBB
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15369 M01S00002.1mt51 +++| UJN RLB2 SET PCL 15370 M01S00003.1mt51 +++|* PSN (ATS NON-CYBER 180) 15371 M01S00004.1mt51 +++| RLBJ EQU *-1 15372 M01S00005.1mt51 +++| LDC NJNI+.RLB12-.RLBB RESET END-OF-BLOCK CHECK 15373 M00S09388.1mt +++| STM .RLBB 15374 M00S09389.1mt +++| RLB2 LDM /READ/RDFA SET PCL 15375 M00S09390.1mt +++| RLBC RJM FCN
| Line S09391 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15376 M01S09391.274l797 ---|* UJN *-2 (NORMAL CLIP LEVEL)
| Line S03050 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15377 M01S03050.274l797 +++|* UJN *+2 (NORMAL CLIP LEVEL) 15378 M00S09392.1mt +++| RJM ITM INITIATE TAPE MOTION 15379 M00S09393.1mt +++| LDN 0 SET UP POINTERS FOR *1LT* 15380 M00S09394.1mt +++| RJM ADP 15381 M00S09395.1mt +++| LDN 1 SEND REQUEST TO *1LT* 15382 M00S09396.1mt +++| RJM SRQ 15383 M00S09397.1mt +++| LDD DS SAVE DEVICE STATUS 15384 M00S09398.1mt +++| STM /READ/STAP
| Line S09399 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15385 M01S09399.1mt51 ---| LDC LBBY
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15386 M01S00006.1mt51 +++| LDC RLB5 SET EXIT ON END OF INPUT 15387 M01S00007.1mt51 +++|* LDC RLB4 (CYBER 180 IOU) 15388 M01S00008.1mt51 +++| RLBD EQU *-1 15389 M01S00009.1mt51 +++| STM /READ/MRDC 15390 M01S00010.1mt51 +++| LDC LBBY SET BYTE COUNT 15391 M00S09400.1mt +++| STM /READ/MRDA
| Line S09401 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15392 M01S09401.1mt51 ---| LDC RLB5 SET EXIT ON END OF INPUT
| Line S09402 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15393 M02S09402.1mt51 ---|* LDC RLB4 (CYBER 170-8X5)
| Line S00171 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15394 M02S00171.1mt51 ---|* LDC RLB4 (CYBER 170-815/825/835/855)
| Line S09403 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15395 M01S09403.1mt51 ---|* LJM .RLB11 (ATS CONTROLLER - INITIATE INPUT) 15396 M01S09404.1mt51 ---| RLBD EQU *-2 15397 M01S09405.1mt51 ---| STM /READ/MRDC 15398 M01S09406.1mt51 ---| RJM /READ/MRD READ TAPE
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15399 M01S00011.1mt51 +++| LJM RLB2.1 READ TAPE 15400 M01S00012.1mt51 +++|* LJM /READ/MRD3 (CYBER 180 - INITIATE INPUT) 15401 M01S00013.1mt51 +++|* LJM .RLB11 (ATS NON-CYBER 180 - INITIATE INPUT) 15402 M01S00014.1mt51 +++| RLBI EQU *-1 15403 M01S00015.1mt51 +++| 15404 M01S00016.1mt51 +++| RLB2.1 RJM /READ/MRD READ TAPE 15405 M01S00017.1mt51 +++| 15406 M01S00018.1mt51 +++|* RETURN FROM */READ/MRD*. 15407 M01S00019.1mt51 +++| 15408 M00S09407.1mt +++| RLB3 LDN 77 DELAY 15409 M00S09408.1mt +++| SBN 1 15410 M00S09409.1mt +++| NJN *-1 15411 M00S09410.1mt +++| RJM CRA SEE IF *1LT* PASSED CHUNK LENGTH
| Line S09411 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15412 M01S09411.274l797 ---| LMN 2 15413 M00S09412.1mt +++| NJN RLB3 IF *1LT* NOT DONE 15414 M00S09413.1mt +++| LJM RLB15 ACKNOWLEDGE *1LT* 15415 M00S09414.1mt +++|
| Line S09415 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15416 M01S09415.1mt51 ---|* ENTER HERE AT END OF INPUT OF A CHUNK OF DATA.
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15417 M01S00020.1mt51 +++|* CYBER 180 - ENTER HERE AT END OF INPUT OF A CHUNK OF DATA. 15418 M00S09416.1mt +++| 15419 M00S09417.1mt +++| RLB4 IJM RLB18,CH IF *1MT* FINISHED INPUT 15420 M00S09418.1mt +++| EJM RLB4,CH IF *1LT* NOT TAKING DATA YET 15421 M00S09419.1mt +++| CCF *,CH CLEAR CHANNEL FLAG
| Line S09420 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15422 M01S09420.274l797 ---| UJN RLB6 COUNT DATA TRANSFERED
| Line S03051 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15423 M01S03051.274l797 +++| UJN RLB6 COUNT DATA TRANSFERRED
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15424 M01S00021.1mt51 +++| 15425 M01S00022.1mt51 +++|* ATS NON-CYBER 180 - ENTER HERE AT END OF INPUT OF A CHUNK. 15426 M00S09421.1mt +++| 15427 M00S09422.1mt +++| RLB5 IJM RLB18,CH IF *1MT* FINISHED INPUT 15428 M00S09423.1mt +++| EJM RLB5,CH IF *1LT* NOT TAKING DATA YET 15429 M00S09424.1mt +++| RLB6 AOM .BYC COUNT CHUNK 15430 M00S09425.1mt +++| LMN 1 15431 M00S09426.1mt +++| ZJN RLB7 IF FIRST CHUNK 15432 M00S09427.1mt +++| LDC /MTX/LBWD ADVANCE FOR *1LT* DATA 15433 M00S09428.1mt +++| RJM ADP 15434 M00S09429.1mt +++| AOM .BYC COUNT CHUNK 15435 M00S09430.1mt +++| RLB7 LDC /MTX/LBWD ADVANCE FET POINTER 15436 M00S09431.1mt +++| RJM ADP 15437 M00S09432.1mt +++| RJM WDA WRITE DATA 15438 M00S09433.1mt +++| LDM .BYC 15439 M00S09434.1mt +++| ADN 1 15440 M00S09435.1mt +++| SBD OV 15441 M00S09436.1mt +++| MJN RLB9 IF MORE FULL CHUNKS TO INPUT 15442 M00S09437.1mt +++| STM RLBH SET SHUTDOWN ENABLED IF ODD CHUNK COUNT 15443 M00S09438.1mt +++| NJN RLB8 IF ODD CHUNK COUNT 15444 M00S09439.1mt +++| LDD WC 15445 M00S09440.1mt +++| SHN 2 15446 M00S09441.1mt +++| ADD WC 15447 M00S09442.1mt +++| RLB8 ADN 1 SET AMOUNT TO INPUT 15448 M00S09443.1mt +++| STM /READ/MRDA 15449 M00S09444.1mt +++| RLBE LDC /READ/MRDC+1 REENABLE SHUT DOWN
| Line S09445 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15450 M01S09445.1mt51 ---|* LDC UJNI+.RLB14-.RLBB (ATS CONTROLLER)
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15451 M01S00023.1mt51 +++|* LDC UJNI+.RLB14-.RLBB (ATS NON-CYBER 180) 15452 M00S09446.1mt +++| RLBF STM /READ/MRDC
| Line S09447 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15453 M01S09447.1mt51 ---|* STM .RLBB (ATS CONTROLLER)
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15454 M01S00024.1mt51 +++|* STM .RLBB (ATS NON-CYBER 180) 15455 M00S09448.1mt +++| RLBG LDM RLBH
| Line S09449 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15456 M01S09449.1mt51 ---|* UJN .RLB9 (ATS CONTROLLER)
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15457 M01S00025.1mt51 +++|* UJN .RLB9 (ATS NON-CYBER 180) 15458 M00S09450.1mt +++| NJN RLB12 IF *1LT* WILL FINISH INPUT 15459 M00S09451.1mt +++| LDM /READ/MRDA 15460 M00S09452.1mt +++| UJN RLB10 INPUT DATA 15461 M00S09453.1mt +++|
| Line S09454 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15462 M01S09454.1mt51 ---|* THE FOLLOWING CODE GETS OVERLAID BY ATS 15463 M01S09455.1mt51 ---|* INPUT LOOP IF ATS CONTROLLER.
| Line S09456 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15464 M02S09456.1mt51 ---|* OVERLAYED BY IOU CODE IF CYBER 170-8X5.
| Line S00172 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15465 M02S00172.1mt51 ---|* OVERLAYED BY IOU CODE IF CYBER 170-815/825/835/855.
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15466 M01S00026.1mt51 +++|* THE FOLLOWING CODE IS OVERLAID BY THE ATS INPUT LOOP IF ATS 15467 M01S00027.1mt51 +++|* ON A NON-CYBER 180, OR BY THE IOU INPUT LOOP ON A CYBER 180. 15468 M00S09457.1mt +++| 15469 M00S09458.1mt +++| .RLBA EQU * BEGINNING OF OVERLAID CODE 15470 M00S09459.1mt +++| 15471 M00S09460.1mt +++| RLB9 LDC LBBY SET TO INPUT FULL CHUNK 15472 M00S09461.1mt +++| RLB10 IJM RLB12,CH IF *1LT* FINISHED INPUT 15473 M00S09462.1mt +++| RLB11 EJM RLB10,CH IF *1LT* TAKING DATA 15474 M00S09463.1mt +++| EJM RLB10,CH IF *1LT* TAKING DATA 15475 M00S09464.1mt +++| EJM RLB10,CH IF *1LT* TAKING DATA 15476 M00S09465.1mt +++| EJM RLB10,CH IF *1LT* TAKING DATA 15477 M00S09466.1mt +++| FJM /READ/MRD3,CH IF TIME FOR *1MT* TO TAKE DATA 15478 M00S09467.1mt +++| UJN RLB11 WAIT FOR *1LT* TO COMPLETE 15479 M00S09468.1mt +++| BSS 7 PAD TO MAKE SAME LENGTH AS ATS INPUT LOOP 15480 M00S09469.1mt +++| 15481 M00S09470.1mt +++| .RLBAL EQU *-.RLBA LENGTH OF OVERLAID AREA 15482 M00S09471.1mt +++| 15483 M00S09472.1mt +++| RLB12 LDN 77 DELAY 15484 M00S09473.1mt +++| SBN 1 15485 M00S09474.1mt +++| NJN *-1 15486 M00S09475.1mt +++| RJM CRA SEE IF *1LT* PASSED CHUNK LENGTH
| Line S09476 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15487 M01S09476.274l797 ---| LMN 2 15488 M00S09477.1mt +++| NJN RLB12 IF *1LT* NOT DONE 15489 M00S09478.1mt +++| AOM BCWA SKIP UPDATE IN BCW 15490 M00S09479.1mt +++| LDC LBBY CALCULATE BYTES IN LAST CHUNK 15491 M00S09480.1mt +++| STM /READ/MRDA 15492 M00S09481.1mt +++| SBD CM+1 15493 M00S09482.1mt +++| STD T1 15494 M00S09483.1mt +++| LMC LBBY 15495 M00S09484.1mt +++| ZJN RLB13 IF *1LT* ENDED ON CHUNK BOUNDARY 15496 M00S09485.1mt +++| LDC 0 15497 M00S09486.1mt +++| RLBH EQU *-1 15498 M00S09487.1mt +++| ZJN RLB14 IF SHUTDOWN NOT ENABLED 15499 M00S09488.1mt +++| LDD WC SET BYTE COUNT ATTEMPTED TO READ 15500 M00S09489.1mt +++| SHN 2 15501 M00S09490.1mt +++| ADD WC 15502 M00S09491.1mt +++| ADN 1 15503 M00S09492.1mt +++| STM /READ/MRDA 15504 M00S09493.1mt +++| SBD CM+1 15505 M00S09494.1mt +++| LJM /READ/MRD4 DETERMINE IF BLOCK TOO LARGE 15506 M00S09495.1mt +++| 15507 M00S09496.1mt +++| RLB13 STD T1 15508 M00S09497.1mt +++| RLB14 LJM /READ/MRD6 EXIT 15509 M00S09498.1mt +++|
| Line S09499 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15510 M01S09499.274l797 ---|* PROCESSING CONTINUES HERE AFTER EXIT FROM RDT.
| Line S03052 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15511 M01S03052.274l797 +++|* PROCESSING CONTINUES HERE AFTER EXIT FROM MRD. 15512 M00S09500.1mt +++| 15513 M00S09501.1mt +++| RLB15 LDD MD 15514 M00S09502.1mt +++| LPN 40 15515 M00S09503.1mt +++| ZJN RLB16 IF NOT 200 READ CODE 15516 M00S09504.1mt +++| LDN 0 SET TRAILER CONTROL WORD 15517 M00S09505.1mt +++| STM BUFB 15518 M00S09506.1mt +++| LDN 1 15519 M00S09507.1mt +++| RJM ADP 15520 M00S09508.1mt +++| RJM WDA WRITE TRAILER CONTROL WORD 15521 M00S09509.1mt +++| RLB16 LDN 0 SET WORD COUNT 15522 M00S09510.1mt +++| STD WC 15523 M00S09511.1mt +++| STD CM ACKNOWLEDGE *1LT* 15524 M00S09512.1mt +++| LDM CPDA 15525 M00S09513.1mt +++| ADN 2 15526 M00S09514.1mt +++| CWD CM 15527 M00S09515.1mt +++| LDD TB 15528 M00S09516.1mt +++| LMN 3 15529 M00S09517.1mt +++| NJN RLB17 IF NOT TAPE MARK 15530 M00S09518.1mt +++| LDM BCWC BACK UP POINTERS 15531 M00S09519.1mt +++| STD CN+3 15532 M00S09520.1mt +++| LDM BCWD 15533 M00S09521.1mt +++| STD CN+4 15534 M00S09522.1mt +++| RLB17 RJM /READ/TDA 15535 M00S09523.1mt +++| LDM SRQB RESTORE STARTING WORD COUNT 15536 M00S09524.1mt +++| STD WC 15537 M00S09525.1mt +++| LJM RLB LOOP 15538 M00S09526.1mt +++| 15539 M00S09527.1mt +++| RLB18 LDN 20 DELAY 15540 M00S09528.1mt +++| SBN 1 15541 M00S09529.1mt +++| NJN *-1 IF MORE DELAY 15542 M00S09530.1mt +++| RJM CRA CHECK *1LT* COMPLETE
| Line S09531 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15543 M01S09531.274l797 ---| LMN 2 15544 M00S09532.1mt +++| NJN RLB18 IF *1LT* NOT COMPLETE 15545 M00S09533.1mt +++| LJM /READ/MRD6 PROCESS READ COMPLETION 15546 M00S09534.1mt +++| 15547 M00S09535.1mt +++| 15548 M00S09536.1mt +++| .BYC CON 0 CHUNKS INPUT OF *LBBY* BYTES 15549 M00S09537.1mt +++| TITLE SUBROUTINES. 15550 M00S09538.1mt +++| ADP SPACE 4,15 15551 M00S09539.1mt +++|** ADP - ADVANCE POINTER. 15552 M00S09540.1mt +++|* 15553 M00S09541.1mt +++|* ENTRY (CN+3 - CN+4) = IN POINTER. 15554 M00S09542.1mt +++|* (A) = WORDS TO INCREMENT IN BY. 15555 M00S09543.1mt +++|* 15556 M00S09544.1mt +++|* EXIT (T4 - T5) = STARTING IN POINTER. 15557 M00S09545.1mt +++|* (CN+3 - CN+4) = UPDATED IN POINTER. 15558 M00S09546.1mt +++|* (T6) = FIRST PART WORD COUNT. 15559 M00S09547.1mt +++|* (T7) = SECOND PART WORD COUNT. 15560 M00S09548.1mt +++|* 15561 M00S09549.1mt +++|* CALLS /READ/CIB. 15562 M00S09550.1mt +++|* 15563 M00S09551.1mt +++|* MACROS SADT. 15564 M00S09552.1mt +++| 15565 M00S09553.1mt +++| 15566 M00S09554.1mt +++| ADP SUBR ENTRY/EXIT 15567 M00S09555.1mt +++| STD T6 15568 M00S09556.1mt +++| RJM /READ/CIB CHECK INPUT BUFFER 15569 M00S09557.1mt +++| SBD T6 15570 M00S09558.1mt +++| PJN ADP1 IF ROOM IN BUFFER FOR BLOCK 15571 M00S09559.1mt +++| RAD T6 ADJUST WORD COUNT 15572 M00S09560.1mt +++| ADP1 LDD CN+3 SAVE IN 15573 M00S09561.1mt +++| STD T4 15574 M00S09562.1mt +++| LDD CN+4 15575 M00S09563.1mt +++| STD T5 15576 M00S09564.1mt +++| LDN 0 PRESET SECOND PART WORD COUNT 15577 M00S09565.1mt +++| STD T7 15578 M00S09566.1mt +++| LDD T6 UPDATE IN 15579 M00S09567.1mt +++| RAD CN+4 15580 M00S09568.1mt +++| SHN -14 15581 M00S09569.1mt +++| RAD CN+3 15582 M00S09570.1mt +++| SHN 14 15583 M00S09571.1mt +++| LMD CN+4 15584 M00S09572.1mt +++| SADT .LM,C 15585 M00S09573.1mt +++| ADC -* (-LIMIT) 15586 M00S09574.1mt +++| MJN ADPX IF NO WRAP AROUND 15587 M00S09575.1mt +++| STD T7 SET SECOND PART WORD COUNT 15588 M00S09576.1mt +++| SADT .FT 15589 M00S09577.1mt +++| ADC * (FIRST) 15590 M00S09578.1mt +++| STD CN+4 15591 M00S09579.1mt +++| SHN -14 15592 M00S09580.1mt +++| STD CN+3 15593 M00S09581.1mt +++| LDD T6 RESET FIRST PART WORD COUNT 15594 M00S09582.1mt +++| SBD T7 15595 M00S09583.1mt +++| STD T6 15596 M00S09584.1mt +++| LJM ADPX RETURN 15597 M00S09585.1mt +++| BCW SPACE 4,10 15598 M00S09586.1mt +++|** BCW - BUILD CONTROL WORD. 15599 M00S09587.1mt +++|* 15600 M00S09588.1mt +++|* ENTRY (BCWA) = 0 IF *1MT* FINISHED INPUT. 15601 M00S09589.1mt +++|*
| Line S09590 Modification History | |
|---|---|
M01 (Removed by) | 1mt47 |
Seq # *Modification Id* Act ----------------------------+ 15602 M01S09590.1mt47 ---|* USES CM - CM+4.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 1mt47 |
Seq # *Modification Id* Act ----------------------------+ 15603 M01S00002.1mt47 +++|* USES TB, T1, CM - CM+4. 15604 M00S09591.1mt +++|* 15605 M00S09592.1mt +++|* CALLS ADP, WDA. 15606 M00S09593.1mt +++|* 15607 M00S09594.1mt +++|* MACROS SADT. 15608 M00S09595.1mt +++| 15609 M00S09596.1mt +++| 15610 M00S09597.1mt +++| BCW SUBR ENTRY/EXIT 15611 M00S09598.1mt +++| LDC * 15612 M00S09599.1mt +++| BCWA EQU *-1 15613 M00S09600.1mt +++| NJN BCW2 IF *1LT* FINISHED INPUT 15614 M00S09601.1mt +++| LDM .BYC 15615 M00S09602.1mt +++| ZJN BCW1 IF FIRST PASS 15616 M00S09603.1mt +++| AOM .BYC COUNT *1LT* BLOCK 15617 M00S09604.1mt +++| LDC /MTX/LBWD 15618 M00S09605.1mt +++| RJM ADP 15619 M00S09606.1mt +++| BCW1 LDD WC TRANSFER LAST PART OF DATA 15620 M00S09607.1mt +++| RJM ADP 15621 M00S09608.1mt +++| RJM WDA WRITE DATA 15622 M00S09609.1mt +++| UJN BCW3 CHECK FOR TAPE MARK 15623 M00S09610.1mt +++| 15624 M00S09611.1mt +++| BCW2 LDD WC ADVANCE POINTER FOR *1LT* 15625 M00S09612.1mt +++| RJM ADP 15626 M00S09613.1mt +++| BCW3 LDD EC 15627 M00S09614.1mt +++| LMN /MTX/BEI 15628 M00S09615.1mt +++| ZJN BCW4 IF TAPE MARK 15629 M00S09616.1mt +++| LDM /READ/BCWA 15630 M00S09617.1mt +++| LPN 77 15631 M00S09618.1mt +++| STD TB 15632 M00S09619.1mt +++| LDN 0 15633 M00S09620.1mt +++| STM LNUM 15634 M00S09621.1mt +++| BCW4 STD T1 15635 M00S09622.1mt +++| LDD MD 15636 M00S09623.1mt +++| LPN 40 15637 M00S09624.1mt +++| NJN BCW5 IF 200 READ 15638 M00S09625.1mt +++| LDD WC 12 * UNUSED BYTES 15639 M00S09626.1mt +++| SHN 2 15640 M00S09627.1mt +++| ADD WC 15641 M00S09628.1mt +++| SBD BY 15642 M00S09629.1mt +++| SHN 2 15643 M00S09630.1mt +++| STD T1 15644 M00S09631.1mt +++| SHN 1 15645 M00S09632.1mt +++| RAD T1 15646 M00S09633.1mt +++| BCW5 LDD ES 15647 M00S09634.1mt +++| LPN 40 15648 M00S09635.1mt +++| BCWB ZJN BCW7 IF NO FILL STATUS 15649 M00S09636.1mt +++|* ZJN BCW6 (9 TRACK BINARY - IF NO FILL STATUS) 15650 M00S09637.1mt +++| LDD WC 15651 M00S09638.1mt +++| ADM .BYC 15652 M00S09639.1mt +++| ZJN BCW7 IF NO DATA READ 15653 M00S09640.1mt +++| LDM /READ/BCWE 15654 M00S09641.1mt +++| LPN 77 15655 M00S09642.1mt +++| UJN BCW7 ADJUST UNUSED BIT COUNT 15656 M00S09643.1mt +++| 15657 M00S09644.1mt +++| BCW6 LDD BY ADJUST UBC FOR ODD BYTE COUNT 15658 M00S09645.1mt +++| LPN 1 15659 M00S09646.1mt +++| SHN 2 15660 M00S09647.1mt +++| BCW7 RAD T1 15661 M00S09648.1mt +++| STM BUFC+2 15662 M00S09649.1mt +++| LDC LBBY 15663 M00S09650.1mt +++| STD T1 15664 M00S09651.1mt +++| LDD BY 15665 M00S09652.1mt +++| STM BUFC+4 15666 M00S09653.1mt +++| LDD MD 15667 M00S09654.1mt +++| LPN 60 15668 M00S09655.1mt +++| NJN BCW9 IF CONTROL WORD READ 15669 M00S09656.1mt +++| LDM BUFC+2 15670 M00S09657.1mt +++| STD T1 15671 M00S09658.1mt +++| LDD FM
| Line S00873 Modification History | |
|---|---|
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 15672 M01S00873.282l826 +++| SHN -6 15673 M00S09659.1mt +++| LMN /MTX/TFL 15674 M00S09660.1mt +++| NJN BCW8 IF NOT L FORMAT 15675 M00S09661.1mt +++| SADT .FE,,6,A 15676 M00S09662.1mt +++| LDC * RETURN UBC TO FET 15677 M00S09663.1mt +++| CRD CM 15678 M00S09664.1mt +++| LDD T1 SET UBC 15679 M00S09665.1mt +++| STD CM+2 15680 M00S09666.1mt +++| SADT .FE,,6,A 15681 M00S09667.1mt +++| LDC * 15682 M00S09668.1mt +++| CWD CM 15683 M00S09669.1mt +++| BCW8 LJM BCWX RETURN 15684 M00S09670.1mt +++| 15685 M00S09671.1mt +++| BCW9 LPN 40 15686 M00S09672.1mt +++| NJN BCW10 IF 200 READ 15687 M00S09673.1mt +++| LDC /MTX/LBWD 15688 M00S09674.1mt +++| STD T1 15689 M00S09675.1mt +++| LDD WC 15690 M00S09676.1mt +++| STM BUFC+4 15691 M00S09677.1mt +++| BCW10 LDN 0 15692 M00S09678.1mt +++| STM BUFC+3 15693 M00S09679.1mt +++| LDM .BYC 15694 M00S09680.1mt +++| STD T0 15695 M00S09681.1mt +++| ZJN BCW12 IF NO PARTIAL BLOCKS 15696 M00S09682.1mt +++| BCW11 LDD T1 COUNT BYTES OR WORDS FOR EACH BUFFER FULL 15697 M00S09683.1mt +++| RAM BUFC+4 15698 M00S09684.1mt +++| SHN -14 15699 M00S09685.1mt +++| RAM BUFC+3 15700 M00S09686.1mt +++| SOD T0 15701 M00S09687.1mt +++| NJN BCW11 IF MORE BLOCKS TO COUNT 15702 M00S09688.1mt +++| BCW12 LDC * PUT CONTROL WORD IN BUFFER 15703 M00S09689.1mt +++| BCWC EQU *-1 15704 M00S09690.1mt +++| SHN 6 15705 M00S09691.1mt +++| ADD RA 15706 M00S09692.1mt +++| SHN 6 15707 M00S09693.1mt +++| ADC * 15708 M00S09694.1mt +++| BCWD EQU *-1 15709 M00S09695.1mt +++| CWM BUFC,ON 15710 M00S09696.1mt +++| LJM BCWX RETURN 15711 M00S09697.1mt +++| CPD SPACE 4,10 15712 M00S09698.1mt +++|** CPD - CHECK PP (1LT) DROP OUT. 15713 M00S09699.1mt +++|* 15714 M00S09700.1mt +++|* ENTRY (CPDA) = PP INPUT REGISTER ADDRESS. 15715 M00S09701.1mt +++|* 15716 M00S09702.1mt +++|* EXIT (A) = 0, IF *1LT* STILL AROUND. 15717 M00S09703.1mt +++|* 15718 M00S09704.1mt +++|* MACROS CHTE. 15719 M00S09705.1mt +++| 15720 M00S09706.1mt +++| 15721 M00S09707.1mt +++| CPD SUBR ENTRY/EXIT 15722 M00S09708.1mt +++| LDC * 15723 M00S09709.1mt +++| CPDA EQU *-1 15724 M00S09710.1mt +++| CRD CM 15725 M00S09711.1mt +++| LDD CM+1 15726 M00S09712.1mt +++| SCN 77 15727 M00S09713.1mt +++| SHN 6 15728 M00S09714.1mt +++| LMD CM 15729 M00S09715.1mt +++| LMC 3RT1L 15730 M00S09716.1mt +++| ZJN CPD1 IF *1LT* 15731 M00S09717.1mt +++| SHN 14 15732 M00S09718.1mt +++| LMN 1R1 15733 M00S09719.1mt +++| NJN CPDX IF NOT *1LT* LOADING 15734 M00S09720.1mt +++| CPD1 LDD CM+3 15735 M00S09721.1mt +++| CHTE * 15736 M00S09722.1mt +++| LMN CH 15737 M00S09723.1mt +++| LPN 77 15738 M00S09724.1mt +++| UJN CPDX RETURN 15739 M00S09725.1mt +++| CRA SPACE 4,10 15740 M00S09726.1mt +++|** CRA - CHECK REQUEST ACCEPTANCE FROM *1LT*. 15741 M00S09727.1mt +++|*
| Line S09728 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15742 M01S09728.274l797 ---|* EXIT (A) = REQUEST BYTE.
| Line S03053 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15743 M01S03053.274l797 +++|* EXIT (A) = 0 IF *1LT* COMPLETE. 15744 M00S09729.1mt +++|* (CM - CM+4) = REQUEST/RETURN WORD. 15745 M00S09730.1mt +++| 15746 M00S09731.1mt +++| 15747 M00S09732.1mt +++| CRA SUBR ENTRY/EXIT 15748 M00S09733.1mt +++| LDM CPDA 15749 M00S09734.1mt +++| ADN 2 15750 M00S09735.1mt +++| CRD CM 15751 M00S09736.1mt +++| LDD CM
| Line S03054 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15752 M01S03054.274l797 +++| LMN 2 15753 M00S09737.1mt +++| UJN CRAX RETURN
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15754 M01S00028.1mt51 +++| ITS SPACE 4,10 15755 M01S00029.1mt51 +++|** ITS - INDICATE *1MT* TRANSFER STARTED. 15756 M01S00030.1mt51 +++|* 15757 M01S00031.1mt51 +++|* ENTRY (A) = BYTE COUNT. 15758 M01S00032.1mt51 +++|* 15759 M01S00033.1mt51 +++|* EXIT (A) = BYTE COUNT. 15760 M01S00034.1mt51 +++| 15761 M01S00035.1mt51 +++| 15762 M01S00036.1mt51 +++| ITS SUBR ENTRY/EXIT 15763 M01S00037.1mt51 +++| STD T0 SAVE BYTE COUNT 15764 M01S00038.1mt51 +++| LDM CPDA INDICATE *1MT* TRANSFER STARTED 15765 M01S00039.1mt51 +++| ADN 3 15766 M01S00040.1mt51 +++| CWD ON 15767 M01S00041.1mt51 +++| LDD T0 RESTORE (A) 15768 M01S00042.1mt51 +++| UJN ITSX RETURN 15769 M00S09738.1mt +++| SRQ SPACE 4,10 15770 M00S09739.1mt +++|** SRQ - SEND REQUEST TO *1LT* TO START BLOCK. 15771 M00S09740.1mt +++|* 15772 M00S09741.1mt +++|* ENTRY (A) = REQUEST CODE. 15773 M00S09742.1mt +++|* (T4 - T5) = POINTER. 15774 M00S09743.1mt +++|* (SRQB) = STARTING WORD COUNT. 15775 M00S09744.1mt +++|* (SRQC) = STARTING OV CONTENTS. 15776 M00S09745.1mt +++|* 15777 M00S09746.1mt +++|* USES T1, T2, T3, CM - CM+4. 15778 M00S09747.1mt +++|*
| Line S09748 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15779 M01S09748.1mt51 ---|* CALLS CPD, CRA, HNG.
| Line S00043 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15780 M01S00043.1mt51 +++|* CALLS CPD, HNG. 15781 M00S09749.1mt +++| 15782 M00S09750.1mt +++| 15783 M00S09751.1mt +++| SRQ SUBR ENTRY/EXIT 15784 M00S09752.1mt +++| STD T1 15785 M00S09753.1mt +++| SRQA UJN SRQ1 NO CHANNEL FLAG PRESENT
| Line S09754 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 15786 M01S09754.ns21000 ---|* PSN (CYBER 170-8X5)
| Line S00173 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15787 M02S00173.1mt51 ---|* PSN (CYBER 170-815/825/835/855)
| Line S00044 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15788 M01S00044.1mt51 +++|* PSN (CYBER 180)
| Line S09755 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15789 M01S09755.274l797 ---| CCF *,CH CLEAR CHANNEL FLAG 15790 M01S09756.274l797 ---| SCF *,CH SET CHANNEL FLAG 15791 M01S09757.274l797 ---| SRQ1 RJM CRA CHECK *1LT* ACCEPT 15792 M01S09758.274l797 ---| NJN SRQ2 IF *1LT* OUT OF SYNC 15793 M01S09759.274l797 ---| LDM CPDA CHECK *1LT* FUNCTION
| Line S03055 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15794 M01S03055.274l797 +++| SCF *+2,CH SET CHANNEL FLAG
| Line S00045 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15795 M01S00045.1mt51 +++| LDM CPDA INDICATE *1MT* TRANSFER STARTED 15796 M01S00046.1mt51 +++| ADN 3 15797 M01S00047.1mt51 +++| CWD ON
| Line S03056 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15798 M01S03056.274l797 +++| SRQ1 LDM CPDA CHECK *1LT* FUNCTION 15799 M00S09760.1mt +++| ADN 1 15800 M00S09761.1mt +++| CRD CM 15801 M00S09762.1mt +++| LDD CM 15802 M00S09763.1mt +++| LMN PRLM 15803 M00S09764.1mt +++| ZJN SRQ3 IF *1LT* PAUSING 15804 M00S09765.1mt +++| LDC * WORD COUNT 15805 M00S09766.1mt +++| SRQB EQU *-1 15806 M00S09767.1mt +++| STD T2 15807 M00S09768.1mt +++| LDC * CHUNK COUNT 15808 M00S09769.1mt +++| SRQC EQU *-1 15809 M00S09770.1mt +++| STD T3 15810 M00S09771.1mt +++| LDM CPDA ENTER REQUEST 15811 M00S09772.1mt +++| ADN 2 15812 M00S09773.1mt +++| CWD T1
| Line S09774 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15813 M01S09774.1mt51 ---| RJM CPD 15814 M01S09775.1mt51 ---| ZJN SRQX IF *1LT* STILL AROUND
| Line S00048 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15815 M01S00048.1mt51 +++| RJM CPD CHECK IF PP *L1T* DROPPED OUT 15816 M01S00049.1mt51 +++| ZJP SRQX IF *1LT* STILL AROUND
| Line S09776 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15817 M01S09776.274l797 ---| SRQ2 RJM HNG HANG PP
| Line S03057 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15818 M01S03057.274l797 +++| RJM HNG HANG PP 15819 M00S09777.1mt +++| 15820 M00S09778.1mt +++| SRQ3 LJM RET2 REQUEUE REQUEST 15821 M00S09779.1mt +++| WDA SPACE 4,10 15822 M00S09780.1mt +++|** WDA - WRITE DATA TO CENTRAL. 15823 M00S09781.1mt +++|* 15824 M00S09782.1mt +++|* ENTRY (T4 - T5) = IN POINTER. 15825 M00S09783.1mt +++|* (T6) = FIRST PART WORD COUNT. 15826 M00S09784.1mt +++|* (T7) = SECOND PART WORD COUNT. 15827 M00S09785.1mt +++|* 15828 M00S09786.1mt +++|* MACROS SADT. 15829 M00S09787.1mt +++| 15830 M00S09788.1mt +++| 15831 M00S09789.1mt +++| WDA SUBR ENTRY/EXIT 15832 M00S09790.1mt +++| LDD T6 15833 M00S09791.1mt +++| ZJN WDAX IF NO FIRST PART 15834 M00S09792.1mt +++| SHN 2 15835 M00S09793.1mt +++| ADD T6 15836 M00S09794.1mt +++| ADC BUFB 15837 M00S09795.1mt +++| STM WDAA 15838 M00S09796.1mt +++| LDD T4 TRANSFER FIRST PART 15839 M00S09797.1mt +++| SHN 6 15840 M00S09798.1mt +++| ADD RA 15841 M00S09799.1mt +++| SHN 6 15842 M00S09800.1mt +++| ADD T5 15843 M00S09801.1mt +++| CWM BUFB,T6 15844 M00S09802.1mt +++| LDD T7 15845 M00S09803.1mt +++| ZJN WDAX IF NO SECOND PART 15846 M00S09804.1mt +++| SADT .FT,,,A 15847 M00S09805.1mt +++| LDC * TRANSFER SECOND PART 15848 M00S09806.1mt +++| CWM *,T7 15849 M00S09807.1mt +++| WDAA EQU *-1 15850 M00S09808.1mt +++| UJN WDAX RETURN
| Line S00050 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15851 M01S00050.1mt51 +++| WTS SPACE 4,10 15852 M01S00051.1mt51 +++|** WTS - WAIT FOR *1LT* TRANSFER TO START. 15853 M01S00052.1mt51 +++|* 15854 M01S00053.1mt51 +++|* ENTRY (A) = BYTE COUNT. 15855 M01S00054.1mt51 +++|* 15856 M01S00055.1mt51 +++|* EXIT (A) = BYTE COUNT. 15857 M01S00056.1mt51 +++|* 15858 M01S00057.1mt51 +++|* USES CM - CM+4. 15859 M01S00058.1mt51 +++| 15860 M01S00059.1mt51 +++| 15861 M01S00060.1mt51 +++| WTS3 LDD T0 RESTORE (A) 15862 M01S00061.1mt51 +++| 15863 M01S00062.1mt51 +++| WTS SUBR ENTRY/EXIT 15864 M01S00063.1mt51 +++| STD T0 SAVE BYTE COUNT 15865 M01S00064.1mt51 +++| WTS1 LDM CPDA CHECK *1MT*/*1LT* INTERLOCK 15866 M01S00065.1mt51 +++| ADN 3 15867 M01S00066.1mt51 +++| CRD CM 15868 M01S00067.1mt51 +++| LDD CM 15869 M01S00068.1mt51 +++| ZJN WTS3 IF *1LT* TRANSFER STARTED 15870 M01S00069.1mt51 +++| LDN 24 DELAY 10 MICROSECONDS 15871 M01S00070.1mt51 +++| WTS2 SBN 1 15872 M01S00071.1mt51 +++| NJN WTS2 IF NOT DONE 15873 M01S00072.1mt51 +++| UJN WTS1 CHECK INTERLOCK 15874 M00S09809.1mt +++| BUFFER SPACE 4,10 15875 M00S09810.1mt +++| BUFFER BUFB 15876 M00S09811.1mt +++| CALL SPACE 4,10 15877 M00S09812.1mt +++| .IM SET 0 DISABLE ADDRESS MODIFICATION ON ERRORS 15878 M00S09813.1mt +++| 15879 M00S09814.1mt +++|** *1LT* CALL BLOCK. 15880 M00S09815.1mt +++|* 15881 M00S09816.1mt +++|*T 18/ 1LT,6/ CP,12/ 0,12/ CHANNEL,12/ PPIA
Figure
15882 M00S09817.1mt +++|*T, 12/ -0,24/ FIRST,24/ LIMIT
Figure
15883 M00S09818.1mt +++| 15884 M00S09819.1mt +++| 15885 M00S09820.1mt +++| CALL VFD 18/3R1LT,6/0 15886 M00S09821.1mt +++| CON 0 READ 15887 M00S09822.1mt +++| CHTE * 15888 M00S09823.1mt +++| CON CH CHANNEL 15889 M00S09824.1mt +++| CON 0 *1MT* INPUT REGISTER ADDRESS 15890 M00S09825.1mt +++| CON -0 15891 M00S09826.1mt +++| SADT .FT,,,,SE 15892 M00S09827.1mt +++| CON 0,0 15893 M00S09828.1mt +++| SADT .LM,,,,SE 15894 M00S09829.1mt +++| CON 0,0
| Line S00073 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15895 M01S00073.1mt51 +++| TITLE PRESET. 15896 M00S09830.1mt +++| PRS SPACE 4,10 15897 M00S09831.1mt +++|** PRS - PRESET. 15898 M00S09832.1mt +++|*
| Line S09833 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15899 M01S09833.274l797 ---|* CALLS CEC, /READ/CIB, CPD, CRA, MCH, SRQ.
| Line S03058 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15900 M01S03058.274l797 +++|* ENTRY AT *PRS10* AFTER OVERLAY *CPP* HAS BEEN LOADED AND 15901 M01S03059.274l797 +++|* EXECUTED. 15902 M01S03060.274l797 +++|* 15903 M01S03061.274l797 +++|* EXIT TO *RLB* WHEN PRESET COMPLETE. 15904 M01S03062.274l797 +++|* 15905 M01S03063.274l797 +++|* USES T1, T4, T5. 15906 M01S03064.274l797 +++|* 15907 M01S03065.274l797 +++|* CALLS CEC, CPD, CRA, MCH, SRQ. 15908 M00S09834.1mt +++|* 15909 M00S09835.1mt +++|* MACROS MONITOR, PAUSE. 15910 M00S09836.1mt +++| 15911 M00S09837.1mt +++|
| Line S09838 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15912 M01S09838.274l797 ---| PRS LDC BUFB
| Line S03066 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15913 M01S03066.274l797 +++| PRS LDC UJNI+2 DISABLE READ AHEAD 15914 M01S03067.274l797 +++| STM /READ/TDAF 15915 M01S03068.274l797 +++| LDN 0 DISABLE ALLOWANCE FOR CONTROL WORDS 15916 M01S03069.274l797 +++| STM /READ/TDAA 15917 M01S03070.274l797 +++| LDC PRSC MODIFY CHANNELS 15918 M01S03071.274l797 +++| RJM MCH 15919 M01S03072.274l797 +++| LDD MD 15920 M01S03073.274l797 +++| LPN 60 15921 M01S03074.274l797 +++| ZJN PRS1 IF NO CONTROL WORDS 15922 M01S03075.274l797 +++| AOM RLBB ALLOW FOR CONTROL WORD 15923 M01S03076.274l797 +++| AOM .CLB+CLBA-CLB ALLOW FOR CONTROL WORD 15924 M01S03077.274l797 +++| PRS1 LDD HP 15925 M01S03078.274l797 +++| SHN 21-7 15926 M01S03079.274l797 +++| PJN PRS3 IF NOT CTS 15927 M01S03080.274l797 +++| ISTORE /READ/RCTD,(UJN /READ/RCT7) SET FOR COMMAND RETRY 15928 M01S03081.274l797 +++| LDC BUFB 15929 M01S03082.274l797 +++| STM /READ/RCTB 15930 M01S03083.274l797 +++| LDC CLB14 15931 M01S03084.274l797 +++| STM /READ/RCT RETURN ADDRESS FROM *RCT* 15932 M01S03085.274l797 +++| LDC BCW 15933 M01S03086.274l797 +++| STM /READ/RCTL+1 15934 M01S03087.274l797 +++| LDC .CLBL-1 LENGTH OF CODE TO MOVE 15935 M01S03088.274l797 +++| STD T1 15936 M01S03089.274l797 +++| PRS2 LDM .CLB,T1 15937 M01S03090.274l797 +++| STM CLB,T1 15938 M01S03091.274l797 +++| SOD T1 15939 M01S03092.274l797 +++| PJN PRS2 IF MORE CODE TO MOVE 15940 M01S03093.274l797 +++| LDC .CLBA MODIFY CHANNELS 15941 M01S03094.274l797 +++| UJP PRS5 CONTINUE PRESET 15942 M01S03095.274l797 +++| 15943 M01S03096.274l797 +++| PRS3 LDC BUFB 15944 M00S09839.1mt +++| STM /READ/MRDB
| Line S09840 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15945 M01S09840.274l797 ---| LDC UJNI+2 DISABLE READ AHEAD 15946 M01S09841.274l797 ---| STM /READ/TDAF 15947 M00S09842.1mt +++| LDC BCW 15948 M00S09843.1mt +++| STM /READ/MRDO+1 15949 M00S09844.1mt +++| LDM /READ/RDFB DISABLE PCL IF NORMAL CLIP LEVEL 15950 M00S09845.1mt +++| STM RLBC
| Line S09846 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15951 M01S09846.274l797 ---| LDN 0 DISABLE ALLOWANCE FOR CONTROL WORDS 15952 M01S09847.274l797 ---| STM /READ/TDAA 15953 M01S09848.274l797 ---| LDD MD 15954 M01S09849.274l797 ---| LPN 60 15955 M01S09850.274l797 ---| ZJN PRS1 IF NO CONTROL WORDS 15956 M01S09851.274l797 ---| AOM RLBB ALLOW FOR CONTROL WORD 15957 M01S09852.274l797 ---| PRS1 LDC PRSC MODIFY CHANNELS 15958 M01S09853.274l797 ---| RJM MCH 15959 M00S09854.1mt +++| LDD HP 15960 M00S09855.1mt +++| LPN 60 15961 M00S09856.1mt +++| SHN 6 15962 M00S09857.1mt +++| RAM CALL+3 SET MTS/ATS FLAGS FOR *1LT*
| Line S09858 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 15963 M01S09858.ns21000 ---| LDN CPUL 15964 M01S09859.ns21000 ---| CRD CM 15965 M01S09860.ns21000 ---| LDD CM+3 15966 M01S09861.ns21000 ---| SHN 21-10 15967 M01S09862.ns21000 ---| PJN PRS4 IF NOT CYBER 170-8X5 IOU
| Line S00174 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 15968 M01S00174.ns21000 +++| LDK MABL CHECK MAINFRAME TYPE 15969 M01S00175.ns21000 +++| CRD CM 15970 M01S00176.ns21000 +++| LDD CM+1 15971 M01S00177.ns21000 +++| SHN -6 15972 M01S00178.ns21000 +++| LPN 41 15973 M01S00179.ns21000 +++| LMN 1
| Line S00180 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15974 M02S00180.274l797 ---| NJN PRS4 IF NOT CYBER 170-815/825/835/855 IOU
| Line S03097 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15975 M02S03097.1mt51 ---| NJN PRS7 IF NOT CYBER 170-815/825/835/855 IOU
| Line S00074 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15976 M01S00074.1mt51 +++| NJN PRS7 IF NOT CYBER 180 IOU 15977 M00S09863.1mt +++|
| Line S09864 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 15978 M01S09864.ns21000 ---|* PRESET FOR CYBER 170-8X5 IOU.
| Line S00181 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15979 M02S00181.1mt51 ---|* PRESET FOR CYBER 170-815/825/835/855 IOU.
| Line S00075 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15980 M01S00075.1mt51 +++|* PRESET FOR CYBER 180 IOU. 15981 M00S09865.1mt +++|
| Line S00076 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15982 M01S00076.1mt51 +++| LDC RLB3 SET EXIT FROM /READ/MRD 15983 M01S00077.1mt51 +++| STM /READ/MRD 15984 M00S09866.1mt +++| LDC RLB4 SET EXIT FROM READ
| Line S09867 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15985 M01S09867.1mt51 ---| STM RLBD+1
| Line S00078 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 15986 M01S00078.1mt51 +++| STM RLBD 15987 M01S00079.1mt51 +++| LDC /READ/MRD3 SET ENTRY ON INITIAL READ 15988 M01S00080.1mt51 +++| STM RLBI
| Line S09868 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15989 M01S09868.274l797 ---| LDN PSNI 15990 M01S09869.274l797 ---| STM SRQA 15991 M00S09870.1mt +++| LDN RLBRL.-1 MOVE IOU LOOP 15992 M00S09871.1mt +++| STD T1
| Line S09872 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15993 M01S09872.274l797 ---| PRS2 LDM RLBR.,T1
| Line S03098 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15994 M01S03098.274l797 +++| PRS4 LDM RLBR.,T1 15995 M00S09873.1mt +++| STM .RLBA,T1 15996 M00S09874.1mt +++| SOD T1
| Line S09875 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15997 M01S09875.274l797 ---| PJN PRS2 IF MORE CODE TO MOVE
| Line S03099 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 15998 M01S03099.274l797 +++| PJN PRS4 IF MORE CODE TO MOVE 15999 M00S09876.1mt +++| LDC RLBC. MODIFY CHANNELS
| Line S09877 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16000 M01S09877.274l797 ---| RJM MCH
| Line S03100 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16001 M01S03100.274l797 +++| PRS5 RJM MCH 16002 M01S03101.274l797 +++| LDN PSNI 16003 M01S03102.274l797 +++| STM SRQA
| Line S09878 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16004 M01S09878.274l797 ---| PRS3 LJM PRS6 CONTINUE PRESET
| Line S03103 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16005 M01S03103.274l797 +++| PRS6 LJM PRS9 CONTINUE PRESET 16006 M00S09879.1mt +++|
| Line S09880 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16007 M01S09880.274l797 ---| PRS4 LDD HP
| Line S03104 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16008 M01S03104.274l797 +++| PRS7 LDD HP 16009 M00S09881.1mt +++| SHN 21-4
| Line S09882 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16010 M01S09882.274l797 ---| PJN PRS3 IF MTS CONTROLLER
| Line S03105 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16011 M01S03105.274l797 +++| PJN PRS6 IF MTS CONTROLLER 16012 M00S09883.1mt +++|
| Line S09884 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 16013 M01S09884.1mt51 ---|* INITIALIZE DRIVER FOR ATS CONTROLLER.
| Line S00081 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 16014 M01S00081.1mt51 +++|* INITIALIZE DRIVER FOR ATS (NON-CYBER 180). 16015 M00S09885.1mt +++| 16016 M00S09886.1mt +++| LDC RLB3 SET EXIT FROM /READ/MRD 16017 M00S09887.1mt +++| STM /READ/MRD
| Line S09888 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 16018 M01S09888.1mt51 ---| LDC LJMI MODIFY INSTRUCTIONS 16019 M01S09889.1mt51 ---| STM RLBD 16020 M01S09890.1mt51 ---| LDC .RLB11 16021 M01S09891.1mt51 ---| STM RLBD+1
| Line S00082 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 16022 M01S00082.1mt51 +++| LDC .RLB11 MODIFY INSTRUCTIONS 16023 M01S00083.1mt51 +++| STM RLBI 16024 M00S09892.1mt +++| LDM PRSA 16025 M00S09893.1mt +++| STM RLBG 16026 M00S09894.1mt +++| LDC UJNI+.RLB14-.RLBB 16027 M00S09895.1mt +++| STM RLBE+1 16028 M00S09896.1mt +++| LDC .RLBB 16029 M00S09897.1mt +++| STM RLBF+1
| Line S00084 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 16030 M01S00084.1mt51 +++| LDN PSNI 16031 M01S00085.1mt51 +++| STM RLBJ 16032 M00S09898.1mt +++| LDN .RLBRL-1 MOVE ATS INPUT LOOP 16033 M00S09899.1mt +++| STD T1
| Line S09900 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16034 M01S09900.274l797 ---| PRS5 LDM .RLBR,T1
| Line S03106 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16035 M01S03106.274l797 +++| PRS8 LDM .RLBR,T1 16036 M00S09901.1mt +++| STM .RLBA,T1 16037 M00S09902.1mt +++| SOD T1
| Line S09903 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16038 M01S09903.274l797 ---| PJN PRS5 IF NOT END OF MOVE
| Line S03107 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16039 M01S03107.274l797 +++| PJN PRS8 IF NOT END OF MOVE 16040 M00S09904.1mt +++| LDC .RLBC MODIFY CHANNELS 16041 M00S09905.1mt +++| RJM MCH
| Line S09906 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16042 M01S09906.274l797 ---| PRS6 LDC PRSB SET FOR INSTRUCTION MODIFICATION
| Line S03108 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16043 M01S03108.274l797 +++| PRS9 LDC PRSB SET FOR INSTRUCTION MODIFICATION 16044 M00S09907.1mt +++| STD CN
| Line S09908 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16045 M01S09908.274l797 ---| LDC PRS7 SET TO RETURN CONTROL HERE AFTER LOAD
| Line S03109 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16046 M01S03109.274l797 +++| LDC PRS10 SET TO RETURN CONTROL HERE AFTER LOAD 16047 M00S09909.1mt +++| STD BT 16048 M00S09910.1mt +++| LJM PRSX RETURN 16049 M00S09911.1mt +++| 16050 M00S09912.1mt +++|* RETURN HERE AFTER ALL ROUTINES LOADED. 16051 M00S09913.1mt +++|* BUILD CALL TO *1LT*. 16052 M00S09914.1mt +++|
| Line S09915 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16053 M01S09915.274l797 ---| PRS7 LDD CP MERGE CP NUMBER
| Line S03110 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16054 M01S03110.274l797 +++| PRS10 LDD CP MERGE CP NUMBER 16055 M00S09916.1mt +++| SHN -7 16056 M00S09917.1mt +++| RAM CALL+1
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16057 M01S00001.ncccts +++| LDD HP 16058 M01S00002.ncccts +++| LPC 7700 ALLOW *1LT* TO TEST FOR CTS 16059 M01S00003.ncccts +++| RAM CALL+2 16060 M00S09918.1mt +++| LDD IA SET INPUT REGISTER ADDRESS IN CALL 16061 M00S09919.1mt +++| STM CALL+4 16062 M00S09920.1mt +++| LDN CMCL CHECK MOVE FLAG 16063 M00S09921.1mt +++| CRD CM 16064 M00S09922.1mt +++| LDD CM
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 16065 M01S00002.271l716 +++| SHN 7 16066 M00S09923.1mt +++| LMD CP
| Line S09924 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16067 M01S09924.274l797 ---| ZJN PRS8 IF MOVE FLAG
| Line S03111 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16068 M01S03111.274l797 +++| ZJN PRS11 IF MOVE FLAG
| Line S09925 Modification History | |
|---|---|
M01 (Removed by) | ns2027 |
Seq # *Modification Id* Act ----------------------------+ 16069 M01S09925.ns2027 ---| LDN PPAL CHECK IF PP AVAILABLE 16070 M01S09926.ns2027 ---| CRD CM 16071 M01S09927.ns2027 ---| LDD CM+4 16072 M01S09928.ns2027 ---| ZJN PRS8 IF NO PP AVAILABLE 16073 M00S09929.1mt +++| LDD MA WRITE REQUEST BLOCK 16074 M00S09930.1mt +++| CWM CALL,TR 16075 M00S09931.1mt +++| LDN 1 SET TO NOT QUEUE REQUEST 16076 M00S09932.1mt +++| STD CM+1 16077 M00S09933.1mt +++| MONITOR RPPM REQUEST PP 16078 M00S09934.1mt +++| LDD CM+1
| Line S09935 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16079 M01S09935.274l797 ---| NJN PRS9 IF PP ASSIGNED 16080 M01S09936.274l797 ---| PRS8 LJM RET2 REQUEUE
| Line S03112 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16081 M01S03112.274l797 +++| NJN PRS12 IF PP ASSIGNED 16082 M01S03113.274l797 +++| PRS11 LJM RET2 REQUEUE 16083 M00S09937.1mt +++|
| Line S09938 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16084 M01S09938.274l797 ---| PRS9 STM CPDA SAVE PP INPUT REGISTER ADDRESS 16085 M01S09939.274l797 ---| PRS10 LDN 77 DELAY
| Line S03114 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16086 M01S03114.274l797 +++| PRS12 STM CPDA SAVE PP INPUT REGISTER ADDRESS 16087 M01S03115.274l797 +++| PRS13 LDN 77 DELAY 16088 M00S09940.1mt +++| SBN 1 16089 M00S09941.1mt +++| NJN *-1 16090 M00S09942.1mt +++| LDD MA CHECK FOR *1LT* ACKNOWLEDGE 16091 M00S09943.1mt +++| ADN 1 16092 M00S09944.1mt +++| CRD CM 16093 M00S09945.1mt +++| LDD CM
| Line S09946 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16094 M01S09946.274l797 ---| ZJN PRS12 IF *1LT* READY
| Line S03116 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16095 M01S03116.274l797 +++| ZJN PRS15 IF *1LT* READY 16096 M00S09947.1mt +++| RJM CPD CHECK FOR *1LT* DROP
| Line S09948 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16097 M01S09948.274l797 ---| NJN PRS8 IF *1LT* GONE
| Line S03117 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16098 M01S03117.274l797 +++| NJN PRS11 IF *1LT* GONE 16099 M00S09949.1mt +++| LDN CMCL CHECK MOVE FLAG 16100 M00S09950.1mt +++| CRD CM 16101 M00S09951.1mt +++| LDD CM
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 16102 M01S00003.271l716 +++| SHN 7 16103 M00S09952.1mt +++| LMD CP
| Line S09953 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16104 M01S09953.274l797 ---| NJN PRS10 IF NO MOVE FLAG FOR THIS CP
| Line S03118 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16105 M01S03118.274l797 +++| NJN PRS13 IF NO MOVE FLAG FOR THIS CP 16106 M00S09954.1mt +++| RJM CEC CHANGE BACK TO MAGNET CP
| Line S09955 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16107 M01S09955.274l797 ---| PRS11 RJM CPD CHECK PP DROP 16108 M01S09956.274l797 ---| NJN PRS8 IF *1LT* GONE
| Line S03119 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16109 M01S03119.274l797 +++| PRS14 RJM CPD CHECK PP DROP 16110 M01S03120.274l797 +++| NJN PRS11 IF *1LT* GONE 16111 M00S09957.1mt +++| PAUSE NE
| Line S09958 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16112 M01S09958.274l797 ---| UJN PRS11 LOOP
| Line S03121 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16113 M01S03121.274l797 +++| UJN PRS14 LOOP 16114 M00S09959.1mt +++|
| Line S09960 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16115 M01S09960.274l797 ---| PRS12 LDD HP
| Line S03122 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16116 M01S03122.274l797 +++| PRS15 LDD HP
| Line S09961 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16117 M01S09961.274l797 ---| LPN 1
| Line S03123 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16118 M01S03123.274l797 +++| LPC 201
| Line S09962 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16119 M01S09962.274l797 ---| ZJN PRS13 IF 7 TRACK
| Line S03124 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16120 M01S03124.274l797 +++| ZJN PRS16 IF 7 TRACK 16121 M00S09963.1mt +++| LDD MD 16122 M00S09964.1mt +++| SHN 21-6
| Line S09965 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16123 M01S09965.274l797 ---| MJN PRS13 IF CODED
| Line S03125 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16124 M01S03125.274l797 +++| MJN PRS16 IF CODED 16125 M00S09966.1mt +++| LCN BCW7-BCW6 SET TO ADJUST UBC IF ODD BYTE COUNT 16126 M00S09967.1mt +++| RAM BCWB
| Line S09968 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16127 M01S09968.274l797 ---| PRS13 LDD WC SET WORD AND CHUNK COUNT FOR *1LT*
| Line S03126 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16128 M01S03126.274l797 +++| PRS16 LDD WC SET WORD AND CHUNK COUNT FOR *1LT* 16129 M00S09969.1mt +++| STM SRQB 16130 M00S09970.1mt +++| LDD OV 16131 M00S09971.1mt +++| STM SRQC 16132 M00S09972.1mt +++| LDM CIOE 16133 M00S09973.1mt +++| LPC 774 16134 M00S09974.1mt +++| LMN 20
| Line S09975 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16135 M01S09975.274l797 ---| NJN PRS14 IF NOT READ SKIP
| Line S03127 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16136 M01S03127.274l797 +++| NJN PRS17 IF NOT READ SKIP 16137 M00S09976.1mt +++| LDC UJNI-PJNI 16138 M00S09977.1mt +++| RAM RLBA 16139 M00S09978.1mt +++| RJM /READ/CIB
| Line S09979 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16140 M01S09979.274l797 ---| MJN PRS15 IF BUFFER ARGUMENT ERROR
| Line S03128 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16141 M01S03128.274l797 +++| MJN PRS18 IF BUFFER ARGUMENT ERROR 16142 M00S09980.1mt +++| STD T5 16143 M00S09981.1mt +++| SHN -14 16144 M00S09982.1mt +++| STD T4 16145 M00S09983.1mt +++| LDN 3 SET REQUEST TO *1LT* 16146 M00S09984.1mt +++| RJM SRQ
| Line S09985 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16147 M01S09985.274l797 ---| PRS14 LDN 77 DELAY
| Line S03129 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16148 M01S03129.274l797 +++| PRS17 LDN 77 DELAY 16149 M00S09986.1mt +++| SBN 1 16150 M00S09987.1mt +++| NJN *-1 16151 M00S09988.1mt +++| RJM CRA SEE IF *1LT* ACCEPTED READ SKIP
| Line S03130 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16152 M01S03130.274l797 +++| LMN 2
| Line S09989 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16153 M01S09989.274l797 ---| NJN PRS14 IF *1LT* NOT DONE 16154 M01S09990.274l797 ---| PRS15 LDC /SRU/ITRL*100 SET SRU INCREMENT
| Line S03131 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16155 M01S03131.274l797 +++| NJN PRS17 IF *1LT* NOT DONE 16156 M01S03132.274l797 +++| PRS18 LDC /SRU/ITRL*100 SET SRU INCREMENT 16157 M00S09991.1mt +++| STM //CECA 16158 M00S09992.1mt +++| LJM RLB ENTER READ TAPE 16159 M00S09993.1mt +++| 16160 M00S09994.1mt +++|* SEE *1LT* FOR FORMAT OF CALL BLOCK. 16161 M00S09995.1mt +++| 16162 M00S09996.1mt +++| PRSA BSS 0 16163 M00S09997.1mt +++| LOC RLBG 16164 M00S09998.1mt +++| UJN .RLB9 WAIT FOR *1LT* TO COMPLETE 16165 M00S09999.1mt +++| LOC *O 16166 M00S10000.1mt +++| 16167 M00S10001.1mt +++| PRSB TSAD SLBP 16168 M00S10002.1mt +++| PRSC CHTB
| Line S00086 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 16169 M01S00086.1mt51 +++| TITLE PRESET SUBROUTINES. 16170 M00S10003.1mt +++| RLB SPACE 4,10
| Line S10004 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 16171 M01S10004.1mt51 ---|** ATS INPUT LOOP.
| Line S00087 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 16172 M01S00087.1mt51 +++|** ATS INPUT LOOP (NON-CYBER 180). 16173 M00S10005.1mt +++| 16174 M00S10006.1mt +++| 16175 M00S10007.1mt +++| .RLBR BSS 0 16176 M00S10008.1mt +++| LOC .RLBA 16177 M00S10009.1mt +++| 16178 M00S10010.1mt +++| .RLB9 AJM *,CH IF WAITING FOR *1LT* TO DCN CHANNEL 16179 M00S10011.1mt +++| LDM /READ/MRDA SET NUMBER OF BYTES TO INPUT 16180 M00S10012.1mt +++| .RLB10 IJM RLB12,CH IF *1LT* FINISHED INPUT 16181 M00S10013.1mt +++| EJM .RLB10,CH IF DATA NOT AVAILABLE 16182 M00S10014.1mt +++| .RLB11 IAM BUFB,CH INPUT DATA 16183 M00S10015.1mt +++| DCN CH+40 INDICATE TO *1LT* TO CONTINUE READ 16184 M00S10016.1mt +++| .RLBB NJN .RLB12 IF END OF BLOCK 16185 M00S10017.1mt +++|* UJN .RLB14 (SHUTDOWN ENABLED) 16186 M00S10018.1mt +++| ACN CH 16187 M00S10019.1mt +++| .RLB12 STD T1 SAVE BYTES REMAINING 16188 M00S10020.1mt +++| .RLB13 IJM RLB18,CH IF *1MT* FINISHED INPUT 16189 M00S10021.1mt +++| EJM .RLB13,CH IF *1LT* NOT TAKING DATA YET 16190 M00S10022.1mt +++| LJM RLB6 SETUP FOR NEXT CHUNK 16191 M00S10023.1mt +++| 16192 M00S10024.1mt +++| .RLB14 LJM /READ/MRD4 CHECK FOR BLOCK TOO LARGE 16193 M00S10025.1mt +++| 16194 M00S10026.1mt +++| LOC *O 16195 M00S10027.1mt +++| .RLBRL EQU *-.RLBR LENGTH OF ATS INPUT LOOP 16196 M00S10028.1mt +++|
| Line S10029 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 16197 M01S10029.1mt51 ---| ERRMI .RLBAL-.RLBRL OVERLAID CODE OVERFLOWED
| Line S00088 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 16198 M01S00088.1mt51 +++| ERRNG .RLBAL-.RLBRL OVERLAID CODE OVERFLOWED 16199 M00S10030.1mt +++| 16200 M00S10031.1mt +++| .RLBC CHTB CHANNEL TABLE FOR ATS INPUT LOOP 16201 M00S10032.1mt +++| 16202 M00S10033.1mt +++|
| Line S10034 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 16203 M01S10034.ns21000 ---|* READ LOOP FOR AN CYBER 170-8X5 IOU.
| Line S00182 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 16204 M02S00182.1mt51 ---|* READ LOOP FOR CYBER 170-815/825/835/855 IOU.
| Line S00089 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 16205 M01S00089.1mt51 +++|* READ LOOP FOR CYBER 180 IOU. 16206 M00S10035.1mt +++| 16207 M00S10036.1mt +++| RLBR. BSS 0 16208 M00S10037.1mt +++| LOC .RLBA 16209 M00S10038.1mt +++| 16210 M00S10039.1mt +++| RLB9. LDC LBBY BYTES TO INPUT
| Line S10040 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 16211 M01S10040.1mt51 ---| RLB10. IJM RLB12,CH IF 1LT COMPLETED READ 16212 M01S10041.1mt51 ---| SCF RLB10.,CH WAIT UNTIL FLAG IS CLEARED BY 1LT
| Line S00090 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 16213 M01S00090.1mt51 +++| ERRNZ RLB9.-RLB9 CODE DEPENDS ON VALUE 16214 M01S00091.1mt51 +++| RLB10. RJM WTS WAIT FOR *1LT* TRANSFER TO START 16215 M01S00092.1mt51 +++| ERRNZ RLB10.-RLB10 CODE DEPENDS ON VALUE 16216 M01S00093.1mt51 +++| RLB11. IJM RLB12,CH IF 1LT COMPLETED READ 16217 M01S00094.1mt51 +++| SCF RLB11.,CH WAIT UNTIL FLAG IS CLEARED BY 1LT 16218 M01S00095.1mt51 +++| RJM ITS INDICATE *1MT* TRANSFER STARTED 16219 M00S10042.1mt +++| LJM /READ/MRD3 PROCESS DATA 16220 M00S10043.1mt +++| 16221 M00S10044.1mt +++| LOC *O 16222 M00S10045.1mt +++| RLBRL. EQU *-RLBR. LENGTH OF IOU INPUT CODE 16223 M00S10046.1mt +++|
| Line S10047 Modification History | |
|---|---|
M01 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 16224 M01S10047.1mt51 ---| ERRMI .RLBAL-RLBRL. IOU INPUT CODE TOO LONG
| Line S00096 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 16225 M01S00096.1mt51 +++| ERRNG .RLBAL-RLBRL. IOU INPUT CODE TOO LONG 16226 M00S10048.1mt +++| 16227 M00S10049.1mt +++| RLBC. CHTB TABLE OF CHANNELS FOR IOU CODE
| Line S03133 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16228 M01S03133.274l797 +++| CLB SPACE 4,15 16229 M01S03134.274l797 +++|** CLB - CTS LONG BLOCK READ. 16230 M01S03135.274l797 +++|* 16231 M01S03136.274l797 +++|* THIS ROUTINE OVERLAYS *RLB* STARTING AT *RLBB*. 16232 M01S03137.274l797 +++| 16233 M01S03138.274l797 +++| 16234 M01S03139.274l797 +++| .CLB BSS 0 16235 M01S03140.274l797 +++| LOC RLBB 16236 M01S03141.274l797 +++| CLB LDD DS 16237 M01S03142.274l797 +++| STM /READ/STAP SAVE GENERAL STATUS 16238 M01S03143.274l797 +++| RJM ITM INITIATE TAPE MOTION 16239 M01S03144.274l797 +++| CLB1 LDN 0 ALLOW FOR CONTROL WORD 16240 M01S03145.274l797 +++| CLBA EQU *-1 16241 M01S03146.274l797 +++|* LDN 1 200/260 READ CODE 16242 M01S03147.274l797 +++| RJM ADP ADVANCE IN POINTER 16243 M01S03148.274l797 +++| LDN 0 16244 M01S03149.274l797 +++| STM BCWA 16245 M01S03150.274l797 +++| STM .BYC CLEAR CHUNK COUNT 16246 M01S03151.274l797 +++| STD EC CLEAR ERROR CODE 16247 M01S03152.274l797 +++| STD TB CLEAR TERMINATION STATUS 16248 M01S03153.274l797 +++|* LDN 0 16249 M01S03154.274l797 +++| RJM ADP SET UP POINTERS FOR *1LT* 16250 M01S03155.274l797 +++| LDN 1 16251 M01S03156.274l797 +++| RJM SRQ SEND START BLOCK REQUEST TO *1LT* 16252 M01S03157.274l797 +++| LDC LBBY 16253 M01S03158.274l797 +++| STM /READ/RCTA 16254 M01S03159.274l797 +++| IAM BUFB,CH 16255 M01S03160.274l797 +++| UJN CLB4 CHECK IF ALL WORDS TRANSFERRED 16256 M01S03161.274l797 +++| 16257 M01S03162.274l797 +++| CLB2 LDC LBBY 16258 M01S03163.274l797 +++| STM /READ/RCTA
| Line S00097 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
M02 (Removed by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16259 M02S00097.ncccts ---| RJM WTS WAIT FOR *1LT* TRANSFER TO START
| Line S03164 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16260 M02S03164.ncccts ---| CLB3 IJM CLB8,CH IF TRANSFER COMPLETE 16261 M02S03165.ncccts ---| SCF CLB3,CH IF *1LT* NOT FINISHED
| Line S00098 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
M02 (Removed by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16262 M02S00098.ncccts ---| RJM ITS INDICATE *1MT* TRANSFER STARTED
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16263 M01S00004.ncccts +++| AJM *,CH WAIT FOR *1LT* TO DCN CHANNEL 16264 M01S00005.ncccts +++| PSN 16265 M01S00006.ncccts +++| PSN 16266 M01S00007.ncccts +++| CLB3 IJM CLB8,CH IF TRANSFER COMPLETE 16267 M01S00008.ncccts +++| EJM CLB3,CH IF DATA NOT AVAILABLE
| Line S03166 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16268 M01S03166.274l797 +++| IAM BUFB,CH
| Line S03167 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16269 M02S03167.ncccts ---| CLB4 NJN CLB6 IF TRANSFER COMPLETE 16270 M02S03168.ncccts ---| CLB5 FJM CLB9,CH IF A WORD IS PRESENT FOR *1LT* TO TRANSFER 16271 M02S03169.ncccts ---| AJM CLB5,CH IF TRANSFER NOT COMPLETE
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16272 M01S00009.ncccts +++| CLB4 DCN CH+40 INDICATE TO *1LT* TO CONTINUE READ 16273 M01S00010.ncccts +++| ZJN CLB9 IF TRANSFER NOT COMPLETE
| Line S03170 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16274 M01S03170.274l797 +++| 16275 M01S03171.274l797 +++|* *1MT* FINISHED THE CHANNEL TRANSFER. 16276 M01S03172.274l797 +++| 16277 M01S03173.274l797 +++| CLB6 STD T1 SAVE WORDS NOT TRANSFERRED 16278 M01S03174.274l797 +++| CLB7 RJM CRA READ *1LT* INTERFACE WORD 16279 M01S03175.274l797 +++| NJN CLB7 IF *1LT* NOT COMPLETE 16280 M01S03176.274l797 +++| LJM /READ/RCT6 CALCULATE REMAINDER OF CM WORD COUNT 16281 M01S03177.274l797 +++| 16282 M01S03178.274l797 +++|* *1LT* FINISHED THE CHANNEL TRANSFER. 16283 M01S03179.274l797 +++| 16284 M01S03180.274l797 +++| CLB8 RJM CRA READ *1LT* INTERFACE WORD 16285 M01S03181.274l797 +++| NJN CLB8 IF *1LT* TRANSFER TO CM NOT COMPLETE 16286 M01S03182.274l797 +++| AOM BCWA SKIP UPDATE IN *BCW* 16287 M01S03183.274l797 +++| LDC LBBY 16288 M01S03184.274l797 +++| SBD CM+1 16289 M01S03185.274l797 +++| LJM /READ/RCT5 CALCULATE REMAINDER OF CM WORD COUNT 16290 M01S03186.274l797 +++|
| Line S03187 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 16291 M02S03187.1mt51 ---| CLB9 CCF *+2,CH CLEAR CHANNEL FLAG (TELLS *1LT* TO START)
| Line S00099 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
M02 (Removed by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16292 M02S00099.ncccts ---| CLB9 CCF *,CH CLEAR CHANNEL FLAG (TELL *1LT* TO START)
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16293 M01S00011.ncccts +++| CLB9 ACN CH
| Line S03188 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16294 M01S03188.274l797 +++| AOM .BYC COUNT CHUNK 16295 M01S03189.274l797 +++| LMN 1 16296 M01S03190.274l797 +++| ZJN CLB10 IF FIRST CHUNK 16297 M01S03191.274l797 +++| LDC /MTX/LBWD 16298 M01S03192.274l797 +++| RJM ADP ADVANCE POINTER FOR *1LT* DATA 16299 M01S03193.274l797 +++| AOM .BYC COUNT CHUNK 16300 M01S03194.274l797 +++| CLB10 LDC /MTX/LBWD 16301 M01S03195.274l797 +++| RJM ADP ADVANCE POINTER 16302 M01S03196.274l797 +++| RJM WDA WRITE DATA TO CM 16303 M01S03197.274l797 +++| LDM .BYC 16304 M01S03198.274l797 +++| ADN 1 16305 M01S03199.274l797 +++| SBD OV 16306 M01S03200.274l797 +++| MJP CLB2 IF MORE CHUNKS TO INPUT 16307 M01S03201.274l797 +++| NJN CLB12 IF *1LT* IS READING LAST CHUNK 16308 M01S03202.274l797 +++| LDD WC 16309 M01S03203.274l797 +++| SHN 2 16310 M01S03204.274l797 +++| ADD WC 16311 M01S03205.274l797 +++| ADN 1 16312 M01S03206.274l797 +++| STM /READ/RCTA LENGTH TO READ + 1 16313 M01S03207.274l797 +++| CLB11 IJM CLB8,CH IF *1LT* FINISHED TRANSFER
| Line S03208 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16314 M02S03208.ncccts ---| SCF CLB11,CH IF *1LT* STILL READING
| Line S03209 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16315 M01S03209.274l797 +++| LJM /READ/RCT2 INPUT LAST CHUNK 16316 M01S03210.274l797 +++| 16317 M01S03211.274l797 +++| CLB12 RJM CRA READ *1LT* INTERFACE WORD 16318 M01S03212.274l797 +++| NJN CLB12 IF *1LT* NOT DONE 16319 M01S03213.274l797 +++| AOM BCWA SKIP UPDATE IN *BCW* 16320 M01S03214.274l797 +++| LDD WC 16321 M01S03215.274l797 +++| SHN 2 16322 M01S03216.274l797 +++| ADD WC 16323 M01S03217.274l797 +++| ADN 1 16324 M01S03218.274l797 +++| STM /READ/RCTA 16325 M01S03219.274l797 +++| SBD CM+1 16326 M01S03220.274l797 +++| LJM /READ/RCT3 SAVE BYTES NOT TRANSFERRED 16327 M01S03221.274l797 +++| 16328 M01S03222.274l797 +++|* *RCT* RETURNS HERE AFTER LAST CHUNK IS TRANSFERRED. 16329 M01S03223.274l797 +++| 16330 M01S03224.274l797 +++| CLB14 LDD MD 16331 M01S03225.274l797 +++| LPN 40 16332 M01S03226.274l797 +++| ZJN CLB15 IF NOT 200 READ CODE 16333 M01S03227.274l797 +++| LDN 0 SET TRAILER CONTROL WORD 16334 M01S03228.274l797 +++| STM BUFB 16335 M01S03229.274l797 +++| LDN 1 16336 M01S03230.274l797 +++| RJM ADP 16337 M01S03231.274l797 +++| RJM WDA WRITE TRAILER CONTROL WORD 16338 M01S03232.274l797 +++| CLB15 LDN 0 SET WORD COUNT 16339 M01S03233.274l797 +++| STD WC 16340 M01S03234.274l797 +++| STD CM ACKNOWLEDGE *1LT* 16341 M01S03235.274l797 +++| LDM CPDA 16342 M01S03236.274l797 +++| ADN 2 16343 M01S03237.274l797 +++| CWD CM 16344 M01S03238.274l797 +++| LDD TB 16345 M01S03239.274l797 +++| LMN 3 16346 M01S03240.274l797 +++| NJN CLB16 IF NOT TAPE MARK 16347 M01S03241.274l797 +++| LDM BCWC BACK UP POINTERS 16348 M01S03242.274l797 +++| STD CN+3 16349 M01S03243.274l797 +++| LDM BCWD 16350 M01S03244.274l797 +++| STD CN+4 16351 M01S03245.274l797 +++| CLB16 RJM /READ/TDA 16352 M01S03246.274l797 +++| LDM SRQB RESTORE STARTING WORD COUNT 16353 M01S03247.274l797 +++| STD WC 16354 M01S03248.274l797 +++| LJM RLB LOOP 16355 M01S03249.274l797 +++| 16356 M01S03250.274l797 +++| ERRMI .BYC-* IF CODE OVERFLOWS 16357 M01S03251.274l797 +++| 16358 M01S03252.274l797 +++| LOC *O 16359 M01S03253.274l797 +++| .CLBL EQU *-.CLB LENGTH OF *CLB* 16360 M01S03254.274l797 +++| 16361 M01S03255.274l797 +++| .CLBA CHTB CHANNEL TABLE 16362 M01S03256.274l797 +++| OVERLAY (READ LI FORMAT.),,,RLI 16363 M01S03257.274l797 +++| .IM SET 0 GENERATE ADDRESSES FOR OVERLAY 16364 M01S03258.274l797 +++| RLI SPACE 4,20 16365 M01S03259.274l797 +++|** RLI - READ LI FORMAT. 16366 M01S03260.274l797 +++|* THIS ROUTINE READS CONSECUTIVE BLOCKS AS LONG AS THERE IS 16367 M01S03261.274l797 +++|* ROOM IN THE BUFFER. ROUTINE *EBP* WILL STOP THE READ OF 16368 M01S03262.274l797 +++|* CONSECUTIVE BLOCKS IF THE TERMINATION CONDITION HAS BEEN 16369 M01S03263.274l797 +++|* MET, AN UNRECOVERABLE ERROR HAS OCCURRED, OR THE DROP OUT 16370 M01S03264.274l797 +++|* BLOCK COUNT HAS BEEN MET. *WDA* TRANSFERS ALL DATA READ 16371 M01S03265.274l797 +++|* IN THE 1ST, 3RD, ... CHUNKS. *UIP* UPDATES THE IN POINTER 16372 M01S03266.274l797 +++|* IN THE FET. FOR A 200 READ *VDA* WRITES THE INITIAL CONTROL 16373 M01S03267.274l797 +++|* WORD AND THE TRAILER CONTROL WORD IS WRITTEN IN *RLI*. IF 16374 M01S03268.274l797 +++|* THE TAPE IS ATS, MOST OF THIS ROUTINE IS OVERLAYED BY *ALI*. 16375 M01S03269.274l797 +++|* 16376 M01S03270.274l797 +++|* ENTRY (CN+3,CN+4) = STARTING IN POINTER. 16377 M01S03271.274l797 +++|* 16378 M01S03272.274l797 +++|* EXIT TO *RET* IF NOT ENOUGH ROOM IN BUFFER. 16379 M01S03273.274l797 +++|*
| Line S03274 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt47 |
Seq # *Modification Id* Act ----------------------------+ 16380 M02S03274.1mt47 ---|* USES CM, T1.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 1mt47 |
Seq # *Modification Id* Act ----------------------------+ 16381 M01S00003.1mt47 +++|* USES CM, CN+3, CN+4, EC, T1.
| Line S03275 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16382 M01S03275.274l797 +++|*
| Line S03276 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 16383 M02S03276.1mt51 ---|* CALLS ADP, CDO, CIB, CRA, EBP, ITM, SRQ, UCP, VDA, WDA, 16384 M02S03277.1mt51 ---|* /PRESET/WFE.
| Line S00100 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 16385 M01S00100.1mt51 +++|* CALLS ADP, CDO, CIB, CRA, EBP, ITM, ITS, SRQ, UCP, VDA, 16386 M01S00101.1mt51 +++|* WDA, WTS, /PRESET/WFE.
| Line S03278 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16387 M01S03278.274l797 +++|* 16388 M01S03279.274l797 +++|* MACROS SADT. 16389 M01S03280.274l797 +++| 16390 M01S03281.274l797 +++| 16391 M01S03282.274l797 +++| RLI RJM CIB CHECK INPUT BUFFER 16392 M01S03283.274l797 +++| SADT .BS,C 16393 M01S03284.274l797 +++| ADC -* (-MAXIMUM BLOCK SIZE)
| Line S03285 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt48 |
Seq # *Modification Id* Act ----------------------------+ 16394 M02S03285.1mt48 ---| PJN RLI1 IF ENOUGH ROOM IN BUFFER
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 1mt48 |
Seq # *Modification Id* Act ----------------------------+ 16395 M01S00003.1mt48 +++| RLIB PJN RLI1 IF ENOUGH ROOM IN BUFFER 16396 M01S00004.1mt48 +++|* UJN RLI1 (READSKP)
| Line S03286 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16397 M01S03286.274l797 +++| LDN 1 16398 M01S03287.274l797 +++| LJM RET SET FET COMPLETE 16399 M01S03288.274l797 +++| 16400 M01S03289.274l797 +++| RLI1 LDD CN+3 SAVE STARTING IN POINTER 16401 M01S03290.274l797 +++| STM VDAB 16402 M01S03291.274l797 +++| LDD CN+4 16403 M01S03292.274l797 +++| STM VDAC 16404 M01S03293.274l797 +++| 16405 M01S03294.274l797 +++|* THE FOLLOWING CODE IS OVERLAYED WITH *ALI* FOR ATS. 16406 M01S03295.274l797 +++| 16407 M01S03296.274l797 +++| .RLIA BSS 0 START OF OVERLAYED CODE 16408 M01S03297.274l797 +++| RJM ITM INITIATE TAPE MOTION
| Line S03298 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt48 |
Seq # *Modification Id* Act ----------------------------+ 16409 M02S03298.1mt48 ---| RLI2 RJM SRQ SEND START BLOCK REQUEST TO *1LT*
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | 1mt48 |
Seq # *Modification Id* Act ----------------------------+ 16410 M01S00005.1mt48 +++| RLI2 LDN 1 16411 M01S00006.1mt48 +++| RJM SRQ SEND READ BLOCK REQUEST TO *1LT*
| Line S03299 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16412 M01S03299.274l797 +++| LDC LBBY+5 BYTE COUNT FOR FIRST CHUNK 16413 M01S03300.274l797 +++| STM RLIA 16414 M01S03301.274l797 +++| IAM BUFB-5,CH 16415 M01S03302.274l797 +++| UJN RLI5 CHECK IF ALL WORDS TRANSFERRED 16416 M01S03303.274l797 +++|
| Line S03304 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 16417 M02S03304.1mt51 ---| RLI3 LDC LBBY
| Line S00102 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
M02 (Removed by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16418 M02S00102.ncccts ---| RLI3 RJM WTS WAIT FOR *1LT* TRANSFER TO START
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16419 M01S00012.ncccts +++| RLI3 AJM *,CH WAIT FOR *1LT* TO DCN CHANNEL
| Line S00103 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
Seq # *Modification Id* Act ----------------------------+ 16420 M01S00103.1mt51 +++| LDC LBBY
| Line S03305 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16421 M01S03305.274l797 +++| STM RLIA 16422 M01S03306.274l797 +++| RLI4 IJM RLI17,CH IF *1LT* FINISHED THE TRANSFER
| Line S03307 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16423 M02S03307.ncccts ---| SCF RLI4,CH IF *1LT* NOT FINISHED
| Line S00104 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
M02 (Removed by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16424 M02S00104.ncccts ---| RJM ITS INDICATE *1MT* TRANSFER STARTED
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16425 M01S00013.ncccts +++| EJM RLI4,CH IF DATA NOT AVAILABLE
| Line S03308 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16426 M01S03308.274l797 +++| IAM BUFB,CH
| Line S03309 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16427 M02S03309.ncccts ---| RLI5 IJM RLI9,CH IF *1MT* FINISHED THE CHANNEL TRANSFER 16428 M02S03310.ncccts ---| EJM RLI5,CH IF *1LT* NOT TAKING DATA YET 16429 M02S03311.ncccts ---| CCF *,CH TELL *1LT* TO START
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16430 M01S00014.ncccts +++| RLI5 DCN CH+40 TELL *1LT* TO START 16431 M01S00015.ncccts +++| ZJN RLI5.1 IF *1MT* DID NOT FINISH THE TRANSFER 16432 M01S00016.ncccts +++| LJM RLI9 16433 M01S00017.ncccts +++| 16434 M01S00018.ncccts +++| RLI5.1 ACN CH 16435 M01S00019.ncccts +++| RLI5.2 IJM RLI9,CH IF *1MT* FINISHED THE CHANNEL TRANSFER 16436 M01S00020.ncccts +++| EJM RLI5.2,CH IF *1LT* NOT TAKING DATA YET
| Line S03312 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16437 M01S03312.274l797 +++| RJM UCP UPDATE COUNTERS AND POINTER 16438 M01S03313.274l797 +++| LMN 1 16439 M01S03314.274l797 +++| ZJN RLI6 IF FIRST CHUNK 16440 M01S03315.274l797 +++| RJM UCP UPDATE COUNTERS AND POINTER 16441 M01S03316.274l797 +++| RLI6 RJM WDA WRITE DATA TO CENTRAL MEMORY 16442 M01S03317.274l797 +++| LDM .BYC 16443 M01S03318.274l797 +++| SBN LICH-1 FULL CHUNKS PER BLOCK - 1 16444 M01S03319.274l797 +++| MJP RLI3 IF MORE FULL CHUNKS TO INPUT
| Line S00105 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
M02 (Removed by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16445 M02S00105.ncccts ---| RJM WTS WAIT FOR *1LT* TRANSFER TO START
| Line S03320 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Removed by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16446 M02S03320.ncccts ---| RLI7 IJM RLI17,CH IF *1LT* FINISHED THE CHANNEL TRANSFER 16447 M02S03321.ncccts ---| SCF RLI7,CH IF *1LT* STILL READING
| Line S00106 Modification History | |
|---|---|
M01 (Added by) | 1mt51 |
M02 (Removed by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16448 M02S00106.ncccts ---| RJM ITS INDICATE *1MT* TRANSFER STARTED
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16449 M01S00021.ncccts +++| AJM *,CH WAIT FOR *1LT* TO DCN CHANNEL
| Line S03322 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16450 M01S03322.274l797 +++| LDC LIRW*5+1+1 BYTES IN REMAINDER + PAD + 1 16451 M01S03323.274l797 +++| STM RLIA LENGTH TO READ + 1
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16452 M01S00022.ncccts +++| RLI7 IJM RLI17,CH IF *1LT* FINISHED THE TRANSFER 16453 M01S00023.ncccts +++| EJM RLI7,CH IF DATA NOT AVAILABLE
| Line S03324 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16454 M01S03324.274l797 +++| IAM BUFB,CH
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16455 M01S00024.ncccts +++| DCN CH+40
| Line S03325 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16456 M01S03325.274l797 +++| NJN RLI9 IF NOT EXCESS BLOCK LENGTH 16457 M01S03326.274l797 +++| 16458 M01S03327.274l797 +++|* THROW AWAY DATA WHEN THE BLOCK IS TOO LONG. IF THE DATA 16459 M01S03328.274l797 +++|* IS NOT TAKEN, OVERRUN ERRORS COULD OCCUR. ALSO, WITH A 16460 M01S03329.274l797 +++|* CROSS-COUPLED CONTROLLER, THE CONTROLLER HUNG WITH CHLA 16461 M01S03330.274l797 +++|* 030F FLASHING ON ITS ERROR DISPLAY. 16462 M01S03331.274l797 +++| 16463 M01S03332.274l797 +++| RLI8 LDC 500
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16464 M01S00025.ncccts +++| ACN CH
| Line S03333 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16465 M01S03333.274l797 +++| IAM ERLB,CH
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16466 M01S00026.ncccts +++| DCN CH+40
| Line S03334 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16467 M01S03334.274l797 +++| ZJN RLI8 IF THERE MAY BE MORE DATA 16468 M01S03335.274l797 +++| LDN /MTX/BTL SET BLOCK TOO LONG 16469 M01S03336.274l797 +++| STD EC 16470 M01S03337.274l797 +++| LDN 1 SET TO COMPUTE WORD COUNT 16471 M01S03338.274l797 +++| RLI9 STD T1 16472 M01S03339.274l797 +++| LDC LBBY+5 BYTE COUNT FOR FIRST CHUNK 16473 M01S03340.274l797 +++| RLIA EQU *-1 16474 M01S03341.274l797 +++|* LDC LBBY (MIDDLE CHUNK) 16475 M01S03342.274l797 +++|* LDC LIRW*5+1+1 (LAST CHUNK) 16476 M01S03343.274l797 +++| RJM VDA PROCESS DATA 16477 M01S03344.274l797 +++| RJM CDO CHECK DROP OUT FLAG 16478 M01S03345.274l797 +++| RLI10 RJM CRA READ *1LT* INTERFACE WORD 16479 M01S03346.274l797 +++| NJN RLI10 IF *1LT* TRANSFER TO CM NOT COMPLETE 16480 M01S03347.274l797 +++| 16481 M01S03348.274l797 +++|* PROCESS STATUS. 16482 M01S03349.274l797 +++| 16483 M01S03350.274l797 +++| RJM /PRESET/WFE WAIT FOR END OF OPERATION 16484 M01S03351.274l797 +++| PJN RLI11 IF NOT COMMAND RETRY 16485 M01S03352.274l797 +++| ACN CH 16486 M01S03353.274l797 +++| LDM VDAB BACK UP POINTERS 16487 M01S03354.274l797 +++| STD CN+3 16488 M01S03355.274l797 +++| LDM VDAC 16489 M01S03356.274l797 +++| STD CN+4 16490 M01S03357.274l797 +++| LJM RLI2 RESEND THE DATA 16491 M01S03358.274l797 +++| 16492 M01S03359.274l797 +++| RLI11 ZJN RLI12 IF NO ERROR 16493 M01S03360.274l797 +++| SHN 21-4 16494 M01S03361.274l797 +++| PJN RLI13 IF NOT TAPE MARK 16495 M01S03362.274l797 +++| LDN 3 SET STOP TO EOI 16496 M01S03363.274l797 +++| STD TB 16497 M01S03364.274l797 +++| LDN 17 SET LEVEL NUMBER 16498 M01S03365.274l797 +++| STM LNUM 16499 M01S03366.274l797 +++| LDM VDAB BACK UP POINTERS 16500 M01S03367.274l797 +++| STD CN+3 16501 M01S03368.274l797 +++| LDM VDAC 16502 M01S03369.274l797 +++| STD CN+4 16503 M01S03370.274l797 +++| LDN /MTX/BEI SET EOI 16504 M01S03371.274l797 +++| UJN RLI14 SAVE ERROR CODE 16505 M01S03372.274l797 +++| 16506 M01S03373.274l797 +++| RLI12 LDD DS 16507 M01S03374.274l797 +++| LPN 40 16508 M01S03375.274l797 +++| ZJN RLI15 IF NO FILL STATUS 16509 M01S03376.274l797 +++| RLI13 LDN /MTX/STE STATUS ERROR 16510 M01S03377.274l797 +++| RLI14 STD EC 16511 M01S03378.274l797 +++| RLI15 LDD MD 16512 M01S03379.274l797 +++| LPN 40 16513 M01S03380.274l797 +++| ZJN RLI16 IF NOT 200 READ CODE 16514 M01S03381.274l797 +++| LDN 1 16515 M01S03382.274l797 +++| RJM ADP 16516 M01S03383.274l797 +++| RJM WDA WRITE TRAILER CONTROL WORD 16517 M01S03384.274l797 +++| RLI16 LDN 0 16518 M01S03385.274l797 +++| STD CM ACKNOWLEDGE *1LT* 16519 M01S03386.274l797 +++| LDM CPDA 16520 M01S03387.274l797 +++| ADN 2 16521 M01S03388.274l797 +++| CWD CM 16522 M01S03389.274l797 +++| RJM EBP END OF BLOCK PROCESSING 16523 M01S03390.274l797 +++| LJM RLI READ NEXT BLOCK 16524 M01S03391.274l797 +++| 16525 M01S03392.274l797 +++|* *1LT* FINISHED THE CHANNEL TRANSFER. 16526 M01S03393.274l797 +++| 16527 M01S03394.274l797 +++| RLI17 RJM CRA READ *1LT* INTERFACE WORD 16528 M01S03395.274l797 +++| NJN RLI17 IF *1LT* TRANSFER TO CM NOT COMPLETE 16529 M01S03396.274l797 +++| AOM VDAA INDICATE *1LT* FINISHED THE TRANSFER 16530 M01S03397.274l797 +++| LDC LBBY
| Line S00027 Modification History | |
|---|---|
M01 (Added by) | ncccts |
Seq # *Modification Id* Act ----------------------------+ 16531 M01S00027.ncccts +++| STM RLIA
| Line S03398 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 16532 M01S03398.274l797 +++| SBD CM+1 16533 M01S03399.274l797 +++| LJM RLI9 SAVE BYTES TRANSFERRED 16534 M01S03400.274l797 +++| 16535 M01S03401.274l797 +++| BSS 70 MAKE ROOM FOR *ALI* 16536 M01S03402.274l797 +++| .RLIAL EQU *-.RLIA LENGTH OF *RLI* 16537 M01S03403.274l797 +++| .BYC CON 0 CHUNKS INPUT OF *LBBY* BYTES 16538 M01S03404.274l797 +++| ADP SPACE 4,15 16539 M01S03405.274l797 +++|** ADP - ADVANCE POINTER. 16540 M01S03406.274l797 +++|* THIS ROUTINE ADVANCES THE IN POINTER FOR WRITES INTO THE 16541 M01S03407.274l797 +++|* BUFFER. ROUTINE *UIP* UPDATES THE IN POINTER FOR THE FET. 16542 M01S03408.274l797 +++|* 16543 M01S03409.274l797 +++|* ENTRY (CN+3 - CN+4) = IN POINTER. 16544 M01S03410.274l797 +++|* (A) = WORDS TO INCREMENT IN BY. 16545 M01S03411.274l797 +++|* 16546 M01S03412.274l797 +++|* EXIT (T4 - T5) = STARTING IN POINTER. 16547 M01S03413.274l797 +++|* (CN+3 - CN+4) = UPDATED IN POINTER. 16548 M01S03414.274l797 +++|* (T6) = FIRST PART WORD COUNT. 16549 M01S03415.274l797 +++|* (T7) = SECOND PART WORD COUNT. 16550 M01S03416.274l797 +++|* 16551 M01S03417.274l797 +++|* CALLS CIB. 16552 M01S03418.274l797 +++|* 16553 M01S03419.274l797 +++|* MACROS SADT. 16554 M01S03420.274l797 +++| 16555 M01S03421.274l797 +++| 16556 M01S03422.274l797 +++| ADP SUBR ENTRY/EXIT 16557 M01S03423.274l797 +++| STD T6 16558 M01S03424.274l797 +++| RJM CIB CHECK INPUT BUFFER 16559 M01S03425.274l797 +++| SBD T6 16560 M01S03426.274l797 +++| PJN ADP1 IF ROOM IN BUFFER FOR BLOCK 16561 M01S03427.274l797 +++| RAD T6 ADJUST WORD COUNT 16562 M01S03428.274l797 +++| ADP1 LDD CN+3 SAVE IN 16563 M01S03429.274l797 +++| STD T4 16564 M01S03430.274l797 +++| LDD CN+4 16565 M01S03431.274l797 +++| STD T5 16566 M01S03432.274l797 +++| LDN 0 PRESET SECOND PART WORD COUNT 16567 M01S03433.274l797 +++| STD T7 16568 M01S03434.274l797 +++| LDD T6 UPDATE IN 16569 M01S03435.274l797 +++| RAD CN+4 16570 M01S03436.274l797 +++| SHN -14 16571 M01S03437.274l797 +++| RAD CN+3 16572 M01S03438.274l797 +++| SHN 14 16573 M01S03439.274l797 +++| LMD CN+4 16574 M01S03440.274l797 +++| SADT .LM,C 16575 M01S03441.274l797 +++| ADC -* (-LIMIT) 16576 M01S03442.274l797 +++| MJN ADPX IF NO WRAP AROUND 16577 M01S03443.274l797 +++| STD T7 SET SECOND PART WORD COUNT 16578 M01S03444.274l797 +++| SADT .FT 16579 M01S03445.274l797 +++| ADC * (FIRST) 16580 M01S03446.274l797 +++| STD CN+4 16581 M01S03447.274l797 +++| SHN -14 16582 M01S03448.274l797 +++| STD CN+3 16583 M01S03449.274l797 +++| LDD T6 RESET FIRST PART WORD COUNT 16584 M01S03450.274l797 +++| SBD T7 16585 M01S03451.274l797 +++| STD T6 16586 M01S03452.274l797 +++| LJM ADPX RETURN 16587 M01S03453.274l797 +++| CIB SPACE 4,10 16588 M01S03454.274l797 +++|** CIB - CHECK INPUT BUFFER. 16589 M01S03455.274l797 +++|* 16590 M01S03456.274l797 +++|* ENTRY (CN+3 - CN+4) = IN POINTER. 16591 M01S03457.274l797 +++|* 16592 M01S03458.274l797 +++|* EXIT (A) = WORD COUNT OF AVAILABLE BUFFER SPACE. 16593 M01S03459.274l797 +++|* TO *RET3* IF ERROR. 16594 M01S03460.274l797 +++|* 16595 M01S03461.274l797 +++|* USES CM - CM+4. 16596 M01S03462.274l797 +++|* 16597 M01S03463.274l797 +++|* MACROS SADT. 16598 M01S03464.274l797 +++| 16599 M01S03465.274l797 +++| 16600 M01S03466.274l797 +++| CIB1 LDD CM+3 LENGTH = OUT - IN - 1 16601 M01S03467.274l797 +++| SBD CN+3 16602 M01S03468.274l797 +++| SHN 14 16603 M01S03469.274l797 +++| ADD CM+4 16604 M01S03470.274l797 +++| SBD CN+4 16605 M01S03471.274l797 +++| SBN 1 16606 M01S03472.274l797 +++| PJN CIBX IF (IN + 1) .LT OUT
Proceed to Part 13
cdc/nos2.source/opl.opl871/deck/1mt.012.txt · Last modified: (external edit)