cdc:nos2.source:opl.opl871:deck:1ds.002
Deck 1DS Part 002
41 Modifications
Listing Sections
- Deck 1DS Start
- Deck 1DS Part 1 (Line 1870)
- Deck 1DS Part 2 (Line 3414)
- Deck 1DS Part 3 (Line 5063)
- Deck 1DS Part 4 (Line 6536)
Source
Seq # *Modification Id* Act ----------------------------+ 03414 M01S00007.1ds24 +++|* 03415 M01S00008.1ds24 +++|* USES CM - CM+4, T1 - T5. 03416 M01S00009.1ds24 +++| 03417 M01S00010.1ds24 +++| 03418 M01S00011.1ds24 +++| SFD SUBR ENTRY/EXIT 03419 M01S00012.1ds24 +++| LDK DFPP 03420 M01S00013.1ds24 +++| CRD T1 03421 M01S00014.1ds24 +++| LDN 3*3+2 SET DAYFILE EST OFFSET 03422 M01S00015.1ds24 +++| STD T3 03423 M01S00016.1ds24 +++| SFD1 LDD T1 03424 M01S00017.1ds24 +++| SHN 14 03425 M01S00018.1ds24 +++| LMD T2 03426 M01S00019.1ds24 +++| ADD T3 03427 M01S00020.1ds24 +++| CRD CM 03428 M01S00021.1ds24 +++| LDD CM 03429 M01S00022.1ds24 +++| LMD IR+4 03430 M01S00023.1ds24 +++| ZJN SFDX IF DAYFILE ON EQUIPMENT 03431 M01S00024.1ds24 +++| LCN 3 03432 M01S00025.1ds24 +++| RAD T3 03433 M01S00026.1ds24 +++| PJN SFD1 IF MORE DAYFILES TO CHECK 03434 M01S00027.1ds24 +++| UJN SFDX RETURN 03435 M00S02816.1ds +++| SUL SPACE 4,10 03436 M00S02817.1ds +++|** SUL - SCAN UNIT LIST. 03437 M00S02818.1ds +++|* 03438 M00S02819.1ds +++|* ENTRY (T3) = CONTROL MODULE NUMBER * 10B. 03439 M00S02820.1ds +++|* (AB+4) = ISMD DEVICE MST ADDRESS/10. 03440 M00S02821.1ds +++|* 03441 M00S02822.1ds +++|* EXIT (A) = 0 IF THE ISMD CONTAINS A UNIT ON THE *CM*. 03442 M00S02823.1ds +++|* 03443 M00S02824.1ds +++|* USES T4, T5, FN - FN+4. 03444 M00S02825.1ds +++| 03445 M00S02826.1ds +++| 03446 M00S02827.1ds +++| SUL SUBR ENTRY/EXIT 03447 M00S02828.1ds +++| LDD AB+4 READ MST WORD *DDLL* 03448 M00S02829.1ds +++| SHN 3 03449 M00S02830.1ds +++| ADN DDLL 03450 M00S02831.1ds +++| CRD FN 03451 M00S02832.1ds +++| LDD FN 03452 M00S02833.1ds +++| SHN 21-12 03453 M00S02834.1ds +++| MJN SULX IF NULL EQUIPMENT 03454 M00S02835.1ds +++| LDD FN GET NUMBER OF UNITS - 1 03455 M00S02836.1ds +++| LPN 7 03456 M00S02837.1ds +++| STD T4 03457 M00S02838.1ds +++| LDN FN+4 INITIALIZE UNIT LIST ADDRESS 03458 M00S02839.1ds +++| STD T5 03459 M00S02840.1ds +++| SUL1 LDI T5 03460 M00S02841.1ds +++| LMD T3 COMPARE WITH CONTROL MODULE NUMBER 03461 M00S02842.1ds +++| LPN 70 03462 M00S02843.1ds +++| ZJN SULX IF NUMBER MATCHES 03463 M00S02844.1ds +++| SOD T4 03464 M00S02845.1ds +++| MJN SULX IF END OF UNITS 03465 M00S02846.1ds +++| LDI T5 03466 M00S02847.1ds +++| SHN 3-11 03467 M00S02848.1ds +++| LMD T3 COMPARE WITH CONTROL MODULE NUMBER 03468 M00S02849.1ds +++| LPN 70 03469 M00S02850.1ds +++| ZJN SULX IF NUMBER MATCHES 03470 M00S02851.1ds +++| SOD T4 03471 M00S02852.1ds +++| MJN SULX IF END OF UNITS 03472 M00S02853.1ds +++| SOD T5 03473 M00S02854.1ds +++| UJN SUL1 CHECK NEXT UNIT 03474 M00S02855.1ds +++| UDD SPACE 4,10 03475 M00S02856.1ds +++|** UDD - UP *DD* DRIVE. 03476 M00S02857.1ds +++|* 03477 M00S02858.1ds +++|* ENTRY (AB - AB+4) = EST ENTRY. 03478 M00S02859.1ds +++|* 03479 M00S02860.1ds +++|* EXIT (A) .NE. 0 IF DRIVE SPUN UP. 03480 M00S02861.1ds +++|* (A) = 0 IF CONTROL MODULE DOWN. 03481 M00S02862.1ds +++|* 03482 M00S02863.1ds +++|* USES T1, T3, CN - CN+4. 03483 M00S02864.1ds +++|* 03484 M00S02865.1ds +++|* CALLS COS, SUL. 03485 M00S02866.1ds +++| 03486 M00S02867.1ds +++| 03487 M00S02868.1ds +++| UDD2 RJM C0S SPIN UP *DD* DRIVE 03488 M00S02869.1ds +++| STM UDDA 03489 M00S02870.1ds +++| RJM * 03490 M00S02871.1ds +++| UDDA EQU *-1 03491 M00S02872.1ds +++| LDN 1 03492 M00S02873.1ds +++| 03493 M00S02874.1ds +++| UDD SUBR ENTRY/EXIT 03494 M00S02875.1ds +++| LDN ESTP 03495 M00S02876.1ds +++| CRD CN 03496 M00S02877.1ds +++| LDD CN+2 SET LAST EST ORDINAL + 1 03497 M00S02878.1ds +++| STD T1 03498 M00S02879.1ds +++| UDD1 SOD T1 03499 M00S02880.1ds +++| ZJN UDD2 IF END OF EST 03500 M00S02881.1ds +++| SFA EST 03501 M00S02882.1ds +++| CRD CN 03502 M00S02883.1ds +++| LDD CN+3 03503 M00S02884.1ds +++| LMC 2RCM 03504 M00S02885.1ds +++| NJN UDD1 IF NOT *CM* 03505 M00S02886.1ds +++| LDD CN 03506 M00S02887.1ds +++| LPN 3 CHECK DEVICE STATE 03507 M00S02888.1ds +++| LMN 3 03508 M00S02889.1ds +++| NJN UDD1 IF NOT DOWN 03509 M00S02890.1ds +++| LDD CN+4 03510 M00S02891.1ds +++| SHN 3-11 SAVE EQUIPMENT NUMBER 03511 M00S02892.1ds +++| STD T3 03512 M00S02893.1ds +++| RJM SUL SCAN UNIT LIST 03513 M00S02894.1ds +++| NJN UDD1 IF NO UNIT ON THIS *CM* 03514 M00S02895.1ds +++| UJP UDDX RETURN 03515 M00S02896.1ds +++| TITLE FUNCTION PROCESSORS. 03516 M00S02897.1ds +++| DCM SPACE 4,10 03517 M00S02898.1ds +++|*** FUNCTION DCMF - DOWN CONTROL MODULE. 03518 M00S02899.1ds +++|* 03519 M00S02900.1ds +++|* ENTRY (IR+4) = CONTROL MODULE EQUIPMENT NUMBER. 03520 M00S02901.1ds +++|* 03521 M00S02902.1ds +++|* NOTE IF ANY ISMD DEVICE WHICH IS NOT DOWN HAS A UNIT ON 03522 M00S02903.1ds +++|* THE SPECIFIED CONTROL MODULE, A NEGATIVE REPLY IS 03523 M00S02904.1ds +++|* RETURNED TO *DSD* AND THE CONTROL MODULE IS NOT 03524 M00S02905.1ds +++|* DOWNED. 03525 M00S02906.1ds +++| 03526 M00S02907.1ds +++| 03527 M00S02908.1ds +++| DCM3 LDN DWES *SEQM* SUBFUNCTION 03528 M00S02909.1ds +++| STD CM+2 03529 M00S02910.1ds +++| LDD IR+4 EST ORDINAL 03530 M00S02911.1ds +++| STD CM+1 03531 M00S02912.1ds +++| MONITOR SEQM SET EQUIPMENT DOWN 03532 M00S02913.1ds +++| 03533 M00S02914.1ds +++| DCM ENTRY ENTRY/EXIT 03534 M00S02915.1ds +++| LDN ESTP GET LAST MASS STORAGE ORDINAL + 1 03535 M00S02916.1ds +++| CRD CN 03536 M00S02917.1ds +++| SFA EST,IR+4 GET *CM* EST ENTRY 03537 M00S02918.1ds +++| CRD CM 03538 M00S02919.1ds +++| LDD CM+4 SAVE EQUIPMENT NUMBER 03539 M00S02920.1ds +++| SHN 3-11 03540 M00S02921.1ds +++| STD T3 03541 M00S02922.1ds +++| DCM1 SOD CN+3 03542 M00S02923.1ds +++| ZJN DCM3 IF END OF EST 03543 M00S02924.1ds +++| SFA EST 03544 M00S02925.1ds +++| ADK EQDE FETCH EST ENTRY 03545 M00S02926.1ds +++| CRD AB 03546 M00S02927.1ds +++| LDD AB+3 CHECK DEVICE TYPE 03547 M00S02928.1ds +++| LMC 2RDD 03548 M00S02929.1ds +++| ZJN DCM2 IF ISD (TYPE *DD*) 03549 M00S02930.1ds +++| LMN 1RG&1RD 03550 M00S02931.1ds +++| NJN DCM1 IF NOT TYPE *DG* 03551 M00S02932.1ds +++| DCM2 LDD AB 03552 M00S02933.1ds +++| LPN 3 CHECK DEVICE STATE 03553 M00S02934.1ds +++| LMN 3 03554 M00S02935.1ds +++| ZJN DCM1 IF DEVICE DOWN 03555 M00S02936.1ds +++| RJM SUL SCAN UNIT LIST 03556 M00S02937.1ds +++| NJN DCM1 IF NO UNIT ON THIS *CM* 03557 M00S02938.1ds +++| LDN 1 INDICATE *CM* NOT DOWNED 03558 M00S02939.1ds +++| RJM SRD SAVE REPONSE TO *DSD* 03559 M00S02940.1ds +++| LJM DCMX RETURN 03560 M00S02941.1ds +++| OCM SPACE 4,10 03561 M00S02942.1ds +++|*** FUNCTION OCMF - ON CONTROL MODULE. 03562 M00S02943.1ds +++|* 03563 M00S02944.1ds +++|* ENTRY (IR+4) = CONTROL MODULE EST ORDINAL. 03564 M00S02945.1ds +++| 03565 M00S02946.1ds +++| 03566 M00S02947.1ds +++|* CHECK FOR FIRMWARE RELOAD COMPLETION. 03567 M00S02948.1ds +++| 03568 M00S02949.1ds +++| OCM1 LMN 1&3 03569 M00S02950.1ds +++| NJN OCM2 IF CONTROL MODULE NOT IDLE 03570 M00S02951.1ds +++| LDD FN+2 03571 M00S02952.1ds +++| SHN 0-12 03572 M00S02953.1ds +++| ZJN OCM2 IF FIRMWARE RELOAD COMPLETE 03573 M00S02954.1ds +++| LDK ZERL SET 1 SECOND TIMED RECALL PARAMETERS 03574 M00S02955.1ds +++| CRD CM 03575 M00S02956.1ds +++| LDM IDSC RESTORE ORIGINAL CONTENTS 03576 M00S02957.1ds +++| STD IR+2 03577 M00S02958.1ds +++| LDD MA SET PP INPUT REGISTER IMAGE 03578 M00S02959.1ds +++| CWD IR 03579 M00S02960.1ds +++| MONITOR RECM ENTER RECALL AND DROP PP 03580 M00S02961.1ds +++| LJM PPR EXIT TO PP RESIDENT 03581 M00S02962.1ds +++| 03582 M00S02963.1ds +++|* SET CONTROL MODULE STATUS = ON. 03583 M00S02964.1ds +++| 03584 M00S02965.1ds +++| OCM2 LDN ONES *SEQM* SUBFUNCTION 03585 M00S02966.1ds +++| STD CM+2 03586 M00S02967.1ds +++| MONITOR SEQM 03587 M00S02968.1ds +++| 03588 M00S02969.1ds +++| OCM ENTRY ENTRY 03589 M00S02970.1ds +++| LDD IR+4 03590 M00S02971.1ds +++| STD CM+1 03591 M00S02972.1ds +++| SFA EST READ CONTROL MODULE EST ENTRY 03592 M00S02973.1ds +++| ADK EQDE 03593 M00S02974.1ds +++| CRD CN 03594 M00S02975.1ds +++| ADK EQAE-EQDE 03595 M00S02976.1ds +++| CRD FN 03596 M00S02977.1ds +++| STD CM+4 SAVE ADDRESS OF *EQAE* WORD 03597 M00S02978.1ds +++| SHN -14 03598 M00S02979.1ds +++| STD CM+3 03599 M00S02980.1ds +++| LDD CN 03600 M00S02981.1ds +++| LPN 3 03601 M00S02982.1ds +++| LMN 3 03602 M00S02983.1ds +++| NJP OCM1 IF CONTROL MODULE NOT DOWN 03603 M00S02984.1ds +++| 03604 M00S02985.1ds +++|* IDLE CONTROL MODULE FOR FIRMWARE LOAD. 03605 M00S02986.1ds +++| 03606 M00S02987.1ds +++| LDN IDES SET *SEQM* SUBFUNCTION 03607 M00S02988.1ds +++| STD CM+2 03608 M00S02989.1ds +++| MONITOR SEQM 03609 M00S02990.1ds +++| 03610 M00S02991.1ds +++|* SET CONTROLWARE LOAD FLAG IN EST ENTRY. 03611 M00S02992.1ds +++| 03612 M00S02993.1ds +++| LDN 1 SET REQUEST COUNT 03613 M00S02994.1ds +++| STD CM+1 03614 M00S02995.1ds +++| LDD MA PLACE *UTEM* PARAMETERS IN MB 03615 M00S02996.1ds +++| CWM OCMA,ON 03616 M00S02997.1ds +++| MONITOR UTEM 03617 M00S02998.1ds +++| 03618 M00S02999.1ds +++|* USE THIS PP TO INITIATE CONTROLWARE LOAD. 03619 M00S03000.1ds +++| 03620 M00S03001.1ds +++| LDM IDSC SET FUNCTION CODE 03621 M00S03002.1ds +++| SCN 77 PRESERVE BUFFER LOCK/LOGGING CONTROL BITS 03622 M00S03003.1ds +++| LMN /1DS/ILJF 03623 M00S03004.1ds +++| STD IR+2 03624 M00S03005.1ds +++| LDC 2000 SET *OCMF* CALL FLAG 03625 M00S03006.1ds +++| RAD IR+4 03626 M00S03007.1ds +++| LDD IA REWRITE PP INPUT REGISTER 03627 M00S03008.1ds +++| CWD IR 03628 M00S03009.1ds +++| EXECUTE 1DS,= 03629 M00S03010.1ds +++| LJM PPR EXIT TO PP RESIDENT 03630 M00S03011.1ds +++| 03631 M00S03012.1ds +++| 03632 M00S03013.1ds +++| OCMA VFD 1/0,5/0,6/1,6/43,42/1 *UTEM* REQUEST
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | ns2767 |
Seq # *Modification Id* Act ----------------------------+ 03633 M01S00008.ns2767 +++| RST SPACE 4,10 03634 M01S00009.ns2767 +++|*** FUNCTION RSTF - RESTORE PARITY PROTECTION FOR DAS DEVICE. 03635 M01S00010.ns2767 +++|* 03636 M01S00011.ns2767 +++|* ENTRY (IR+4) = DEVICE EST ORDINAL. 03637 M01S00012.ns2767 +++| 03638 M01S00013.ns2767 +++| 03639 M01S00014.ns2767 +++| RST ENTRY ENTRY/EXIT 03640 M01S00015.ns2767 +++| LDD IR+4 03641 M01S00016.ns2767 +++| STD T5 03642 M01S00017.ns2767 +++| SFA EST GET EST ENTRY 03643 M01S00018.ns2767 +++| ADK EQDE 03644 M01S00019.ns2767 +++| CRD CM 03645 M01S00020.ns2767 +++| 03646 M01S00021.ns2767 +++|* CHECK DEVICE TYPE. 03647 M01S00022.ns2767 +++| 03648 M01S00023.ns2767 +++| LDN TRSTL CHECK DEVICE TYPE 03649 M01S00024.ns2767 +++| STD T1 03650 M01S00025.ns2767 +++| RST1 SOD T1 03651 M01S00026.ns2767 +++| MJN RSTX IF DEVICE DOES NOT SUPPORT RESTORE 03652 M01S00027.ns2767 +++| LDD CM+3 03653 M01S00028.ns2767 +++| LMM TRST,T1 03654 M01S00029.ns2767 +++| NJN RST1 IF DEVICE TYPE DOES NOT MATCH 03655 M01S00030.ns2767 +++| 03656 M01S00031.ns2767 +++|* CALCULATE *PUT* ENTRY ADDRESS. 03657 M01S00032.ns2767 +++| 03658 M01S00033.ns2767 +++| LDD CM+4 GET *PUT* ORDINAL 03659 M01S00034.ns2767 +++| SHN 3 03660 M01S00035.ns2767 +++| ADN DILL 03661 M01S00036.ns2767 +++| CRD CM 03662 M01S00037.ns2767 +++| LDD CM+2 03663 M01S00038.ns2767 +++| SHN PUTLS 03664 M01S00039.ns2767 +++| STM RSTA+1 03665 M01S00040.ns2767 +++| SHN -14 03666 M01S00041.ns2767 +++| RAM RSTA 03667 M01S00042.ns2767 +++| LDC BIOL GET POINTER TO BUFFERED I/O TABLES 03668 M01S00043.ns2767 +++| CRD CM 03669 M01S00044.ns2767 +++| LDD CM+1 FETCH *PUT* TABLE POINTER WORD 03670 M01S00045.ns2767 +++| SHN 14 03671 M01S00046.ns2767 +++| LMD CM+2 03672 M01S00047.ns2767 +++| ADN PUTP 03673 M01S00048.ns2767 +++| CRD CM 03674 M01S00049.ns2767 +++| LDD CM+3 FWA OF FIRST *PUT* ENTRY 03675 M01S00050.ns2767 +++| LPN 77 03676 M01S00051.ns2767 +++| SHN 14 03677 M01S00052.ns2767 +++| ADD CM+4 03678 M01S00053.ns2767 +++| RSTA ADC 0 (*PUT* ORDINAL SHIFTED BY *PUTLS*) 03679 M01S00054.ns2767 +++| 03680 M01S00055.ns2767 +++|* SET *RSPF* SPECIAL REQUEST FLAG IN *PUT*. 03681 M01S00056.ns2767 +++| 03682 M01S00057.ns2767 +++| STD CM+4 SET ADDRESS OF *PUT* ENTRY 03683 M01S00058.ns2767 +++| SHN -14 03684 M01S00059.ns2767 +++| STD CM+3 03685 M01S00060.ns2767 +++| LDN 1 SET NUMBER OF REQUESTS 03686 M01S00061.ns2767 +++| STD CM+1 03687 M01S00062.ns2767 +++| LDD MA STORE *UTEM* REQUEST IN MESSAGE BUFFER 03688 M01S00063.ns2767 +++| CWM RSTB,ON 03689 M01S00064.ns2767 +++| MONITOR UTEM SET FLAG FOR BUFFERED DEVICE DRIVER 03690 M01S00065.ns2767 +++| UJP RSTX RETURN 03691 M01S00066.ns2767 +++| 03692 M01S00067.ns2767 +++| 03693 M01S00068.ns2767 +++| RSTB VFD 1/0,5/PILL,6/1,6/RSPF,42/1 *UTEM* REQUEST 03694 M01S00069.ns2767 +++|
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2775a |
Seq # *Modification Id* Act ----------------------------+ 03695 M01S00001.ns2775a +++| PURGMAC TBLM 03696 M01S00002.ns2775a +++| 03697 M01S00003.ns2775a +++| TBLM MACRO TY 03698 M01S00004.ns2775a +++| TBLM IFEQ BF_TY,7,1 03699 M01S00005.ns2775a +++| CON 2R_TY 03700 M01S00006.ns2775a +++| TBLM ENDIF 03701 M01S00007.ns2775a +++| TBLM ENDM 03702 M01S00008.ns2775a +++|
| Line S00070 Modification History | |
|---|---|
M01 (Added by) | ns2767 |
Seq # *Modification Id* Act ----------------------------+ 03703 M01S00070.ns2767 +++| TRST BSS 0 DEVICES ALLOWED FOR RESTORE
| Line S00071 Modification History | |
|---|---|
M01 (Added by) | ns2767 |
M02 (Removed by) | ns2775a |
Seq # *Modification Id* Act ----------------------------+ 03704 M02S00071.ns2775a ---| CON 2RED 5833 (1XP SABRE) 03705 M02S00072.ns2775a ---| CON 2REF 5833 (2XP SABRE) 03706 M02S00073.ns2775a ---| CON 2REH 5838 (1XP ELITE)
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | ns2775a |
Seq # *Modification Id* Act ----------------------------+ 03707 M01S00009.ns2775a +++| LIST G 03708 M01S00010.ns2775a +++| TBL "MSEQ" 03709 M01S00011.ns2775a +++| LIST * 03710 M01S00012.ns2775a +++| TRSTL EQU *-TRST LENGTH OF TABLE
| Line S00074 Modification History | |
|---|---|
M01 (Added by) | ns2767 |
Seq # *Modification Id* Act ----------------------------+ 03711 M01S00074.ns2767 +++|
| Line S00075 Modification History | |
|---|---|
M01 (Added by) | ns2767 |
M02 (Removed by) | ns2775a |
Seq # *Modification Id* Act ----------------------------+ 03712 M02S00075.ns2775a ---| TRSTL EQU *-TRST LENGTH OF TABLE
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | ns2775a |
Seq # *Modification Id* Act ----------------------------+ 03713 M01S00013.ns2775a +++| PURGMAC TBLM 03714 M00S03014.1ds +++| SCA SPACE 4,10 03715 M00S03015.1ds +++|*** FUNCTION SCAF - SET/CLEAR BIT IN MST WORD ACGL. 03716 M00S03016.1ds +++|* 03717 M00S03017.1ds +++|* ENTRY (IR+3) = BIT NUMBER. 03718 M00S03018.1ds +++|* (IR+4) = EST ORDINAL. 03719 M00S03019.1ds +++|* BIT 2**11 OF (IR+3) SET IF BIT TO BE CLEARED. 03720 M00S03020.1ds +++| 03721 M00S03021.1ds +++| 03722 M00S03022.1ds +++| SCA ENTRY ENTRY/EXIT 03723 M00S03023.1ds +++| LDD IR+4 SET EST ORDINAL 03724 M00S03024.1ds +++| STD T5 03725 M00S03025.1ds +++| LDD IR+3 CHECK REQUEST 03726 M00S03026.1ds +++| LPC 4000 03727 M00S03027.1ds +++| ZJN SCA1 IF BIT TO BE SET 03728 M00S03028.1ds +++| LMC -0 03729 M00S03029.1ds +++| SCA1 LMD IR+3 SET/CLEAR GLOBAL BIT 03730 M00S03030.1ds +++| RJM TGB 03731 M00S03031.1ds +++| UJN SCAX RETURN 03732 M00S03032.1ds +++| SCD SPACE 4,10 03733 M00S03033.1ds +++|*** FUNCTION SCDF - SET/CLEAR FLAGS FOR RMS DEVICES. 03734 M00S03034.1ds +++|* 03735 M00S03035.1ds +++|* ENTRY (IR+3) = *ONES* TO SET DEVICE *ON*. 03736 M00S03036.1ds +++|* *IDES* TO SET DEVICE *IDLE*. 03737 M00S03037.1ds +++|* *OFES* TO SET DEVICE *OFF*. 03738 M00S03038.1ds +++|* *DWES* TO SET DEVICE *DOWN*. 03739 M00S03039.1ds +++|* (IR+4) = EST ORDINAL. 03740 M00S03040.1ds +++| 03741 M00S03041.1ds +++|
| Line S03042 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03742 M01S03042.271l716 ---| SCD11 LDN 1 RETURN NEGATIVE RESPONSE
| Line S00194 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03743 M01S00194.271l716 +++| SCD14 LDN 1 RETURN NEGATIVE RESPONSE 03744 M00S03043.1ds +++| RJM SRD 03745 M00S03044.1ds +++| 03746 M00S03045.1ds +++| SCD ENTRY 03747 M00S03046.1ds +++| LDD IR+4 SAVE EST ORDINAL 03748 M00S03047.1ds +++| STM L0SD-1 03749 M00S03048.1ds +++| STM SCDA+2 03750 M00S03049.1ds +++| SFA EST FETCH EST ENTRY 03751 M00S03050.1ds +++| ADK EQDE 03752 M00S03051.1ds +++| CRD AB 03753 M00S03052.1ds +++| LDD IR+3 03754 M00S03053.1ds +++| LMN DWES
| Line S03054 Modification History | |
|---|---|
M01 (Removed by) | 1ds24 |
Seq # *Modification Id* Act ----------------------------+ 03755 M01S03054.1ds24 ---| ZJN SCD3 IF SETTING DEVICE DOWN 03756 M01S03055.1ds24 ---| LDD AB+3
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | 1ds24 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03757 M02S00028.271l716 ---| NJN SCD0.1 IF NOT SETTING DEVICE DOWN 03758 M02S00029.271l716 ---| RJM SFD SEARCH FOR DAYFILES ON DEVICE 03759 M02S00030.271l716 ---| SCD0 ZJN SCD11 IF DAYFILES PRESENT 03760 M02S00031.271l716 ---| UJN SCD3 CONTINUE DOWN PROCESSING 03761 M02S00032.271l716 ---| 03762 M02S00033.271l716 ---| SCD0.1 LDD AB+3
| Line S03056 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03763 M01S03056.271l716 ---| LMC 2RDD 03764 M01S03057.271l716 ---| ZJN SCD1 IF ISD DEVICE 03765 M01S03058.271l716 ---| LMN 1RG&1RD 03766 M01S03059.271l716 ---| ZJN SCD1 IF ISMD DEVICE 03767 M01S03060.271l716 ---| LMN 1RF&1RG 03768 M01S03061.271l716 ---| ZJN SCD1 IF HYDRA DEVICE 03769 M01S03062.271l716 ---| LMN 1RH&1RF 03770 M01S03063.271l716 ---| NJN SCD2 IF NOT HYDRA DEVICE 03771 M01S03064.271l716 ---| SCD1 RJM UDD SPIN UP ISD DRIVE
| Line S03065 Modification History | |
|---|---|
M01 (Removed by) | 1ds24 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03772 M02S03065.271l716 ---| ZJN SCD11 IF ERROR
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | 1ds24 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03773 M02S00034.271l716 ---| ZJN SCD0 IF ERROR
| Line S03066 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03774 M01S03066.271l716 ---| SCD2 LDD AB 03775 M01S03067.271l716 ---| SHN 21-6 03776 M01S03068.271l716 ---| MJN SCD5.2 IF DEVICE UNAVAILABLE 03777 M01S03069.271l716 ---| SCD3 LDD IR+3 03778 M01S03070.271l716 ---| SBN OFES 03779 M01S03071.271l716 ---| PJN SCD5.1 IF *OFF* OR *DOWN* 03780 M01S03072.271l716 ---| ADN OFES-ONES 03781 M01S03073.271l716 ---| ZJN SCD4 IF *ON* 03782 M01S03074.271l716 ---| LDN ONFC&IDFC 03783 M01S03075.271l716 ---| SCD4 LMN ONFC 03784 M01S03076.271l716 ---| SCD5 SHN 6
| Line S00195 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03785 M01S00195.271l716 +++| NJN SCD2 IF NOT SETTING DEVICE DOWN 03786 M01S00196.271l716 +++| RJM SFD SEARCH FOR DAYFILES ON DEVICE 03787 M01S00197.271l716 +++| SCD1 ZJN SCD14 IF DAYFILES PRESENT 03788 M01S00198.271l716 +++| UJN SCD5 CONTINUE DOWN PROCESSING 03789 M01S00199.271l716 +++|
| Line S00200 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 03790 M02S00200.272l774 ---| SCD2 LDD AB+3 03791 M02S00201.272l774 ---| LMC 2RDD 03792 M02S00202.272l774 ---| ZJN SCD3 IF ISD DEVICE 03793 M02S00203.272l774 ---| LMN 1RG&1RD 03794 M02S00204.272l774 ---| ZJN SCD3 IF ISMD DEVICE 03795 M02S00205.272l774 ---| LMN 1RF&1RG 03796 M02S00206.272l774 ---| ZJN SCD3 IF HYDRA DEVICE 03797 M02S00207.272l774 ---| LMN 1RH&1RF 03798 M02S00208.272l774 ---| ZJN SCD3 IF HYDRA DEVICE 03799 M02S00209.272l774 ---| LMN 1RN&1RH 03800 M02S00210.272l774 ---| NJN SCD4 IF NOT XMD DEVICE 03801 M02S00211.272l774 ---| SCD3 RJM UDD
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 03802 M01S00001.272l774 +++| SCD2 LDN TSCDL CHECK DEVICE TYPE FOR NON-*LDAM* DEVICE 03803 M01S00002.272l774 +++| STD T1 03804 M01S00003.272l774 +++| SCD3 SOD T1 03805 M01S00004.272l774 +++| MJN SCD4 IF DRIVE SHOULD NOT BE SPUN UP 03806 M01S00005.272l774 +++| LDD AB+3 03807 M01S00006.272l774 +++| LMM TSCD,T1 03808 M01S00007.272l774 +++| NJN SCD3 IF DEVICE TYPE DOES NOT MATCH 03809 M01S00008.272l774 +++| RJM UDD SPIN UP DRIVE
| Line S00212 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03810 M01S00212.271l716 +++| ZJN SCD1 IF SPIN-UP ERROR 03811 M01S00213.271l716 +++| SCD4 LDD AB 03812 M01S00214.271l716 +++| SHN 21-6 03813 M01S00215.271l716 +++| MJN SCD9 IF DEVICE UNAVAILABLE 03814 M01S00216.271l716 +++| SCD5 LDD IR+3 03815 M01S00217.271l716 +++| SBN OFES 03816 M01S00218.271l716 +++| PJN SCD8 IF SETTING DEVICE *OFF* OR *DOWN* 03817 M01S00219.271l716 +++| ADN OFES-ONES 03818 M01S00220.271l716 +++| ZJN SCD6 IF SETTING DEVICE *ON* 03819 M01S00221.271l716 +++| LDN ONFC&IDFC 03820 M01S00222.271l716 +++| SCD6 LMN ONFC 03821 M01S00223.271l716 +++| SCD7 SHN 6 03822 M00S03077.1ds +++| STM SCDA+3 03823 M00S03078.1ds +++| RJM LKC LOG KEYBOARD COMMAND 03824 M00S03079.1ds +++| LDD IR+1 03825 M00S03080.1ds +++| LPN 77 03826 M00S03081.1ds +++| RAM SCDA+1 03827 M00S03082.1ds +++| LDD IA CALL *1MV* TO PROCESS REQUEST 03828 M00S03083.1ds +++| CWM SCDA,ON 03829 M00S03084.1ds +++| EXECUTE 1MV,= 03830 M00S03085.1ds +++| LJM PPR EXIT TO PPR TO LOAD *1MV* 03831 M00S03086.1ds +++|
| Line S03087 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03832 M01S03087.271l716 ---| SCD5.1 ZJN SCD6 IF *OFF* REQUESTED
| Line S00224 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03833 M01S00224.271l716 +++| SCD8 ZJN SCD10 IF *OFF* REQUESTED 03834 M00S03088.1ds +++| LDK OFES SET DEVICE *OFF* TO ELIMINATE ACTIVITY 03835 M00S03089.1ds +++| STD CM+2 03836 M00S03090.1ds +++| LDD IR+4 03837 M00S03091.1ds +++| STD CM+1 03838 M00S03092.1ds +++| MONITOR SEQM
| Line S03093 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03839 M01S03093.271l716 ---| SCD5.2 UJN SCD7 SET DEVICE *DOWN* 03840 M01S03094.271l716 ---| 03841 M01S03095.271l716 ---| SCD6 LDD AB
| Line S00225 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03842 M01S00225.271l716 +++| SCD9 UJN SCD11 SET DEVICE *DOWN* 03843 M01S00226.271l716 +++| 03844 M01S00227.271l716 +++| SCD10 LDD AB 03845 M00S03096.1ds +++| LPN 3 03846 M00S03097.1ds +++| LMN 3
| Line S03098 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03847 M01S03098.271l716 ---| NJN SCD7 IF NOT CURRENTLY DOWN 03848 M01S03099.271l716 ---| LDN OFFC 03849 M01S03100.271l716 ---| UJN SCD5 CALL *1MV* TO GO FROM DOWN TO OFF 03850 M01S03101.271l716 ---| 03851 M01S03102.271l716 ---| SCD7 LDD IR+3 *SEQM* SUBFUNCTION
| Line S00228 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03852 M01S00228.271l716 +++| NJN SCD11 IF NOT CURRENTLY DOWN 03853 M01S00229.271l716 +++| LDN OFFC 03854 M01S00230.271l716 +++| UJN SCD7 CALL *1MV* TO GO FROM DOWN TO OFF 03855 M01S00231.271l716 +++| 03856 M01S00232.271l716 +++| SCD11 LDD IR+3 *SEQM* SUBFUNCTION 03857 M00S03103.1ds +++| STD CM+2 03858 M00S03104.1ds +++| LDD IR+4 EST ORDINAL 03859 M00S03105.1ds +++| STD CM+1 03860 M00S03106.1ds +++| MONITOR SEQM CHANGE EQUIPMENT STATE 03861 M00S03107.1ds +++| LDD CM+1
| Line S03108 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03862 M01S03108.271l716 ---| NJN SCD9 IF DEVICE STATE WAS CHANGED
| Line S00233 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03863 M01S00233.271l716 +++| NJN SCD12 IF DEVICE STATE WAS CHANGED 03864 M00S03109.1ds +++| LDD AB RESTORE ORIGINAL DEVICE STATE 03865 M00S03110.1ds +++| LPN 3 03866 M00S03111.1ds +++| STD CM+2 03867 M00S03112.1ds +++| ERRNZ ONES CODE DEPENDS ON VALUE 03868 M00S03113.1ds +++| ERRNZ IDES-1 CODE DEPENDS ON VALUE 03869 M00S03114.1ds +++| ERRNZ OFES-2 CODE DEPENDS ON VALUE 03870 M00S03115.1ds +++| LDD IR+4 EST ORDINAL 03871 M00S03116.1ds +++| STD CM+1 03872 M00S03117.1ds +++| MONITOR SEQM
| Line S03118 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03873 M01S03118.271l716 ---| LJM SCD11 RETURN 03874 M01S03119.271l716 ---| 03875 M01S03120.271l716 ---| SCD9 LDD IR+3
| Line S03121 Modification History | |
|---|---|
M01 (Removed by) | 1ds28 |
M02 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03876 M02S03121.271l716 ---| LMK ONES 03877 M02S03122.271l716 ---| NJN SCD10 IF NOT TURNING DEVICE ON
| Line S00234 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03878 M01S00234.271l716 +++| LJM SCD14 RETURN 03879 M01S00235.271l716 +++| 03880 M01S00236.271l716 +++| SCD12 LDD IR+3 03881 M01S00237.271l716 +++| LMK ONES 03882 M01S00238.271l716 +++| NJN SCD13 IF NOT TURNING DEVICE ON
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 1ds28 |
Seq # *Modification Id* Act ----------------------------+ 03883 M01S00001.1ds28 +++| LPN 2 03884 M01S00002.1ds28 +++| ERRNZ ONES CODE DEPENDS ON VALUE 03885 M01S00003.1ds28 +++| ERRNZ IDES-1 CODE DEPENDS ON VALUE 03886 M01S00004.1ds28 +++| NJN SCD10 IF NOT ATTEMPTING TO *ON* OR *IDLE* DEVICE 03887 M00S03123.1ds +++| LDD AB 03888 M00S03124.1ds +++| SHN -3 CHECK EQUIPMENT STATUS 03889 M00S03125.1ds +++| LPN 41
| Line S03126 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03890 M01S03126.271l716 ---| NJN SCD10 IF NOT INACTIVE NON-REMOVABLE DEVICE
| Line S00239 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03891 M01S00239.271l716 +++| NJN SCD13 IF NOT INACTIVE NON-REMOVABLE DEVICE 03892 M00S03127.1ds +++| LDC 4000+LUNL 03893 M00S03128.1ds +++| STD IR+3 03894 M00S03129.1ds +++| RJM .TPS PROCESS MOUNT REQUEST
| Line S03130 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03895 M01S03130.271l716 ---| SCD10 LDN ZERL
| Line S00240 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 03896 M01S00240.271l716 +++| SCD13 LDN ZERL 03897 M00S03131.1ds +++| CRD CM 03898 M00S03132.1ds +++| ADN PFNL+1-ZERL CLEAR *CMS* TIMEOUT 03899 M00S03133.1ds +++| CWD CM 03900 M00S03134.1ds +++| LJM SCDX RETURN 03901 M00S03135.1ds +++| 03902 M00S03136.1ds +++| 03903 M00S03137.1ds +++| SCDA VFD 18/3R1MV,42/0
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 03904 M01S00009.272l774 +++| 03905 M01S00010.272l774 +++| TSCD BSS 0 DEVICES TO SPIN UP ON *ON* 03906 M01S00011.272l774 +++| CON 2RDD 834 03907 M01S00012.272l774 +++| CON 2RDG 836 03908 M01S00013.272l774 +++| CON 2RDF 887 (4KB SECTOR) 03909 M01S00014.272l774 +++| CON 2RDH 887 (16KB SECTOR)
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | 272l774 |
M02 (Removed by) | ns2750 |
Seq # *Modification Id* Act ----------------------------+ 03910 M02S00015.ns2750 ---| CON 2RDN 9853 03911 M02S00016.ns2750 ---| CON 2REA 5832 (1X SSD) 03912 M02S00017.ns2750 ---| CON 2REB 5832 (2X SSD) 03913 M02S00018.ns2750 ---| CON 2REC 5833 (1X SABRE) 03914 M02S00019.ns2750 ---| CON 2RED 5833 (1XP SABRE) 03915 M02S00020.ns2750 ---| CON 2REE 5833 (2X SABRE) 03916 M02S00021.ns2750 ---| CON 2REF 5833 (2XP SABRE)
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | 272l774 |
Seq # *Modification Id* Act ----------------------------+ 03917 M01S00022.272l774 +++| 03918 M01S00023.272l774 +++| TSCDL EQU *-TSCD LENGTH OF TABLE 03919 M00S03138.1ds +++| SPD SPACE 4,10 03920 M00S03139.1ds +++|*** FUNCTION SPNF - SPIN MASS STORAGE DRIVE. 03921 M00S03140.1ds +++|* 03922 M00S03141.1ds +++|* ENTRY (IR+3) = 0 IF SPIN UP. 03923 M00S03142.1ds +++|* .GT. 0 IF SPIN DOWN. 03924 M00S03143.1ds +++|* (IR+4) = DEVICE EST ORDINAL. 03925 M00S03144.1ds +++| 03926 M00S03145.1ds +++| 03927 M00S03146.1ds +++| SPD ENTRY ENTRY/EXIT 03928 M00S03147.1ds +++| LDD IR+3 03929 M00S03148.1ds +++| ZJN SPD1 IF SPIN UP 03930 M00S03149.1ds +++| LDN 20 03931 M00S03150.1ds +++| SPD1 RJM C0S CALL *0SD* 03932 M00S03151.1ds +++| STM SPDA SAVE *0SD* PROCESSOR ENTRY ADDRESS 03933 M00S03152.1ds +++| LDD IR+4 SET EST ORDINAL 03934 M00S03153.1ds +++| STM L0SD-1 03935 M00S03154.1ds +++| RJM * SPIN UP/DOWN MASS STORAGE DEVICE 03936 M00S03155.1ds +++| SPDA EQU *-1 (*0SD* PROCESSOR ENTRY ADDRESS) 03937 M00S03156.1ds +++| UJN SPDX RETURN 03938 M00S03157.1ds +++| TPS SPACE 4,20 03939 M00S03158.1ds +++|*** FUNCTION TPSF - TOGGLE PF STATUS. 03940 M00S03159.1ds +++|* 03941 M00S03160.1ds +++|* PROCESS COMMAND FOR *DSD* - 03942 M00S03161.1ds +++|* *INITIALIZE*, *MOUNT*, OR *UNLOAD*. 03943 M00S03162.1ds +++|* 03944 M00S03163.1ds +++|* ENTRY (IR+3) = 1/M, 11/TYPE. 03945 M00S03164.1ds +++|* M = 1, IF *MOUNT* REQUEST. 03946 M00S03165.1ds +++|* = 0, IF *UNLOAD* REQUEST. 03947 M00S03166.1ds +++|* TYPE = LUNL, IF *MOUNT* OR *UNLOAD*. 03948 M00S03167.1ds +++|* (IR+4) = 1/, 1/S, 10/EQ. 03949 M00S03168.1ds +++|* S = 1, IF SHARED RMS IS PRESET. 03950 M00S03169.1ds +++|* EQ = EST ORDINAL, IF NOT *INITIALIZE*. 03951 M00S03170.1ds +++|* = UNUSED, IF *INITIALIZE*. 03952 M00S03171.1ds +++|* (PARAMETER WORD) = 12/EQ1,12/EQ2,12/EQ3,12/EQ4,12/EQ5. 03953 M00S03172.1ds +++|* (USED ONLY FOR *INITIALIZE*.) 03954 M00S03173.1ds +++|* THE FIRST EQUIPMENT THAT EQUALS 03955 M00S03174.1ds +++|* ZERO ENDS THE LIST OF EQUIPMENTS. 03956 M00S03175.1ds +++| 03957 M00S03176.1ds +++| 03958 M00S03177.1ds +++|* PROCESS *MOUNT* OR *UNLOAD* OF ONE EQUIPMENT. 03959 M00S03178.1ds +++| 03960 M00S03179.1ds +++| TPS14 LDD IR+4 GET EST ENTRY 03961 M00S03180.1ds +++| LPC 777 03962 M00S03181.1ds +++| STD T5 03963 M00S03182.1ds +++| STM L0SD-1 03964 M00S03183.1ds +++| SFA EST 03965 M00S03184.1ds +++| ADK EQDE 03966 M00S03185.1ds +++| CRD MS-4
| Line S03186 Modification History | |
|---|---|
M01 (Removed by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 03967 M01S03186.274l797 ---| LDD IR+3
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 03968 M01S00001.274l797 +++|* 03969 M01S00002.274l797 +++|* CHECK IF OPTICAL DISK DRIVE. 03970 M01S00003.274l797 +++|* 03971 M01S00004.274l797 +++| LDD MS-1 03972 M01S00005.274l797 +++| LMC 2ROD OPTICAL DISK 03973 M01S00006.274l797 +++| NJN TPS14.1 IF NOT OPTICAL DISK 03974 M01S00007.274l797 +++| RJM DOD DISMOUNT OPTICAL DISK 03975 M01S00008.274l797 +++| LJM TPSX RETURN TO CALLER 03976 M01S00009.274l797 +++| 03977 M01S00010.274l797 +++| TPS14.1 LDD IR+3 03978 M00S03187.1ds +++| SHN 0-13 03979 M00S03188.1ds +++| ZJP TPS20 IF UNLOAD REQUEST 03980 M00S03189.1ds +++| LDD MS-4 03981 M00S03190.1ds +++| SHN 21-3 03982 M00S03191.1ds +++| PJN TPS15 IF DEVICE INACTIVE 03983 M00S03192.1ds +++| SHN 4+21-10 03984 M00S03193.1ds +++| PJN TPS16 IF NON-REMOVABLE DEVICE 03985 M00S03194.1ds +++| TPS15 LDD MS 03986 M00S03195.1ds +++| SHN 3 03987 M00S03196.1ds +++| ADN STLL 03988 M00S03197.1ds +++| CRD CM 03989 M00S03198.1ds +++| LDD CM CHECK LOCAL STATUS 03990 M00S03199.1ds +++| LPN MLDUL 03991 M00S03200.1ds +++| ZJN TPS19 IF DEVICE NOT UNLOADED 03992 M00S03201.1ds +++| SMSTF LPTU PROHIBIT TRT UPDATE BY *1RU* 03993 M00S03202.1ds +++| TPS16 RJM CSM 03994 M00S03203.1ds +++| MJN TPS17 IF BAD CALL 03995 M00S03204.1ds +++| NJN TPS18 IF INDEPENDENT SHARED DEVICE MOUNT 03996 M00S03205.1ds +++| RJM CSD CHECK EXTENDED MEMORY MMF SHARED DEVICE 03997 M00S03206.1ds +++| TPS17 NJN TPS21 IF DEVICE CANNOT BE RECOVERED 03998 M00S03207.1ds +++| TPS18 CMSTF LDUL CLEAR DEVICE UNLOADED STATUS 03999 M00S03208.1ds +++| CMSTF GUNL CLEAR GLOBAL UNLOAD 04000 M00S03209.1ds +++| RJM C0S CALL 0SD 04001 M00S03210.1ds +++| STM TPSB 04002 M00S03211.1ds +++| RJM ** SPIN UP ISMD DEVICE 04003 M00S03212.1ds +++| TPSB EQU *-1 (*0SD* PROCESSOR ENTRY ADDRESS) 04004 M00S03213.1ds +++| TPS19 LCN 0 04005 M00S03214.1ds +++| TPS20 LMN LUNL SET/CLEAR UNLOAD REQUESTED 04006 M00S03215.1ds +++| RJM TLB 04007 M00S03216.1ds +++| TPS21 LDK ZERL 04008 M00S03217.1ds +++| CRD CM 04009 M00S03218.1ds +++| ADN PFNL+1-ZERL CLEAR *CMS* TIMEOUT 04010 M00S03219.1ds +++| CWD CM 04011 M00S03220.1ds +++| 04012 M00S03221.1ds +++| TPS ENTRY ENTRY/EXIT 04013 M00S03222.1ds +++| LDD IR+3 CHECK REQUEST 04014 M00S03223.1ds +++| LPN 77 04015 M00S03224.1ds +++| LMN LUNL 04016 M00S03225.1ds +++| NJN TPS1 IF NOT MOUNT/UNLOAD 04017 M00S03226.1ds +++| LJM TPS14 PROCESS MOUNT/UNLOAD 04018 M00S03227.1ds +++| 04019 M00S03228.1ds +++|* PROCESS *INITIALIZE* OF MULTIPLE EQUIPMENTS. 04020 M00S03229.1ds +++| 04021 M00S03230.1ds +++| TPS1 LDC /1DS/DSDL+/1DS/KBCML READ SPECIAL PARAMETER WORD 04022 M00S03231.1ds +++| CRM TPSA,ON 04023 M00S03232.1ds +++| LDD IR+3 SET REQUESTED INITIALIZE OPTION 04024 M00S03233.1ds +++| RAM CIOA 04025 M00S03234.1ds +++| LDC TPSA 04026 M00S03235.1ds +++| STD T4 04027 M00S03236.1ds +++| UJN TPS3 ENTER LOOP 04028 M00S03237.1ds +++| 04029 M00S03238.1ds +++| TPS2 AOD T4 04030 M00S03239.1ds +++| ADC -TPSA-4-1 04031 M00S03240.1ds +++| ZJN TPSX IF END OF PARAMETER WORD 04032 M00S03241.1ds +++| TPS3 LDI T4 GET NEXT EQUIPMENT 04033 M00S03242.1ds +++| ZJN TPSX IF NO MORE EQUIPMENTS 04034 M00S03243.1ds +++| STD T5 04035 M00S03244.1ds +++| SFA EST GET EST ENTRY 04036 M00S03245.1ds +++| ADK EQDE 04037 M00S03246.1ds +++| CRD MS-4 04038 M00S03247.1ds +++| LDD MS READ *STLL* 04039 M00S03248.1ds +++| SHN 3 04040 M00S03249.1ds +++| ADN STLL 04041 M00S03250.1ds +++| CRD AB 04042 M00S03251.1ds +++| RJM CIO CHECK INITIALIZE OPTIONS 04043 M00S03252.1ds +++| LDD AB 04044 M00S03253.1ds +++| LPC MLFPR+MLIAL+MLIHD+MLIFD 04045 M00S03254.1ds +++| ZJN TPS7 IF FULL INITIALIZE NOT SET 04046 M00S03255.1ds +++| LDD IR+3 04047 M00S03256.1ds +++| SBN LIFD 04048 M00S03257.1ds +++| MJN TPS2 IF REQUEST FOR PARTIAL INITIALIZE 04049 M00S03258.1ds +++| ADN LIFD 04050 M00S03259.1ds +++| RJM TLB SET INITIALIZE REQUEST 04051 M00S03260.1ds +++| LDN LIAL 04052 M00S03261.1ds +++| STD T2 04053 M00S03262.1ds +++| LDD CM+1 CHECK REPLY 04054 M00S03263.1ds +++| LPN 1 04055 M00S03264.1ds +++| ZJN TPS4 IF INITIALIZE FLAG NOT ALREADY SET 04056 M00S03265.1ds +++| LJM TPS9 CLEAR INITIALIZE FLAG 04057 M00S03266.1ds +++| 04058 M00S03267.1ds +++| TPS4 LDD IR+3 CHECK FULL INITIALIZE FLAG 04059 M00S03268.1ds +++| LMD T2 04060 M00S03269.1ds +++| ZJN TPS5 IF FLAG JUST SET 04061 M00S03270.1ds +++| LCN 0 CLEAR OTHER FULL INITIALIZE FLAGS 04062 M00S03271.1ds +++| LMD T2 04063 M00S03272.1ds +++| RJM TLB 04064 M00S03273.1ds +++| TPS5 SOD T2 DECREMENT FLAG NUMBER 04065 M00S03274.1ds +++| LMN LIFD-1 04066 M00S03275.1ds +++| NJN TPS4 IF NOT END OF FULL INITIALIZE FLAG 04067 M00S03276.1ds +++| TPS6 LJM TPS2 LOOP 04068 M00S03277.1ds +++| 04069 M00S03278.1ds +++| TPS7 LDD IR+3 04070 M00S03279.1ds +++| SBN LIQF 04071 M00S03280.1ds +++| MJN TPS8 IF PRESERVED FILES NOT BEING INITIALIZED 04072 M00S03281.1ds +++| RJM CSD CHECK SHARED DEVICE 04073 M00S03282.1ds +++| NJN TPS6 IF NOT CLEAR FOR INITIALIZE 04074 M00S03283.1ds +++| LDD IR+3 04075 M00S03284.1ds +++| SBN LIPF 04076 M00S03285.1ds +++| MJN TPS8 IF PERMANENT FILES NOT INVOLVED 04077 M00S03286.1ds +++| RJM SFA 04078 M00S03287.1ds +++| ZJN TPS8 IF NO FAST ATTACH FILES ON DEVICE 04079 M00S03288.1ds +++| LDC =C*FAST ATTACH FILES ON DEVICE.* 04080 M00S03289.1ds +++| RJM DFM 04081 M00S03290.1ds +++| LJM TPSX RETURN 04082 M00S03291.1ds +++| 04083 M00S03292.1ds +++| TPS8 LDD IR+3 SET INITIALIZE REQUEST 04084 M00S03293.1ds +++| RJM TLB 04085 M00S03294.1ds +++| LDD CM+1 CHECK REPLY 04086 M00S03295.1ds +++| LPN 1 04087 M00S03296.1ds +++| ZJN TPS10 IF INITIALIZE FLAG NOT ALREADY SET 04088 M00S03297.1ds +++| TPS9 LCN 0 CLEAR INITIALIZE FLAG 04089 M00S03298.1ds +++| LMD IR+3 04090 M00S03299.1ds +++| RJM TLB 04091 M00S03300.1ds +++| TPS10 LDD IR+3 CHECK REQUEST 04092 M00S03301.1ds +++| SBN LIFD 04093 M00S03302.1ds +++| MJN TPS12 IF NOT FULL INITIALIZE REQUEST 04094 M00S03303.1ds +++| LDD AB 04095 M00S03304.1ds +++| LPC MLIPF+MLIQF 04096 M00S03305.1ds +++| ZJN TPS11 IF PARTIAL INITIALIZE NOT SET 04097 M00S03306.1ds +++| CMSTF LIPF 04098 M00S03307.1ds +++| CMSTF LIQF 04099 M00S03308.1ds +++| TPS11 LDD AB+1 04100 M00S03309.1ds +++| LPC MLIDF+MLIAF+MLIEF+MLIMF 04101 M00S03310.1ds +++| ZJN TPS12 IF NO DAYFILE INITIALIZATION SET 04102 M00S03311.1ds +++| CMSTF LIDF 04103 M00S03312.1ds +++| CMSTF LIAF 04104 M00S03313.1ds +++| CMSTF LIEF 04105 M00S03314.1ds +++| CMSTF LIMF 04106 M00S03315.1ds +++| TPS12 LDD MS REREAD INITIALIZE STATUS FROM MST 04107 M00S03316.1ds +++| SHN 3 04108 M00S03317.1ds +++| ADN STLL 04109 M00S03318.1ds +++| CRD AB 04110 M00S03319.1ds +++| LDD AB+1 04111 M00S03320.1ds +++| SCN 77 04112 M00S03321.1ds +++| SHN 6 04113 M00S03322.1ds +++| LMD AB 04114 M00S03323.1ds +++| SCN MLIRP+MLUNL+MLCKP+MLDUL+MRASD+MLPTU 04115 M00S03324.1ds +++| ZJN TPS13 IF NO INITIALIZE FLAGS SET 04116 M00S03325.1ds +++| LCN 0 04117 M00S03326.1ds +++| TPS13 LMC -LIRP SET/CLEAR INITIALIZE PENDING 04118 M00S03327.1ds +++| RJM TLB 04119 M00S03328.1ds +++| LJM TPS2 LOOP 04120 M00S03329.1ds +++| 04121 M00S03330.1ds +++| 04122 M00S03331.1ds +++| TPSA VFD 60/0 EQUIPMENT LIST 04123 M00S03332.1ds +++| VMS SPACE 4,10 04124 M00S03333.1ds +++|*** VMSF - VERIFY MASS STORAGE FUNCTION. 04125 M00S03334.1ds +++|* 04126 M00S03335.1ds +++|* ENTRY (IR+4) = EST ORDINAL. 04127 M00S03336.1ds +++| 04128 M00S03337.1ds +++| 04129 M00S03338.1ds +++| VMS ENTRY ENTRY/EXIT 04130 M00S03339.1ds +++| LDD IR+4 SET EST ORDINAL 04131 M00S03340.1ds +++| STD T5 04132 M00S03341.1ds +++| SFA EST 04133 M00S03342.1ds +++| ADK EQDE 04134 M00S03343.1ds +++| CRD CM 04135 M00S03344.1ds +++| LDD CM+4 GET MST PARAMETERS 04136 M00S03345.1ds +++| SHN 3 04137 M00S03346.1ds +++| ADN SDGL 04138 M00S03347.1ds +++| CRD CM 04139 M00S03348.1ds +++| ADN STLL-SDGL 04140 M00S03349.1ds +++| CRD AB 04141 M00S03350.1ds +++| LDD AB+1 EXTRACT CURRENT ERROR STATUS 04142 M00S03351.1ds +++| LPN 77 04143 M00S03352.1ds +++| STD T7 04144 M00S03353.1ds +++| LDD CM+4 04145 M00S03354.1ds +++| LPN 1 04146 M00S03355.1ds +++| ZJN VMS1 IF DEVICE NOT INTERLOCKED 04147 M00S03356.1ds +++| LDD T7 CHECK CURRENT ERROR STATUS
| Line S03357 Modification History | |
|---|---|
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 04148 M01S03357.ns2552 ---| LMN /LSD/STVE
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 04149 M01S00022.ns2552 +++| LMN STVE 04150 M00S03358.1ds +++| SHN 14 04151 M00S03359.1ds +++| NJN VMS1 IF NOT INTERLOCKED WITH VALIDATION ERROR 04152 M00S03360.1ds +++| SMSTF LPTU PROHIBIT TRT UPDATE BY *1RU* 04153 M00S03361.1ds +++| LDN VEQS&VEIS 04154 M00S03362.1ds +++| VMS1 LMK VEIS SET UP MONITOR CALL 04155 M00S03363.1ds +++| STD CM+3 04156 M00S03364.1ds +++| LDD T5 04157 M00S03365.1ds +++| STD CM+1 04158 M00S03366.1ds +++| MONITOR VMSM REQUEST MASS STORAGE VALIDATION 04159 M00S03367.1ds +++| LDD CM+1 04160 M00S03368.1ds +++| NJN VMS3 IF VALIDATION NOT SUCCESSFUL 04161 M00S03369.1ds +++| CMSTF LPTU ALLOW TRT UPDATES BY *1RU* 04162 M00S03370.1ds +++| LDD T7 CHECK PREVIOUS ERROR STATUS
| Line S03371 Modification History | |
|---|---|
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 04163 M01S03371.ns2552 ---| LMN /LSD/STVE
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 04164 M01S00023.ns2552 +++| LMN STVE 04165 M00S03372.1ds +++| NJN VMS2 IF NOT VALIDATION ERROR 04166 M00S03373.1ds +++| RJM SES CLEAR MST ERROR STATUS 04167 M00S03374.1ds +++| LDN NCPL 04168 M00S03375.1ds +++| CRD CN 04169 M00S03376.1ds +++| AOD CN+1 CLEAR MESSAGE AT SYSTEM CONTROL POINT 04170 M00S03377.1ds +++| SHN 7 04171 M00S03378.1ds +++| ADN MS2W 04172 M00S03379.1ds +++| CWD CM 04173 M00S03380.1ds +++| CMSTF GDEI CLEAR ERROR IDLE FLAG 04174 M00S03381.1ds +++| SMSTF LCKP SET CHECKPOINT REQUEST 04175 M00S03382.1ds +++| VMS2 LJM VMSX RETURN 04176 M00S03383.1ds +++| 04177 M00S03384.1ds +++| VMS3 STD IR+2 SET ERROR CODES 04178 M00S03385.1ds +++| LDD T7 CHECK PREVIOUS ERROR STATUS
| Line S03386 Modification History | |
|---|---|
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 04179 M01S03386.ns2552 ---| SBN /LSD/MNEC
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 04180 M01S00024.ns2552 +++| SBN MNEC 04181 M00S03387.1ds +++| PJN VMS4 IF PREVIOUS ERROR NOT TO BE CHANGED 04182 M00S03388.1ds +++| LDD TH 04183 M00S03389.1ds +++| RAD T5
| Line S03390 Modification History | |
|---|---|
M01 (Removed by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 04184 M01S03390.ns2552 ---| LDN /LSD/STVE SET ERROR STATUS IN MST
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 04185 M01S00025.ns2552 +++| LDN STVE SET ERROR STATUS IN MST 04186 M00S03391.1ds +++| RJM SES 04187 M00S03392.1ds +++| VMS4 LDD T5 SET EST ORDINAL FOR *5ME* 04188 M00S03393.1ds +++| STD IR+3 04189 M00S03394.1ds +++| EXECUTE 5ME 04190 M00S03395.1ds +++| UJN VMS2 RETURN
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 04191 M01S00011.274l797 +++| DOD SPACE 4,10 04192 M01S00012.274l797 +++|** DOD - DISMOUNT OPTICAL DRIVE. 04193 M01S00013.274l797 +++|* 04194 M01S00014.274l797 +++|* ENTRY (T5) = EST ORDINAL. 04195 M01S00015.274l797 +++|* 04196 M01S00016.274l797 +++|* USES CM+1. 04197 M01S00017.274l797 +++|* 04198 M01S00018.274l797 +++|* CALLS (1OS). 04199 M01S00019.274l797 +++|* 04200 M01S00020.274l797 +++|* MACROS DELAY, MONITOR. 04201 M01S00021.274l797 +++| 04202 M01S00022.274l797 +++| 04203 M01S00023.274l797 +++| DOD2 LDD CP CLEAR WAIT MESSAGE 04204 M01S00024.274l797 +++| ADK MS2W 04205 M01S00025.274l797 +++| CWD CM 04206 M01S00026.274l797 +++| 04207 M01S00027.274l797 +++| DOD SUBR ENTRY/EXIT 04208 M01S00028.274l797 +++| LDM IDSC PASS RELEVANT CALL DATA ON TO *1OS* 04209 M01S00029.274l797 +++| STM DODA+2 04210 M01S00030.274l797 +++| LDD IR+3 04211 M01S00031.274l797 +++| STM DODA+3 04212 M01S00032.274l797 +++| LDD IR+4 04213 M01S00033.274l797 +++| STM DODA+4 04214 M01S00034.274l797 +++| DOD1 LDD MA PLACE REQUEST IN MESSAGE BUFFER 04215 M01S00035.274l797 +++| CWM DODA,ON 04216 M01S00036.274l797 +++| LDN 0 04217 M01S00037.274l797 +++| STD CM+1 04218 M01S00038.274l797 +++| MONITOR RPPM CALL *1OS* 04219 M01S00039.274l797 +++| LDD CM+1 04220 M01S00040.274l797 +++| NJP DOD2 IF PP ASSIGNED OR IN REQUEST QUEUE 04221 M01S00041.274l797 +++| LDD CP ISSUE WAIT MESSAGE 04222 M01S00042.274l797 +++| ADK MS2W 04223 M01S00043.274l797 +++| CWM DODB,TR 04224 M01S00044.274l797 +++| DELAY 100D DELAY BETWEEN *1OS* CALLS 04225 M01S00045.274l797 +++| UJN DOD1 RETRY *1OS* CALL 04226 M01S00046.274l797 +++| 04227 M01S00047.274l797 +++| 04228 M01S00048.274l797 +++| DODA VFD 18/3R1OS,6/0,12/0,12/0,12/0 04229 M01S00049.274l797 +++| DODB DATA C*WAITING FOR PP.* 04230 M00S03396.1ds +++| SPACE 4,10 04231 M00S03397.1ds +++|** COMMON DECKS. 04232 M00S03398.1ds +++| 04233 M00S03399.1ds +++|
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | ns2552 |
Seq # *Modification Id* Act ----------------------------+ 04234 M01S00026.ns2552 +++| QUAL$ EQU 0 DON-T QUALIFY COMMON DECKS 04235 M01S00027.ns2552 +++|*CALL COMPCLC 04236 M00S03400.1ds +++|*CALL COMPSES 04237 M00S03401.1ds +++|*CALL COMPSMI 04238 M00S03402.1ds +++| 04239 M00S03403.1ds +++| 04240 M00S03404.1ds +++| L0SD EQU *+2 *0SD* LOAD ADDRESS 04241 M00S03405.1ds +++| 04242 M00S03406.1ds +++| ERRNG BFMS-L0SD-ZSDL *0SD* OVERFLOW 04243 M00S03407.1ds +++|
| Line S03408 Modification History | |
|---|---|
M01 (Removed by) | 1ds21 |
Seq # *Modification Id* Act ----------------------------+ 04244 M01S03408.1ds21 ---| OVERFLOW OVLA,BFMS
| Line S00079 Modification History | |
|---|---|
M01 (Added by) | 1ds21 |
Seq # *Modification Id* Act ----------------------------+ 04245 M01S00079.1ds21 +++| OVERFLOW OVLA,/OVERLAY/BUFB
| Line S03409 Modification History | |
|---|---|
M01 (Removed by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 04246 M01S03409.ns2765 ---| OVERLAY (IAF FUNCTIONS.)
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 04247 M01S00014.ns2765 +++| OVERLAY (IAF/MAGNET FUNCTIONS.) 04248 M00S03410.1ds +++| DIA SPACE 4,10 04249 M00S03411.1ds +++|*** FUNCTION DIAF - SEND MESSAGE TO *IAF* USER. 04250 M00S03412.1ds +++|* 04251 M00S03413.1ds +++|* ENTRY (CP) = *IAF* CONTROL POINT ADDRESS. 04252 M00S03414.1ds +++|* (IR+3) = USER TERMINAL NUMBER.
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04253 M01S00016.ns2680 +++|* = 7777 IF DIALING ALL TERMINALS. 04254 M00S03415.1ds +++|* (IR+4) = 6/KEYBOARD BUFFER OFFSET, 6/. 04255 M00S03416.1ds +++| 04256 M00S03417.1ds +++| 04257 M00S03418.1ds +++| DIA ENTRY ENTRY/EXIT 04258 M00S03419.1ds +++| LDC IFSI FIND *IAF* 04259 M00S03420.1ds +++| RJM CSS
| Line S03421 Modification History | |
|---|---|
M01 (Removed by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04260 M01S03421.ns2680 ---| PAUSE 04261 M01S03422.ns2680 ---| LDD CM+1
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04262 M01S00017.ns2680 +++| CHKERR CHECK ERROR FLAG 04263 M00S03423.1ds +++| NJN DIAX IF ERROR FLAG
| Line S03424 Modification History | |
|---|---|
M01 (Removed by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04264 M01S03424.ns2680 ---| LDN 3 ONE HEADER AND TWO LINKAGE WORDS
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04265 M01S00018.ns2680 +++| LDN 1 INITIALIZE TERMINAL COUNT 04266 M01S00019.ns2680 +++| STD SR+4 04267 M01S00020.ns2680 +++| LDN 40 INITIALIZE NO POT CHAIN RETRY COUNT 04268 M01S00021.ns2680 +++| STD AB 04269 M01S00022.ns2680 +++| LDD IR+3 GET TERMINAL NUMBER 04270 M01S00023.ns2680 +++| LMC 7777 CHECK FOR DIAL ALL REQUEST 04271 M01S00024.ns2680 +++| NJP DIA2 IF DIALING A SPECIFIC JSN 04272 M01S00025.ns2680 +++| LDK /REM/VPST INITIALIZE TERMINAL NUMBER 04273 M01S00026.ns2680 +++| STD IR+3 04274 M01S00027.ns2680 +++| LDD RA 04275 M01S00028.ns2680 +++| SHN 6 04276 M01S00029.ns2680 +++| ADK /REM/VTTP 04277 M01S00030.ns2680 +++| CRD CN GET FWA OF TERMINAL TABLE 04278 M01S00031.ns2680 +++| ADK /REM/VMNL-/REM/VTTP 04279 M01S00032.ns2680 +++| CRD SR GET MAX NUMBER OF TERMINALS 04280 M01S00033.ns2680 +++| LDN 2 SET WORD COUNT FOR CM READ 04281 M01S00034.ns2680 +++| STD CN 04282 M01S00035.ns2680 +++| LDK /REM/VPST*/REM/VTTL 04283 M01S00036.ns2680 +++| DIA1 RAD CN+2 04284 M01S00037.ns2680 +++| SHN -14 04285 M01S00038.ns2680 +++| RAD CN+1 04286 M01S00039.ns2680 +++| SHN 6 CALCULATE ADDRESS FOR THIS ENTRY 04287 M01S00040.ns2680 +++| ADD RA 04288 M01S00041.ns2680 +++| SHN 6 04289 M01S00042.ns2680 +++| ADD CN+2 04290 M01S00043.ns2680 +++| ADK /REM/VFST 04291 M01S00044.ns2680 +++| CRD T1 READ JSN 04292 M01S00045.ns2680 +++| ADK /REM/VDCT-/REM/VFST GET OUTPUT POT POINTERS 04293 M01S00046.ns2680 +++| ERRNZ /REM/VSTT-/REM/VDCT-1 CODE REQUIRES CONTIGUOUS WORDS 04294 M01S00047.ns2680 +++| CRM T3,CN 04295 M01S00048.ns2680 +++| LDD T1 04296 M01S00049.ns2680 +++| ZJN DIA3 IF ENTRY NOT IN USE 04297 M01S00050.ns2680 +++| STM DIAA+7 PLACE JSN IN FAILURE MESSAGE 04298 M01S00051.ns2680 +++| LDD T3+4 04299 M01S00052.ns2680 +++| ADD T3+5+4 04300 M01S00053.ns2680 +++| ZJN DIA2 IF OUTPUT NOT ALREADY QUEUED 04301 M01S00054.ns2680 +++| LDD T2 04302 M01S00055.ns2680 +++| STM DIAA+10 04303 M01S00056.ns2680 +++| LDC DIAA 04304 M01S00057.ns2680 +++| RJM DFM SEND FAILURE MESSAGE TO DAYFILE 04305 M01S00058.ns2680 +++| UJN DIA3 CHECK FOR ERROR 04306 M01S00059.ns2680 +++| 04307 M01S00060.ns2680 +++| DIA2 LDN 3 ONE HEADER AND TWO LINKAGE WORDS 04308 M00S03425.1ds +++| RJM SBT FILL POTS WITH MESSAGE
| Line S03426 Modification History | |
|---|---|
M01 (Removed by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04309 M01S03426.ns2680 ---| ZJN DIAX IF POT CHAIN UNAVAILABLE
| Line S00061 Modification History | |
|---|---|
M01 (Added by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04310 M01S00061.ns2680 +++| ZJN DIA7 IF NO POT CHAIN AVAILABLE 04311 M01S00062.ns2680 +++| LDN 40 RESET NO POT CHAIN RETRY COUNT 04312 M01S00063.ns2680 +++| STD AB 04313 M00S03427.1ds +++| LDD IR+3 04314 M00S03428.1ds +++| STM WARA+4 ADD TERMINAL NUMBER TO REQUEST 04315 M00S03429.1ds +++| RJM ITR ISSUE *TSEM* REQUEST
| Line S03430 Modification History | |
|---|---|
M01 (Removed by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04316 M01S03430.ns2680 ---| UJN DIAX EXIT
| Line S00064 Modification History | |
|---|---|
M01 (Added by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04317 M01S00064.ns2680 +++| DIA3 CHKERR CHECK ERROR FLAG 04318 M01S00065.ns2680 +++| NJN DIA6 IF ERROR FLAG SET 04319 M01S00066.ns2680 +++| AOD IR+3 INCREMENT TERMINAL NUMBER 04320 M01S00067.ns2680 +++| SOD SR+4 DECREMENT TERMINAL COUNT 04321 M01S00068.ns2680 +++| ZJN DIA6 IF ALL TERMINALS DIALED 04322 M01S00069.ns2680 +++| LDN /REM/VTTL ADVANCE TERMINAL TABLE POINTER 04323 M01S00070.ns2680 +++| DIA4 UJP DIA1 READ TERMINAL TABLE ENTRY 04324 M01S00071.ns2680 +++| 04325 M01S00072.ns2680 +++| DIA5 LDC DIAB *DIAL - NO POT CHAIN.* 04326 M01S00073.ns2680 +++| RJM DFM SEND FAILURE MESSAGE 04327 M01S00074.ns2680 +++| DIA6 LJM DIAX RETURN 04328 M01S00075.ns2680 +++| 04329 M01S00076.ns2680 +++| DIA7 SOD AB DECREMENT NO POT CHAIN RETRY COUNT 04330 M01S00077.ns2680 +++| MJN DIA5 IF THROUGH RETRYING 04331 M01S00078.ns2680 +++| LDC 1400 DELAY 100 MILLISECONDS AND RETRY 04332 M01S00079.ns2680 +++| STD T0 04333 M01S00080.ns2680 +++| DIA8 DELAY 04334 M01S00081.ns2680 +++| CHKERR CHECK ERROR FLAG 04335 M01S00082.ns2680 +++| NJN DIA6 IF ERROR FLAG SET 04336 M01S00083.ns2680 +++| SOD T0 04337 M01S00084.ns2680 +++| NJN DIA8 IF NOT THROUGH DELAYING 04338 M01S00085.ns2680 +++| UJN DIA4 RETRY DIAL 04339 M01S00086.ns2680 +++| 04340 M01S00087.ns2680 +++| 04341 M01S00088.ns2680 +++| DIAA DATA C*OUTPUT BUSY - JSNX.* 04342 M01S00089.ns2680 +++| DIAB DATA C*DIAL - NO POT CHAIN.*
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2587 |
Seq # *Modification Id* Act ----------------------------+ 04343 M01S00002.ns2587 +++| KIJ SPACE 4,10 04344 M01S00003.ns2587 +++|*** FUNCTION KIJF - KILL INTERACTIVE JOB. 04345 M01S00004.ns2587 +++|* 04346 M01S00005.ns2587 +++|* ENTRY (IR+3 - IR+4) = JSN. 04347 M01S00006.ns2587 +++| 04348 M01S00007.ns2587 +++| 04349 M01S00008.ns2587 +++| KIJ ENTRY ENTRY/EXIT 04350 M01S00009.ns2587 +++| LDD MA COPY JSN INTO (AB - AB+1) 04351 M01S00010.ns2587 +++| CWD IR+3 04352 M01S00011.ns2587 +++| CRD AB
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | ns2587 |
M02 (Removed by) | ns2748a |
Seq # *Modification Id* Act ----------------------------+ 04353 M02S00012.ns2748a ---| LDN /REM/VCPT IAF CP NUMBER 04354 M02S00013.ns2748a ---| SHN 7 04355 M02S00014.ns2748a ---| STD CP
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2748a |
Seq # *Modification Id* Act ----------------------------+ 04356 M01S00003.ns2748a +++| LDN /REM/VCPT MOVE TO *IAF* CP 04357 M01S00004.ns2748a +++| STD CM+1 04358 M01S00005.ns2748a +++| MONITOR CCAM 04359 M01S00006.ns2748a +++| LDD CM+1 04360 M01S00007.ns2748a +++| NJP IDS2 IF UNABLE TO CHANGE CONTROL POINTS
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | ns2587 |
Seq # *Modification Id* Act ----------------------------+ 04361 M01S00015.ns2587 +++| LDC IFSI CHECK IF IAF PRESENT 04362 M01S00016.ns2587 +++| RJM CSS 04363 M01S00017.ns2587 +++|* LDN 0 04364 M01S00018.ns2587 +++| STD AB+3 INITIALIZE TERMINAL NUMBER
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | ns2587 |
M02 (Removed by) | ns2748a |
Seq # *Modification Id* Act ----------------------------+ 04365 M02S00019.ns2748a ---| LDD CP GET IAF-S RA 04366 M02S00020.ns2748a ---| ADN FLSW 04367 M02S00021.ns2748a ---| CRD T4
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | ns2748a |
Seq # *Modification Id* Act ----------------------------+ 04368 M01S00008.ns2748a +++| LDD RA SET *IAF* RA 04369 M01S00009.ns2748a +++| STD T7
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | ns2587 |
Seq # *Modification Id* Act ----------------------------+ 04370 M01S00022.ns2587 +++| RJM GTN GET TERMINAL NUMBER 04371 M01S00023.ns2587 +++| MJN KIJX IF NOT FOUND 04372 M01S00024.ns2587 +++| LDD AB+3 SET TERMINAL NUMBER 04373 M01S00025.ns2587 +++| STM WARA+4 04374 M01S00026.ns2587 +++| LDC /REM/VTLF 04375 M01S00027.ns2587 +++| STM WARA 04376 M01S00028.ns2587 +++| LDN 2 SET UNCONDITIONAL LOGOFF 04377 M01S00029.ns2587 +++| STM WARA+2 04378 M01S00030.ns2587 +++| RJM ITR ISSUE *TSEM* REQUEST
| Line S00031 Modification History | |
|---|---|
M01 (Added by) | ns2587 |
M02 (Removed by) | ns2748a |
Seq # *Modification Id* Act ----------------------------+ 04379 M02S00031.ns2748a ---| UJN KIJX RETURN
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | ns2748a |
Seq # *Modification Id* Act ----------------------------+ 04380 M01S00010.ns2748a +++| LJM KIJX RETURN 04381 M00S03431.1ds +++| WAR SPACE 4,10 04382 M00S03432.1ds +++|*** FUNCTION WARF - SEND *IAF* WARNING MESSAGE. 04383 M00S03433.1ds +++|* 04384 M00S03434.1ds +++|* ENTRY (CP) = *IAF* CONTROL POINT ADDRESS. 04385 M00S03435.1ds +++|* (IR+4) = 6/KEYBOARD BUFFER OFFSET, 6/. 04386 M00S03436.1ds +++| 04387 M00S03437.1ds +++| 04388 M00S03438.1ds +++| WAR ENTRY ENTRY/EXIT 04389 M00S03439.1ds +++| LDC IFSI FIND *IAF* 04390 M00S03440.1ds +++| RJM CSS 04391 M00S03441.1ds +++| LDD IR+4 04392 M00S03442.1ds +++| SHN -6 04393 M00S03443.1ds +++| NJN WAR1 IF NOT CLEAR PREVIOUS MESSAGE 04394 M00S03444.1ds +++| LDC 2R"NL" SET NEW LINE TO CLEAR BUFFER 04395 M00S03445.1ds +++| STM BFMS+5*6+2 04396 M00S03446.1ds +++| UJN WAR2 CLEAR OLD MESSAGE 04397 M00S03447.1ds +++| 04398 M00S03448.1ds +++| WAR1 LDN TIML SET TIME 04399 M00S03449.1ds +++| CRM BFMS+5*3,ON 04400 M00S03450.1ds +++| LDD MA SET WARNING 04401 M00S03451.1ds +++| CWM =C* WARNING*,ON 04402 M00S03452.1ds +++| SBN 1 04403 M00S03453.1ds +++| CRM BFMS+5*4,ON 04404 M00S03454.1ds +++| LDN ZERL 04405 M00S03455.1ds +++| CRM BFMS+5*5,ON
| Line S03456 Modification History | |
|---|---|
M01 (Removed by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04406 M01S03456.ns2680 ---| PAUSE 04407 M01S03457.ns2680 ---| LDD CM+1
| Line S00090 Modification History | |
|---|---|
M01 (Added by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04408 M01S00090.ns2680 +++| CHKERR 04409 M00S03458.1ds +++| NJN WAR4 IF ERROR FLAG 04410 M00S03459.1ds +++| LDN 6 FOUR HEADER AND TWO LINKAGE WORDS 04411 M00S03460.1ds +++| RJM SBT FILL POTS WITH MESSAGE 04412 M00S03461.1ds +++| ZJN WAR4 IF POT CHAIN NOT AVAILABLE 04413 M00S03462.1ds +++| WAR2 LDC BFMS+5*6+2-1 FIND NEW LINE 04414 M00S03463.1ds +++| STD T1 04415 M00S03464.1ds +++| WAR3 AOD T1 04416 M00S03465.1ds +++| LDI T1 04417 M00S03466.1ds +++| LMC 2R"NL" 04418 M00S03467.1ds +++| NJN WAR3 IF NOT FOUND 04419 M00S03468.1ds +++| STI T1 SET MESSAGE TERMINATOR 04420 M00S03469.1ds +++| RJM ITR ISSUE *TSEM* REQUEST 04421 M00S03470.1ds +++| ZJN WAR4 IF IAF NOT AVAILABLE 04422 M00S03471.1ds +++| LDD CP COPY MESSAGE TO B DISPLAY 04423 M00S03472.1ds +++| ADN MS1W 04424 M00S03473.1ds +++| CWM BFMS+5*6+2,FV 04425 M00S03474.1ds +++| WAR4 LJM WARX EXIT 04426 M00S03475.1ds +++| 04427 M00S03476.1ds +++| 04428 M00S03477.1ds +++| WARA CON /REM/VMSG 04429 M00S03478.1ds +++| CON 0 04430 M00S03479.1ds +++| CON 0 LAST POT FILLED 04431 M00S03480.1ds +++| CON 0 FIRST POT FILLED 04432 M00S03481.1ds +++| CON 0 TERMINAL NUMBER (DIAL)
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 04433 M01S00015.ns2765 +++| EUF SPACE 4,10 04434 M01S00016.ns2765 +++|*** FUNCTION EUFF - ENTER MAGNET UDT ENTRY. 04435 M01S00017.ns2765 +++|* 04436 M01S00018.ns2765 +++|* ENTRY (IR+3) = OFFSET INTO KEYBOARD BUFFER. 04437 M01S00019.ns2765 +++| 04438 M01S00020.ns2765 +++| 04439 M01S00021.ns2765 +++| EUF ENTRY ENTRY/EXIT 04440 M01S00022.ns2765 +++| 04441 M01S00023.ns2765 +++|* CHECK MAGNET STATUS AND FIND UDT ENTRY. 04442 M01S00024.ns2765 +++| 04443 M01S00025.ns2765 +++| LDC MTSI 04444 M01S00026.ns2765 +++| RJM CSS CHECK MAGNET STATUS 04445 M01S00027.ns2765 +++| LDK /1DS/DSDL+/1DS/KBCML GET REQUEST 04446 M01S00028.ns2765 +++| CRD AB 04447 M01S00029.ns2765 +++| LDD RA 04448 M01S00030.ns2765 +++| SHN 6 04449 M01S00031.ns2765 +++| ADC /MTX/UBUF GET UDT POINTERS 04450 M01S00032.ns2765 +++| CRD T1 04451 M01S00033.ns2765 +++| LDD T1+3 SET UDT ADDRESS 04452 M01S00034.ns2765 +++| LPN 77 04453 M01S00035.ns2765 +++| RAM UADA 04454 M01S00036.ns2765 +++| LDD T1+4 04455 M01S00037.ns2765 +++| STM UADA+1 04456 M01S00038.ns2765 +++| EUF1 RJM UAD SET UDT ADDRESS 04457 M01S00039.ns2765 +++| CRD T1 04458 M01S00040.ns2765 +++| ADK /MTX/UST1 GET EST ORDINAL 04459 M01S00041.ns2765 +++| CRD CM 04460 M01S00042.ns2765 +++| ADK /MTX/UVRI-/MTX/UST1 GET EJT ORDINAL 04461 M01S00043.ns2765 +++| CRD CN 04462 M01S00044.ns2765 +++| LDD T1 04463 M01S00045.ns2765 +++| SHN -13 04464 M01S00046.ns2765 +++| LMN 1 04465 M01S00047.ns2765 +++| ZJN EUF3 IF END OF UDT 04466 M01S00048.ns2765 +++| LDD AB+1 04467 M01S00049.ns2765 +++| LMD CM+2 04468 M01S00050.ns2765 +++| ZJN EUF2 IF UDT ENTRY FOUND 04469 M01S00051.ns2765 +++| AOM IMRA ADVANCE UDT ORDINAL 04470 M01S00052.ns2765 +++| LMK /MTX/MUNIT 04471 M01S00053.ns2765 +++| ZJN EUF3 IF BEYOND MAXIMUM UDT 04472 M01S00054.ns2765 +++| LDK /MTX/UNITL ADVANCE UDT ADDRESS 04473 M01S00055.ns2765 +++| RAM UADA+1 04474 M01S00056.ns2765 +++| SHN -14 04475 M01S00057.ns2765 +++| RAM UADA 04476 M01S00058.ns2765 +++| UJN EUF1 CHECK NEXT UNIT 04477 M01S00059.ns2765 +++| 04478 M01S00060.ns2765 +++|* DETERMINE IF REQUEST ALLOWED ON UNIT. 04479 M01S00061.ns2765 +++| 04480 M01S00062.ns2765 +++| EUF2 LDD CM 04481 M01S00063.ns2765 +++| SHN -1 04482 M01S00064.ns2765 +++| LPN 1 ACS UNIT FLAG 04483 M01S00065.ns2765 +++| RAM EUFA 04484 M01S00066.ns2765 +++| LDM TMRF,AB SET TABLE ADDRESS FOR REQUEST 04485 M01S00067.ns2765 +++| EUFA LPN 1 04486 M01S00068.ns2765 +++|* LPN 2 (ACS UNIT) 04487 M01S00069.ns2765 +++| EUF3 ZJN EUF5 IF REQUEST NOT ALLOWED ON UNIT 04488 M01S00070.ns2765 +++| LDM TMRF,AB 04489 M01S00071.ns2765 +++| SHN 21-2
| Line S00072 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
M02 (Removed by) | ns2773 |
Seq # *Modification Id* Act ----------------------------+ 04490 M02S00072.ns2773 ---| PJN EUF4 IF REQUEST ALLOWED ON ASSIGNED UNIT
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2773 |
Seq # *Modification Id* Act ----------------------------+ 04491 M01S00001.ns2773 +++| PJN EUF3.1 IF UNASSIGNED UNIT NOT REQUIRED
| Line S00073 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 04492 M01S00073.ns2765 +++| LDD CN 04493 M01S00074.ns2765 +++| NJN EUF5 IF UNIT ASSIGNED TO JOB
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2773 |
Seq # *Modification Id* Act ----------------------------+ 04494 M01S00002.ns2773 +++| UJN EUF4 SET PROCESSOR ADDRESS 04495 M01S00003.ns2773 +++| 04496 M01S00004.ns2773 +++| EUF3.1 LDD CN 04497 M01S00005.ns2773 +++| ZJN EUF5 IF UNIT NOT ASSIGNED 04498 M01S00006.ns2773 +++| LDD CN+4 04499 M01S00007.ns2773 +++| SHN 21-0 04500 M01S00008.ns2773 +++| PJN EUF5 IF NO PREVIEW DISPLAY MESSAGE
| Line S00075 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 04501 M01S00075.ns2765 +++| EUF4 LDM TMRP,AB SET PROCESSOR ADDRESS 04502 M01S00076.ns2765 +++| STD T1 04503 M01S00077.ns2765 +++| RJM 0,T1 CALL PROCESSOR 04504 M01S00078.ns2765 +++| NJN EUF6 IF ERROR 04505 M01S00079.ns2765 +++| RJM IMR ISSUE MAGNET REQUEST 04506 M01S00080.ns2765 +++| UJN EUF7 RETURN 04507 M01S00081.ns2765 +++| 04508 M01S00082.ns2765 +++| EUF5 LDN 1 SET INCORRECT EQUIPMENT ERROR 04509 M01S00083.ns2765 +++| EUF6 RJM SRD SET RETURN STATUS 04510 M01S00084.ns2765 +++| EUF7 LJM EUFX RETURN 04511 M01S00085.ns2765 +++| TMRF SPACE 4,15 04512 M01S00086.ns2765 +++|** TMRF - TABLE OF MAGNET REQUEST FLAGS. 04513 M01S00087.ns2765 +++|* 04514 M01S00088.ns2765 +++|* ENTRY FORMAT - 04515 M01S00089.ns2765 +++|* 04516 M01S00090.ns2765 +++|*T 9/0,1/U,1/A,1/N
Figure
04517 M01S00091.ns2765 +++|* 04518 M01S00092.ns2765 +++|* U UNASSIGNED UNIT REQUIRED. 04519 M01S00093.ns2765 +++|* A REQUEST ALLOWED ON ACS UNITS. 04520 M01S00094.ns2765 +++|* N REQUEST ALLOWED ON NON-ACS UNITS. 04521 M01S00095.ns2765 +++| 04522 M01S00096.ns2765 +++| 04523 M01S00097.ns2765 +++| TMRF INDEX 04524 M01S00098.ns2765 +++| INDEX /MTX/XEV,5 ENTER VSN 04525 M01S00099.ns2765 +++| INDEX /MTX/XUU,7 UNLOAD UNIT 04526 M01S00100.ns2765 +++| INDEX /MTX/XSV,5 ENTER SCRATCH VSN 04527 M01S00101.ns2765 +++| INDEX /MTX/XRT,3 SET *RETRY* FLAG 04528 M01S00102.ns2765 +++| INDEX /MTX/XUG,3 UNIT GO 04529 M01S00103.ns2765 +++| INDEX /MTX/XUS,3 UNIT STOP 04530 M01S00104.ns2765 +++| INDEX /MTX/XTR,3 SET *TERMINATE* FLAG 04531 M01S00105.ns2765 +++| INDEX /MTX/XMU,6 ACS UNIT MOUNT
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | ns2773 |
Seq # *Modification Id* Act ----------------------------+ 04532 M01S00009.ns2773 +++| INDEX /MTX/XNV,3 SPECIFY NEXT VSN
| Line S00106 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 04533 M01S00106.ns2765 +++| INDEX /MTX/XRMX 04534 M01S00107.ns2765 +++| TMRP SPACE 4,15 04535 M01S00108.ns2765 +++|** TMRP - TABLE OF MAGNET REQUEST PROCESSORS. 04536 M01S00109.ns2765 +++| 04537 M01S00110.ns2765 +++| 04538 M01S00111.ns2765 +++| TMRP INDEX 04539 M01S00112.ns2765 +++| INDEX /MTX/XEV,CVR ENTER VSN 04540 M01S00113.ns2765 +++| INDEX /MTX/XUU,CLC UNLOAD UNIT
| Line S00114 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
M02 (Removed by) | ns2772 |
Seq # *Modification Id* Act ----------------------------+ 04541 M02S00114.ns2772 ---| INDEX /MTX/XSV,CSR ENTER SCRATCH VSN
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2772 |
Seq # *Modification Id* Act ----------------------------+ 04542 M01S00001.ns2772 +++| INDEX /MTX/XSV,CLC ENTER SCRATCH VSN
| Line S00115 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 04543 M01S00115.ns2765 +++| INDEX /MTX/XRT,CLE SET *RETRY* FLAG 04544 M01S00116.ns2765 +++| INDEX /MTX/XUG,CUG UNIT GO 04545 M01S00117.ns2765 +++| INDEX /MTX/XUS,CUG UNIT STOP 04546 M01S00118.ns2765 +++| INDEX /MTX/XTR,CLE SET *TERMINATE* FLAG 04547 M01S00119.ns2765 +++| INDEX /MTX/XMU,CAM ACS UNIT MOUNT
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | ns2773 |
Seq # *Modification Id* Act ----------------------------+ 04548 M01S00010.ns2773 +++| INDEX /MTX/XNV,CNV SPECIFY NEXT VSN
| Line S00120 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 04549 M01S00120.ns2765 +++| INDEX /MTX/XRMX 04550 M01S00121.ns2765 +++| TITLE IAF FUNCTION SUBROUTINES. 04551 M00S03482.1ds +++| ITR SPACE 4,10 04552 M00S03483.1ds +++|** ITR - ISSUE *TSEM* REQUEST. 04553 M00S03484.1ds +++|* 04554 M00S03485.1ds +++|* ENTRY (WARA - WARA+4) = FORMATTED *TSEM* REQUEST. 04555 M00S03486.1ds +++|* 04556 M00S03487.1ds +++|* EXIT (A) .EQ. 0, IF IAF UNAVAILABLE. 04557 M00S03488.1ds +++|* .NE. 0, IF REQUEST SENT. 04558 M00S03489.1ds +++|*
| Line S03490 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 04559 M01S03490.271l716 ---|* USES T2.
| Line S00241 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 04560 M01S00241.271l716 +++|* USES T2, CM - CM+4. 04561 M00S03491.1ds +++|*
| Line S03492 Modification History | |
|---|---|
M01 (Removed by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04562 M01S03492.ns2680 ---|* MACROS DELAY, MONITOR, PAUSE.
| Line S00091 Modification History | |
|---|---|
M01 (Added by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04563 M01S00091.ns2680 +++|* MACROS DELAY, MONITOR, CHKERR. 04564 M00S03493.1ds +++| 04565 M00S03494.1ds +++| 04566 M00S03495.1ds +++| ITR3 LDN 0 04567 M00S03496.1ds +++| 04568 M00S03497.1ds +++| ITR SUBR ENTRY/EXIT 04569 M00S03498.1ds +++| ITR1 LDD MA ISSUE *TSEM* REQUEST 04570 M00S03499.1ds +++| CWM WARA,ON
| Line S00242 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 04571 M01S00242.271l716 +++| LDK ZERL 04572 M01S00243.271l716 +++| CRD CM 04573 M00S03500.1ds +++| MONITOR TSEM 04574 M00S03501.1ds +++| LDD CM+1 04575 M00S03502.1ds +++| ZJN ITRX IF IAF UNAVAILABLE 04576 M00S03503.1ds +++| LMC 7777 04577 M00S03504.1ds +++| NJN ITRX IF REQUEST COMPLETE 04578 M00S03505.1ds +++| LDC 7313 REISSUE REQUEST AFTER ONE HALF SECOND 04579 M00S03506.1ds +++| STD T2 04580 M00S03507.1ds +++| ITR2 DELAY
| Line S03508 Modification History | |
|---|---|
M01 (Removed by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04581 M01S03508.ns2680 ---| PAUSE 04582 M01S03509.ns2680 ---| LDD CM+1
| Line S00092 Modification History | |
|---|---|
M01 (Added by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04583 M01S00092.ns2680 +++| CHKERR 04584 M00S03510.1ds +++| NJN ITR3 IF ERROR FLAG 04585 M00S03511.1ds +++| SOD T2 04586 M00S03512.1ds +++| ZJN ITR1 IF TIME TO REISSUE REQUEST 04587 M00S03513.1ds +++| UJN ITR2 CONTINUE TO DELAY
| Line S03514 Modification History | |
|---|---|
M01 (Removed by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04588 M01S03514.ns2680 ---| SBT SPACE 4,10
| Line S00093 Modification History | |
|---|---|
M01 (Added by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04589 M01S00093.ns2680 +++| SBT SPACE 4,15 04590 M00S03515.1ds +++|** SBT - SET BUFFER AND TRANSFER DATA TO POTS. 04591 M00S03516.1ds +++|* 04592 M00S03517.1ds +++|* ENTRY (A) = NUMBER OF WORDS IN HEADER, INCLUDING THE FIRST 04593 M00S03518.1ds +++|* TWO WORDS USED FOR QUEUE LINKAGE BY IAF. 04594 M00S03519.1ds +++|* 04595 M00S03520.1ds +++|* EXIT (A) = 0, IF POTS NOT AVAILABLE. 04596 M00S03521.1ds +++|* (WARA+2 - WARA+3) = SET UP FOR *TSEM* REQUEST. 04597 M00S03522.1ds +++|* 04598 M00S03523.1ds +++|* USES T1, T2, T3. 04599 M00S03524.1ds +++|* 04600 M00S03525.1ds +++|* CALLS RPK, SPA, UPP. 04601 M00S03526.1ds +++|* 04602 M00S03527.1ds +++|* MACROS MONITOR. 04603 M00S03528.1ds +++| 04604 M00S03529.1ds +++| 04605 M00S03530.1ds +++| SBT SUBR ENTRY/EXIT 04606 M00S03531.1ds +++| STD T3 COMPUTE ADDRESS OF FIRST WORD AFTER HEADER 04607 M00S03532.1ds +++| SHN 2 04608 M00S03533.1ds +++| ADC BFMS 04609 M00S03534.1ds +++| RAD T3 04610 M00S03535.1ds +++| LDK ZERL PUT AN EOL IN THE FIRST WORD OF MESSAGE 04611 M00S03536.1ds +++| CRM BFMS+5*2,ON 04612 M00S03537.1ds +++| LDK 2R"EM" SET EXTENDED MODE AS FIRST BYTE OF HEADER 04613 M00S03538.1ds +++| STI T3 04614 M00S03539.1ds +++| LDK 2R"NL" SET NEW LINE AS SECOND BYTE 04615 M00S03540.1ds +++| STM 1,T3 04616 M00S03541.1ds +++| LDD T3 04617 M00S03542.1ds +++| ADN 2 04618 M00S03543.1ds +++| RJM RPK PACK MESSAGE AFTER HEADER 04619 M00S03544.1ds +++| LDN 0 ENSURE MESSAGE TERMINATOR AFTER FIVE WORDS 04620 M00S03545.1ds +++| STM 1+5*5,T3 04621 M00S03546.1ds +++| SBT1 AOD T3 NEXT BYTE 04622 M00S03547.1ds +++| LDI T3 04623 M00S03548.1ds +++| NJN SBT1 IF NOT END OF MESSAGE 04624 M00S03549.1ds +++| LDM -1,T3 CHECK PREVIOUS BYTE 04625 M00S03550.1ds +++| LPN 77 04626 M00S03551.1ds +++| NJN SBT2 IF NOT ZERO CHARACTER IN LAST BYTE 04627 M00S03552.1ds +++| LDN 1R INSERT BLANK 04628 M00S03553.1ds +++| RAM -1,T3 04629 M00S03554.1ds +++| SBT2 LDC 2R"NL" ISSUE NEW LINE 04630 M00S03555.1ds +++| STI T3 04631 M00S03556.1ds +++| AOD T3 04632 M00S03557.1ds +++| LDK 2R"EB" SET STOP BYTE 04633 M00S03558.1ds +++| STI T3 04634 M00S03559.1ds +++| AOD T3
| Line S03560 Modification History | |
|---|---|
M01 (Removed by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04635 M01S03560.ns2680 ---| STM SBTE
| Line S00094 Modification History | |
|---|---|
M01 (Added by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04636 M01S00094.ns2680 +++| STM SBTA 04637 M00S03561.1ds +++| LDN ZERL 04638 M00S03562.1ds +++| CRM *,ON INSURE END OF LINE
| Line S03563 Modification History | |
|---|---|
M01 (Removed by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04639 M01S03563.ns2680 ---| SBTE EQU *-1
| Line S00095 Modification History | |
|---|---|
M01 (Added by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04640 M01S00095.ns2680 +++| SBTA EQU *-1 04641 M00S03564.1ds +++| LDN 5 ADVANCE BEYOND EOL 04642 M00S03565.1ds +++| RAD T3 04643 M00S03566.1ds +++| LDN 0 SET CM WORD COUNT 04644 M00S03567.1ds +++| STD T2 04645 M00S03568.1ds +++| LDC -BFMS 04646 M00S03569.1ds +++| RAD T3 04647 M00S03570.1ds +++| SBT3 AOD T2 04648 M00S03571.1ds +++| LCN 5 04649 M00S03572.1ds +++| RAD T3 04650 M00S03573.1ds +++| PJN SBT3 IF NOT START OF MESSAGE 04651 M00S03574.1ds +++| LDN /REM/VCPC 04652 M00S03575.1ds +++| STD T3 04653 M00S03576.1ds +++| LDK ZERL CALCULATE HOW MANY POTS ARE NEEDED 04654 M00S03577.1ds +++| CRD CM 04655 M00S03578.1ds +++| LDD T2 04656 M00S03579.1ds +++| ADK /REM/VCPC-1 ROUND UP TO THE NEAREST POT 04657 M00S03580.1ds +++| SHN -3 04658 M00S03581.1ds +++| STD CM+1 04659 M00S03582.1ds +++| MONITOR TGPM
| Line S00096 Modification History | |
|---|---|
M01 (Added by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04660 M01S00096.ns2680 +++| LDC BFMS INITIALIZE BUFFER ADDRESS 04661 M01S00097.ns2680 +++| STM SBTB 04662 M00S03583.1ds +++| LDD CM+1 04663 M00S03584.1ds +++| ZJN SBT5 IF IAF UNAVAILABLE 04664 M00S03585.1ds +++| LMC 7777 04665 M00S03586.1ds +++| ZJN SBT5 IF POT QUEUE IN IAF CURRENTLY EMPTY 04666 M00S03587.1ds +++| LMC 7777 04667 M00S03588.1ds +++| STD PP 04668 M00S03589.1ds +++| STM WARA+3 04669 M00S03590.1ds +++| SBT4 STM WARA+2 04670 M00S03591.1ds +++| RJM SPA SET POT ADDRESS
| Line S03592 Modification History | |
|---|---|
M01 (Removed by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04671 M01S03592.ns2680 ---| CWM BFMS,T3
| Line S00098 Modification History | |
|---|---|
M01 (Added by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04672 M01S00098.ns2680 +++| CWM *,T3
| Line S03593 Modification History | |
|---|---|
M01 (Removed by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04673 M01S03593.ns2680 ---| SBTF EQU *-1
| Line S00099 Modification History | |
|---|---|
M01 (Added by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04674 M01S00099.ns2680 +++| SBTB EQU *-1 04675 M00S03594.1ds +++| LCN /REM/VCPC 04676 M00S03595.1ds +++| RAD T2 04677 M00S03596.1ds +++| SBN 1 04678 M00S03597.1ds +++| MJN SBT5 IF TRANSFER COMPLETE 04679 M00S03598.1ds +++| LDN /REM/VCPC*5
| Line S03599 Modification History | |
|---|---|
M01 (Removed by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04680 M01S03599.ns2680 ---| RAM SBTF
| Line S00100 Modification History | |
|---|---|
M01 (Added by) | ns2680 |
Seq # *Modification Id* Act ----------------------------+ 04681 M01S00100.ns2680 +++| RAM SBTB 04682 M00S03600.1ds +++| RJM UPP UPDATE TO NEXT POT 04683 M00S03601.1ds +++| NJN SBT4 IF MORE POTS IN CHAIN 04684 M00S03602.1ds +++| LDN 1 04685 M00S03603.1ds +++| SBT5 LJM SBTX EXIT
| Line S00122 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 04686 M01S00122.ns2765 +++| TITLE MAGNET FUNCTION SUBROUTINES. 04687 M01S00123.ns2765 +++| CAM SPACE 4,15 04688 M01S00124.ns2765 +++|** CAM - CHECK ACS MOUNT REQUEST. 04689 M01S00125.ns2765 +++|* 04690 M01S00126.ns2765 +++|* EXIT (A) = 0 IF MOUNT CAN BE PROCESSED. 04691 M01S00127.ns2765 +++|* (A) = 1 IF UNIT STATUS PROHIBITS MOUNT. 04692 M01S00128.ns2765 +++|* (A) = 2 IF VSN ACTIVITY PROHIBITS MOUNT. 04693 M01S00129.ns2765 +++|* 04694 M01S00130.ns2765 +++|* USES CM - CM+4. 04695 M01S00131.ns2765 +++|* 04696 M01S00132.ns2765 +++|* CALLS FAV, UAD. 04697 M01S00133.ns2765 +++|* 04698 M01S00134.ns2765 +++|* MACROS SFA. 04699 M01S00135.ns2765 +++| 04700 M01S00136.ns2765 +++| 04701 M01S00137.ns2765 +++| CAM2 LDN 1 SET EQUIPMENT ERROR 04702 M01S00138.ns2765 +++| 04703 M01S00139.ns2765 +++| CAM SUBR ENTRY/EXIT 04704 M01S00140.ns2765 +++| SFA EST,AB+1 GET EQUIPMENT STATUS 04705 M01S00141.ns2765 +++| ADK EQDE 04706 M01S00142.ns2765 +++| CRD CM 04707 M01S00143.ns2765 +++| LDD CM 04708 M01S00144.ns2765 +++| LPN 3 04709 M01S00145.ns2765 +++| LMN DWES 04710 M01S00146.ns2765 +++| ZJN CAM2 IF UNIT DOWN 04711 M01S00147.ns2765 +++| LDD CM+1 04712 M01S00148.ns2765 +++| SHN -11 04713 M01S00149.ns2765 +++| LMN 4 04714 M01S00150.ns2765 +++| ZJN CAM1 IF UNIT ACCESSIBLE ON PRIMARY CHANNEL 04715 M01S00151.ns2765 +++| LDD CM+2 04716 M01S00152.ns2765 +++| SHN -11 04717 M01S00153.ns2765 +++| LMN 4 04718 M01S00154.ns2765 +++| NJN CAM2 IF NO ACCESS ON SECONDARY CHANNEL 04719 M01S00155.ns2765 +++| CAM1 RJM UAD SET UDT ADDRESS 04720 M01S00156.ns2765 +++| ADK /MTX/UMST GET MOUNT STATUS 04721 M01S00157.ns2765 +++| CRD CM 04722 M01S00158.ns2765 +++| LDD CM+4 04723 M01S00159.ns2765 +++| LPN 7 04724 M01S00160.ns2765 +++| NJN CAMX IF NOT DISMOUNTED OR CONTROL PATH ERROR 04725 M01S00161.ns2765 +++| RJM FAV FIND ACS VSN 04726 M01S00162.ns2765 +++| UJN CAMX RETURN WITH STATUS 04727 M01S00163.ns2765 +++| CLE SPACE 4,10 04728 M01S00164.ns2765 +++|** CLE - CHECK LOAD POINT ERROR. 04729 M01S00165.ns2765 +++|* 04730 M01S00166.ns2765 +++|* EXIT (A) = 0 IF LOAD POINT ERROR OPERATOR PROMPT PRESENT. 04731 M01S00167.ns2765 +++|* (A) = 1 IF NO LOAD POINT ERROR OPERATOR PROMPT. 04732 M01S00168.ns2765 +++|*
| Line S00169 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
M02 (Removed by) | ns2773 |
Seq # *Modification Id* Act ----------------------------+ 04733 M02S00169.ns2773 ---|* USES CM - CM+4. 04734 M02S00170.ns2773 ---|* 04735 M02S00171.ns2773 ---|* CALLS UAD.
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | ns2773 |
Seq # *Modification Id* Act ----------------------------+ 04736 M01S00011.ns2773 +++|* CALLS GMC.
| Line S00172 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 04737 M01S00172.ns2765 +++| 04738 M01S00173.ns2765 +++| 04739 M01S00174.ns2765 +++| CLE SUBR ENTRY/EXIT
| Line S00175 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
M02 (Removed by) | ns2773 |
Seq # *Modification Id* Act ----------------------------+ 04740 M02S00175.ns2773 ---| RJM UAD 04741 M02S00176.ns2773 ---| ADK /MTX/UISN GET PREVIEW DISPLAY MESSAGE CODE 04742 M02S00177.ns2773 ---| CRD CM 04743 M02S00178.ns2773 ---| LDD CM+3 04744 M02S00179.ns2773 ---| LPN 77
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | ns2773 |
Seq # *Modification Id* Act ----------------------------+ 04745 M01S00012.ns2773 +++| RJM GMC GET MESSAGE CODE
| Line S00180 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 04746 M01S00180.ns2765 +++| LMN /RSX/TCF 04747 M01S00181.ns2765 +++| ZJN CLEX IF LOAD POINT ERROR 04748 M01S00182.ns2765 +++| LMN /RSX/BFR&/RSX/TCF 04749 M01S00183.ns2765 +++| ZJN CLEX IF LOAD POINT ERROR 04750 M01S00184.ns2765 +++| LMN /RSX/BFW&/RSX/BFR 04751 M01S00185.ns2765 +++| ZJN CLEX IF LOAD POINT ERROR 04752 M01S00186.ns2765 +++| LDN 1 SET EQUIPMENT ERROR 04753 M01S00187.ns2765 +++| UJN CLEX RETURN 04754 M01S00188.ns2765 +++| CLC SPACE 4,10 04755 M01S00189.ns2765 +++|** CLC - CHECK INITIAL LABEL CHECK COMPLETE. 04756 M01S00190.ns2765 +++|* 04757 M01S00191.ns2765 +++|* EXIT (A) = 0 IF INITIAL LABEL CHECK COMPLETE. 04758 M01S00192.ns2765 +++|* (A) = 1 IF INITIAL LABEL CHECK NOT COMPLETE. 04759 M01S00193.ns2765 +++|* (CM - CM+4) = *UVSN*. 04760 M01S00194.ns2765 +++|* 04761 M01S00195.ns2765 +++|* USES CM - CM+4. 04762 M01S00196.ns2765 +++|* 04763 M01S00197.ns2765 +++|* CALLS UAD. 04764 M01S00198.ns2765 +++| 04765 M01S00199.ns2765 +++| 04766 M01S00200.ns2765 +++| CLC1 LDN 1 SET EQUIPMENT ERROR 04767 M01S00201.ns2765 +++| 04768 M01S00202.ns2765 +++| CLC SUBR ENTRY/EXIT 04769 M01S00203.ns2765 +++| RJM UAD SET UDT ADDRESS 04770 M01S00204.ns2765 +++| ADK /MTX/UVSN GET LABEL CHECK STATUS 04771 M01S00205.ns2765 +++| CRD CM 04772 M01S00206.ns2765 +++| LDD CM 04773 M01S00207.ns2765 +++| ADD CM+1 04774 M01S00208.ns2765 +++| ADD CM+2 04775 M01S00209.ns2765 +++| ZJN CLC1 IF LABELS NOT CHECKED 04776 M01S00210.ns2765 +++| LDD CM+3 04777 M01S00211.ns2765 +++| SHN -13 CHECK FOR LABEL CHECK IN PROGRESS 04778 M01S00212.ns2765 +++| UJN CLCX RETURN WITH STATUS
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | ns2773 |
Seq # *Modification Id* Act ----------------------------+ 04779 M01S00013.ns2773 +++| CNV SPACE 4,10 04780 M01S00014.ns2773 +++|** CNV - CHECK *NEXTVSN* COMMAND REQUEST. 04781 M01S00015.ns2773 +++|* 04782 M01S00016.ns2773 +++|* EXIT (A) = 0 IF NO ERROR. 04783 M01S00017.ns2773 +++|* (A) = 1 IF ERROR. 04784 M01S00018.ns2773 +++|* 04785 M01S00019.ns2773 +++|* CALLS GMC. 04786 M01S00020.ns2773 +++| 04787 M01S00021.ns2773 +++| 04788 M01S00022.ns2773 +++| CNV SUBR ENTRY/EXIT 04789 M01S00023.ns2773 +++| RJM GMC GET MESSAGE CODE 04790 M01S00024.ns2773 +++| LMN /RSX/NTV 04791 M01S00025.ns2773 +++| ZJN CNVX IF NEXT VSN PROMPT 04792 M01S00026.ns2773 +++| LDN 1 SET EUIPMENT ERROR 04793 M01S00027.ns2773 +++| UJN CNVX RETURN
| Line S00213 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
M02 (Removed by) | ns2772 |
Seq # *Modification Id* Act ----------------------------+ 04794 M02S00213.ns2772 ---| CSR SPACE 4,10 04795 M02S00214.ns2772 ---|** CSR - CHECK *SCRATCH* COMMAND REQUEST. 04796 M02S00215.ns2772 ---|* 04797 M02S00216.ns2772 ---|* EXIT (A) = 0 IF NO ERROR. 04798 M02S00217.ns2772 ---|* (A) = 1 IF ERROR. 04799 M02S00218.ns2772 ---|* 04800 M02S00219.ns2772 ---|* CALLS CLC. 04801 M02S00220.ns2772 ---| 04802 M02S00221.ns2772 ---| 04803 M02S00222.ns2772 ---| CSR SUBR ENTRY/EXIT 04804 M02S00223.ns2772 ---| RJM CLC CHECK LABEL CHECK COMPLETE 04805 M02S00224.ns2772 ---| NJN CSRX IF LABELS NOT CHECKED 04806 M02S00225.ns2772 ---| LDD CM+3 04807 M02S00226.ns2772 ---| SHN -10 04808 M02S00227.ns2772 ---| LPN 1 CHECK DENSITY CONFLICT 04809 M02S00228.ns2772 ---| UJN CSRX RETURN WITH STATUS
| Line S00229 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 04810 M01S00229.ns2765 +++| CUG SPACE 4,10 04811 M01S00230.ns2765 +++|** CUG - CHECK FOR TMS UNIT GO PROMPT. 04812 M01S00231.ns2765 +++|* 04813 M01S00232.ns2765 +++|* EXIT (A) = 0 IF UNIT GO PROMPT. 04814 M01S00233.ns2765 +++|* (A) = 1 IF NO UNIT GO PROMPT. 04815 M01S00234.ns2765 +++|*
| Line S00235 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
M02 (Removed by) | ns2773 |
Seq # *Modification Id* Act ----------------------------+ 04816 M02S00235.ns2773 ---|* USES CM - CM+4. 04817 M02S00236.ns2773 ---|* 04818 M02S00237.ns2773 ---|* CALLS UAD.
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | ns2773 |
Seq # *Modification Id* Act ----------------------------+ 04819 M01S00028.ns2773 +++|* CALLS GMC.
| Line S00238 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 04820 M01S00238.ns2765 +++| 04821 M01S00239.ns2765 +++| 04822 M01S00240.ns2765 +++| CUG SUBR ENTRY EXIT
| Line S00241 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
M02 (Removed by) | ns2773 |
Seq # *Modification Id* Act ----------------------------+ 04823 M02S00241.ns2773 ---| RJM UAD 04824 M02S00242.ns2773 ---| ADK /MTX/UISN GET PREVIEW DISPLAY MESSAGE CODE 04825 M02S00243.ns2773 ---| CRD CM 04826 M02S00244.ns2773 ---| LDD CM+3 04827 M02S00245.ns2773 ---| LPN 77
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | ns2773 |
Seq # *Modification Id* Act ----------------------------+ 04828 M01S00029.ns2773 +++| RJM GMC GET MESSAGE CODE
| Line S00246 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 04829 M01S00246.ns2765 +++| LMN /RSX/NLG 04830 M01S00247.ns2765 +++| ZJN CUGX IF UNIT GO PROMPT 04831 M01S00248.ns2765 +++| LMN /RSX/CAG&/RSX/NLG 04832 M01S00249.ns2765 +++| ZJN CUGX IF UNIT GO PROMPT 04833 M01S00250.ns2765 +++| LMN /RSX/WVG&/RSX/CAG 04834 M01S00251.ns2765 +++| ZJN CUGX IF UNIT GO PROMPT 04835 M01S00252.ns2765 +++| LDN 1 SET EQUIPMENT ERROR 04836 M01S00253.ns2765 +++| UJN CUGX RETURN 04837 M01S00254.ns2765 +++| CVR SPACE 4,10 04838 M01S00255.ns2765 +++|** CVR - CHECK ENTER VSN REQUEST. 04839 M01S00256.ns2765 +++|* 04840 M01S00257.ns2765 +++|* EXIT (A) = 0 IF NO ERROR. 04841 M01S00258.ns2765 +++|* (A) = 1 IF ERROR. 04842 M01S00259.ns2765 +++|* 04843 M01S00260.ns2765 +++|* CALLS CLC. 04844 M01S00261.ns2765 +++| 04845 M01S00262.ns2765 +++| 04846 M01S00263.ns2765 +++| CVR SUBR ENTRY/EXIT 04847 M01S00264.ns2765 +++| RJM CLC CHECK LABEL CHECK COMPLETE 04848 M01S00265.ns2765 +++| NJN CVRX IF LABELS NOT CHECKED 04849 M01S00266.ns2765 +++| LDD AB+2 04850 M01S00267.ns2765 +++| ADD AB+3 04851 M01S00268.ns2765 +++| ADD AB+4 04852 M01S00269.ns2765 +++| ZJN CVRX IF CLEARING VSN 04853 M01S00270.ns2765 +++| LDD CM+3
| Line S00271 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
M02 (Removed by) | ns2772 |
Seq # *Modification Id* Act ----------------------------+ 04854 M02S00271.ns2772 ---| LPC 404
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2772 |
Seq # *Modification Id* Act ----------------------------+ 04855 M01S00002.ns2772 +++| LPN 4
| Line S00272 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 04856 M01S00272.ns2765 +++| LMN 4
| Line S00273 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
M02 (Removed by) | ns2772 |
Seq # *Modification Id* Act ----------------------------+ 04857 M02S00273.ns2772 ---| ZJN CVRX IF UNLABELED TAPE AND NO DENSITY CONFLICT
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2772 |
Seq # *Modification Id* Act ----------------------------+ 04858 M01S00003.ns2772 +++| ZJN CVRX IF UNLABELED TAPE
| Line S00274 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 04859 M01S00274.ns2765 +++| LDN 1 SET EQUIPMENT ERROR 04860 M01S00275.ns2765 +++| UJN CVRX RETURN 04861 M01S00276.ns2765 +++| CVS SPACE 4,10 04862 M01S00277.ns2765 +++|** CVS - COMPARE VSN-S. 04863 M01S00278.ns2765 +++|* 04864 M01S00279.ns2765 +++|* ENTRY (AB+2 - AB+4) = REQUESTED VSN. 04865 M01S00280.ns2765 +++|* (CM - CM+2) = VSN TO COMPARE. 04866 M01S00281.ns2765 +++|* 04867 M01S00282.ns2765 +++|* EXIT (A) = 0 IF VSN-S MATCH. 04868 M01S00283.ns2765 +++|* (A) .NE. 0 IF VSN-S DO NOT MATCH. 04869 M01S00284.ns2765 +++| 04870 M01S00285.ns2765 +++| 04871 M01S00286.ns2765 +++| CVS SUBR ENTRY/EXIT 04872 M01S00287.ns2765 +++| LDD CM 04873 M01S00288.ns2765 +++| LMD AB+2 04874 M01S00289.ns2765 +++| NJN CVSX IF NO MATCH 04875 M01S00290.ns2765 +++| LDD CM+1 04876 M01S00291.ns2765 +++| LMD AB+3 04877 M01S00292.ns2765 +++| NJN CVSX IF NO MATCH 04878 M01S00293.ns2765 +++| LDD CM+2 04879 M01S00294.ns2765 +++| LMD AB+4 04880 M01S00295.ns2765 +++| UJN CVSX RETURN WITH STATUS 04881 M01S00296.ns2765 +++| FAV SPACE 4,10 04882 M01S00297.ns2765 +++|** FAV - FIND ACS VSN. 04883 M01S00298.ns2765 +++|* 04884 M01S00299.ns2765 +++|* EXIT (A) = 0 IF VSN NOT FOUND IN UDT OR VSN ERROR TABLE. 04885 M01S00300.ns2765 +++|* (A) = 2 IF VSN FOUND IN UDT OR VSN ERROR TABLE. 04886 M01S00301.ns2765 +++|* 04887 M01S00302.ns2765 +++|* USES CM - CM+4, CN - CN+4, T1 - T1+4. 04888 M01S00303.ns2765 +++|* 04889 M01S00304.ns2765 +++|* CALLS CVS. 04890 M01S00305.ns2765 +++| 04891 M01S00306.ns2765 +++| 04892 M01S00307.ns2765 +++| FAV SUBR ENTRY/EXIT 04893 M01S00308.ns2765 +++| 04894 M01S00309.ns2765 +++|* CHECK UDT. 04895 M01S00310.ns2765 +++| 04896 M01S00311.ns2765 +++| LDD RA 04897 M01S00312.ns2765 +++| SHN 6 04898 M01S00313.ns2765 +++| ADK /MTX/UBUF GET UDT POINTERS 04899 M01S00314.ns2765 +++| CRD T1 04900 M01S00315.ns2765 +++| LDN 0 INITIALIZE UDT ORDINAL 04901 M01S00316.ns2765 +++| STD T1 04902 M01S00317.ns2765 +++| FAV1 LDD T4 04903 M01S00318.ns2765 +++| SHN 6 04904 M01S00319.ns2765 +++| ADD RA 04905 M01S00320.ns2765 +++| SHN 6 04906 M01S00321.ns2765 +++| ADD T5 04907 M01S00322.ns2765 +++| CRD CN 04908 M01S00323.ns2765 +++| ADK /MTX/UMST 04909 M01S00324.ns2765 +++| CRD CM 04910 M01S00325.ns2765 +++| LDD CN 04911 M01S00326.ns2765 +++| SHN 21-13 04912 M01S00327.ns2765 +++| MJN FAV2 IF END OF UDT 04913 M01S00328.ns2765 +++| RJM CVS COMPARE VSN-S 04914 M01S00329.ns2765 +++| ZJN FAV4 IF VSN FOUND 04915 M01S00330.ns2765 +++| LDK /MTX/UNITL ADVANCE UDT ADDRESS 04916 M01S00331.ns2765 +++| RAD T5 04917 M01S00332.ns2765 +++| SHN -14 04918 M01S00333.ns2765 +++| RAD T4 04919 M01S00334.ns2765 +++| AOD T1 04920 M01S00335.ns2765 +++| LMN /MTX/MUNIT 04921 M01S00336.ns2765 +++| ZJN FAV4 IF BEYOND MAXIMUM UDT 04922 M01S00337.ns2765 +++| UJN FAV1 CHECK NEXT UNIT 04923 M01S00338.ns2765 +++| 04924 M01S00339.ns2765 +++|* CHECK VSN ERROR TABLE. 04925 M01S00340.ns2765 +++| 04926 M01S00341.ns2765 +++| FAV2 LDN 0 INITIALIZE ERROR TABLE INDEX 04927 M01S00342.ns2765 +++| STD T1 04928 M01S00343.ns2765 +++| FAV3 LDD RA SET ERROR TABLE ADDRESS 04929 M01S00344.ns2765 +++| SHN 6 04930 M01S00345.ns2765 +++| ADK /MTX/VET 04931 M01S00346.ns2765 +++| ADD T1 04932 M01S00347.ns2765 +++| CRD CM GET ERROR TABLE ENTRY 04933 M01S00348.ns2765 +++| LDD CM 04934 M01S00349.ns2765 +++| ZJN FAV5 IF END OF ENTRIES 04935 M01S00350.ns2765 +++| RJM CVS COMPARE VSN-S 04936 M01S00351.ns2765 +++| ZJN FAV4 IF VSN FOUND 04937 M01S00352.ns2765 +++| AOD T1 ADVANCE ENTRY INDEX 04938 M01S00353.ns2765 +++| LMK /MTX/VETL 04939 M01S00354.ns2765 +++| NJN FAV3 IF NOT BEYOND MAXIMUM ENTRY 04940 M01S00355.ns2765 +++| 04941 M01S00356.ns2765 +++|* RETURN STATUS. 04942 M01S00357.ns2765 +++| 04943 M01S00358.ns2765 +++| FAV4 LDN 2 SET VSN ERROR 04944 M01S00359.ns2765 +++| FAV5 LJM FAVX RETURN
| Line S00030 Modification History | |
|---|---|
M01 (Added by) | ns2773 |
Seq # *Modification Id* Act ----------------------------+ 04945 M01S00030.ns2773 +++| GMC SPACE 4,10 04946 M01S00031.ns2773 +++|** GMC - GET PREVIEW DISPLAY MESSAGE CODE. 04947 M01S00032.ns2773 +++|* 04948 M01S00033.ns2773 +++|* EXIT (A) = PREVIEW DISPLAY MESSAGE CODE. 04949 M01S00034.ns2773 +++|* 04950 M01S00035.ns2773 +++|* USES CM - CM+4. 04951 M01S00036.ns2773 +++|* 04952 M01S00037.ns2773 +++|* CALLS UAD. 04953 M01S00038.ns2773 +++| 04954 M01S00039.ns2773 +++| 04955 M01S00040.ns2773 +++| GMC SUBR ENTRY/EXIT 04956 M01S00041.ns2773 +++| RJM UAD SET UDT ADDRESS 04957 M01S00042.ns2773 +++| ADK /MTX/UISN GET PREVIEW DISPLAY MESSAGE CODE 04958 M01S00043.ns2773 +++| CRD CM 04959 M01S00044.ns2773 +++| LDD CM+3 04960 M01S00045.ns2773 +++| LPN 77 SET MESSAGE CODE 04961 M01S00046.ns2773 +++| UJN GMCX RETURN
| Line S00360 Modification History | |
|---|---|
M01 (Added by) | ns2765 |
Seq # *Modification Id* Act ----------------------------+ 04962 M01S00360.ns2765 +++| IMR SPACE 4,10 04963 M01S00361.ns2765 +++|** IMR - ISSUE MAGNET EXTERNAL REQUEST. 04964 M01S00362.ns2765 +++|* 04965 M01S00363.ns2765 +++|* USES AB+1, T1, CM+1 - CM+4. 04966 M01S00364.ns2765 +++|* 04967 M01S00365.ns2765 +++|* MACROS DELAY, MONITOR, PAUSE. 04968 M01S00366.ns2765 +++| 04969 M01S00367.ns2765 +++| 04970 M01S00368.ns2765 +++| IMR SUBR ENTRY/EXIT 04971 M01S00369.ns2765 +++| LDC 0 SET UDT ORDINAL 04972 M01S00370.ns2765 +++| IMRA EQU *-1 (UDT ORDINAL) 04973 M01S00371.ns2765 +++| STD AB+1 04974 M01S00372.ns2765 +++| LDD MA SET REQUEST 04975 M01S00373.ns2765 +++| CWD AB 04976 M01S00374.ns2765 +++| LDC 250D SET 1 SECOND RETRY LIMIT 04977 M01S00375.ns2765 +++| STD T1 04978 M01S00376.ns2765 +++| IMR1 LDN 1 SET WRITE FLAG 04979 M01S00377.ns2765 +++| STD CM+1 04980 M01S00378.ns2765 +++| LCN 7777-MTSI SET SUBSYSTEM ID 04981 M01S00379.ns2765 +++| STD CM+2 04982 M01S00380.ns2765 +++| LDD HN SET WORD COUNT 04983 M01S00381.ns2765 +++| STD CM+3 04984 M01S00382.ns2765 +++| LDN /MTX/XREQ SET WRITE ADDRESS 04985 M01S00383.ns2765 +++| STD CM+4 04986 M01S00384.ns2765 +++| MONITOR TDAM 04987 M01S00385.ns2765 +++| LDD CM+1 04988 M01S00386.ns2765 +++| ZJN IMRX IF TRANSFER COMPLETE 04989 M01S00387.ns2765 +++| SBN 4 04990 M01S00388.ns2765 +++| ZJN IMRX IF *MAGNET* NOT ACTIVE 04991 M01S00389.ns2765 +++| SOD T1 04992 M01S00390.ns2765 +++| ZJN IMRX IF MAXIMUM RETRIES 04993 M01S00391.ns2765 +++| PAUSE ST 04994 M01S00392.ns2765 +++| DELAY 40 DELAY 4 MILLISECONDS 04995 M01S00393.ns2765 +++| UJN IMR1 RETRY FUNCTION 04996 M01S00394.ns2765 +++| UAD SPACE 4,10 04997 M01S00395.ns2765 +++|** UAD - SET UDT ADDRESS. 04998 M01S00396.ns2765 +++|* 04999 M01S00397.ns2765 +++|* EXIT (A) = ABSOLUTE UDT ADDRESS. 05000 M01S00398.ns2765 +++| 05001 M01S00399.ns2765 +++| 05002 M01S00400.ns2765 +++| UAD SUBR ENTRY/EXIT 05003 M01S00401.ns2765 +++| LDD RA 05004 M01S00402.ns2765 +++| SHN 6 05005 M01S00403.ns2765 +++| UADA ADC 0 SET UDT ADDRESS 05006 M01S00404.ns2765 +++| UJN UADX RETURN 05007 M00S03604.1ds +++| SPACE 4,10 05008 M00S03605.1ds +++|** COMMON DECKS. 05009 M00S03606.1ds +++| 05010 M00S03607.1ds +++| 05011 M00S03608.1ds +++|*CALL COMPSPA 05012 M00S03609.1ds +++|*CALL COMPUPP
| Line S00032 Modification History | |
|---|---|
M01 (Added by) | ns2587 |
Seq # *Modification Id* Act ----------------------------+ 05013 M01S00032.ns2587 +++|*CALL COMPGTN 05014 M00S03610.1ds +++| 05015 M00S03611.1ds +++|
| Line S03612 Modification History | |
|---|---|
M01 (Removed by) | 1ds21 |
Seq # *Modification Id* Act ----------------------------+ 05016 M01S03612.1ds21 ---| OVERFLOW OVLA,BFMS
| Line S00080 Modification History | |
|---|---|
M01 (Added by) | 1ds21 |
Seq # *Modification Id* Act ----------------------------+ 05017 M01S00080.1ds21 +++| OVERFLOW OVLA,/OVERLAY/BUFB 05018 M00S03613.1ds +++| OVERLAY (MULTILEVEL SECURITY FUNCTIONS.) 05019 M00S03614.1ds +++| SAM SPACE 4,10 05020 M00S03615.1ds +++|*** FUNCTION SAMF - SEND ACCOUNT FILE MESSAGE. 05021 M00S03616.1ds +++|*
| Line S03617 Modification History | |
|---|---|
M01 (Removed by) | ns2639 |
Seq # *Modification Id* Act ----------------------------+ 05022 M01S03617.ns2639 ---|* ENTRY (IR+3) = 1/T, 5/, 3/LA, 3/UA.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2639 |
Seq # *Modification Id* Act ----------------------------+ 05023 M01S00001.ns2639 +++|* ENTRY (IR+3) = 2/T, 4/, 3/LA, 3/UA. 05024 M00S03618.1ds +++|* T = 0, IF *MSOT* MESSAGE.
| Line S03619 Modification History | |
|---|---|
M01 (Removed by) | ns2639 |
Seq # *Modification Id* Act ----------------------------+ 05025 M01S03619.ns2639 ---|* = 1, IF *MSEQ* MESSAGE.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2639 |
Seq # *Modification Id* Act ----------------------------+ 05026 M01S00002.ns2639 +++|* = 1, IF *MSLK* MESSAGE. 05027 M01S00003.ns2639 +++|* = 2, IF *MSEQ* MESSAGE. 05028 M01S00004.ns2639 +++|* = 3, IF *MSUL* MESSAGE. 05029 M00S03620.1ds +++|* LA = NEW LOWER ACCESS LEVEL LIMIT. 05030 M00S03621.1ds +++|* UA = NEW UPPER ACCESS LEVEL LIMIT. 05031 M00S03622.1ds +++|* (IR+4) = 12/ORD. 05032 M00S03623.1ds +++|* ORD = EST ORDINAL, IF *MSEQ* MESSAGE. 05033 M00S03624.1ds +++|* = ORIGIN TYPE ORDINAL, IF *MSOT* MESSAGE. 05034 M00S03625.1ds +++| 05035 M00S03626.1ds +++| 05036 M00S03627.1ds +++| SAM ENTRY ENTRY/EXIT 05037 M00S03628.1ds +++| LDD IR+3
| Line S03629 Modification History | |
|---|---|
M01 (Removed by) | ns2639 |
Seq # *Modification Id* Act ----------------------------+ 05038 M01S03629.ns2639 ---| SHN 0-13 05039 M01S03630.ns2639 ---| ZJN SAM1 IF *MSOT* MESSAGE
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns2639 |
Seq # *Modification Id* Act ----------------------------+ 05040 M01S00005.ns2639 +++| SHN 21-12 05041 M01S00006.ns2639 +++| PJN SAM2 IF NOT *MSLK* OR *MSUL* MESSAGE 05042 M01S00007.ns2639 +++| LPN 1 05043 M01S00008.ns2639 +++| ZJN SAM1 IF *MSLK* 05044 M01S00009.ns2639 +++| LDC 2RUL&2RLK 05045 M01S00010.ns2639 +++| SAM1 LMC 2RLK 05046 M01S00011.ns2639 +++| STM SAMA+1 CHANGE ACCOUNT FILE MESSAGE 05047 M01S00012.ns2639 +++| LDC 2R. APPEND PERIOD 05048 M01S00013.ns2639 +++| STM SAMA+2 05049 M01S00014.ns2639 +++| LJM SAM6 ISSUE MESSAGE 05050 M01S00015.ns2639 +++| 05051 M01S00016.ns2639 +++| SAM2 LPN 1 05052 M01S00017.ns2639 +++| ZJN SAM3 IF *MSOT* MESSAGE 05053 M00S03631.1ds +++| LDD IR+4 CONVERT EST ORDINAL TO DISPLAY CODE 05054 M00S03632.1ds +++| SHN -3 05055 M00S03633.1ds +++| RJM C2D 05056 M00S03634.1ds +++| STM SAMA+3 05057 M00S03635.1ds +++| LDD IR+4 05058 M00S03636.1ds +++| LPN 7 05059 M00S03637.1ds +++| ADN 1R0 05060 M00S03638.1ds +++| SHN 6 05061 M00S03639.1ds +++| STM SAMC TEMPORARILY SAVE DISPLAY-CODED ORDINAL 05062 M00S03640.1ds +++| LDC SAMB FWA OF MESSAGE BUFFER
Proceed to Part 3
cdc/nos2.source/opl.opl871/deck/1ds.002.txt · Last modified: (external edit)