cdc:nos2.source:opl.opl871:deck:1tm.002
Deck 1TM Part 002
22 Modifications
Listing Sections
- Deck 1TM Start
- Deck 1TM Part 1 (Line 1536)
- Deck 1TM Part 2 (Line 3425)
- Deck 1TM Part 3 (Line 5332)
- Deck 1TM Part 4 (Line 6914)
Source
Seq # *Modification Id* Act ----------------------------+ 03425 M00S02998.1tm +++|* (DP+2), CURRENT WORD = FIRST WORD OF OUTPUT. 03426 M00S02999.1tm +++|* (DP+3) *BINARY TRANSMISSION* STATUS 03427 M00S03000.1tm +++|* (CH+2) = ESCAPE CONTROL. 03428 M00S03001.1tm +++|* 03429 M00S03002.1tm +++|* EXIT TO *AWT* FOR *ASCII* FORMAT WRITE. 03430 M00S03003.1tm +++|* TO *BWT* FOR NOS *BINARY* FORMAT WRITE. 03431 M00S03004.1tm +++|* 03432 M00S03005.1tm +++|* CALLS ERQ, RLT. 03433 M00S03006.1tm +++| 03434 M00S03007.1tm +++| 03435 M00S03008.1tm +++| WTM BSS 0 ENTRY 03436 M00S03009.1tm +++| RJM RLT CHECK POT LINK 03437 M00S03010.1tm +++| NJN WTM1 IF POT LINKED 03438 M00S03011.1tm +++| LDN /TLX/RES REQUEST MORE OUTPUT 03439 M00S03012.1tm +++| RJM ERQ 03440 M00S03013.1tm +++| WTM1 LDD DP+3 CHECK *BINARY TRANSMISSION* 03441 M00S03014.1tm +++| LPN 10 03442 M00S03015.1tm +++| ZJN AWT IF *ASCII* WRITE 03443 M00S03016.1tm +++| LJM BWT ENTER *BINARY* WRITE 03444 M00S03017.1tm +++| AWT TITLE WRITE MODE - *ASCII* WRITE PROCESSOR. 03445 M00S03018.1tm +++| AWT SPACE 4,50 03446 M00S03019.1tm +++|** AWT - *ASCII* WRITE PROCESSOR. 03447 M00S03020.1tm +++|* 03448 M00S03021.1tm +++|* ISSUES *ASCII* CHARACTER DATA TO TERMINAL. 03449 M00S03022.1tm +++|* 03450 M00S03023.1tm +++|* ENTRY (CH+2) = ESCAPE CONTROL. 03451 M00S03024.1tm +++|* 03452 M00S03025.1tm +++|* EXIT (CH+2) = ESCAPE CONTROL UPDATED. 03453 M00S03026.1tm +++|* 03454 M00S03027.1tm +++|* ESCAPE CONTROL - 03455 M00S03028.1tm +++|* 03456 M00S03029.1tm +++|* 4XXX = VALID CHARACTER POINTER XXX. 03457 M00S03030.1tm +++|* 0100 = ESCAPE 1. 03458 M00S03031.1tm +++|* 0200 = ESCAPE 2. 03459 M00S03032.1tm +++|* 0300 = *00* (POSSIBLE EOL) BYTE HAS BEEN 03460 M00S03033.1tm +++|* DETECTED. THIS SITUATION WILL OCCUR 03461 M00S03034.1tm +++|* WHEN THE LOWER CHARACTER OF AN 03462 M00S03035.1tm +++|* OUTPUT BYTE IS FOUND TO BE ZERO. 03463 M00S03036.1tm +++|* AT THIS POINT, FURTHER TESTING MUST 03464 M00S03037.1tm +++|* BE DONE TO DETERMINE WHETHER OR NOT 03465 M00S03038.1tm +++|* THIS ZERO CHARACTER IS PART OF 03466 M00S03039.1tm +++|* AN END OF LINE OR IS FOLLOWED BY 03467 M00S03040.1tm +++|* DATA. THIS LATTER CONDITION IS A 03468 M00S03041.1tm +++|* FALSE END OF LINE AND THE ZERO 03469 M00S03042.1tm +++|* CHARACTER MUST BE PROCESSED AS A 03470 M00S03043.1tm +++|* COLON. 03471 M00S03044.1tm +++|* 04XX = FALSE EOL HAS BEEN DETECTED. 03472 M00S03045.1tm +++|* XX = NEXT OUTPUT CHARACTER. 03473 M00S03046.1tm +++|* 05XX = SUSPENDED CONTROL PROCESSING. THIS 03474 M00S03047.1tm +++|* SITUATION OCCURS WHEN A CONTROL 03475 M00S03048.1tm +++|* CHARACTER PROCESSOR IS UNABLE TO 03476 M00S03049.1tm +++|* TO DETERMINE WHETHER OR NOT A 03477 M00S03050.1tm +++|* SUSPECTED CONTROL CHARACTER IS 03478 M00S03051.1tm +++|* FOLLOWED BY AN END OF LINE. 03479 M00S03052.1tm +++|* THIS WILL OCCUR WHEN THERE IS 03480 M00S03053.1tm +++|* NO FURTHER DATA IN THE CURRENT 03481 M00S03054.1tm +++|* OUTPUT POTS AND THE DRIVER MUST 03482 M00S03055.1tm +++|* WAIT FOR FURTHER OUTPUT TO BE 03483 M00S03056.1tm +++|* ASSIGNED. 03484 M00S03057.1tm +++| 03485 M00S03058.1tm +++| 03486 M00S03059.1tm +++| AWT BSS 0 ENTRY 03487 M00S03060.1tm +++| RETURN * REENTER 03488 M00S03061.1tm +++| 03489 M00S03062.1tm +++|* CHECK ESCAPE CONTROL. 03490 M00S03063.1tm +++| 03491 M00S03064.1tm +++| LDD CH+2 GET ESCAPE CONTROL 03492 M00S03065.1tm +++| SHN -6 03493 M00S03066.1tm +++| ZJN AWT1 IF NULL 03494 M00S03067.1tm +++| STD T1 03495 M00S03068.1tm +++| SBN TECPL TEST FOR VALID DATA BIT 03496 M00S03069.1tm +++| PJN AWT1 IF VALID DATA SET 03497 M00S03070.1tm +++| LDM TECP-1,T1 SET PROCESSOR ADDRESS 03498 M00S03071.1tm +++| STD T2 03499 M00S03072.1tm +++| LDD CH+2 SAVE LOWER SIX BITS 03500 M00S03073.1tm +++| LPN 77 03501 M00S03074.1tm +++| STD T7 03502 M00S03075.1tm +++| LJM 0,T2 PROCESS ESCAPE CONTROL 03503 M00S03076.1tm +++| 03504 M00S03077.1tm +++|* GET NEXT OUTPUT CHARACTER. 03505 M00S03078.1tm +++| 03506 M00S03079.1tm +++| AWT1 RJM ROC GET NEXT CHARACTER 03507 M00S03080.1tm +++| PJN AWT3 IF NOT CONTROL BYTE 03508 M00S03081.1tm +++| AWT2 LJM SOC PROCESS CONTROL BYTE 03509 M00S03082.1tm +++| 03510 M00S03083.1tm +++| AWT3 NJN AWT4 IF NON-ZERO 03511 M00S03084.1tm +++| LJM AWT11 CHECK POSSIBLE END OF LINE 03512 M00S03085.1tm +++| 03513 M00S03086.1tm +++|* CHECK OUTPUT CHARACTER. 03514 M00S03087.1tm +++| 03515 M00S03088.1tm +++| AWT4 SBN 74 CHECK FOR ESCAPE CHARACTER 03516 M00S03089.1tm +++| MJN AWT7 IF NOT ESCAPE 1 OR 2 03517 M00S03090.1tm +++| ZJN AWT5 IF ESCAPE 2 03518 M00S03091.1tm +++| SBN 76-74 03519 M00S03092.1tm +++| NJN AWT7 IF NOT ESCAPE 1 03520 M00S03093.1tm +++| LCN 1 03521 M00S03094.1tm +++| 03522 M00S03095.1tm +++|* PROCESS ESCAPE CHARACTER. 03523 M00S03096.1tm +++| 03524 M00S03097.1tm +++| AWT5 ADN 2 SET ESCAPE CHARACTER BIAS 03525 M00S03098.1tm +++| SHN 6 03526 M00S03099.1tm +++| STD CH+2
| Line S03100 Modification History | |
|---|---|
M01 (Removed by) | ns2409 |
Seq # *Modification Id* Act ----------------------------+ 03527 M01S03100.ns2409 ---| LDD DP+3 CHECK TERMINAL MODE 03528 M01S03101.ns2409 ---| LPN 2
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2409 |
M02 (Removed by) | ns2409b |
Seq # *Modification Id* Act ----------------------------+ 03529 M02S00001.ns2409b ---| LDD DC CHECK TERMINAL MODE 03530 M02S00002.ns2409b ---| LPN 10
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | ns2409b |
Seq # *Modification Id* Act ----------------------------+ 03531 M01S00014.ns2409b +++| LDD DP+3 03532 M01S00015.ns2409b +++| LPN 2 03533 M00S03102.1tm +++| ZJN AWT7 IF NOT EXTENDED MODE 03534 M00S03103.1tm +++| AWT6 RJM ROC GET NEXT OUTPUT CHARACTER 03535 M00S03104.1tm +++| MJN AWT2 IF CONTROL BYTE 03536 M00S03105.1tm +++| ADD CH+2 ADD ESCAPE CHARACTER BIAS 03537 M00S03106.1tm +++| STD T7 03538 M00S03107.1tm +++| ADC -214 03539 M00S03108.1tm +++| MJN AWT7 IF LEGAL CHARACTER 03540 M00S03109.1tm +++| LDN 0 IGNORE INVALID CHARACTER 03541 M00S03110.1tm +++| STD CH+2 03542 M00S03111.1tm +++| LJM AWT LOOP FOR NEXT CHARACTER 03543 M00S03112.1tm +++| 03544 M00S03113.1tm +++|* CLEAR ESCAPE CONTROL. 03545 M00S03114.1tm +++|* 03546 M00S03115.1tm +++|* (T7) = OUTPUT CHARACTER PLUS ESCAPE BIAS. 03547 M00S03116.1tm +++| 03548 M00S03117.1tm +++| AWT7 LDN 0 CLEAR ESCAPE CONTROL 03549 M00S03118.1tm +++| STD CH+2 03550 M00S03119.1tm +++| 03551 M00S03120.1tm +++|* TRANSLATE AND ISSUE OUTPUT CHARACTER. 03552 M00S03121.1tm +++|* 03553 M00S03122.1tm +++|* (T7) = OUTPUT CHARACTER PLUS ESCAPE BIAS. 03554 M00S03123.1tm +++| 03555 M00S03124.1tm +++| AWT8 RJM TOC TRANSLATE OUTPUT CHARACTER 03556 M00S03125.1tm +++| SHN 6 03557 M00S03126.1tm +++| PJN AWT10 IF SPECIAL PROCESSING REQUIRED 03558 M00S03127.1tm +++| AOD CH+1 ADVANCE CHARACTER COUNT/LINE 03559 M00S03128.1tm +++| AOD CH+4 ADVANCE OUTPUT CHARACTER COUNT 03560 M00S03129.1tm +++| SHN -14 03561 M00S03130.1tm +++| ZJN AWT9 IF NO OVERFLOW (4096 CHARACTERS) 03562 M00S03131.1tm +++| LDN /TLX/IAM REQUEST ISSUE ACCOUNTING MESSAGE 03563 M00S03132.1tm +++| RJM ERQ 03564 M00S03133.1tm +++| 03565 M00S03134.1tm +++|* ISSUE TRANSLATED CHARACTER TO OUTPUT. 03566 M00S03135.1tm +++| 03567 M00S03136.1tm +++| AWT9 LDD T7 GET TRANSLATED CHARACTER 03568 M00S03137.1tm +++| STD DO ISSUE CHARACTER TO OUTPUT 03569 M00S03138.1tm +++| LJM AWT LOOP FOR NEXT CHARACTER 03570 M00S03139.1tm +++| 03571 M00S03140.1tm +++|* PERFORM SPECIAL PROCESSING. 03572 M00S03141.1tm +++| 03573 M00S03142.1tm +++| AWT10 SHN -6 SET SPECIAL PROCESSOR INDEX 03574 M00S03143.1tm +++| STD T1 03575 M00S03144.1tm +++| LDM TWSP,T1 GET CHARACTER PROCESSOR ADDRESS 03576 M00S03145.1tm +++| LJM MGR= ENTER CHARACTER PROCESSOR 03577 M00S03146.1tm +++| 03578 M00S03147.1tm +++|* PROCESS POSSIBLE END OF LINE. 03579 M00S03148.1tm +++| 03580 M00S03149.1tm +++| AWT11 LDC 300 SET OUTPUT CONTROL 03581 M00S03150.1tm +++| STD CH+2 03582 M00S03151.1tm +++| AWT12 RJM ROC GET NEXT CHARACTER 03583 M00S03152.1tm +++| PJN AWT15 IF NOT CONTROL BYTE 03584 M00S03153.1tm +++| LJM SOC 03585 M00S03154.1tm +++| 03586 M00S03155.1tm +++|* ENTRY FROM CONTROL CHARACTER PROCESSORS. 03587 M00S03156.1tm +++|* 03588 M00S03157.1tm +++|* (A) = FALSE CONTROL BYTE VALUE. 03589 M00S03158.1tm +++| 03590 M00S03159.1tm +++| AWT13 STD CM SAVE FALSE CONTROL BYTE 03591 M00S03160.1tm +++| LDD CH+2 CHECK OUTPUT CONTROL 03592 M00S03161.1tm +++| LMC 300 03593 M00S03162.1tm +++| NJN AWT14 IF NOT SUSPENDED COLON 03594 M00S03163.1tm +++| STD CM 03595 M00S03164.1tm +++| SOD DP+2 BACK UP CHARACTER 03596 M00S03165.1tm +++| AWT14 LDD CM 03597 M00S03166.1tm +++| AWT15 ADC 400 SET ESCAPE CONTROL 03598 M00S03167.1tm +++| STD CH+2 03599 M00S03168.1tm +++| LDN 00 SET COLON 03600 M00S03169.1tm +++| STD T7 03601 M00S03170.1tm +++| LJM AWT8 TRANSLATE AND ISSUE CHARACTER 03602 M00S03171.1tm +++| TECP SPACE 4,10 03603 M00S03172.1tm +++|** TECP - TABLE OF ESCAPE CONTROL PROCESSORS. 03604 M00S03173.1tm +++| 03605 M00S03174.1tm +++| 03606 M00S03175.1tm +++| TECP BSS 0 03607 M00S03176.1tm +++| LOC 1 03608 M00S03177.1tm +++| 03609 M00S03178.1tm +++| CON AWT6 *0100* - ESCAPE 1. 03610 M00S03179.1tm +++| CON AWT6 *0200* - ESCAPE 2. 03611 M00S03180.1tm +++| CON AWT12 *0300* - POSSIBLE *EOL*. 03612 M00S03181.1tm +++| CON AWT4 *04XX* - FALSE *EOL*. 03613 M00S03182.1tm +++| CON SOC1 *05XX* - SUSPENDED OUTPUT CONTROL. 03614 M00S03183.1tm +++| 03615 M00S03184.1tm +++| TECPL BSS 0 03616 M00S03185.1tm +++| LOC *O 03617 M00S03186.1tm +++| TWSP SPACE 4,10 03618 M00S03187.1tm +++|** TWSP - TABLE OF SPECIAL WRITE PROCESSORS. 03619 M00S03188.1tm +++| 03620 M00S03189.1tm +++| 03621 M00S03190.1tm +++| TWSP BSS 0 03622 M00S03191.1tm +++| QUAL TRN 03623 M00S03192.1tm +++| LOC 0 03624 M00S03193.1tm +++| 03625 M00S03194.1tm +++| NLO CON /WTM/AWT NULL CHARACTER (IGNORED) 03626 M00S03195.1tm +++| ACR CON /WTM/ACR CARRIAGE RETURN 03627 M00S03196.1tm +++| ANL CON /WTM/ANL NEW LINE (CR/LF) 03628 M00S03197.1tm +++| 03629 M00S03198.1tm +++| LOC *O 03630 M00S03199.1tm +++| NOREF NLO 03631 M00S03200.1tm +++| QUAL * 03632 M00S03201.1tm +++| BWT TITLE WRITE MODE - *BINARY* WRITE PROCESSOR. 03633 M00S03202.1tm +++| BWT SPACE 4,15 03634 M00S03203.1tm +++|** BWT - BINARY WRITE. 03635 M00S03204.1tm +++|* 03636 M00S03205.1tm +++|* WRITES NOS *BINARY* MODE DATA TO TERMINAL. 03637 M00S03206.1tm +++|* 03638 M00S03207.1tm +++|* CALLS ROC, ERQ. 03639 M00S03208.1tm +++| 03640 M00S03209.1tm +++| 03641 M00S03210.1tm +++| BWT BSS 0 ENTRY 03642 M00S03211.1tm +++| RETURN * REENTER 03643 M00S03212.1tm +++| RJM ROC READ OUTPUT CHARACTER 03644 M00S03213.1tm +++| MJP SOC IF CONTROL BYTE 03645 M00S03214.1tm +++| LDI T5 READ ENTIRE 12-BIT CHARACTER 03646 M00S03215.1tm +++| STD DO STORE OUTPUT 03647 M00S03216.1tm +++| SHN 21-13 CHECK FORMAT 03648 M00S03217.1tm +++| PJN BWT2 IF NOT BINARY FORMAT 03649 M00S03218.1tm +++| AOD DP+2 ADVANCE CHARACTER COUNT 03650 M00S03219.1tm +++| AOD CH+4 03651 M00S03220.1tm +++| SHN -14 03652 M00S03221.1tm +++| ZJN BWT1 IF NO OVERFLOW 03653 M00S03222.1tm +++| LDN /TLX/IAM ISSUE ACCOUNTING MESSAGE 03654 M00S03223.1tm +++| RJM ERQ 03655 M00S03224.1tm +++| BWT1 JMP MGR REENTER 03656 M00S03225.1tm +++| 03657 M00S03226.1tm +++|* TERMINATE BINARY MODE OUTPUT. 03658 M00S03227.1tm +++| 03659 M00S03228.1tm +++| BWT2 LCN 10 CLEAR BINARY MODE BIT 03660 M00S03229.1tm +++| RAD DP+3 03661 M00S03230.1tm +++| SOD DP+2 RESET CHARACTER POSITION 03662 M00S03231.1tm +++| LDN 0 CLEAR ESCAPE CONTROL 03663 M00S03232.1tm +++| STD CH+2 03664 M00S03233.1tm +++| LDN 1 SET CHARACTER COUNT NON-ZERO 03665 M00S03234.1tm +++| STD CH+1 03666 M00S03235.1tm +++| JMP AWT ENTER *ASCII* WRITE 03667 M00S03236.1tm +++| WTM TITLE WRITE MODE - MAIN ROUTINES. 03668 M00S03237.1tm +++| ISN SPACE 4,15 03669 M00S03238.1tm +++|** ISN - ISSUE ASCII *NUL* CHARACTERS. 03670 M00S03239.1tm +++|* 03671 M00S03240.1tm +++|* ENTRY (A) = DEFAULT REPEAT COUNT. 03672 M00S03241.1tm +++|* 03673 M00S03242.1tm +++|* EXIT TO *AWT* TO CONTINUE WRITE OPERATION. 03674 M00S03243.1tm +++|* 03675 M00S03244.1tm +++|* CALLS DDC, SRC. 03676 M00S03245.1tm +++| 03677 M00S03246.1tm +++| 03678 M00S03247.1tm +++| ISN BSS 0 ENTRY 03679 M00S03248.1tm +++| RJM DDC DETERMINE DELAY COUNT 03680 M00S03249.1tm +++| SHN 14 03681 M00S03250.1tm +++| ADK .CNUL SET *NUL* CHARACTER 03682 M00S03251.1tm +++| LMD PY TOGGLE ODD PARITY 03683 M00S03252.1tm +++| RJM SRC SEND REPEATED CHARACTER 03684 M00S03253.1tm +++| JMP AWT CONTINUE WRITE 03685 M00S03254.1tm +++| SOC SPACE 4,15 03686 M00S03255.1tm +++|** SOC - SET OUTPUT CONTROL. 03687 M00S03256.1tm +++|* 03688 M00S03257.1tm +++|* ENTRY (A) = OUTPUT CONTROL BYTE SET BY *ROC*. 03689 M00S03258.1tm +++|* (T7) = LOWER 12 BITS OF *ROC* CONTROL BYTE. 03690 M00S03259.1tm +++|* 03691 M00S03260.1tm +++|* EXIT TO CONTROL BYTE PROCESSOR. 03692 M00S03261.1tm +++|* 03693 M00S03262.1tm +++|* CALLS ERQ, RLT. 03694 M00S03263.1tm +++| 03695 M00S03264.1tm +++| 03696 M00S03265.1tm +++| SOC4 RJM RLT CHECK POT LINK 03697 M00S03266.1tm +++| NJN SOC5 IF LINKED 03698 M00S03267.1tm +++| LDC /CTL/RWC1 SET REENTRY ADDRESS 03699 M00S03268.1tm +++| STD DP+4 03700 M00S03269.1tm +++| UJN SOC6 03701 M00S03270.1tm +++| 03702 M00S03271.1tm +++|* SET NEXT POT. 03703 M00S03272.1tm +++| 03704 M00S03273.1tm +++| SOC5 STD DP SET POT POINTER 03705 M00S03274.1tm +++| LDD DP+1 DROP CURRENT POT 03706 M00S03275.1tm +++| STD RQ+3 03707 M00S03276.1tm +++| LDN /TLX/DRP 03708 M00S03277.1tm +++| RJM ERQ 03709 M00S03278.1tm +++| LDD DP SET CURRENT POT 03710 M00S03279.1tm +++| STD DP+1 03711 M00S03280.1tm +++| RJM RLT CHECK THIS POT LINK 03712 M00S03281.1tm +++| NJN SOC7 IF POT LINKED 03713 M00S03282.1tm +++| 03714 M00S03283.1tm +++|* REQUEST ADDITIONAL OUTPUT. 03715 M00S03284.1tm +++| 03716 M00S03285.1tm +++| SOC6 LDN /TLX/RES REQUEST ADDITIONAL OUTPUT 03717 M00S03286.1tm +++| RJM ERQ 03718 M00S03287.1tm +++| SOC7 LDN 0 CLEAR LINE POSITION 03719 M00S03288.1tm +++| STD DP+2 03720 M00S03289.1tm +++| STD DO CLEAR OUTPUT 03721 M00S03290.1tm +++| JMP MGR EXIT 03722 M00S03291.1tm +++| 03723 M00S03292.1tm +++| 03724 M00S03293.1tm +++|* SOC - ENTRY. 03725 M00S03294.1tm +++| 03726 M00S03295.1tm +++| SOC BSS 0 ENTRY 03727 M00S03296.1tm +++| SHN 21-20 CHECK BIT 20 03728 M00S03297.1tm +++| MJN SOC4 IF SET, THEN END OF POT 03729 M00S03298.1tm +++| AOD DP+2 ADVANCE CHARACTER POINTER 03730 M00S03299.1tm +++| 03731 M00S03300.1tm +++|* CHECK CONTROL BYTE. 03732 M00S03301.1tm +++| 03733 M00S03302.1tm +++| SOC1 LDD T7 CHECK CONTROL BYTE 03734 M00S03303.1tm +++| ZJN SOC3 IF END OF LINE 03735 M00S03304.1tm +++| LMN 2R"IB" 03736 M00S03305.1tm +++| ZJN SOC2 IF INTERNAL END OF BLOCK 03737 M00S03306.1tm +++| LDD DP+3 CHECK MODE 03738 M00S03307.1tm +++| SHN 21-3 03739 M00S03308.1tm +++| PJN SOC2 IF NOT BINARY 03740 M00S03309.1tm +++| SOD DP+2 TERMINATE BINARY MODE 03741 M00S03310.1tm +++| LJM BWT2 03742 M00S03311.1tm +++| 03743 M00S03312.1tm +++|* EXIT TO CONTROL BYTE PROCESSOR. 03744 M00S03313.1tm +++| 03745 M00S03314.1tm +++| SOC2 LDN /TLX/RES REQUEST ADDITIONAL OUTPUT 03746 M00S03315.1tm +++| RJM ERQ 03747 M00S03316.1tm +++| SOC3 LDM TSOC,T7 SET REENTRY ADDRESS 03748 M00S03317.1tm +++| LJM MGR= REENTER 03749 M00S03318.1tm +++| TTM SPACE 4,25 03750 M00S03319.1tm +++|** TTM - ISSUE TERMINAL MESSAGE. 03751 M00S03320.1tm +++|* 03752 M00S03321.1tm +++|* ISSUES MESSAGE TO TERMINAL. 03753 M00S03322.1tm +++|* 03754 M00S03323.1tm +++|* ENTRY (A) = ADDRESS OF FORMATTED MESSAGE. 03755 M00S03324.1tm +++|* 03756 M00S03325.1tm +++|* EXIT (CM+2) = 0. 03757 M00S03326.1tm +++|* (OMCC) = 0. 03758 M00S03327.1tm +++|* TO *RDM* AFTER MESSAGE IS COMPLETE IF THERE 03759 M00S03328.1tm +++|* ARE INPUT POTS AVAILABLE - 03760 M00S03329.1tm +++|* (DP+1) = CURRENT POT RESET TO START OF LINE. 03761 M00S03330.1tm +++|* (DP+2) = CURRENT WORD RESET TO START OF LINE. 03762 M00S03331.1tm +++|* TO *RWC* AFTER MESSAGE IS COMPLETE IF THERE 03763 M00S03332.1tm +++|* IS NO INPUT POT AVAILABLE. 03764 M00S03333.1tm +++|* 03765 M00S03334.1tm +++|* USES (DP+1) = MESSAGE ADDRESS POINTER. 03766 M00S03335.1tm +++|* (DP+2) = MESSAGE BYTE POINTER. 03767 M00S03336.1tm +++|* 03768 M00S03337.1tm +++|* CALLS SEM. 03769 M00S03338.1tm +++|* 03770 M00S03339.1tm +++|* MACROS RETURN. 03771 M00S03340.1tm +++| 03772 M00S03341.1tm +++| 03773 M00S03342.1tm +++| TTM BSS 0 ENTRY 03774 M00S03343.1tm +++| ADC 7700 SET MESSAGE PSEUDO-POT-POINTER 03775 M00S03344.1tm +++| STD DP+1 03776 M00S03345.1tm +++| LDD DP+2 CLEAR BYTE POINTER 03777 M00S03346.1tm +++| LPC 7600 03778 M00S03347.1tm +++| STD DP+2 03779 M00S03348.1tm +++| LDN 0 CLEAR OUTPUT CONTROL 03780 M00S03349.1tm +++| STD CH+2 03781 M00S03350.1tm +++| STM OMCC CLEAR OPERATOR MESSAGE 03782 M00S03351.1tm +++| RJM SEM SET EXTENDED MODE 03783 M00S03352.1tm +++| RETURN AWT ENTER WRITE MODE 03784 M00S03353.1tm +++| 03785 M00S03354.1tm +++| 03786 M00S03355.1tm +++|* ENTERED HERE FROM SUBROUTINE *ROC* TO EXTRACT NEXT 03787 M00S03356.1tm +++|* MESSAGE CHARACTER TO BE RETURNED TO WRITE PROCESSOR. 03788 M00S03357.1tm +++| 03789 M00S03358.1tm +++| TTM1 LDM TTMA-7700,DP+1 GET NEXT CHARACTER 03790 M00S03359.1tm +++| STD T7 03791 M00S03360.1tm +++| LDD DP+2 TOGGLE BYTE INDEX 03792 M00S03361.1tm +++| LMN 1 03793 M00S03362.1tm +++| STD DP+2 03794 M00S03363.1tm +++| LPN 1 03795 M00S03364.1tm +++| NJN TTM2 IF UPPER CHARACTER 03796 M00S03365.1tm +++| AOD DP+1 INCREMENT MESSAGE ADDRESS 03797 M00S03366.1tm +++| LDD T7 03798 M00S03367.1tm +++| LPN 77 EXTRACT LOWER CHARACTER 03799 M00S03368.1tm +++| UJN TTM3 03800 M00S03369.1tm +++| 03801 M00S03370.1tm +++| TTM2 LDD T7 EXTRACT UPPER CHARACTER 03802 M00S03371.1tm +++| SHN -6 03803 M00S03372.1tm +++| TTM3 STD T7 SET CHARACTER 03804 M00S03373.1tm +++| ZJN TTM5 IF END OF MESSAGE 03805 M00S03374.1tm +++| SOD CH+4 PREVENT CHARACTER COUNT ON MESSAGE 03806 M00S03375.1tm +++| LDD T7 03807 M00S03376.1tm +++| LJM ROCX ISSUE CHARACTER 03808 M00S03377.1tm +++| 03809 M00S03378.1tm +++|* RESET LINE POINTERS AND EXIT. 03810 M00S03379.1tm +++| 03811 M00S03380.1tm +++| TTM5 LDD DP+2 RESET CURRENT WORD 03812 M00S03381.1tm +++| SHN -5 03813 M00S03382.1tm +++| LMD DP+2 03814 M00S03383.1tm +++| SCN 17 03815 M00S03384.1tm +++| STD DP+2 03816 M00S03385.1tm +++| LDD DP RESET CURRENT POT 03817 M00S03386.1tm +++| STD DP+1 03818 M00S03387.1tm +++| ZJN TTM6 IF NO INPUT POT 03819 M00S03388.1tm +++| RJM CEM CLEAR EXTENDED MODE 03820 M00S03389.1tm +++| LJM RDM RE-ENTER READ MODE 03821 M00S03390.1tm +++| 03822 M00S03391.1tm +++| TTM6 LDN /TLX/RES RESTART JOB 03823 M00S03392.1tm +++| RJM ERQ 03824 M00S03393.1tm +++| JMP RWC ENTER READ/WRITE CONTROL 03825 M00S03394.1tm +++| 03826 M00S03395.1tm +++| 03827 M00S03396.1tm +++|** TABLE OF TERMINAL MESSAGES. 03828 M00S03397.1tm +++| 03829 M00S03398.1tm +++| TTMA BSS 0 03830 M00S03399.1tm +++| LOC 0 03831 M00S03400.1tm +++| 03832 M00S03401.1tm +++| DELM DATA Z+ *DEL*"NL"+ 03833 M00S03402.1tm +++| LOFM DATA Z+"NL" *OVL*"NL"+ 03834 M00S03403.1tm +++| MBSY DATA Z+"NL" *CONSOLE BUSY*"NL"+ 03835 M00S03404.1tm +++| RDYM DATA Z+"NL" *READY*"NL"+ 03836 M00S03405.1tm +++| RILM DATA Z+"NL" *RE-ENTER LAST LINE*"NL"+ 03837 M00S03406.1tm +++| 03838 M00S03407.1tm +++| LOC *O 03839 M00S03408.1tm +++| TITLE WRITE MODE - OUTPUT CONTROL BYTE PROCESSORS. 03840 M00S03409.1tm +++| TSOC SPACE 4,10 03841 M00S03410.1tm +++|** TSOC - TABLE OF OUTPUT CONTROL BYTE PROCESSORS. 03842 M00S03411.1tm +++|* INDEXED BY CONTROL CODE. 03843 M00S03412.1tm +++| 03844 M00S03413.1tm +++| 03845 M00S03414.1tm +++| TSOC BSS 0 03846 M00S03415.1tm +++| LOC 0 03847 M00S03416.1tm +++| 03848 M00S03417.1tm +++| CON EOL END OF LINE 03849 M00S03418.1tm +++| CON EOB END OF BLOCK 03850 M00S03419.1tm +++| CON ECB END OF CORRESPONDENCE BLOCK 03851 M00S03420.1tm +++| CON ATI AUTO INPUT 03852 M00S03421.1tm +++| CON LOF LOG OFF USER 03853 M00S03422.1tm +++| CON TPI TRANSPARENT INPUT 03854 M00S03423.1tm +++| CON BNI BINARY INPUT 03855 M00S03424.1tm +++| CON BNO BEGIN BINARY OUTPUT 03856 M00S03425.1tm +++| CON EOL UNUSED - TREAT AS END OF LINE 03857 M00S03426.1tm +++| CON BEO BEGIN EXTENDED OUTPUT 03858 M00S03427.1tm +++| CON EOL UNUSED - TREAT AS END OF LINE 03859 M00S03428.1tm +++| CON EOS END OF STRING 03860 M00S03429.1tm +++| CON IEB INTERNAL END OF BLOCK 03861 M00S03430.1tm +++| CON ETI EXECUTIVE AUTO MODE INPUT 03862 M00S03431.1tm +++| 03863 M00S03432.1tm +++| TSOCL BSS 0 03864 M00S03433.1tm +++| LOC *O 03865 M00S03434.1tm +++| EOL SPACE 4,15 03866 M00S03435.1tm +++|*** 0000 END OF OUTPUT LINE. 03867 M00S03436.1tm +++|* 03868 M00S03437.1tm +++|* THIS CONTROL BYTE CAUSES THE TERMINAL TO BE POSITIONED TO 03869 M00S03438.1tm +++|* THE BEGINNING OF THE NEXT LINE. THE REMAINDER OF THE WORD 03870 M00S03439.1tm +++|* IN WHICH THE *END OF LINE* OCCURS IS DISCARDED. 03871 M00S03440.1tm +++|* 03872 M00S03441.1tm +++|* EXIT (CH+1) = 0. 03873 M00S03442.1tm +++|* (CH+2) = 0. 03874 M00S03443.1tm +++|* TO *ANL* IF IN *ASCII* MODE. 03875 M00S03444.1tm +++|* TO *AWT* IF IN BINARY MODE. 03876 M00S03445.1tm +++|* 03877 M00S03446.1tm +++|* CALLS CEM. 03878 M00S03447.1tm +++| 03879 M00S03448.1tm +++| 03880 M00S03449.1tm +++| EOL BSS 0 ENTRY 03881 M00S03450.1tm +++| LDN 0 CLEAR LINE CHARACTER COUNT 03882 M00S03451.1tm +++| STD CH+1 03883 M00S03452.1tm +++| STD CH+2 CLEAR ESCAPE CONTROL 03884 M00S03453.1tm +++| LDD DP+2 CLEAR WORD AND CHARACTER POINTERS 03885 M00S03454.1tm +++| SCN 17 03886 M00S03455.1tm +++| LMN 12 03887 M00S03456.1tm +++| STD DP+2 03888 M00S03457.1tm +++| LDD DP+3 CHECK FOR BINARY MODE 03889 M00S03458.1tm +++| LPN 10 03890 M00S03459.1tm +++| NJN EOL1 IF BINARY MODE 03891 M00S03460.1tm +++| RJM CEM CLEAR/RESET EXTENDED MODE 03892 M00S03461.1tm +++| JMP ANL ISSUE *NEW LINE* 03893 M00S03462.1tm +++| 03894 M00S03463.1tm +++| EOL1 LMD DP+3 CLEAR BINARY MODE 03895 M00S03464.1tm +++| STD DP+3 03896 M00S03465.1tm +++| JMP AWT CONTINUE OUTPUT 03897 M00S03466.1tm +++| EOB SPACE 4,20 03898 M00S03467.1tm +++|*** 0001 END OF OUTPUT BLOCK. 03899 M00S03468.1tm +++|* 03900 M00S03469.1tm +++|* THIS CONTROL BYTE IS USED TO TERMINATE OUTPUT BEFORE 03901 M00S03470.1tm +++|* THE END OF POT IS REACHED. THE REMAINDER OF THE POT IS 03902 M00S03471.1tm +++|* DISCARDED AND THE TERMINAL IS NOT POSITIONED TO THE 03903 M00S03472.1tm +++|* START OF THE NEXT LINE. 03904 M00S03473.1tm +++|* 03905 M00S03474.1tm +++|* THIS CONTROL BYTE MUST BE FOLLOWED BY AN END-OF-LINE. 03906 M00S03475.1tm +++|* 03907 M00S03476.1tm +++|* EXIT TO *RWC* FOR NEXT OPERATION - 03908 M00S03477.1tm +++|* (DP+2) = 0. 03909 M00S03478.1tm +++|* (CH+1) = 0. 03910 M00S03479.1tm +++|* (CH+2) = 0. 03911 M00S03480.1tm +++|* 03912 M00S03481.1tm +++|* CALLS CLT. 03913 M00S03482.1tm +++| 03914 M00S03483.1tm +++| 03915 M00S03484.1tm +++| EOB BSS 0 ENTRY 03916 M00S03485.1tm +++| LDN 1RA 03917 M00S03486.1tm +++| RJM CLT CHECK FOR LINE TERMINATION 03918 M00S03487.1tm +++| EOB1 LDN 0 CLEAR CHARACTER POSITION 03919 M00S03488.1tm +++| STD DP+2 03920 M00S03489.1tm +++| STD CH+1 RESET CHARACTER COUNT 03921 M00S03490.1tm +++| STD CH+2 CLEAR ESCAPE CONTROL 03922 M00S03491.1tm +++| JMP RWC 03923 M00S03492.1tm +++| ECB SPACE 4,20 03924 M00S03493.1tm +++|*** 0002 END OF CORRESPONDENCE BLOCK. 03925 M00S03494.1tm +++|* 03926 M00S03495.1tm +++|* SPECIAL END OF BLOCK PROCESSING FOR POSSIBLE 03927 M00S03496.1tm +++|* CORRESPONDENCE TERMINALS. 03928 M00S03497.1tm +++|* THIS CODE ENABLES INPUT IF CORRESPONDENCE TERMINAL, 03929 M00S03498.1tm +++|* OTHERWISE IT IS TREATED AS A *0001* BYTE. 03930 M00S03499.1tm +++|* 03931 M00S03500.1tm +++|* THIS CONTROL BYTE MUST BE FOLLOWED BY AN END-OF-LINE. 03932 M00S03501.1tm +++|* 03933 M00S03502.1tm +++|* NOTE THIS CONTROL BYTE IS NOT MEANINGFUL TO THE 03934 M00S03503.1tm +++|* THE TWO-PORT MULTIPLEXER DRIVER. 03935 M00S03504.1tm +++|* 03936 M00S03505.1tm +++|* EXIT TO *EOB1* TO TERMINATE OUTPUT BLOCK. 03937 M00S03506.1tm +++|* 03938 M00S03507.1tm +++|* CALLS CLT. 03939 M00S03508.1tm +++| 03940 M00S03509.1tm +++| 03941 M00S03510.1tm +++| 03942 M00S03511.1tm +++| ECB BSS 0 ENTRY 03943 M00S03512.1tm +++| LDN 1RB CHECK FOR LINE TERMINATOR 03944 M00S03513.1tm +++| RJM CLT 03945 M00S03514.1tm +++| JMP EOB1 PROCESS AS *EOB* 03946 M00S03515.1tm +++| ATI SPACE 4,20 03947 M00S03516.1tm +++|*** 0003 INITIATE AUTO-MODE INPUT. 03948 M00S03517.1tm +++|* 03949 M00S03518.1tm +++|* THIS CONTROL BYTE MUST BE FOLLOWED BY AN END OF LINE 03950 M00S03519.1tm +++|* AND TERMINATES OUTPUT. 03951 M00S03520.1tm +++|* THE WORD CONTAINING THE AUTO INPUT CONTROL BYTE IS 03952 M00S03521.1tm +++|* MOVED TO THE FIRST WORD OF THE POT FOR SUBSEQUENT 03953 M00S03522.1tm +++|* INPUT WHICH MUST FOLLOW IMMEDIATELY. 03954 M00S03523.1tm +++|* 03955 M00S03524.1tm +++|* EXIT TO *RDM* TO READ IN AUTO MODE. 03956 M00S03525.1tm +++|* TO *RWC* TO PROCESS DRIVER REQUEST. 03957 M00S03526.1tm +++|* 03958 M00S03527.1tm +++|* ERROR TO *AWT13* IF INVALID REQUEST. 03959 M00S03528.1tm +++|* 03960 M00S03529.1tm +++|* CALLS CLT, CKL, ERQ, MDS, RSW, SWA. 03961 M00S03530.1tm +++|* 03962 M00S03531.1tm +++|* MACROS RETURN. 03963 M00S03532.1tm +++| 03964 M00S03533.1tm +++| 03965 M00S03534.1tm +++| ATI7 LDN 1RC REENTER WRITE MODE 03966 M00S03535.1tm +++|* LDN 1RM (CONTROL BYTE 0015B) 03967 M00S03536.1tm +++| ATIB EQU *-1 03968 M00S03537.1tm +++| JMP AWT13 CONTINUE WRITE 03969 M00S03538.1tm +++| 03970 M00S03539.1tm +++|* ATI - ENTRY. 03971 M00S03540.1tm +++| 03972 M00S03541.1tm +++| ATI BSS 0 ENTRY 03973 M00S03542.1tm +++| LDC LDNI+1RC CONTROL BYTE TO REENTER WRITE MODE 03974 M00S03543.1tm +++| STM ATIB 03975 M00S03544.1tm +++| LDC MDS SET UP CALL TO SUBROUTINE MDS 03976 M00S03545.1tm +++| STM ATIA 03977 M00S03546.1tm +++| LDN 1RC 03978 M00S03547.1tm +++| 03979 M00S03548.1tm +++|* ATI1 - ENTRY FROM *ATI* AND *ETI*. 03980 M00S03549.1tm +++|* 03981 M00S03550.1tm +++|* ENTRY (ATIA) = *MDS* IF CALLED FROM *ATI*. 03982 M00S03551.1tm +++|* = *WDS* IF CALLED FROM *ETI*. 03983 M00S03552.1tm +++|* (ATIB) = DISPLAY CHARACTER FOR ERROR PROCESSING. 03984 M00S03553.1tm +++| 03985 M00S03554.1tm +++| ATI1 RJM CLT CHECK FOR LINE TERMINATION 03986 M00S03555.1tm +++| RJM CKL CHECK *LIST* STATUS 03987 M00S03556.1tm +++| MJN ATI7 IF FILE BEING LISTED 03988 M00S03557.1tm +++| LDD DC CHECK TERMINAL STATUS 03989 M00S03558.1tm +++| LPN 2 03990 M00S03559.1tm +++| NJN ATI3 IF AUTO INPUT MODE SET 03991 M00S03560.1tm +++| LDD DC+4 CHECK VDCT INTERLOCK 03992 M00S03561.1tm +++| ZJN ATI2 IF NOT INTERLOCKED 03993 M00S03562.1tm +++| LDN 2 SET AUTO INPUT MODE 03994 M00S03563.1tm +++| RAD DC 03995 M00S03564.1tm +++| RJM WDC WRITE VDCT 03996 M00S03565.1tm +++| UJN ATI3 SET WORD/BYTE NUMBER 03997 M00S03566.1tm +++| 03998 M00S03567.1tm +++| ATI2 LDN /TLX/SAI REQUEST SET AUTO INPUT 03999 M00S03568.1tm +++| RJM ERQ 04000 M00S03569.1tm +++| ATI3 LDD DP+2 SET BYTE NUMBER 04001 M00S03570.1tm +++| SHN -1 04002 M00S03571.1tm +++| LPN 7 04003 M00S03572.1tm +++| STD T5 04004 M00S03573.1tm +++| RJM SWA SET WORD ADDRESS 04005 M00S03574.1tm +++| CRD T0 READ DATA WORD 04006 M00S03575.1tm +++| LDN 0 CLEAR BYTE 04007 M00S03576.1tm +++| STI T5 04008 M00S03577.1tm +++| STD CH+2 CLEAR ESCAPE CONTROL 04009 M00S03578.1tm +++| RJM MDS RESTORE WORD AND SET FIRST WORD 04010 M00S03579.1tm +++|* RJM RSW (CONTROL BYTE 0015) 04011 M00S03580.1tm +++| ATIA EQU *-1 04012 M00S03581.1tm +++| LDD DP+2 04013 M00S03582.1tm +++| SCN 17 04014 M00S03583.1tm +++| SHN 5 04015 M00S03584.1tm +++| LMD DP+2 04016 M00S03585.1tm +++| SBN 2 DECREMENT CHARACTER NUMBER 04017 M00S03586.1tm +++| STD DP+2 04018 M00S03587.1tm +++| LPN 17 04019 M00S03588.1tm +++| STD CH+1 SET INPUT LINE CHARACTER COUNT 04020 M00S03589.1tm +++| LDD DP+3 CLEAR BINARY AND EXTENDED MODES 04021 M00S03590.1tm +++| SCN 12 04022 M00S03591.1tm +++| STD DP+3 04023 M00S03592.1tm +++| 04024 M00S03593.1tm +++|* WAIT FOR EXECUTIVE TO SET *AUTO* MODE. 04025 M00S03594.1tm +++| 04026 M00S03595.1tm +++| ATI4 RETURN * REENTER 04027 M00S03596.1tm +++| LDD DC CHECK TERMINAL STATUS 04028 M00S03597.1tm +++| SHN 21-1 04029 M00S03598.1tm +++| MJN ATI5 IF AUTO MODE SET 04030 M00S03599.1tm +++| LDD DC+4 CHECK FOR DRIVER REQUEST 04031 M00S03600.1tm +++| NJP RWC IF DRIVER REQUEST 04032 M00S03601.1tm +++| JMP MGR REENTER 04033 M00S03602.1tm +++| 04034 M00S03603.1tm +++| ATI5 LPN 2 SET NORMAL/EXTENDED MODE BIT 04035 M00S03604.1tm +++| RAD DP+3 04036 M00S03605.1tm +++| RETURN RDM ENTER READ MODE 04037 M00S03606.1tm +++| LOF SPACE 4,15 04038 M00S03607.1tm +++|*** 0004 LOGOFF TERMINAL USER. 04039 M00S03608.1tm +++|* 04040 M00S03609.1tm +++|* THIS BYTE LOGS-OFF THE USER. IT MUST BE THE FIRST 04041 M00S03610.1tm +++|* BYTE OF OUTPUT AND MUST BE FOLLOWED BY AN END-OF-LINE. 04042 M00S03611.1tm +++|* 04043 M00S03612.1tm +++|* CALLS ERQ, CKL, CLT. 04044 M00S03613.1tm +++| 04045 M00S03614.1tm +++| 04046 M00S03615.1tm +++| LOF BSS 0 ENTRY 04047 M00S03616.1tm +++| RJM CKL CHECK *LIST* STATUS 04048 M00S03617.1tm +++| MJN LOF1 IF FILE BEING LISTED 04049 M00S03618.1tm +++| LDD CH+1 CHECK LINE CHARACTER COUNT 04050 M00S03619.1tm +++| NJN LOF1 IF NOT FIRST BYTE 04051 M00S03620.1tm +++| LDN 1RD 04052 M00S03621.1tm +++| RJM CLT CHECK FOR LINE TERMINATION 04053 M00S03622.1tm +++| LDN 1 SET NORMAL LOGOFF 04054 M00S03623.1tm +++| STD RQ+2 04055 M00S03624.1tm +++| LDN /TLX/FLO FORCE LOGOUT 04056 M00S03625.1tm +++| RJM ERQ 04057 M00S03626.1tm +++| LJM EOB1 04058 M00S03627.1tm +++| 04059 M00S03628.1tm +++| LOF1 LDN 1RD 04060 M00S03629.1tm +++| JMP AWT13 REENTER WRITE MODE 04061 M00S03630.1tm +++| TPI SPACE 4,15 04062 M00S03631.1tm +++|*** 0005 INITIATE TRANSPARENT MODE INPUT. 04063 M00S03632.1tm +++|* 04064 M00S03633.1tm +++|* THIS CONTROL BYTE SETS TRANSPARENT INPUT FOR THE NEXT INPUT 04065 M00S03634.1tm +++|* REQUEST. IT MUST APPEAR IN THE FIRST BYTE OF A WORD 04066 M00S03635.1tm +++|* AND BE FOLLOWED BY AN END-OF-LINE. 04067 M00S03636.1tm +++|* 04068 M00S03637.1tm +++|* TRANSPARENT INPUT ALLOWS ALL CHARACTERS TO BE TRANSMITTED 04069 M00S03638.1tm +++|* TO THE CPU PROGRAM. 04070 M00S03639.1tm +++|* 04071 M00S03640.1tm +++|* CALLS CKL, CLT. 04072 M00S03641.1tm +++| 04073 M00S03642.1tm +++| 04074 M00S03643.1tm +++| TPI BSS 0 ENTRY 04075 M00S03644.1tm +++| RJM CKL CHECK *LIST* STATUS 04076 M00S03645.1tm +++| MJN TPI1 IF FILE BEING LISTED 04077 M00S03646.1tm +++| LDD DP+2 CHECK BYTE 04078 M00S03647.1tm +++| LPN 17 04079 M00S03648.1tm +++| LMN 2 04080 M00S03649.1tm +++| NJN TPI1 IF NOT FIRST BYTE 04081 M00S03650.1tm +++| LDN 1RE 04082 M00S03651.1tm +++| RJM CLT CHECK FOR LINE TERMINATION 04083 M00S03652.1tm +++| LDD DP+3 SET TRANSPARENT MODE 04084 M00S03653.1tm +++| SCN 14 04085 M00S03654.1tm +++| LMN 4 04086 M00S03655.1tm +++| STD DP+3 04087 M00S03656.1tm +++| JMP EOB1 TERMINATE OUTPUT BLOCK 04088 M00S03657.1tm +++| 04089 M00S03658.1tm +++| TPI1 LDN 1RE 04090 M00S03659.1tm +++| JMP AWT13 REENTER WRITE MODE 04091 M00S03660.1tm +++| BNI SPACE 4,25 04092 M00S03661.1tm +++|*** 0006 INITIATE BINARY MODE INPUT. 04093 M00S03662.1tm +++|* 04094 M00S03663.1tm +++|* THIS CONTROL BYTE SETS BINARY INPUT FOR THE NEXT INPUT 04095 M00S03664.1tm +++|* REQUEST. THE CONTROL BYTE MUST BE THE FIRST BYTE OF A WORD. 04096 M00S03665.1tm +++|* THE NEXT 2 BYTES ARE THE TERMINATION CONDITIONS AS FOLLOWS - 04097 M00S03666.1tm +++|* 04098 M00S03667.1tm +++|* THE FIRST BYTE (BYTE 1) IS THE MAXIMUM NUMBER OF CHARACTERS 04099 M00S03668.1tm +++|* TO BE RECEIVED BEFORE THE INPUT IS TERMINATED. IF THE 04100 M00S03669.1tm +++|* VALUE IS 0, 1 IS ASSUMED. 04101 M00S03670.1tm +++|* 04102 M00S03671.1tm +++|* THE SECOND CONTROL BYTE (BYTE 2) IS A TERMINATION CODE. 04103 M00S03672.1tm +++|* WHEN A CHARACTER IS RECEIVED FROM THE TERMINAL WHICH 04104 M00S03673.1tm +++|* MATCHES THE BOTTOM 8 BITS OF THIS BYTE, THE INPUT OPERATION 04105 M00S03674.1tm +++|* IS TERMINATED. IF BIT 13 OF THIS BYTE IS SET, NO TERMINATION 04106 M00S03675.1tm +++|* CHARACTER IS ASSUMED. 04107 M00S03676.1tm +++|* 04108 M00S03677.1tm +++|* EXIT (CH) = TERMINATION CHARACTER. 04109 M00S03678.1tm +++|* (CH+1) = INPUT LINE CHARACTER COUNT. 04110 M00S03679.1tm +++|* 04111 M00S03680.1tm +++|* CALLS CKL, SWA. 04112 M00S03681.1tm +++| 04113 M00S03682.1tm +++| 04114 M00S03683.1tm +++| BNI5 LDN 1RF 04115 M00S03684.1tm +++| JMP AWT13 CONTINUE WRITE MODE 04116 M00S03685.1tm +++| 04117 M00S03686.1tm +++|* BNI - ENTRY. 04118 M00S03687.1tm +++| 04119 M00S03688.1tm +++| BNI BSS 0 ENTRY 04120 M00S03689.1tm +++| RJM CKL CHECK *LIST* STATUS 04121 M00S03690.1tm +++| MJN BNI5 IF FILE BEING LISTED 04122 M00S03691.1tm +++| LDD DP+3 CLEAR BINARY MODE 04123 M00S03692.1tm +++| SCN 10 04124 M00S03693.1tm +++| STD DP+3 04125 M00S03694.1tm +++| LDD CH+1 CHECK CHARACTER COUNT 04126 M00S03695.1tm +++| NJN BNI5 IF NOT FIRST BYTE 04127 M00S03696.1tm +++| RJM SWA SET WORD ADDRESS 04128 M00S03697.1tm +++| CRD CM READ DATA WORD 04129 M00S03698.1tm +++| LDD CM+3 CHECK FOR TERMINATION 04130 M00S03699.1tm +++| ADD CM+4 04131 M00S03700.1tm +++| NJN BNI5 IF NOT TERMINATED 04132 M00S03701.1tm +++| LDD CM+1 SET CHARACTER COUNT 04133 M00S03702.1tm +++| NJN BNI2 04134 M00S03703.1tm +++| BNI1 LDN 1 04135 M00S03704.1tm +++| BNI2 STD CH+1
| Line S03705 Modification History | |
|---|---|
M01 (Removed by) | 1tm6 |
Seq # *Modification Id* Act ----------------------------+ 04136 M01S03705.1tm6 ---| ADC -MXIC-1
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 1tm6 |
Seq # *Modification Id* Act ----------------------------+ 04137 M01S00002.1tm6 +++| ADC -VXLL-1 04138 M00S03706.1tm +++| MJN BNI3 IF NOT MORE THAN INTERACTIVE MAXIMUM 04139 M00S03707.1tm +++| LDD DC CHECK TERMINAL STATUS 04140 M00S03708.1tm +++| SHN 21-6 04141 M00S03709.1tm +++| MJN BNI1 IF *READ DATA* SET 04142 M00S03710.1tm +++| BNI3 LDD CM+2 SET TERMINATION CHARACTER 04143 M00S03711.1tm +++| STD CH 04144 M00S03712.1tm +++| LDN 2 SET CHARACTER 2 04145 M00S03713.1tm +++| STD DP+2 04146 M00S03714.1tm +++| LDN 10 SET BINARY MODE 04147 M00S03715.1tm +++| RAD DP+3 04148 M00S03716.1tm +++| RJM SWA WRITE FIRST WORD 04149 M00S03717.1tm +++| CWM BNIA,ON
| Line S00310 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 04150 M01S00310.242l642 +++| LDN 0 CLEAR START OF *F7* SEQUENCE 04151 M01S00311.242l642 +++| STD F7 04152 M00S03718.1tm +++| JMP RWC ENTER READ/WRITE CONTROL 04153 M00S03719.1tm +++| 04154 M00S03720.1tm +++| 04155 M00S03721.1tm +++| BNIA DATA 0007,0,0,0,0 BINARY MODE HEADER 04156 M00S03722.1tm +++| BNO SPACE 4,15 04157 M00S03723.1tm +++|*** 0007 INITIATE BINARY MODE OUTPUT. 04158 M00S03724.1tm +++|* 04159 M00S03725.1tm +++|* THIS CONTROL BYTE INITIATES BINARY OUTPUT. IT MUST 04160 M00S03726.1tm +++|* APPEAR IN THE FIRST BYTE OF OUTPUT. 04161 M00S03727.1tm +++|* 04162 M00S03728.1tm +++|* EXIT TO *BWT* IF VALID CONTROL BYTE. 04163 M00S03729.1tm +++|* TO *AWT13* IF INVALID CONTROL BYTE. 04164 M00S03730.1tm +++| 04165 M00S03731.1tm +++| 04166 M00S03732.1tm +++| BNO BSS 0 ENTRY 04167 M00S03733.1tm +++| LDD DP+3 CLEAR BINARY MODE 04168 M00S03734.1tm +++| SCN 10 04169 M00S03735.1tm +++| STD DP+3 04170 M00S03736.1tm +++| LDD CH+1 CHECK CHARACTER COUNT 04171 M00S03737.1tm +++| NJN BNO1 IF NOT FIRST BYTE 04172 M00S03738.1tm +++| LDN 10 SET BINARY TRANSMISSION 04173 M00S03739.1tm +++| RAD DP+3 04174 M00S03740.1tm +++| LJM BWT ENTER BINARY WRITE MODE 04175 M00S03741.1tm +++| 04176 M00S03742.1tm +++| BNO1 LDN 1RG 04177 M00S03743.1tm +++| JMP AWT13 CONTINUE WRITE MODE 04178 M00S03744.1tm +++| BEO SPACE 4,15 04179 M00S03745.1tm +++|*** 0011 BEGIN EXENDED OUTPUT. 04180 M00S03746.1tm +++|* 04181 M00S03747.1tm +++|* THIS CONTROL BYTE INITIATES EXTENDED MODE OUTPUT.
| Line S03748 Modification History | |
|---|---|
M01 (Removed by) | ns2406 |
Seq # *Modification Id* Act ----------------------------+ 04182 M01S03748.ns2406 ---|* IT MUST APPEAR IN THE FIRST BYTE OF THE OUTPUT WORD.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2406 |
Seq # *Modification Id* Act ----------------------------+ 04183 M01S00001.ns2406 +++|* IT MUST APPEAR IN THE FIRST BYTE OF THE OUTPUT LINE. 04184 M00S03749.1tm +++|* 04185 M00S03750.1tm +++|* EXIT TO *AWT* TO INITIATE EXTENDED OUTPUT. 04186 M00S03751.1tm +++|* TO *AWT13* IF INVALID CONTROL BYTE. 04187 M00S03752.1tm +++|* 04188 M00S03753.1tm +++|* CALLS SEM. 04189 M00S03754.1tm +++| 04190 M00S03755.1tm +++| 04191 M00S03756.1tm +++| BEO BSS 0 ENTRY
| Line S03757 Modification History | |
|---|---|
M01 (Removed by) | ns2406 |
Seq # *Modification Id* Act ----------------------------+ 04192 M01S03757.ns2406 ---| LDD DP+2 CHECK BYTE POSITION IN LINE 04193 M01S03758.ns2406 ---| LPN 17 04194 M01S03759.ns2406 ---| LMN 2
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2406 |
Seq # *Modification Id* Act ----------------------------+ 04195 M01S00002.ns2406 +++| LDD CH+1 04196 M00S03760.1tm +++| NJN BEO1 IF NOT FIRST BYTE 04197 M00S03761.1tm +++| RJM SEM SET EXTENDED MODE 04198 M00S03762.1tm +++| JMP AWT INITIATE OUTPUT 04199 M00S03763.1tm +++| 04200 M00S03764.1tm +++| BEO1 LDN 1RI 04201 M00S03765.1tm +++| JMP AWT13 CONTINUE WRITE MODE 04202 M00S03766.1tm +++| EOS SPACE 4,15 04203 M00S03767.1tm +++|*** 0013 END OF STRING. 04204 M00S03768.1tm +++|* 04205 M00S03769.1tm +++|* THIS BYTE ACTS AS A LOGICAL LINE TERMINATOR WHEN 04206 M00S03770.1tm +++|* FOLLOWED BY AN END OF LINE. THE TERMINAL CARRIAGE 04207 M00S03771.1tm +++|* WILL NOT BE REPOSITIONED AND OUTPUT WILL CONTINUE 04208 M00S03772.1tm +++|* WITH THE NEXT LINE OF DATA. 04209 M00S03773.1tm +++|* 04210 M00S03774.1tm +++|* EXIT (CH+1) = 0. 04211 M00S03775.1tm +++|* (CH+2) = 0. 04212 M00S03776.1tm +++|* TO *SOC* IF END OF CURRENT POT - 04213 M00S03777.1tm +++|* (A) = *.ECP*. 04214 M00S03778.1tm +++|* TO *AWT* TO CONTINUE WRITE IF NOT END OF POT. 04215 M00S03779.1tm +++|* 04216 M00S03780.1tm +++|* CALLS CEM, CLT, ROC. 04217 M00S03781.1tm +++| 04218 M00S03782.1tm +++| 04219 M00S03783.1tm +++| EOS BSS 0 ENTRY 04220 M00S03784.1tm +++| LDN 1RK CHECK FOR LINE TERMINATION 04221 M00S03785.1tm +++| RJM CLT 04222 M00S03786.1tm +++| STD CH+1 CLEAR CHARACTER COUNT 04223 M00S03787.1tm +++| STD CH+2 CLEAR CONTROL BYTE 04224 M00S03788.1tm +++| RJM ROC FORCE LINE SKIP IF IN BYTE 4 04225 M00S03789.1tm +++| LMC .ECP CHECK IF END OF POT REACHED 04226 M00S03790.1tm +++| NJN EOS1 IF NOT END OF CURRENT POT 04227 M00S03791.1tm +++| LMC .ECP 04228 M00S03792.1tm +++| LJM SOC SET OUTPUT CONTROL 04229 M00S03793.1tm +++| 04230 M00S03794.1tm +++| EOS1 LDD DP+2 REPOSITION TO READ NEXT WORD 04231 M00S03795.1tm +++| SCN 17 04232 M00S03796.1tm +++| LMN 12 04233 M00S03797.1tm +++| STD DP+2 04234 M00S03798.1tm +++| RJM CEM CLEAR EXTENDED MODE 04235 M00S03799.1tm +++| JMP AWT CONTINUE OUTPUT 04236 M00S03800.1tm +++| IEB SPACE 4,20 04237 M00S03801.1tm +++|*** 0014 INTERNAL END OF BLOCK. 04238 M00S03802.1tm +++|* 04239 M00S03803.1tm +++|* THIS CONTROL BYTE IS USED INTERNALLY BY *1TO* ONLY TO 04240 M00S03804.1tm +++|* TERMINATE OUTPUT BEFORE THE END OF POT IS REACHED. THE 04241 M00S03805.1tm +++|* REMAINDER OF THE POT IS DISCARDED, THE TERMINAL IS NOT 04242 M00S03806.1tm +++|* REPOSITIONED TO THE BEGINNING OF THE NEXT LINE, AND ANY 04243 M00S03807.1tm +++|* SPECIAL MODES (E.G., EXTENDED OR BINARY TRANSMISSION) 04244 M00S03808.1tm +++|* WILL REMAIN SET. THIS BYTE MUST APPEAR AS THE FIRST BYTE 04245 M00S03809.1tm +++|* OF A WORD, AND MUST BE FOLLOWED BY AN END OF LINE. 04246 M00S03810.1tm +++|* 04247 M00S03811.1tm +++|* EXIT TO *RWC1* IF VALID CONTROL BYTE. 04248 M00S03812.1tm +++|* TO *AWT13* IF INVALID CONTROL BYTE. 04249 M00S03813.1tm +++|* 04250 M00S03814.1tm +++|* CALLS CLT. 04251 M00S03815.1tm +++|* 04252 M00S03816.1tm +++|* MACROS RETURN. 04253 M00S03817.1tm +++| 04254 M00S03818.1tm +++| 04255 M00S03819.1tm +++| IEB BSS 0 ENTRY 04256 M00S03820.1tm +++| LDD DP+2 CHECK CHARACTER POSITION 04257 M00S03821.1tm +++| LPN 17 04258 M00S03822.1tm +++| LMN 2 04259 M00S03823.1tm +++| NJN IEB1 IF NOT FIRST BYTE IN WORD 04260 M00S03824.1tm +++| LDN 1RL CHECK FOR LINE TERMINATION 04261 M00S03825.1tm +++| RJM CLT 04262 M00S03826.1tm +++| STD DP+2 CLEAR CHARACTER POSITION 04263 M00S03827.1tm +++| RETURN /CTL/RWC1 ENTER READ/WRITE CONTROL 04264 M00S03828.1tm +++| 04265 M00S03829.1tm +++| IEB1 LDN 1RL 04266 M00S03830.1tm +++| JMP AWT13 REENTER WRITE MODE 04267 M00S03831.1tm +++| ETI SPACE 4,15 04268 M00S03832.1tm +++|*** 0015 EXECUTIVE AUTO INPUT. 04269 M00S03833.1tm +++|*
| Line S03834 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 04270 M01S03834.242l642 ---|* THIS CONTROL BYTE IS INTENDED TO BE USED BY *RAF* FOR
| Line S00312 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 04271 M01S00312.242l642 +++|* THIS CONTROL BYTE IS INTENDED TO BE USED BY *RDF* FOR 04272 M00S03835.1tm +++|* AUTO MODE INPUT. THE WORD IN WHICH THE CONTROL BYTE OCCURS 04273 M00S03836.1tm +++|* IS USED AS THE FIRST N CHARACTERS OF THE INPUT LINE. 04274 M00S03837.1tm +++|* N MUST BE EVEN AND LESS THAN 9. 04275 M00S03838.1tm +++|* 04276 M00S03839.1tm +++|* THIS CONTROL BYTE MUST BE FOLLOWED BY AN END-OF-LINE. 04277 M00S03840.1tm +++|* 04278 M00S03841.1tm +++|* EXIT TO *ATI1* TO INITIATE AUTO MODE INPUT - 04279 M00S03842.1tm +++|* (A) = 1RM. 04280 M00S03843.1tm +++|* (RTIA) = *RSW*. 04281 M00S03844.1tm +++|* (RTIB) = *LDNI+1RM*. 04282 M00S03845.1tm +++| 04283 M00S03846.1tm +++| 04284 M00S03847.1tm +++| ETI BSS 0 ENTRY 04285 M00S03848.1tm +++| LDC LDNI+1RM SET CONTROL TO REENTER WRITE MODE 04286 M00S03849.1tm +++| STM ATIB 04287 M00S03850.1tm +++| LDC RSW SET UP CALL TO SUBROUTINE RSW 04288 M00S03851.1tm +++| STM ATIA 04289 M00S03852.1tm +++| LDN 1RM 04290 M00S03853.1tm +++| LJM ATI1 AUTO MODE INPUT PROCESSING 04291 M00S03854.1tm +++| TITLE WRITE MODE - SPECIAL CHARACTER PROCESSORS. 04292 M00S03855.1tm +++| ACR SPACE 4,15 04293 M00S03856.1tm +++|** ACR - PROCESS *CARRIAGE RETURN* OUTPUT. 04294 M00S03857.1tm +++|* 04295 M00S03858.1tm +++|* ISSUES *CARRIAGE RETURN* TO THE TERMINAL, FOLLOWED 04296 M00S03859.1tm +++|* BY *NUL* CHARACTERS IF IN KEYBOARD MODE OR BY 04297 M00S03860.1tm +++|* *DEL* CHARACTERS IF IN TAPE MODE. 04298 M00S03861.1tm +++|* 04299 M00S03862.1tm +++|* EXIT TO *AWT* TO CONTINUE WRITE OPERATION. 04300 M00S03863.1tm +++|* 04301 M00S03864.1tm +++|* USES T7. 04302 M00S03865.1tm +++|* 04303 M00S03866.1tm +++|* CALLS DDC, SRC. 04304 M00S03867.1tm +++|* 04305 M00S03868.1tm +++|* MACROS RETURN. 04306 M00S03869.1tm +++| 04307 M00S03870.1tm +++| 04308 M00S03871.1tm +++| ACR BSS 0 ENTRY 04309 M00S03872.1tm +++| LDC .CCR ISSUE *CR* TO OUTPUT 04310 M00S03873.1tm +++| LMD PY TOGGLE ODD PARITY 04311 M00S03874.1tm +++| STD DO 04312 M00S03875.1tm +++| RETURN * REENTER 04313 M00S03876.1tm +++| LDN 3 SET DEFAULT DELAY COUNT 04314 M00S03877.1tm +++| RJM DDC DETERMINE TERMINAL DELAY COUNT 04315 M00S03878.1tm +++| STD T7 04316 M00S03879.1tm +++| LDD DC CHECK TERMINAL STATUS 04317 M00S03880.1tm +++| LPN 1 04318 M00S03881.1tm +++| ZJN ACR1 IF NOT IN *TAPE* MODE 04319 M00S03882.1tm +++| LDK .CDEL SET ASCII *DEL* CODE 04320 M00S03883.1tm +++| UJN ACR2 04321 M00S03884.1tm +++| 04322 M00S03885.1tm +++| ACR1 LDK .CNUL SET ASCII *NUL* CODE 04323 M00S03886.1tm +++| ACR2 SHN 6 ADD DELAY COUNT 04324 M00S03887.1tm +++| ADD T7 04325 M00S03888.1tm +++| SHN 14 04326 M00S03889.1tm +++| LMD PY TOGGLE ODD PARITY 04327 M00S03890.1tm +++| RJM SRC SEND REPEATED CHARACTERS 04328 M00S03891.1tm +++| JMP AWT REENTER WRITE MODE 04329 M00S03892.1tm +++| ANL SPACE 4,15 04330 M00S03893.1tm +++|** ANL - PROCESS *NEW LINE* OUTPUT. 04331 M00S03894.1tm +++|* 04332 M00S03895.1tm +++|* ISSUES *CARRIAGE RETURN* FOLLOWED BY *LINE FEED* 04333 M00S03896.1tm +++|* TO THE TERMINAL, THEN FOLLOWED BY *NULL* CHARACTERS. 04334 M00S03897.1tm +++|* 04335 M00S03898.1tm +++|* EXIT TO *ISN* TO ISSUE *NULL* CHARACTERS. 04336 M00S03899.1tm +++|* 04337 M00S03900.1tm +++|* MACROS RETURN. 04338 M00S03901.1tm +++| 04339 M00S03902.1tm +++| 04340 M00S03903.1tm +++| ANL BSS 0 ENTRY 04341 M00S03904.1tm +++| LDC .CCR ISSUE *CR* TO OUTPUT 04342 M00S03905.1tm +++| LMD PY TOGGLE ODD PARITY 04343 M00S03906.1tm +++| STD DO 04344 M00S03907.1tm +++| RETURN * REENTER 04345 M00S03908.1tm +++| LDC .CLF ISSUE *LF* TO OUTPUT 04346 M00S03909.1tm +++| LMD PY TOGGLE ODD PARITY 04347 M00S03910.1tm +++| STD DO 04348 M00S03911.1tm +++| RETURN * REENTER 04349 M00S03912.1tm +++| LDN 2 SET DEFAULT REPEAT COUNT 04350 M00S03913.1tm +++| JMP ISN ISSUE *NUL*S 04351 M00S03914.1tm +++| WTM TITLE WRITE MODE - SUBROUTINES. 04352 M00S03915.1tm +++| CKL SPACE 4,15 04353 M00S03916.1tm +++|** CKL - CHECK LIST STATUS. 04354 M00S03917.1tm +++|* 04355 M00S03918.1tm +++|* EXIT (A) = NEGATIVE IF FILE LIST IN PROGRESS. 04356 M00S03919.1tm +++|* 04357 M00S03920.1tm +++|* USES T1 - T5. 04358 M00S03921.1tm +++|* 04359 M00S03922.1tm +++|* CALLS STA. 04360 M00S03923.1tm +++| 04361 M00S03924.1tm +++| 04362 M00S03925.1tm +++| CKL SUBR ENTRY/EXIT 04363 M00S03926.1tm +++| RJM STA SET FWA OF TERMINAL TABLE 04364 M00S03927.1tm +++| ADN VROT READ *VROT* 04365 M00S03928.1tm +++| CRD T1 04366 M00S03929.1tm +++| LDD T1+4 LOAD STATUS BYTE 04367 M00S03930.1tm +++| SHN 21-6 SHIFT *LIST* STATUS BIT 04368 M00S03931.1tm +++| UJN CKLX RETURN 04369 M00S03932.1tm +++| CLT SPACE 4,25 04370 M00S03933.1tm +++|** CLT - CHECK FOR LINE TERMINATION. 04371 M00S03934.1tm +++|* 04372 M00S03935.1tm +++|* CHECKS CURRENT OUTPUT FOR LINE TERMINATION. 04373 M00S03936.1tm +++|* 04374 M00S03937.1tm +++|* ENTRY (A) = NEXT OUTPUT CHARACTER IF NOT END OF LINE. 04375 M00S03938.1tm +++|* 04376 M00S03939.1tm +++|* EXIT TO CALLING ROUTINE IF LINE TERMINATED. 04377 M00S03940.1tm +++|* TO WRITE MODE IF LINE NOT TERMINATED. 04378 M00S03941.1tm +++|* LINE TERMINATION CAN BE EXPLICIT IN THE CASE OF 04379 M00S03942.1tm +++|* A VALID END OF LINE FOLLOWING THE CURRENT LINE 04380 M00S03943.1tm +++|* POSITION, OR IT MAY BE IMPLICIT IN THE CASE OF THERE 04381 M00S03944.1tm +++|* BEING NO FURTHER DATA, EITHER ASSIGNED OR ON 04382 M00S03945.1tm +++|* MASS STORAGE. 04383 M00S03946.1tm +++|* IN THE EVENT THAT NO DETERMINATION CAN BE MADE 04384 M00S03947.1tm +++|* BECAUSE THE DRIVER IS AT THE END OF THE CURRENT 04385 M00S03948.1tm +++|* POT STRING BUT OUTPUT IS WAITING ON MASS STORAGE, 04386 M00S03949.1tm +++|* OR IF THE JOB IS CURRENTLY IN EXECUTION, 04387 M00S03950.1tm +++|* EXIT IS TO READ/WRITE CONTROL WITH SUSPENDED CONTROL 04388 M00S03951.1tm +++|* STATUS SET IN (CH+2). 04389 M00S03952.1tm +++|* 04390 M00S03953.1tm +++|* USES T0 - T5, CM, CM+1, (MA)-(MA)+5. 04391 M00S03954.1tm +++|* 04392 M00S03955.1tm +++|* CALLS RLT, ROC, STA. 04393 M00S03956.1tm +++|* 04394 M00S03957.1tm +++|* MACROS RETURN. 04395 M00S03958.1tm +++| 04396 M00S03959.1tm +++| 04397 M00S03960.1tm +++| CLT SUBR ENTRY/EXIT 04398 M00S03961.1tm +++| STD CM SAVE CALLING CODE 04399 M00S03962.1tm +++| LDD MA SAVE POINTER WORD 04400 M00S03963.1tm +++| CWD DP 04401 M00S03964.1tm +++| RJM ROC READ NEXT CHARACTER 04402 M00S03965.1tm +++| LMC .ECP 04403 M00S03966.1tm +++| ZJN CLT3 IF END OF CURRENT POT 04404 M00S03967.1tm +++| LMC .ECP 04405 M00S03968.1tm +++| 04406 M00S03969.1tm +++|* CHECK NEXT OUTPUT BYTE FOR END OF LINE. 04407 M00S03970.1tm +++| 04408 M00S03971.1tm +++| CLT1 SHN 1 CHECK FOR END OF LINE 04409 M00S03972.1tm +++| LMN 1 04410 M00S03973.1tm +++| STD CM+1 STORE FLAG (ZERO IF END OF LINE) 04411 M00S03974.1tm +++| CLT2 LDD MA RESTORE POINTER WORD 04412 M00S03975.1tm +++| CRD DP 04413 M00S03976.1tm +++| LDD CM+1 CHECK FLAG 04414 M00S03977.1tm +++| ZJN CLTX IF END OF LINE 04415 M00S03978.1tm +++| LJM CLT6 04416 M00S03979.1tm +++| 04417 M00S03980.1tm +++|* ADVANCE TO NEXT POT. 04418 M00S03981.1tm +++| 04419 M00S03982.1tm +++| CLT3 STD DP+2 CLEAR POINTERS 04420 M00S03983.1tm +++| STD CM+1 04421 M00S03984.1tm +++| RJM RLT CHECK POT LINK 04422 M00S03985.1tm +++| ZJN CLT4 IF POT NOT LINKED 04423 M00S03986.1tm +++| STD DP+1 SET NEXT POT 04424 M00S03987.1tm +++| RJM ROC READ NEXT CHARACTER 04425 M00S03988.1tm +++| UJN CLT1 04426 M00S03989.1tm +++| 04427 M00S03990.1tm +++|* CHECK FOR ADDITIONAL OUTPUT. 04428 M00S03991.1tm +++| 04429 M00S03992.1tm +++| CLT4 LDD DC CHECK FOR DRIVER REQUEST 04430 M00S03993.1tm +++| SHN 21-13 04431 M00S03994.1tm +++| MJN CLT2 IF DRIVER REQUEST 04432 M00S03995.1tm +++| LDD DC+4 04433 M00S03996.1tm +++| NJN CLT5 IF OUTPUT ASSIGNED 04434 M00S03997.1tm +++| RJM STA SET FWA OF TERMINAL TABLE 04435 M00S03998.1tm +++| ADN VROT READ *VROT* 04436 M00S03999.1tm +++| CRD T0 04437 M00S04000.1tm +++| LDD T0+4 CHECK JOB STATUS 04438 M00S04001.1tm +++| LPN 21 04439 M00S04002.1tm +++| LMN 1 04440 M00S04003.1tm +++| ZJN CLT2 IF NOT EXECUTING AND NO OUTPUT 04441 M00S04004.1tm +++| 04442 M00S04005.1tm +++|* SUSPEND CONTROL UNTIL FURTHER OUTPUT IS ASSIGNED. 04443 M00S04006.1tm +++| 04444 M00S04007.1tm +++| CLT5 LDD MA RESET POINTER WORD 04445 M00S04008.1tm +++| CRD DP 04446 M00S04009.1tm +++| LDD CM SET SUSPENDED CONTROL 04447 M00S04010.1tm +++| ADC 600 04448 M00S04011.1tm +++| STD CH+2 04449 M00S04012.1tm +++| RETURN /CTL/RWC1 ENTER READ/WRITE CONTROL 04450 M00S04013.1tm +++| 04451 M00S04014.1tm +++|* REENTER WRITE MODE IF NO TERMINATOR. 04452 M00S04015.1tm +++| 04453 M00S04016.1tm +++| CLT6 LDD DP+3 CHECK *BINARY* MODE 04454 M00S04017.1tm +++| SHN 21-3 04455 M00S04018.1tm +++| MJN CLT7 IF SET 04456 M00S04019.1tm +++| LDD CM SET OUTPUT CHARACTER 04457 M00S04020.1tm +++| LJM AWT13 REENTER WRITE MODE 04458 M00S04021.1tm +++| 04459 M00S04022.1tm +++| CLT7 SOD DP+2 BACK UP CHARACTER 04460 M00S04023.1tm +++| LJM BWT2 EXIT BINARY MODE 04461 M00S04024.1tm +++| MDS SPACE 4,15 04462 M00S04025.1tm +++|** MDS - MOVE DATA WORD TO START OF POT. 04463 M00S04026.1tm +++|* 04464 M00S04027.1tm +++|* MOVE THE WORD CONTAINING THE AUTO INPUT CONTROL BYTE 04465 M00S04028.1tm +++|* TO THE FIRST WORD OF THE POT FOR SUBSEQUENT INPUT. 04466 M00S04029.1tm +++|* 04467 M00S04030.1tm +++|* ENTRY (TO - T4) = DATA WORD. 04468 M00S04031.1tm +++|* 04469 M00S04032.1tm +++|* CALLS SWA. 04470 M00S04033.1tm +++| 04471 M00S04034.1tm +++| 04472 M00S04035.1tm +++| MDS SUBR ENTRY/EXIT 04473 M00S04036.1tm +++| LDD DP+2 CLEAR POT WORD POINTER 04474 M00S04037.1tm +++| LPC 0617 04475 M00S04038.1tm +++| STD DP+2 04476 M00S04039.1tm +++| RJM SWA SET WORD ADDRESS 04477 M00S04040.1tm +++| CWD T0 WRITE WORD TO POT 04478 M00S04041.1tm +++| UJN MDSX RETURN 04479 M00S04042.1tm +++| ROC SPACE 4,20 04480 M00S04043.1tm +++|** ROC - READ OUTPUT CHARACTER. 04481 M00S04044.1tm +++|* 04482 M00S04045.1tm +++|* EXIT (T5) = OUTPUT BYTE ADDRESS. 04483 M00S04046.1tm +++|* (T7) = LOWER 12 BITS OF (A). 04484 M00S04047.1tm +++|* (A) = POSITIVE - 04485 M00S04048.1tm +++|* (A) = OUTPUT CHARACTER. 04486 M00S04049.1tm +++|* = NEGATIVE - 04487 M00S04050.1tm +++|* (A) = 400000B + CONTROL BYTE VALUE, OR, 04488 M00S04051.1tm +++|* 770001 (END OF POT). 04489 M00S04052.1tm +++|* 04490 M00S04053.1tm +++|* USES DP+2, T7, T0 - T5. 04491 M00S04054.1tm +++|* 04492 M00S04055.1tm +++|* CALLS SWA. 04493 M00S04056.1tm +++|* 04494 M00S04057.1tm +++|* MACROS ADCBM. 04495 M00S04058.1tm +++| 04496 M00S04059.1tm +++| 04497 M00S04060.1tm +++|* PROCESS ODD (LOWER) CHARACTER. 04498 M00S04061.1tm +++| 04499 M00S04062.1tm +++| ROC9 LPN 7 SET BYTE NUMBER 04500 M00S04063.1tm +++| STD T5 04501 M00S04064.1tm +++| AOD DP+2 ADVANCE CHARACTER NUMBER 04502 M00S04065.1tm +++| RJM SWA READ DATA WORD 04503 M00S04066.1tm +++| CRD T0 04504 M00S04067.1tm +++| LDI T5 EXTRACT LOWER CHARACTER 04505 M00S04068.1tm +++| LPN 77 04506 M00S04069.1tm +++| ROC10 STD T7 SET CHARACTER 04507 M00S04070.1tm +++|* UJN ROCX 04508 M00S04071.1tm +++| 04509 M00S04072.1tm +++| 04510 M00S04073.1tm +++|* ROC - ENTRY. 04511 M00S04074.1tm +++| 04512 M00S04075.1tm +++| ROC SUBR ENTRY/EXIT 04513 M00S04076.1tm +++| LDD DP+1 CHECK CURRENT POT POINTER 04514 M00S04077.1tm +++| SHN -6 04515 M00S04078.1tm +++| LMN 77 04516 M00S04079.1tm +++| NJN ROC1 IF NOT MESSAGE PSEUDO-POT POINTER 04517 M00S04080.1tm +++| LJM TTM1 GET MESSAGE CHARACTER 04518 M00S04081.1tm +++| 04519 M00S04082.1tm +++| ROC1 LDD DP+2 CHECK CHARACTER NUMBER 04520 M00S04083.1tm +++| SHN 21 04521 M00S04084.1tm +++| MJN ROC9 IF ODD CHARACTER 04522 M00S04085.1tm +++| 04523 M00S04086.1tm +++|* PROCESS EVEN (UPPER) CHARACTER. 04524 M00S04087.1tm +++| 04525 M00S04088.1tm +++| LPN 77 CHECK WORD STATUS 04526 M00S04089.1tm +++| LMN 75 04527 M00S04090.1tm +++| NJN ROC2 IF NOT END OF WORD AND END OF POT 04528 M00S04091.1tm +++| LDC .ECP 04529 M00S04092.1tm +++| UJN ROCX 04530 M00S04093.1tm +++| 04531 M00S04094.1tm +++| ROC2 LPN 7 04532 M00S04095.1tm +++| NJN ROC3 IF NOT END OF WORD 04533 M00S04096.1tm +++| STD T5 SET BYTE 0 04534 M00S04097.1tm +++| LDN 21-12 ADVANCE WORD AND SET ODD CHARACTER 04535 M00S04098.1tm +++| RAD DP+2 04536 M00S04099.1tm +++| UJN ROC4 04537 M00S04100.1tm +++| 04538 M00S04101.1tm +++| ROC3 LMN 5 SET BYTE NUMBER 04539 M00S04102.1tm +++| STD T5 04540 M00S04103.1tm +++| AOD DP+2 ADVANCE CHARACTER 04541 M00S04104.1tm +++| ROC4 RJM SWA SET WORD ADDRESS 04542 M00S04105.1tm +++| CRD T0 READ WORD 04543 M00S04106.1tm +++| LDI T5 EXTRACT UPPER CHARACTER 04544 M00S04107.1tm +++| SHN -6 04545 M00S04108.1tm +++| NJN ROC6 IF NOT CONTROL BYTE 04546 M00S04109.1tm +++| LDI T5 04547 M00S04110.1tm +++| ZJN ROC7 IF ZERO BYTE 04548 M00S04111.1tm +++| SBN TSOCL 04549 M00S04112.1tm +++| PJN ROC8 IF NOT CONTROL BYTE 04550 M00S04113.1tm +++| ADN TSOCL 04551 M00S04114.1tm +++| ROC5 LMC 400000 04552 M00S04115.1tm +++| ROC6 LJM ROC10 04553 M00S04116.1tm +++| 04554 M00S04117.1tm +++|* CHECK FOR END OF LINE. 04555 M00S04118.1tm +++| 04556 M00S04119.1tm +++| ROC7 AOD T5 ADVANCE BYTE POINTER 04557 M00S04120.1tm +++| LMN 5 04558 M00S04121.1tm +++| ZJN ROC5 IF END OF WORD 04559 M00S04122.1tm +++| LDI T5 04560 M00S04123.1tm +++| ZJN ROC7 IF NO DATA IN NEXT BYTE 04561 M00S04124.1tm +++| ROC8 LDN 0 ISSUE COLON 04562 M00S04125.1tm +++| UJN ROC6 04563 M00S04126.1tm +++| RSW SPACE 4,15 04564 M00S04127.1tm +++|** RSW - RESTORE WORD. 04565 M00S04128.1tm +++|* 04566 M00S04129.1tm +++|* THE WORD IN WHICH THE CONTROL BYTE 0015 OCCURS IS USED 04567 M00S04130.1tm +++|* AS THE FIRST N CHARACTERS OF THE INPUT LINE. 04568 M00S04131.1tm +++|* 04569 M00S04132.1tm +++|* ENTRY (T0 - T4) = DATA WORD. 04570 M00S04133.1tm +++|* 04571 M00S04134.1tm +++|* CALLS SWA. 04572 M00S04135.1tm +++| 04573 M00S04136.1tm +++| 04574 M00S04137.1tm +++| RSW SUBR ENTRY/EXIT 04575 M00S04138.1tm +++| RJM SWA SET WORD ADDRESS 04576 M00S04139.1tm +++| CWD T0 WRITE WORD TO POT 04577 M00S04140.1tm +++| UJN RSWX RETURN 04578 M00S04141.1tm +++| SRC SPACE 4,15 04579 M00S04142.1tm +++|** SRC - SEND REPEATED CHARACTER. 04580 M00S04143.1tm +++|* 04581 M00S04144.1tm +++|* ENTRY (A) = 6/REPEAT COUNT, 12/CHARACTER. 04582 M00S04145.1tm +++|* 04583 M00S04146.1tm +++|* EXIT CHARACTER TRANSMITTED (A) TIMES. 04584 M00S04147.1tm +++|* 04585 M00S04148.1tm +++|* USES (CH) = RETURN ADDRESS. 04586 M00S04149.1tm +++|* (CH+1) = REPEAT COUNT. 04587 M00S04150.1tm +++|* 04588 M00S04151.1tm +++|* MACROS RETURN. 04589 M00S04152.1tm +++| 04590 M00S04153.1tm +++| 04591 M00S04154.1tm +++| SRC SUBR ENTRY/EXIT 04592 M00S04155.1tm +++| LPC -4000 SET OUTPUT CHARACTER BIT 04593 M00S04156.1tm +++| LMC 4000 04594 M00S04157.1tm +++| STM RDAT SAVE CHARACTER 04595 M00S04158.1tm +++| SHN -14 SET REPEAT COUNT 04596 M00S04159.1tm +++| STD CH+1 04597 M00S04160.1tm +++| ZJN SRCX IF ZERO 04598 M00S04161.1tm +++| LDM SRC SET RETURN ADDRESS 04599 M00S04162.1tm +++| STD CH 04600 M00S04163.1tm +++| SRC1 LDM RDAT TRANSMIT OUTPUT 04601 M00S04164.1tm +++| STD DO 04602 M00S04165.1tm +++| RETURN * REENTER 04603 M00S04166.1tm +++| SOD CH+1 DECREMENT REPEAT COUNT 04604 M00S04167.1tm +++| NJN SRC1 IF NOT EXHAUSTED 04605 M00S04168.1tm +++| LJM 0,CH REENTER CALLING ROUTINE 04606 M00S04169.1tm +++| TOC SPACE 4,15 04607 M00S04170.1tm +++|** TOC - TRANSLATE ASCII OUTPUT CHARACTER. 04608 M00S04171.1tm +++|* 04609 M00S04172.1tm +++|* TRANSLATES OUTPUT DATA CHARACTER AND SETS THE 04610 M00S04173.1tm +++|* PROPER PARITY (EVEN OR ODD) ON THE TRANSLATED 04611 M00S04174.1tm +++|* OUTPUT CHARACTER. 04612 M00S04175.1tm +++|* 04613 M00S04176.1tm +++|* ENTRY (T7) = CHARACTER TO BE TRANSLATED. 04614 M00S04177.1tm +++|* 04615 M00S04178.1tm +++|* EXIT (A) = 4000B+CHARACTER IF SPECIAL PROCESOR 04616 M00S04179.1tm +++|* NOT DEFINED. 04617 M00S04180.1tm +++|* = SPECIAL PROCESSOR INDEX IF DEFINED. 04618 M00S04181.1tm +++|* (T7) = (A). 04619 M00S04182.1tm +++| 04620 M00S04183.1tm +++| 04621 M00S04184.1tm +++| TOC SUBR ENTRY/EXIT 04622 M00S04185.1tm +++| LDM TOTP,T7 READ TRANSLATION TABLE ENTRY 04623 M00S04186.1tm +++| STD T7 04624 M00S04187.1tm +++| SHN 21-13 CHECK FOR VALID CHARACTER 04625 M00S04188.1tm +++| PJN TOC1 IF IF SPECIAL PROCESSOR 04626 M00S04189.1tm +++| LDD T7 TOGGLE PARITY 04627 M00S04190.1tm +++| LMD PY TOGGLE ODD PARITY 04628 M00S04191.1tm +++| STD T7 04629 M00S04192.1tm +++| TOC1 LDD T7 RETURN (A) = TRANSLATION 04630 M00S04193.1tm +++| UJN TOCX RETURN 04631 M00S04194.1tm +++| SPACE 4,10 04632 M00S04195.1tm +++| QUAL 04633 M00S04196.1tm +++| 04634 M00S04197.1tm +++| WTM EQU /WTM/WTM 04635 M00S04198.1tm +++| TTM EQU /WTM/TTM 04636 M00S04199.1tm +++| DELM EQU /WTM/DELM 04637 M00S04200.1tm +++| LOFM EQU /WTM/LOFM 04638 M00S04201.1tm +++| MBSY EQU /WTM/MBSY 04639 M00S04202.1tm +++| RDYM EQU /WTM/RDYM 04640 M00S04203.1tm +++| RILM EQU /WTM/RILM
| Line S04204 Modification History | |
|---|---|
M01 (Removed by) | ns2149 |
Seq # *Modification Id* Act ----------------------------+ 04641 M01S04204.ns2149 ---| ITM TITLE MULTIPLEXER CHANNEL SUBROUTINES. 04642 M01S04205.ns2149 ---| IFN SPACE 4,35 04643 M01S04206.ns2149 ---|** IFN - ISSUE FUNCTION. 04644 M01S04207.ns2149 ---|* 04645 M01S04208.ns2149 ---|* ISSUE CHANNEL FUNCTION TO FUNCTION TPM HARDWARE. 04646 M01S04209.ns2149 ---|* IF THE TWO-PORT MULTIPLEXER FAILS TO REPLY TO THE FUNCTION 04647 M01S04210.ns2149 ---|* BY DISCONNECTING THE CHANNEL WITHIN 3 MILLISECONDS, 04648 M01S04211.ns2149 ---|* *IFN* FORMATS A DAYFILE MESSAGE SHOWING THE FAILED 04649 M01S04212.ns2149 ---|* FUNCTION AND EXITS TO THE ERROR PROCESSOR. 04650 M01S04213.ns2149 ---|* 04651 M01S04214.ns2149 ---|* ENTRY (A) = FUNCTION TO BE ISSUED. 04652 M01S04215.ns2149 ---|* 04653 M01S04216.ns2149 ---|* ERROR TO *ERR* IF FUNCTION REJECT - 04654 M01S04217.ns2149 ---|* (A) = ADDRESS OF DAYFILE MESSAGE. 04655 M01S04218.ns2149 ---|* ERROR LOG MESSAGE ISSUED. 04656 M01S04219.ns2149 ---|* 04657 M01S04220.ns2149 ---|* CALLS DFM, O2D. 04658 M01S04221.ns2149 ---|* 04659 M01S04222.ns2149 ---|* MACROS CHTE, DELAY. 04660 M01S04223.ns2149 ---| 04661 M01S04224.ns2149 ---| 04662 M01S04225.ns2149 ---| IFN SUBR ENTRY/EXIT 04663 M01S04226.ns2149 ---| STM IFNA SAVE FUNCTION CODE 04664 M01S04227.ns2149 ---| DCN MC+40 INSURE CHANNEL DISCONNECT 04665 M01S04228.ns2149 ---| FAN MC ISSUE FUNCTION CODE 04666 M01S04229.ns2149 ---| LDK FNTIO SET FUNCTION TIME-OUT 04667 M01S04230.ns2149 ---| STD T0 04668 M01S04231.ns2149 ---| 04669 M01S04232.ns2149 ---|* WAIT FOR CHANNEL DISCONNECT. 04670 M01S04233.ns2149 ---| 04671 M01S04234.ns2149 ---| IFN1 IJM IFNX,MC IF FUNCTION COMPLETE 04672 M01S04235.ns2149 ---| DELAY PAUSE 128 USECS 04673 M01S04236.ns2149 ---| SOD T0 DECREMENT TIME-OUT 04674 M01S04237.ns2149 ---| PJN IFN1 IF NOT TIMED-OUT 04675 M01S04238.ns2149 ---| DCN MC+40 DISCONNECT CHANNEL 04676 M01S04239.ns2149 ---|
| Line S04240 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | ns2149 |
Seq # *Modification Id* Act ----------------------------+ 04677 M02S04240.ns2149 ---|* FORMAT EQUIPMENT NUMBER INTO DAYFILE MESSAGE.
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2149 |
Seq # *Modification Id* Act ----------------------------+ 04678 M02S00013.ns2149 ---|* FORMAT EST ORDINAL INTO DAYFILE MESSAGE.
| Line S04241 Modification History | |
|---|---|
M01 (Removed by) | ns2149 |
Seq # *Modification Id* Act ----------------------------+ 04679 M01S04241.ns2149 ---| 04680 M01S04242.ns2149 ---| LDD EQ CONVERT UPPER 3 BITS 04681 M01S04243.ns2149 ---| SHN -6 04682 M01S04244.ns2149 ---| LPN 7
| Line S04245 Modification History | |
|---|---|
M01 (Removed by) | 1tm1 |
M02 (Removed by) | ns2149 |
Seq # *Modification Id* Act ----------------------------+ 04683 M02S04245.ns2149 ---| RJM 02D
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 1tm1 |
M02 (Removed by) | ns2149 |
Seq # *Modification Id* Act ----------------------------+ 04684 M02S00001.ns2149 ---| RJM O2D
| Line S04246 Modification History | |
|---|---|
M01 (Removed by) | ns2149 |
Seq # *Modification Id* Act ----------------------------+ 04685 M01S04246.ns2149 ---| SBK 2R00-2RM0 CONVERT UPPER *0* TO *M* 04686 M01S04247.ns2149 ---| STM IFNB+4 04687 M01S04248.ns2149 ---| LDD EQ CONVERT LOWER 6 BITS 04688 M01S04249.ns2149 ---| RJM O2D 04689 M01S04250.ns2149 ---| STM IFNB+5 04690 M01S04251.ns2149 ---| 04691 M01S04252.ns2149 ---|* FORMAT CHANNEL AND PORT NUMBERS INTO DAYFILE MESSAGE. 04692 M01S04253.ns2149 ---| 04693 M01S04254.ns2149 ---| LDN MC CONVERT CHANNEL NUMBER 04694 M01S04255.ns2149 ---| CHTE *-1
| Line S04256 Modification History | |
|---|---|
M01 (Removed by) | 1tm1 |
M02 (Removed by) | ns2149 |
Seq # *Modification Id* Act ----------------------------+ 04695 M02S04256.ns2149 ---| RJM 02D
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 1tm1 |
M02 (Removed by) | ns2149 |
Seq # *Modification Id* Act ----------------------------+ 04696 M02S00002.ns2149 ---| RJM O2D
| Line S04257 Modification History | |
|---|---|
M01 (Removed by) | ns2149 |
Seq # *Modification Id* Act ----------------------------+ 04697 M01S04257.ns2149 ---| STM IFNB+7 04698 M01S04258.ns2149 ---| LDD PN CONVERT PORT NUMBER 04699 M01S04259.ns2149 ---| RJM O2D 04700 M01S04260.ns2149 ---| STM IFNB+11 04701 M01S04261.ns2149 ---| 04702 M01S04262.ns2149 ---|* FORMAT FUNCTION CODE INTO DAYFILE MESSAGE. 04703 M01S04263.ns2149 ---| 04704 M01S04264.ns2149 ---| LDC * CONVERT UPPER TWO DIGITS 04705 M01S04265.ns2149 ---| IFNA EQU *-1 04706 M01S04266.ns2149 ---| SHN -6 04707 M01S04267.ns2149 ---| RJM O2D 04708 M01S04268.ns2149 ---| STM IFNB+13 04709 M01S04269.ns2149 ---| LDM IFNA CONVERT LOWER TWO DIGITS 04710 M01S04270.ns2149 ---| RJM O2D 04711 M01S04271.ns2149 ---| STM IFNB+14 04712 M01S04272.ns2149 ---| 04713 M01S04273.ns2149 ---|* ISSUE ERROR LOG MESSAGE AND EXIT TO ERROR PROCESSOR. 04714 M01S04274.ns2149 ---| 04715 M01S04275.ns2149 ---| LDC IFNB+3+ERLN 04716 M01S04276.ns2149 ---| RJM DFM ISSUE ERROR LOG MESSAGE 04717 M01S04277.ns2149 ---| LDC IFNB SET ADDRESS OF DAYFILE MESSAGE 04718 M01S04278.ns2149 ---| LJM ERR EXIT TO ERROR PROCESSOR 04719 M01S04279.ns2149 ---| 04720 M01S04280.ns2149 ---| 04721 M01S04281.ns2149 ---| IFNB DATA C* 1TM - RMEEE CXX PYY FNNNN REJECT.* 04722 M01S04282.ns2149 ---| SEL SPACE 4,15 04723 M01S04283.ns2149 ---|** SEL - SELECT MULTIPLEXER PORT. 04724 M01S04284.ns2149 ---|* 04725 M01S04285.ns2149 ---|* ISSUES TPM FUNCTION CODES TO SELECT THE TPM PORT, 04726 M01S04286.ns2149 ---|* SET THE PORT OPERATING MODE, AND SET *DATA TERMINAL 04727 M01S04287.ns2149 ---|* READY* AND *REQUEST TO SEND*, THEN GETS AND STORES 04728 M01S04288.ns2149 ---|* THE PORT STATUS. 04729 M01S04289.ns2149 ---|* 04730 M01S04290.ns2149 ---|* ENTRY (PN) = PORT NUMBER. 04731 M01S04291.ns2149 ---|* 04732 M01S04292.ns2149 ---|* EXIT PORT SELECTED. 04733 M01S04293.ns2149 ---|* (ST) = PORT STATUS. 04734 M01S04294.ns2149 ---|* 04735 M01S04295.ns2149 ---|* CALLS IFN, STS. 04736 M01S04296.ns2149 ---| 04737 M01S04297.ns2149 ---| 04738 M01S04298.ns2149 ---| SEL SUBR ENTRY/EXIT 04739 M01S04299.ns2149 ---| LDD PN GET PORT NUMBER 04740 M01S04300.ns2149 ---| ADK SELECT SET *SELECT* FUNCTION 04741 M01S04301.ns2149 ---| RJM IFN ISSUE FUNCTION 04742 M01S04302.ns2149 ---| LDC SETPOM+TPMODE SET PORT OPERATING MODE 04743 M01S04303.ns2149 ---| RJM IFN 04744 M01S04304.ns2149 ---| LDK SETDTR SET *DATA TERMINAL READY* 04745 M01S04305.ns2149 ---| RJM IFN 04746 M01S04306.ns2149 ---| LDK SETRQS SET *REQUEST TO SEND* 04747 M01S04307.ns2149 ---| RJM IFN 04748 M01S04308.ns2149 ---| RJM STS GET PORT STATUS 04749 M01S04309.ns2149 ---| UJN SELX RETURN 04750 M01S04310.ns2149 ---| STS SPACE 4,15 04751 M01S04311.ns2149 ---|** STS - RETURN MULTIPLEXER STATUS. 04752 M01S04312.ns2149 ---|* 04753 M01S04313.ns2149 ---|* ISSUES FUNCTION TO REQUEST THE TPM PORT STATUS AND 04754 M01S04314.ns2149 ---|* INPUTS AND STORES THE STATUS RESPONSE FROM THE CHANNEL. 04755 M01S04315.ns2149 ---|* 04756 M01S04316.ns2149 ---|* EXIT (A) = MULTIPLEXER PORT STATUS. 04757 M01S04317.ns2149 ---|* (ST) = MULTIPLEXER PORT STATUS. 04758 M01S04318.ns2149 ---|* 04759 M01S04319.ns2149 ---|* ERROR TO *ERR* IF NO RESPONSE - 04760 M01S04320.ns2149 ---|* (A) = ADDRESS OF DAYFILE MESSAGE. 04761 M01S04321.ns2149 ---|* 04762 M01S04322.ns2149 ---|* CALLS IFN. 04763 M01S04323.ns2149 ---| 04764 M01S04324.ns2149 ---| 04765 M01S04325.ns2149 ---| STS SUBR ENTRY/EXIT 04766 M01S04326.ns2149 ---| LDK STATUS SELECT *STATUS* FUNCTION 04767 M01S04327.ns2149 ---| RJM IFN 04768 M01S04328.ns2149 ---| ACN MC 04769 M01S04329.ns2149 ---| EJM STS1,MC IF NO RESPONSE ON CHANNEL 04770 M01S04330.ns2149 ---| IAN MC READ STATUS RESPONSE 04771 M01S04331.ns2149 ---| STD ST STORE PORT STATUS 04772 M01S04332.ns2149 ---| DCN MC+40 DISCONNECT CHANNEL 04773 M01S04333.ns2149 ---| UJN STSX RETURN 04774 M01S04334.ns2149 ---| 04775 M01S04335.ns2149 ---| STS1 LDC =C* 1TM - NO TPM RESPONSE.* 04776 M01S04336.ns2149 ---| UJP ERR PROCESS ERROR 04777 M01S04337.ns2149 ---| SVM SPACE 4,15 04778 M01S04338.ns2149 ---|** SVM - SERVICE MULTIPLEXER. 04779 M01S04339.ns2149 ---|* 04780 M01S04340.ns2149 ---|* PERFORMS DATA OUTPUT AND INPUT OPERATIONS ON THE 04781 M01S04341.ns2149 ---|* TWO-PORT MULITPLEXER. 04782 M01S04342.ns2149 ---|* 04783 M01S04343.ns2149 ---|* ENTRY (DO) = OUTPUT DATA IF BIT 2**11 SET. 04784 M01S04344.ns2149 ---|* 04785 M01S04345.ns2149 ---|* EXIT (DO) = ZERO IF DATA SENT. 04786 M01S04346.ns2149 ---|* = OUTPUT DATA IF OUTPUT BUFFER FULL. 04787 M01S04347.ns2149 ---|* (DI) = INPUT DATA. 04788 M01S04348.ns2149 ---|* = ZERO IF NO INPUT DATA. 04789 M01S04349.ns2149 ---|* 04790 M01S04350.ns2149 ---|* CALLS IFN. 04791 M01S04351.ns2149 ---| 04792 M01S04352.ns2149 ---| 04793 M01S04353.ns2149 ---| SVM SUBR ENTRY/EXIT 04794 M01S04354.ns2149 ---| LDN 0 CLEAR INPUT DATA 04795 M01S04355.ns2149 ---| STD DI 04796 M01S04356.ns2149 ---| LDD ST GET PORT STATUS 04797 M01S04357.ns2149 ---| LPN 6 CHECK *CARRIER ON* AND *DATA SET READY* 04798 M01S04358.ns2149 ---| LMN 6 04799 M01S04359.ns2149 ---| NJN SVMX IF NOT *CARRIER ON* AND *DATA SET READY* 04800 M01S04360.ns2149 ---| 04801 M01S04361.ns2149 ---|* WRITE OUTPUT DATA TO MULTIPLEXER PORT. 04802 M01S04362.ns2149 ---| 04803 M01S04363.ns2149 ---| LDD ST GET PORT STATUS 04804 M01S04364.ns2149 ---| LPN 20 CHECK *OUPUT BUFFER READY* 04805 M01S04365.ns2149 ---| ZJN SVM1 IF NOT *OUPUT BUFFER READY* 04806 M01S04366.ns2149 ---| LDD DO CHECK OUTPUT DATA 04807 M01S04367.ns2149 ---| SHN 21-13 04808 M01S04368.ns2149 ---| PJN SVM1 IF NO OUTPUT DATA 04809 M01S04369.ns2149 ---| LDK WRITE SELECT *WRITE* FUNCTION 04810 M01S04370.ns2149 ---| RJM IFN 04811 M01S04371.ns2149 ---| LDD DO TRANSMIT DATA TO PORT 04812 M01S04372.ns2149 ---| LPC 377 04813 M01S04373.ns2149 ---| ACN MC 04814 M01S04374.ns2149 ---| OAN MC 04815 M01S04375.ns2149 ---| DCN MC+40 04816 M01S04376.ns2149 ---| LDN 0 CLEAR OUTPUT DATA POINTER 04817 M01S04377.ns2149 ---| STD DO 04818 M01S04378.ns2149 ---| 04819 M01S04379.ns2149 ---|* READ INPUT DATA FROM MULTIPLEXER PORT. 04820 M01S04380.ns2149 ---| 04821 M01S04381.ns2149 ---| SVM1 LDD ST CHECK PORT STATUS 04822 M01S04382.ns2149 ---| LPN 10 04823 M01S04383.ns2149 ---| ZJN SVM2 IF NOT *INPUT DATA READY* 04824 M01S04384.ns2149 ---| LDK READ SELECT *READ* FUNCTION 04825 M01S04385.ns2149 ---| RJM IFN 04826 M01S04386.ns2149 ---| ACN MC 04827 M01S04387.ns2149 ---| IAN MC INPUT DATA FROM PORT 04828 M01S04388.ns2149 ---| DCN MC+40 04829 M01S04389.ns2149 ---| SVM2 STD DI STORE INPUT DATA 04830 M01S04390.ns2149 ---| UJP SVMX RETURN 04831 M00S04391.1tm +++| ITM TITLE GENERAL SUBROUTINES. 04832 M00S04392.1tm +++| AVT SPACE 4,15 04833 M00S04393.1tm +++|** AVT - ADVANCE TIMERS. 04834 M00S04394.1tm +++|* 04835 M00S04395.1tm +++|* EXIT (HS) = NONZERO IF 1/2 SECOND ELAPSED. 04836 M00S04396.1tm +++|* = CLEARED BETWEEN 1/2 SECOND CYCLES. 04837 M00S04397.1tm +++|* (IT) = DECREMENTED BY ONE EACH 1/2 04838 M00S04398.1tm +++|* SECOND IF NONZERO. 04839 M00S04399.1tm +++|* 04840 M00S04400.1tm +++|* USES CM - CM+4. 04841 M00S04401.1tm +++|* 04842 M00S04402.1tm +++|* MACROS DELAY. 04843 M00S04403.1tm +++| 04844 M00S04404.1tm +++| 04845 M00S04405.1tm +++| AVT SUBR ENTRY/EXIT 04846 M00S04406.1tm +++| AVT1 LDK RTCL READ REAL-TIME CLOCK 04847 M00S04407.1tm +++| CRD CM 04848 M00S04408.1tm +++| LDD CM+4 CHECK CYCLE TIME 04849 M00S04409.1tm +++| SBM AVTA 04850 M00S04410.1tm +++| PJN AVT2 IF NO OVERFLOW 04851 M00S04411.1tm +++| ADC 10000 04852 M00S04412.1tm +++| AVT2 SBK MNCT 04853 M00S04413.1tm +++| PJN AVT3 IF MINIMUM CYCLE TIME ELAPSED 04854 M00S04414.1tm +++| DELAY 04855 M00S04415.1tm +++| UJN AVT1 LOOP 04856 M00S04416.1tm +++| 04857 M00S04417.1tm +++| AVT3 LDD CM+4 UPDATE MSECS BITS 11-0 04858 M00S04418.1tm +++| STM AVTA 04859 M00S04419.1tm +++| SHN -11 CHECK INTERVAL 04860 M00S04420.1tm +++| SHN 17 04861 M00S04421.1tm +++| LMD CM+3 04862 M00S04422.1tm +++| SHN 3 04863 M00S04423.1tm +++| LPC 7777 04864 M00S04424.1tm +++| SBM AVTB CHECK MSECS BITS 20-9 04865 M00S04425.1tm +++| ZJN AVT4 IF NO CHANGE 04866 M00S04426.1tm +++| RAM AVTB UPDATE MSECS BITS 20-9 04867 M00S04427.1tm +++| LDN 1 04868 M00S04428.1tm +++| AVT4 STD HS SET/CLEAR HALF-SECOND FLAG 04869 M00S04429.1tm +++| ZJN AVT5 IF NOT 1/2 SECOND INTERVAL 04870 M00S04430.1tm +++| LDD IT CHECK 1/2 SECOND TIMER 04871 M00S04431.1tm +++| ZJN AVT5 IF ZERO 04872 M00S04432.1tm +++| SOD IT DECREMENT TIMER 04873 M00S04433.1tm +++| AVT5 UJP AVTX RETURN 04874 M00S04434.1tm +++| 04875 M00S04435.1tm +++| 04876 M00S04436.1tm +++| AVTA CON 0 PREVIOUS REAL-TIME MSECS (BITS 11-0) 04877 M00S04437.1tm +++| AVTB CON 0 PREVIOUS REAL-TIME MSECS (BITS 20-9) 04878 M00S04438.1tm +++| BUP SPACE 4,15 04879 M00S04439.1tm +++|** BUP - BACK UP POINTERS. 04880 M00S04440.1tm +++|* 04881 M00S04441.1tm +++|* BACKS UP THE CURRENT CHARACTER, CURRENT WORD, 04882 M00S04442.1tm +++|* AND CURRENT POT POINTERS TO THE IMMEDIATELY 04883 M00S04443.1tm +++|* PRECEDING CHARACTER POSITION. 04884 M00S04444.1tm +++|* 04885 M00S04445.1tm +++|* EXIT (DP+1) = NEW CURRENT POT. 04886 M00S04446.1tm +++|* (DP+2) = NEW CURRENT WORD AND CHARACTER. 04887 M00S04447.1tm +++|* 04888 M00S04448.1tm +++|* USES T5, T6. 04889 M00S04449.1tm +++|* 04890 M00S04450.1tm +++|* CALLS RLT. 04891 M00S04451.1tm +++| 04892 M00S04452.1tm +++| 04893 M00S04453.1tm +++| BUP5 SOD DP+2 DECREMENT CHARACTER NUMBER 04894 M00S04454.1tm +++| 04895 M00S04455.1tm +++| BUP SUBR ENTRY/EXIT 04896 M00S04456.1tm +++| LDD DP+2 CHECK CHARACTER NUMBER 04897 M00S04457.1tm +++| LPN 17 04898 M00S04458.1tm +++| NJN BUP5 IF NOT FIRST CHARACTER OF WORD 04899 M00S04459.1tm +++| LDD DP+1 CHECK CURRENT POT 04900 M00S04460.1tm +++| LMD DP 04901 M00S04461.1tm +++| NJN BUP2 IF NOT FIRST POT 04902 M00S04462.1tm +++| LDD DP+2 CHECK WORD NUMBER 04903 M00S04463.1tm +++| SHN 5 04904 M00S04464.1tm +++| LMD DP+2 04905 M00S04465.1tm +++| LPC 7000 04906 M00S04466.1tm +++| ZJN BUPX IF FIRST WORD 04907 M00S04467.1tm +++| BUP1 LCN 20-11 DECREMENT WORD NUMBER, SET LAST CHARACTER 04908 M00S04468.1tm +++| RAD DP+2 04909 M00S04469.1tm +++| UJN BUPX 04910 M00S04470.1tm +++| 04911 M00S04471.1tm +++| BUP2 LDD DP+2 CHECK CURRENT WORD 04912 M00S04472.1tm +++| LPC 160 04913 M00S04473.1tm +++| NJN BUP1 IF NOT FIRST WORD OF POT 04914 M00S04474.1tm +++| LDD DP+1 SAVE CURRENT POT 04915 M00S04475.1tm +++| STD T6 04916 M00S04476.1tm +++| LDD DP SET FIRST POT 04917 M00S04477.1tm +++| BUP3 STD DP+1 04918 M00S04478.1tm +++| RJM RLT READ LINK TABLE 04919 M00S04479.1tm +++| LMD T6 04920 M00S04480.1tm +++| ZJN BUP4 IF CURRENT POT REACHED 04921 M00S04481.1tm +++| LMD T6 SET NEXT POT 04922 M00S04482.1tm +++| UJN BUP3 LOOP 04923 M00S04483.1tm +++| 04924 M00S04484.1tm +++| BUP4 LDD DP+2 SET LAST WORD, LAST CHARACTER 04925 M00S04485.1tm +++| LPC 7000 04926 M00S04486.1tm +++| LMC 371 SET *POT REQUESTED* 04927 M00S04487.1tm +++| STD DP+2 04928 M00S04488.1tm +++| LJM BUPX RETURN 04929 M00S04489.1tm +++| CCQ SPACE 4,15 04930 M00S04490.1tm +++|** CCQ - CHECK CIRCULAR REQUEST QUEUE. 04931 M00S04491.1tm +++|* 04932 M00S04492.1tm +++|* CHECKS THE DRIVER CIRCULAR REQUEST QUEUE FOR 04933 M00S04493.1tm +++|* AMOUNT OF FREE SPACE REMAINING AND RECALLS THE 04934 M00S04494.1tm +++|* CPU IF THE QUEUE IS MORE THAN HALF FULL. 04935 M00S04495.1tm +++|* 04936 M00S04496.1tm +++|* USES CM - CM+4. 04937 M00S04497.1tm +++|* 04938 M00S04498.1tm +++|* MACROS LDCDQ, MONITOR. 04939 M00S04499.1tm +++| 04940 M00S04500.1tm +++| 04941 M00S04501.1tm +++| CCQ SUBR ENTRY/EXIT 04942 M00S04502.1tm +++| LDCDQ 3 READ CIRCULAR QUEUE *OUT* POINTER 04943 M00S04503.1tm +++| CRD CM 04944 M00S04504.1tm +++| LDD IN+3 CHECK *IN* - *OUT* 04945 M00S04505.1tm +++| SBD CM+3 04946 M00S04506.1tm +++| SHN 14 04947 M00S04507.1tm +++| ADD IN+4 04948 M00S04508.1tm +++| SBD CM+4 04949 M00S04509.1tm +++| PJN CCQ1 IF *IN* .GE. *OUT*
| Line S04510 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 04950 M01S04510.242l642 ---| ADC VDSL 04951 M01S04511.242l642 ---| CCQ1 ADC -VDSL/2
| Line S00313 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | 1tm11 |
Seq # *Modification Id* Act ----------------------------+ 04952 M02S00313.1tm11 ---| ADD HN 04953 M02S00314.1tm11 ---| ERRNZ VDSL-100 *VDSL* CHANGED
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 1tm11 |
Seq # *Modification Id* Act ----------------------------+ 04954 M01S00001.1tm11 +++| ADK VDSL
| Line S00315 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 04955 M01S00315.242l642 +++| CCQ1 SBK VDSL/2 04956 M00S04512.1tm +++| MJN CCQX IF QUEUE .LE. HALF FULL 04957 M00S04513.1tm +++| MONITOR RCLM RECALL CPU 04958 M00S04514.1tm +++| UJN CCQX RETURN 04959 M00S04515.1tm +++| CEF SPACE 4,15 04960 M00S04516.1tm +++|** CEF - CHECK ERROR FLAG. 04961 M00S04517.1tm +++|* 04962 M00S04518.1tm +++|* CHECKS CPU ERROR FLAG. IF SET, DROPS EQUIPMENT 04963 M00S04519.1tm +++|* AND CHANNEL AND DROPS THE PPU. 04964 M00S04520.1tm +++|* 04965 M00S04521.1tm +++|* EXIT TO *DPP* IF ERROR FLAG SET. 04966 M00S04522.1tm +++|* 04967 M00S04523.1tm +++|* USES CM - CM+4. 04968 M00S04524.1tm +++| 04969 M00S04525.1tm +++| 04970 M00S04526.1tm +++| CEF SUBR ENTRY/EXIT 04971 M00S04527.1tm +++| LDD CP READ CP STATUS WORD 04972 M00S04528.1tm +++| ADK STSW 04973 M00S04529.1tm +++| CRD CM 04974 M00S04530.1tm +++| LDD CM+1 CHECK ERROR FLAG 04975 M00S04531.1tm +++| ZJN CEFX IF NO ERROR FLAG 04976 M00S04532.1tm +++| LJM DPP DROP PPU 04977 M00S04533.1tm +++| CEM SPACE 4,15 04978 M00S04534.1tm +++|** CEM - CLEAR EXTENDED TRANSMISSION MODE. 04979 M00S04535.1tm +++|* 04980 M00S04536.1tm +++|* SET/RESET EXTENDED TRANSMISSION MODE DEPENDING 04981 M00S04537.1tm +++|* UPON MODE IN *VDCT*. 04982 M00S04538.1tm +++|* 04983 M00S04539.1tm +++|* EXIT (A) = (DP+3). 04984 M00S04540.1tm +++|* (DP+3) = EXTENDED MODE CLEARED OR SET. 04985 M00S04541.1tm +++| 04986 M00S04542.1tm +++| 04987 M00S04543.1tm +++| CEM SUBR ENTRY/EXIT 04988 M00S04544.1tm +++| LDD DP+3 CLEAR EXTENDED MODE 04989 M00S04545.1tm +++| SCN 2 04990 M00S04546.1tm +++| STD DP+3 04991 M00S04547.1tm +++| LDD DC GET TERMINAL STATUS 04992 M00S04548.1tm +++| SHN 1-3 SET EXTENDED/NORMAL MODE 04993 M00S04549.1tm +++| LPN 2 04994 M00S04550.1tm +++| RAD DP+3 04995 M00S04551.1tm +++| UJN CEMX RETURN 04996 M00S04552.1tm +++| CIT SPACE 4,15 04997 M00S04553.1tm +++|** CIT - CHECK FOR INACTIVITY TIME-OUT. 04998 M00S04554.1tm +++|* 04999 M00S04555.1tm +++|* ENTRY (IR+3) = REAL-TIME CLOCK (SECONDS) AT START 05000 M00S04556.1tm +++|* OF DRIVER INACTIVITY TIME-OUT. 05001 M00S04557.1tm +++|* 05002 M00S04558.1tm +++|* EXIT (A) = NONZERO IF DRIVER TIMED-OUT. 05003 M00S04559.1tm +++|* = ZERO IF NOT TIMED-OUT. 05004 M00S04560.1tm +++|* 05005 M00S04561.1tm +++|* USES CM - CM+4. 05006 M00S04562.1tm +++| 05007 M00S04563.1tm +++| 05008 M00S04564.1tm +++| CIT SUBR ENTRY/EXIT 05009 M00S04565.1tm +++| LDK SSTL READ SUBSYSTEM CONTROL WORD 05010 M00S04566.1tm +++| CRD CM 05011 M00S04567.1tm +++| LDD CM+3 CHECK *RDF* STATUS 05012 M00S04568.1tm +++| SHN 21-10 05013 M00S04569.1tm +++| PJN CIT2 IF *RDF* IN DEDICATED STATUS 05014 M00S04570.1tm +++| LDK RTCL READ REAL-TIME CLOCK 05015 M00S04571.1tm +++| CRD CM 05016 M00S04572.1tm +++| LDD CM+1 CHECK ELAPSED TIME 05017 M00S04573.1tm +++| SBD IR+3 05018 M00S04574.1tm +++| PJN CIT1 IF NO ROLLOVER 05019 M00S04575.1tm +++| ADC 10000 05020 M00S04576.1tm +++| CIT1 SBK INATIO SUBTRACT TIME-OUT INTERVAL 05021 M00S04577.1tm +++| MJN CIT2 IF INTERVAL NOT EXCEEDED 05022 M00S04578.1tm +++| LDN 77 (A) STATUS = TIMED-OUT 05023 M00S04579.1tm +++| UJN CITX RETURN 05024 M00S04580.1tm +++| 05025 M00S04581.1tm +++| CIT2 LDN 0 (A) STATUS = NOT TIMED-OUT 05026 M00S04582.1tm +++| UJN CITX RETURN 05027 M00S04583.1tm +++| CMF SPACE 4,15 05028 M00S04584.1tm +++|** CMF - CHECK *RDF* STATUS. 05029 M00S04585.1tm +++|* 05030 M00S04586.1tm +++|* CHECKS TO SEE THAT *RDF* IS ENABLED. IF NOT, 05031 M00S04587.1tm +++|* ISSUE ERROR LOG MESSAGE AND EXIT TO *ERR*. 05032 M00S04588.1tm +++|* 05033 M00S04589.1tm +++|* EXIT RETURN TO CALLER IF *RDF* ENABLED. 05034 M00S04590.1tm +++|* TO *ERR* IF *RDF* DISABLED - 05035 M00S04591.1tm +++|* ERROR LOG MESSAGE ISSUED. 05036 M00S04592.1tm +++|* (A) = ADDRESS OF DAYFILE MESSAGE. 05037 M00S04593.1tm +++|*
| Line S04594 Modification History | |
|---|---|
M01 (Removed by) | v22l602 |
Seq # *Modification Id* Act ----------------------------+ 05038 M01S04594.v22l602 ---|* USES CM - CM+4.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | v22l602 |
Seq # *Modification Id* Act ----------------------------+ 05039 M01S00002.v22l602 +++|* USES T1, CM - CM+4. 05040 M00S04595.1tm +++|* 05041 M00S04596.1tm +++|* CALLS DFM. 05042 M00S04597.1tm +++| 05043 M00S04598.1tm +++| 05044 M00S04599.1tm +++| CMF SUBR ENTRY/EXIT
| Line S04600 Modification History | |
|---|---|
M01 (Removed by) | v22l602 |
Seq # *Modification Id* Act ----------------------------+ 05045 M01S04600.v22l602 ---| LDK SSTL READ SUBSYSTEM CONTROL WORD 05046 M01S04601.v22l602 ---| CRD CM 05047 M01S04602.v22l602 ---| LDD CM+3 CHECK *RDF* STATUS 05048 M01S04603.v22l602 ---| SHN 21-6 05049 M01S04604.v22l602 ---| PJN CMFX IF *RDF* NOT DISABLED
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | v22l602 |
Seq # *Modification Id* Act ----------------------------+ 05050 M01S00003.v22l602 +++| LDK SSSL READ SUBSYSTEM STATUS 05051 M01S00004.v22l602 +++| CRD CM 05052 M01S00005.v22l602 +++| LDM CMFB+1 SET MASK 05053 M01S00006.v22l602 +++| STM CMFC 05054 M01S00007.v22l602 +++| LDM CMFB GET *SSSL* BYTE NUMBER 05055 M01S00008.v22l602 +++| STD T1 05056 M01S00009.v22l602 +++| LDM CM,T1 READ BYTE 05057 M01S00010.v22l602 +++| LPC ** 05058 M01S00011.v22l602 +++| CMFC EQU *-1 (*RDF* MASK BIT) 05059 M01S00012.v22l602 +++| ZJN CMFX IF *RDF* NOT DISABLED
| Line S04605 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05060 M01S04605.242l642 ---| LDC CMFA+3+ERLN ISSUE ERROR LOG MESSAGE 05061 M01S04606.242l642 ---| RJM DFM 05062 M01S04607.242l642 ---| LDC CMFA 05063 M01S04608.242l642 ---| JMP ERR EXIT TO ERROR PROCESSOR 05064 M01S04609.242l642 ---| 05065 M01S04610.242l642 ---| 05066 M01S04611.242l642 ---| CMFA DATA C* 1TM - RDF TERMINATED.*
| Line S00316 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05067 M01S00316.242l642 +++| LDN MTER * RDF TERMINATED.* 05068 M01S00317.242l642 +++| JMP IMT ISSUE MESSAGE AND TERMINATE
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | v22l602 |
Seq # *Modification Id* Act ----------------------------+ 05069 M01S00013.v22l602 +++| 05070 M01S00014.v22l602 +++|* CALCULATE *SSSL* BYTE AND MASK FOR *RDF*. 05071 M01S00015.v22l602 +++| 05072 M01S00016.v22l602 +++| .1 SET MXSI-RDSI 05073 M01S00017.v22l602 +++| .2 SET .1/12D 05074 M01S00018.v22l602 +++| .3 SET 4-.2 05075 M01S00019.v22l602 +++| .4 DECMIC .1-12D*.2 05076 M01S00020.v22l602 +++| .5 SET 1S".4" 05077 M01S00021.v22l602 +++| 05078 M01S00022.v22l602 +++| CMFB CON .3 *SSSL* BYTE NUMBER 05079 M01S00023.v22l602 +++| CON .5 *SSSL* MASK 05080 M00S04612.1tm +++| CUT SPACE 4,15 05081 M00S04613.1tm +++|** CUT - CLEAN UP TERMINAL TABLE. 05082 M00S04614.1tm +++|* 05083 M00S04615.1tm +++|* CLEARS ALL INFORMATION FROM THE TERMINAL TABLE OF THE 05084 M00S04616.1tm +++|* LOGGED OUT USER, LEAVING VROT SET COMPLETE. 05085 M00S04617.1tm +++|* 05086 M00S04618.1tm +++|* EXIT TERMINAL TABLE WORDS ZEROED OUT. (VROT), BIT 05087 M00S04619.1tm +++|* ZERO, SET. 05088 M00S04620.1tm +++|* 05089 M00S04621.1tm +++|* USES T0 - T5. 05090 M00S04622.1tm +++|* 05091 M00S04623.1tm +++|* CALLS STA. 05092 M00S04624.1tm +++| 05093 M00S04625.1tm +++| 05094 M00S04626.1tm +++| CUT SUBR ENTRY/EXIT 05095 M00S04627.1tm +++| LDN ZERL 05096 M00S04628.1tm +++| CRD T0 05097 M00S04629.1tm +++| LDN 0 05098 M00S04630.1tm +++| STD T5 05099 M00S04631.1tm +++| CUT1 RJM STA SET FWA OF TERMINAL TABLE 05100 M00S04632.1tm +++| ADD T5 05101 M00S04633.1tm +++| CWD T0 CLEAR OUT TERMINAL TABLE 05102 M00S04634.1tm +++| AOD T5 05103 M00S04635.1tm +++| SBN VTTL 05104 M00S04636.1tm +++| NJN CUT1 IF MORE WORDS TO CLEAR 05105 M00S04637.1tm +++| AOD T4 SET COMPLETE BIT IN VROT 05106 M00S04638.1tm +++| RJM STA SET FWA OF TERMINAL TABLE 05107 M00S04639.1tm +++| ADN VROT WRITE *VROT* 05108 M00S04640.1tm +++| CWD T0 05109 M00S04641.1tm +++| UJN CUTX EXIT 05110 M00S04642.1tm +++| CWA SPACE 4,15 05111 M00S04643.1tm +++|** CWA - SET DRIVER CONTROL WORD ADDRESS. 05112 M00S04644.1tm +++|* 05113 M00S04645.1tm +++|* RETURNS THE ABSOLUTE CM ADDRESS OF THE DRIVER CONTROL
| Line S04646 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05114 M01S04646.242l642 ---|* WORD WITHIN *RAF* FIELD LENGTH.
| Line S00318 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05115 M01S00318.242l642 +++|* WORD WITHIN *RDF* FIELD LENGTH. 05116 M00S04647.1tm +++|* 05117 M00S04648.1tm +++|* ENTRY (IR+4) = DRIVER CONTROL WORD POINTER. 05118 M00S04649.1tm +++|* 05119 M00S04650.1tm +++|* EXIT (A) = CM ADDRESS OF DRIVER CONTROL WORD. 05120 M00S04651.1tm +++| 05121 M00S04652.1tm +++| 05122 M00S04653.1tm +++| CWA SUBR ENTRY/EXIT 05123 M00S04654.1tm +++| LDD RA SET CM ADDRESS 05124 M00S04655.1tm +++| SHN 6 05125 M00S04656.1tm +++| ADD IR+4 ADD DRIVER CONTROL WORD POINTER 05126 M00S04657.1tm +++| UJN CWAX RETURN 05127 M00S04658.1tm +++| DCE SPACE 4,15 05128 M00S04659.1tm +++|** DCE - DROP CHANNEL AND EQUIPMENT. 05129 M00S04660.1tm +++|*
| Line S04661 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05130 M01S04661.242l642 ---|* ENTRY (EQ) = BIT 2**9 SET IF CHANNEL AND 05131 M01S04662.242l642 ---|* EQUIPMENT RESERVED.
| Line S00319 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05132 M01S00319.242l642 +++|* ENTRY (EQ) = BIT 2**9 SET IF EQUIPMENT RESERVED. 05133 M00S04663.1tm +++|* 05134 M00S04664.1tm +++|* EXIT CHANNEL AND EQUIPMENT DROPPED. 05135 M00S04665.1tm +++|* (EQ) = BIT 2**9 RESET. 05136 M00S04666.1tm +++|* 05137 M00S04667.1tm +++|* USES CM - CM+4. 05138 M00S04668.1tm +++|*
| Line S04669 Modification History | |
|---|---|
M01 (Removed by) | ns2149 |
Seq # *Modification Id* Act ----------------------------+ 05139 M01S04669.ns2149 ---|* MACROS CHTE, DCHAN, MONITOR.
| Line S00045 Modification History | |
|---|---|
M01 (Added by) | ns2149 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05140 M02S00045.242l642 ---|* CALLS RTM.
| Line S00320 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05141 M01S00320.242l642 +++|* CALLS CLR, RTM.
| Line S00046 Modification History | |
|---|---|
M01 (Added by) | ns2149 |
Seq # *Modification Id* Act ----------------------------+ 05142 M01S00046.ns2149 +++|* 05143 M01S00047.ns2149 +++|* MACROS DCHAN, MONITOR. 05144 M00S04670.1tm +++| 05145 M00S04671.1tm +++|
| Line S04672 Modification History | |
|---|---|
M01 (Removed by) | ns2149 |
Seq # *Modification Id* Act ----------------------------+ 05146 M01S04672.ns2149 ---| DCE SUBR ENTRY EXIT
| Line S00048 Modification History | |
|---|---|
M01 (Added by) | ns2149 |
Seq # *Modification Id* Act ----------------------------+ 05147 M01S00048.ns2149 +++| DCE SUBR ENTRY/EXIT 05148 M00S04673.1tm +++| LDD EQ CHECK EQUIPMENT 05149 M00S04674.1tm +++| SBD TH 05150 M00S04675.1tm +++| MJN DCEX IF NOT RESERVED 05151 M00S04676.1tm +++| STD EQ CLEAR BIT 2**9 05152 M00S04677.1tm +++| STD CM+1 DROP EQUIPMENT 05153 M00S04678.1tm +++| MONITOR DEQM
| Line S04679 Modification History | |
|---|---|
M01 (Removed by) | ns2149 |
Seq # *Modification Id* Act ----------------------------+ 05154 M01S04679.ns2149 ---| LDN MC DROP MULTIPLEXER CHANNEL 05155 M01S04680.ns2149 ---| CHTE *-1
| Line S00049 Modification History | |
|---|---|
M01 (Added by) | ns2149 |
Seq # *Modification Id* Act ----------------------------+ 05156 M01S00049.ns2149 +++| LDN MX DROP MULTIPLEXER CHANNEL 05157 M00S04681.1tm +++| DCHAN
| Line S00050 Modification History | |
|---|---|
M01 (Added by) | ns2149 |
Seq # *Modification Id* Act ----------------------------+ 05158 M01S00050.ns2149 +++| RJM RTM RELEASE TERMINAL ON MULTIPLEXER
| Line S00321 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05159 M01S00321.242l642 +++| RJM CLR CLEAR LAST REQUEST 05160 M00S04682.1tm +++| UJN DCEX RETURN 05161 M00S04683.1tm +++| DDC SPACE 4,20 05162 M00S04684.1tm +++|** DDC - DETERMINE DELAY COUNT. 05163 M00S04685.1tm +++|* 05164 M00S04686.1tm +++|* DETERMINES THE TERMINAL NULL CHARACTER (*NUL* OR 05165 M00S04687.1tm +++|* *DEL*) COUNT BASED UPON THE DELAY COUNT IN THE 05166 M00S04688.1tm +++|* USER'S TERMINAL TABLE AND UPON THE DEFAULT COUNT 05167 M00S04689.1tm +++|* PRESENTED TO THE ROUTINE. IF THERE IS NO COUNT 05168 M00S04690.1tm +++|* DEFINED IN THE TERMINAL TABLE, THE DEFAULT COUNT 05169 M00S04691.1tm +++|* WILL BE USED. 05170 M00S04692.1tm +++|* 05171 M00S04693.1tm +++|* ENTRY (A) = DEFAULT COUNT. 05172 M00S04694.1tm +++|* 05173 M00S04695.1tm +++|* EXIT (A) = DELAY COUNT. 05174 M00S04696.1tm +++| 05175 M00S04697.1tm +++| 05176 M00S04698.1tm +++| DDC SUBR ENTRY/EXIT 05177 M00S04699.1tm +++| STD T0 SAVE DEFAULT COUNT 05178 M00S04700.1tm +++| LDD DC+1 GET USER DELAY COUNT 05179 M00S04701.1tm +++| SHN -3 05180 M00S04702.1tm +++| LPN 37 05181 M00S04703.1tm +++| ZJN DDC1 IF NO USER DELAY COUNT DEFINED 05182 M00S04704.1tm +++| STD T0 05183 M00S04705.1tm +++| DDC1 LDD T0 GET DELAY COUNT 05184 M00S04706.1tm +++| UJN DDCX RETURN 05185 M00S04707.1tm +++| DPP SPACE 4,15 05186 M00S04708.1tm +++|** DPP - DROP PPU. 05187 M00S04709.1tm +++|* 05188 M00S04710.1tm +++|* DROPS CHANNEL AND EQUIPMENT, SIGNALS DRIVER SHUTDOWN
| Line S04711 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05189 M01S04711.242l642 ---|* TO *RAF*, AND DROPS THE PPU.
| Line S00322 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05190 M01S00322.242l642 +++|* TO *RDF*, AND DROPS THE PPU. 05191 M00S04712.1tm +++|* 05192 M00S04713.1tm +++|* EXIT TO *PPR*. 05193 M00S04714.1tm +++|* 05194 M00S04715.1tm +++|* CALLS DCE, SDS. 05195 M00S04716.1tm +++|* 05196 M00S04717.1tm +++|* MACROS MONITOR. 05197 M00S04718.1tm +++| 05198 M00S04719.1tm +++| 05199 M00S04720.1tm +++| DPP BSS 0 ENTRY 05200 M00S04721.1tm +++| RJM DCE DISCONNECT CHANNEL AND EQUIPMENT 05201 M00S04722.1tm +++| RJM SDS SIGNAL DRIVER SHUTDOWN 05202 M00S04723.1tm +++| MONITOR DPPM DROP PPU 05203 M00S04724.1tm +++| LJM PPR EXIT TO PPU RESIDENT
| Line S04725 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05204 M01S04725.242l642 ---| DTO SPACE 4,15 05205 M01S04726.242l642 ---|** DTO - PROCESS DRIVER TIME-OUT. 05206 M01S04727.242l642 ---|* 05207 M01S04728.242l642 ---|* ENTERED WHEN DRIVER HAS TIMED-OUT BECAUSE OF NO 05208 M01S04729.242l642 ---|* LINE ACTIVITY. ISSUES ERROR LOG MESSAGE, THEN 05209 M01S04730.242l642 ---|* EXITS TO *ERR* TO ISSUE DAYFILE MESSAGE AND TO 05210 M01S04731.242l642 ---|* DROP THE PPU WITHOUT RECALL. 05211 M01S04732.242l642 ---|* 05212 M01S04733.242l642 ---|* EXIT TO *ERR* - 05213 M01S04734.242l642 ---|* ERROR LOG MESSAGE ISSUED. 05214 M01S04735.242l642 ---|* (A) = ADDRESS OF DAYFILE MESSAGE. 05215 M01S04736.242l642 ---|* 05216 M01S04737.242l642 ---|* CALLS DFM. 05217 M01S04738.242l642 ---| 05218 M01S04739.242l642 ---| 05219 M01S04740.242l642 ---| DTO BSS 0 ENTRY
| Line S04741 Modification History | |
|---|---|
M01 (Removed by) | ns2149 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05220 M02S04741.242l642 ---| LDC DTOA+3+ERLN * RDF TIMOUT.*
| Line S00051 Modification History | |
|---|---|
M01 (Added by) | ns2149 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05221 M02S00051.242l642 ---| LDC DTOA+3+ERLN * RDF TIME-OUT.*
| Line S04742 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05222 M01S04742.242l642 ---| RJM DFM ISSUE ERROR LOG MESSAGE 05223 M01S04743.242l642 ---| LDC DTOA * 1TM - RDF TIME-OUT.* 05224 M01S04744.242l642 ---| LJM ERR ENTER ERROR PROCESSOR 05225 M01S04745.242l642 ---| 05226 M01S04746.242l642 ---| 05227 M01S04747.242l642 ---| DTOA DATA C* 1TM - RDF TIME-OUT.* 05228 M00S04748.1tm +++| ERQ SPACE 4,20 05229 M00S04749.1tm +++|** ERQ - ENTER CIRCULAR REQUEST QUEUE. 05230 M00S04750.1tm +++|* 05231 M00S04751.1tm +++|* ERQ IS USED TO PLACE AN ENTRY IN THE DRIVER CIRCULAR REQUEST
| Line S04752 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05232 M01S04752.242l642 ---|* QUEUE FOR *RAF* TO PROCESS.
| Line S00323 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05233 M01S00323.242l642 +++|* QUEUE FOR *RDF* TO PROCESS. 05234 M00S04753.1tm +++|* 05235 M00S04754.1tm +++|* ENTRY (A) = REQUEST CODE. 05236 M00S04755.1tm +++|* (RQ+1 - RQ+3) = PARAMETERS. 05237 M00S04756.1tm +++|* (TN) = TERMINAL NUMBER. 05238 M00S04757.1tm +++|* 05239 M00S04758.1tm +++|* EXIT IN UPDATED. 05240 M00S04759.1tm +++|* (A) = 0. 05241 M00S04760.1tm +++|* (RQ+1 - RQ+3) = 0. 05242 M00S04761.1tm +++|* 05243 M00S04762.1tm +++|* USES IN+3, IN+4, RQ - RQ+3. 05244 M00S04763.1tm +++|* 05245 M00S04764.1tm +++|* MACROS LDCDQ, LMCDQ. 05246 M00S04765.1tm +++| 05247 M00S04766.1tm +++| 05248 M00S04767.1tm +++| ERQ1 AOD IN+4 ADVANCE IN 05249 M00S04768.1tm +++| SHN -14 05250 M00S04769.1tm +++| RAD IN+3 ADD OVERFLOW 05251 M00S04770.1tm +++| ERQ2 LDCDQ 2 UPDATE IN 05252 M00S04771.1tm +++| CWD IN 05253 M00S04772.1tm +++| LDN 0 EXIT ERQ WITH A=0 05254 M00S04773.1tm +++| STD RQ+1 CLEAR REQUEST BUFFER 05255 M00S04774.1tm +++| STD RQ+2 05256 M00S04775.1tm +++| STD RQ+3 05257 M00S04776.1tm +++| 05258 M00S04777.1tm +++|* ERQ - ENTRY. 05259 M00S04778.1tm +++| 05260 M00S04779.1tm +++| ERQ SUBR ENTRY/EXIT 05261 M00S04780.1tm +++| ADC 2000 ADD FUNCTION BIAS 05262 M00S04781.1tm +++| STD RQ 05263 M00S04782.1tm +++| LDD IN+3 ENTER REQUEST 05264 M00S04783.1tm +++| SHN 6 05265 M00S04784.1tm +++| ADD RA 05266 M00S04785.1tm +++| SHN 6 05267 M00S04786.1tm +++| ADD IN+4 05268 M00S04787.1tm +++| CWD RQ 05269 M00S04788.1tm +++| LMCDQ 4+VDSL 05270 M00S04789.1tm +++| NJN ERQ1 IF *IN* NOT EQUAL TO LIMIT-1 05271 M00S04790.1tm +++| LDCDQ 1 RESET IN = FIRST 05272 M00S04791.1tm +++| CRD IN 05273 M00S04792.1tm +++| UJN ERQ2
| Line S04793 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05274 M01S04793.242l642 ---| ERR SPACE 4,15 05275 M01S04794.242l642 ---|** ERR - PROCESS DRIVER ERROR. 05276 M01S04795.242l642 ---|* 05277 M01S04796.242l642 ---|* ISSUES DAYFILE MESSAGE, IF REQUIRED, AND 05278 M01S04797.242l642 ---|* TERMINATES DRIVER. 05279 M01S04798.242l642 ---|* 05280 M01S04799.242l642 ---|* ENTRY (A) = ADDRESS OF DAYFILE MESSAGE IF NONZERO. 05281 M01S04800.242l642 ---|* 05282 M01S04801.242l642 ---|* EXIT TO *DPP*. 05283 M01S04802.242l642 ---|*
| Line S04803 Modification History | |
|---|---|
M01 (Removed by) | ns2149 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05284 M02S04803.242l642 ---|* CALLS DFM.
| Line S00052 Modification History | |
|---|---|
M01 (Added by) | ns2149 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05285 M02S00052.242l642 ---|* CALLS DFM, O2D.
| Line S04804 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05286 M01S04804.242l642 ---|
| Line S00053 Modification History | |
|---|---|
M01 (Added by) | ns2149 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05287 M02S00053.242l642 ---| 05288 M02S00054.242l642 ---|* ENTER HERE ON FUNCTION TIME-OUT ERROR. 05289 M02S00055.242l642 ---|* (A) = FUNCTION CODE. 05290 M02S00056.242l642 ---| 05291 M02S00057.242l642 ---| FTER BSS 0 FUNCTION TIME-OUT ERROR 05292 M02S00058.242l642 ---| STM ERRA SAVE FUNCTION CODE 05293 M02S00059.242l642 ---| 05294 M02S00060.242l642 ---|* FORMAT EST ORDINAL INTO DAYFILE MESSAGE. 05295 M02S00061.242l642 ---| 05296 M02S00062.242l642 ---| LDD EQ CONVERT UPPER 3 BITS 05297 M02S00063.242l642 ---| SHN -6 05298 M02S00064.242l642 ---| LPN 7 05299 M02S00065.242l642 ---| ADC 2RM0 05300 M02S00066.242l642 ---| STM ERRB+4 05301 M02S00067.242l642 ---| LDD EQ CONVERT LOWER 6 BITS 05302 M02S00068.242l642 ---| RJM O2D 05303 M02S00069.242l642 ---| STM ERRB+5 05304 M02S00070.242l642 ---| 05305 M02S00071.242l642 ---|* FORMAT CHANNEL AND PORT NUMBERS INTO DAYFILE MESSAGE. 05306 M02S00072.242l642 ---| 05307 M02S00073.242l642 ---| LDN MX CONVERT CHANNEL NUMBER 05308 M02S00074.242l642 ---| RJM O2D 05309 M02S00075.242l642 ---| STM ERRB+7 05310 M02S00076.242l642 ---| LDD PN CONVERT PORT NUMBER 05311 M02S00077.242l642 ---| RJM O2D 05312 M02S00078.242l642 ---| STM ERRB+11 05313 M02S00079.242l642 ---| 05314 M02S00080.242l642 ---|* FORMAT FUNCTION CODE INTO DAYFILE MESSAGE. 05315 M02S00081.242l642 ---| 05316 M02S00082.242l642 ---| LDC * CONVERT UPPER TWO DIGITS 05317 M02S00083.242l642 ---| ERRA EQU *-1 05318 M02S00084.242l642 ---| SHN -6 05319 M02S00085.242l642 ---| RJM O2D 05320 M02S00086.242l642 ---| STM ERRB+13 05321 M02S00087.242l642 ---| LDM ERRA CONVERT LOWER TWO DIGITS 05322 M02S00088.242l642 ---| RJM O2D 05323 M02S00089.242l642 ---| STM ERRB+14 05324 M02S00090.242l642 ---| 05325 M02S00091.242l642 ---|* ISSUE ERROR LOG MESSAGE AND EXIT TO ERROR PROCESSOR. 05326 M02S00092.242l642 ---| 05327 M02S00093.242l642 ---| LDC ERRB+3+ERLN 05328 M02S00094.242l642 ---| RJM DFM ISSUE ERROR LOG MESSAGE 05329 M02S00095.242l642 ---| LDC ERRB SET ADDRESS OF DAYFILE MESSAGE 05330 M02S00096.242l642 ---|* UJN ERR ISSUE DAYFILE MESSAGE
| Line S04805 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 05331 M01S04805.242l642 ---|
Proceed to Part 3
cdc/nos2.source/opl.opl871/deck/1tm.002.txt · Last modified: (external edit)