Action unknown: copypageplugin__copy
cdc:nos2.source:opl.opl871:deck:1ri.001
Deck 1RI Part 001
15 Modifications
Listing Sections
- Deck 1RI Start
- Deck 1RI Part 1 (Line 1493)
- Deck 1RI Part 2 (Line 2977)
Source
Seq # *Modification Id* Act ----------------------------+
| Line S00202 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01493 M02S00202.273l780 ---|* 01494 M02S00203.273l780 ---|* MACROS LCPA.
| Line S00204 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01495 M01S00204.271l716 +++| 01496 M01S00205.271l716 +++| 01497 M01S00206.271l716 +++| RPC SUBR ENTRY/EXIT
| Line S00207 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01498 M02S00207.273l780 ---| LCPA TFSW,T6
| Line S00032 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01499 M01S00032.273l780 +++| TLDC TFSW,PCAD
| Line S00208 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01500 M01S00208.271l716 +++| CRD CM 01501 M01S00209.271l716 +++| LDN 0 CLEAR PCP ASSIGNMENT 01502 M01S00210.271l716 +++| STD CM
| Line S00211 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01503 M02S00211.273l780 ---| LCPA STSW,T6
| Line S00033 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01504 M01S00033.273l780 +++| TLDC STSW,PCAD
| Line S00212 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01505 M01S00212.271l716 +++| CWD ZR CLEAR PP/PCP ASSIGNMENT 01506 M01S00213.271l716 +++| ADK TFSW-STSW 01507 M01S00214.271l716 +++| CWD CM 01508 M01S00215.271l716 +++| UJP RPCX RETURN
| Line S01206 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01509 M01S01206.273l780 ---| SNS SPACE 4,15
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01510 M01S00034.273l780 +++| SNS SPACE 4,20 01511 M00S01207.1ri +++|** SNS - SEND NOTIFICATION OF ROLLIN TO SCP. 01512 M00S01208.1ri +++|* 01513 M00S01209.1ri +++|* *SNS* NOTIFIES A PARTICULAR SCP TYPE SUBSYSTEM THAT A USER 01514 M00S01210.1ri +++|* JOB (UCP) HAS ROLLED IN. THIS RESPONSE OCCURS AS A RESULT 01515 M00S01211.1ri +++|* OF A PREVIOUS *SF.SWPI* FUNCTION ISSUED FROM A SYSTEM 01516 M00S01212.1ri +++|* CONTROL POINT (SCP). 01517 M00S01213.1ri +++|*
| Line S01214 Modification History | |
|---|---|
M01 (Removed by) | 1ri27 |
Seq # *Modification Id* Act ----------------------------+ 01518 M01S01214.1ri27 ---|* ENTRY (CJSB - CJSB+4) = *SCHE* WORD OF EJT ENTRY.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 1ri27 |
Seq # *Modification Id* Act ----------------------------+ 01519 M01S00002.1ri27 +++|* ENTRY (A) = REPLY CODE.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 1ri27 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01520 M02S00003.273l780 ---|* (CJSB - CJSB+4) = *SCHE* WORD OF EJT ENTRY.
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01521 M01S00035.273l780 +++|* (CJSC - CJSC+4) = SUBSYSTEM PARAMETERS. 01522 M00S01215.1ri +++|* *SCHE* FORMAT IS 30/,18/ ADDR,12/ SSID 01523 M00S01216.1ri +++|* ADDR = ADDRESS OF COMPLETION BIT WORD 01524 M00S01217.1ri +++|* SSID = SUBSYSTEM IDENTIFICATION NUMBER. 01525 M00S01218.1ri +++|* (EO) = EJT ORDINAL. 01526 M00S01219.1ri +++|* 01527 M00S01220.1ri +++|* USES T1, EF, CM - CM+4. 01528 M00S01221.1ri +++|*
| Line S01222 Modification History | |
|---|---|
M01 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01529 M01S01222.273l780 ---|* MACROS DELAY, MONITOR, SFA.
| Line S00036 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01530 M01S00036.273l780 +++|* MACROS DELAY, MONITOR PAUSE, SFA. 01531 M00S01223.1ri +++| 01532 M00S01224.1ri +++| 01533 M00S01225.1ri +++| SNS SUBR ENTRY/EXIT
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 1ri27 |
Seq # *Modification Id* Act ----------------------------+ 01534 M01S00004.1ri27 +++| SHN 6 SAVE REPLY CODE 01535 M01S00005.1ri27 +++| STM SNSA 01536 M01S00006.1ri27 +++| NJN SNS1 IF ERROR RESPONSE 01537 M00S01226.1ri +++| LDD CP READ SCP CONTROL WORD 01538 M00S01227.1ri +++| ADK SSCW 01539 M00S01228.1ri +++| CRD CM 01540 M00S01229.1ri +++| LDN 5 INITIALIZE BYTE INDEX 01541 M00S01230.1ri +++| STD T1 01542 M00S01231.1ri +++| SNS0.1 SOD T1 01543 M00S01232.1ri +++| MJN SNSX IF SUBSYSTEM NOT FOUND 01544 M00S01233.1ri +++| LDM CM,T1 CHECK NEXT BYTE 01545 M00S01234.1ri +++| SHN -6 01546 M00S01235.1ri +++| ADC LSSI CALCULATE SUBSYSTEM ID
| Line S01236 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01547 M01S01236.271l716 ---| LMM CJSB+4
| Line S00216 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01548 M01S00216.271l716 +++| LMM CJSC+4 01549 M00S01237.1ri +++| NJN SNS0.1 IF NOT THIS SUBSYSTEM 01550 M00S01238.1ri +++| LDM CM,T1 CLEAR ROLLOUT ALLOWABLE FLAG 01551 M00S01239.1ri +++| SCN 20 01552 M00S01240.1ri +++| STM CM,T1 01553 M00S01241.1ri +++| LDD CP 01554 M00S01242.1ri +++| ADC SSCW 01555 M00S01243.1ri +++| CWD CM 01556 M00S01244.1ri +++| 01557 M00S01245.1ri +++|* ISSUE *TDAM* FUNCTION TO SET COMPLETION BIT. 01558 M00S01246.1ri +++|
| Line S01247 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01559 M01S01247.271l716 ---| SNS1 LDM CJSB+4 SET SUBSYSTEM ID FOR *TDAM*
| Line S00217 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01560 M01S00217.271l716 +++| SNS1 LDM CJSC+4 SET SUBSYSTEM ID FOR *TDAM* 01561 M00S01248.1ri +++| STD CM+2
| Line S01249 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01562 M01S01249.271l716 ---| LDM CJSB+3 SET COMPLETION BIT ADDRESS FOR *TDAM*
| Line S00218 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01563 M01S00218.271l716 +++| LDM CJSC+3 SET COMPLETION BIT ADDRESS FOR *TDAM* 01564 M00S01250.1ri +++| STD CM+4
| Line S01251 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01565 M01S01251.271l716 ---| LDM CJSB+2
| Line S00219 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01566 M01S00219.271l716 +++| LDM CJSC+2 01567 M00S01252.1ri +++| LPN 77
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | 1ri27 |
Seq # *Modification Id* Act ----------------------------+ 01568 M01S00007.1ri27 +++| LMC ** 01569 M01S00008.1ri27 +++| SNSA EQU *-1 01570 M00S01253.1ri +++| STD CM+3 01571 M00S01254.1ri +++| LDN 2 SET *TDAM* SUBFUNCTION 01572 M00S01255.1ri +++| STD CM+1 01573 M00S01256.1ri +++| MONITOR TDAM 01574 M00S01257.1ri +++| LDD CM+1 01575 M00S01258.1ri +++| ZJN SNS3 IF NO REJECT 01576 M00S01259.1ri +++| SBN 4 01577 M00S01260.1ri +++| ZJN SNS3 IF SCP INACTIVE 01578 M00S01261.1ri +++| PJN SNS2 IF INCORRECT COMPLETION ADDRESS 01579 M00S01262.1ri +++| PAUSE ST 01580 M00S01263.1ri +++| DELAY 01581 M00S01264.1ri +++| SFA EJT,EO READ ERROR FLAG WORD OF EJT ENTRY 01582 M00S01265.1ri +++| ADN PRFE 01583 M00S01266.1ri +++| CRD CM 01584 M00S01267.1ri +++| LDD CM+1 01585 M00S01268.1ri +++| LMN ORET 01586 M00S01269.1ri +++| ZJN SNS3 IF OPERATOR INTERVENTION 01587 M00S01270.1ri +++| LJM SNS1 REISSUE REQUEST 01588 M00S01271.1ri +++| 01589 M00S01272.1ri +++| SNS2 LDN ITET SET INCORRECT TRANSFER ADDRESS ERROR FLAG 01590 M00S01273.1ri +++| SBD EF 01591 M00S01274.1ri +++| MJN SNS3 IF LARGER ERROR FLAG ALREADY SET 01592 M00S01275.1ri +++| LDN ITET SET INCORRECT TRANSFER ADDRESS ERROR FLAG 01593 M00S01276.1ri +++| STD EF 01594 M00S01277.1ri +++| SNS3 LJM SNSX RETURN 01595 M00S01278.1ri +++| SYS SPACE 4,10 01596 M00S01279.1ri +++|** SYS - READ SYSTEM SECTOR. 01597 M00S01280.1ri +++|* 01598 M00S01281.1ri +++|* ENTRY I/O SEQUENCE INITIATED. 01599 M00S01282.1ri +++|* 01600 M00S01283.1ri +++|* USES T7. 01601 M00S01284.1ri +++|* 01602 M00S01285.1ri +++|* CALLS MSR, RNS. 01603 M00S01286.1ri +++|* 01604 M00S01287.1ri +++|* ERROR TO *MSR* IF INVALID SYSTEM SECTOR. 01605 M00S01288.1ri +++| 01606 M00S01289.1ri +++| 01607 M00S01290.1ri +++| SYS SUBR ENTRY 01608 M00S01291.1ri +++| LDC SBUF-2 READ SYSTEM SECTOR 01609 M00S01292.1ri +++| RJM RNS 01610 M00S01293.1ri +++| LDN FSMS SET FIRST SECTOR 01611 M00S01294.1ri +++| STD T7 01612 M00S01295.1ri +++| LDD T1 CHECK WORD COUNT 01613 M00S01296.1ri +++| LMN 77 01614 M00S01297.1ri +++| NJN SYS1 IF NOT SYSTEM SECTOR 01615 M00S01298.1ri +++| LDI T3 01616 M00S01299.1ri +++| LMC 3777
| Line S01300 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01617 M01S01300.271l716 ---| ZJN SYSX IF VALID SYSTEM SECTOR
| Line S00220 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01618 M01S00220.271l716 +++| NJN SYS1 IF NOT VALID SYSTEM SECTOR 01619 M01S00221.271l716 +++| LDM SBUF+TYSS*5+4 01620 M01S00222.271l716 +++| SHN -6
| Line S00223 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2685 |
Seq # *Modification Id* Act ----------------------------+ 01621 M02S00223.ns2685 ---| SYSA LMN ROFT 01622 M02S00224.ns2685 ---|* LMN LOFT (*DMP=* ROLLIN) 01623 M02S00225.ns2685 ---| ZJN SYSX IF CORRECT FILE TYPE
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2685 |
Seq # *Modification Id* Act ----------------------------+ 01624 M01S00002.ns2685 +++| LMN ROFT 01625 M01S00003.ns2685 +++| NJN SYS1 IF NOT ROLLOUT FILE 01626 M01S00004.ns2685 +++| LDM SBUF+DMFA 01627 M01S00005.ns2685 +++| SYSA ZJN SYSX IF NOT DM* ROLLOUT FILE (NORMAL ROLLIN) 01628 M01S00006.ns2685 +++|* NJN SYSX IF DM* ROLLOUT FILE (*DMP=* ROLLIN) 01629 M00S01301.1ri +++| SYS1 RJM MSR PROCESS ERROR - NO RETURN 01630 M00S01302.1ri +++| RJM HNG HANG PP
| Line S00226 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01631 M01S00226.271l716 +++| TCP SPACE 4,10 01632 M01S00227.271l716 +++|** TCP - TRANSFER PCPA TO CPA. 01633 M01S00228.271l716 +++|*
| Line S00229 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01634 M02S00229.273l780 ---|* ENTRY (T6) = PCP NUMBER. 01635 M02S00230.273l780 ---|* 01636 M02S00231.273l780 ---|* MACROS LCPA.
| Line S00037 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01637 M01S00037.273l780 +++|* EXIT CONTROL POINT AREA SET FROM PCP.
| Line S00232 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01638 M01S00232.271l716 +++| 01639 M01S00233.271l716 +++| 01640 M01S00234.271l716 +++| TCP SUBR ENTRY/EXIT
| Line S00235 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01641 M02S00235.273l780 ---| LCPA 0,T6 COMPUTE PCPA ADDRESS
| Line S00038 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01642 M01S00038.273l780 +++| TLDC 0,PCAD COMPUTE PCPA ADDRESS
| Line S00236 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01643 M01S00236.271l716 +++| CRM CBUF,HN READ FIRST HALF OF PCPA 01644 M01S00237.271l716 +++| CRM BFMS+2,HN READ SECOND HALF OF PCPA 01645 M01S00238.271l716 +++| LDD CP WRITE SECOND HALF OF PCPA TO CPA 01646 M01S00239.271l716 +++| ADD HN 01647 M01S00240.271l716 +++| CWM BFMS+2,HN 01648 M01S00241.271l716 +++| UJN TCPX RETURN 01649 M00S01303.1ri +++| UEP SPACE 4,10 01650 M00S01304.1ri +++|** UEP - UPDATE EXCHANGE PACKAGE. 01651 M00S01305.1ri +++|* 01652 M00S01306.1ri +++|* ENTRY (RA) = ADJUSTED RA. 01653 M00S01307.1ri +++|* (FL) = ADJUSTED CM FL. 01654 M00S01308.1ri +++| 01655 M00S01309.1ri +++| 01656 M00S01310.1ri +++| UEP SUBR ENTRY/EXIT
| Line S01311 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01657 M01S01311.271l716 ---| LDD CP READ *FLSW* AND *FLSW+1* 01658 M01S01312.271l716 ---| ADN FLSW 01659 M01S01313.271l716 ---| CRM CBUF+5*FLSW,TW 01660 M01S01314.271l716 ---| ADN ECSW-FLSW-2 01661 M01S01315.271l716 ---| CRM CBUF+5*ECSW,ON
| Line S00242 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01662 M01S00242.271l716 +++| LDD CP READ FIELD LENGTH CONTROL WORDS 01663 M01S00243.271l716 +++| ADK FLSW 01664 M01S00244.271l716 +++| CRM CBUF+5*FLSW,TR 01665 M01S00245.271l716 +++| ERRNZ ECSW-FLSW-2 CODE DEPENDS ON VALUE 01666 M00S01316.1ri +++| LDM CBUF+5*FLSW+3 SET RA IN EXCHANGE PACKAGE 01667 M00S01317.1ri +++| SHN 6 01668 M00S01318.1ri +++| STM CBUF+5*1+1 01669 M00S01319.1ri +++| LMM CBUF+5*FLSW+2 01670 M00S01320.1ri +++| SHN 6 01671 M00S01321.1ri +++| STM CBUF+5*1 01672 M00S01322.1ri +++| LDD FL STORE FL IN EXCHANGE PACKAGE 01673 M00S01323.1ri +++| SHN 6 01674 M00S01324.1ri +++| STM CBUF+5*2+1 01675 M00S01325.1ri +++| SHN -14 01676 M00S01326.1ri +++| STM CBUF+5*2 01677 M00S01327.1ri +++| LDM CBUF+5*3 ENSURE MONITOR MODE NOT SET (CYBER 176) 01678 M00S01328.1ri +++| LPC 7627 01679 M00S01329.1ri +++| STM CBUF+5*3 01680 M00S01330.1ri +++| LDM CBUF+5*ECSW+4 01681 M00S01331.1ri +++| ZJP UEP3 IF NO EXTENDED MEMORY ASSIGNED 01682 M00S01332.1ri +++| LDK UEML READ UEM BASE ADDRESS/1000B 01683 M00S01333.1ri +++| CRD CM 01684 M00S01334.1ri +++| LDD CM+4 01685 M00S01335.1ri +++| LPN 2 01686 M00S01336.1ri +++| ZJN UEP1 IF NO UEM 01687 M00S01337.1ri +++| LDD CM 01688 M00S01338.1ri +++| UEP1 STD T0 01689 M00S01339.1ri +++| LDM CBUF+5*ECSW+2 SET RAE 01690 M00S01340.1ri +++| SHN 14 01691 M00S01341.1ri +++| ADM CBUF+5*ECSW+3 01692 M00S01342.1ri +++| UEPA SHN 0 01693 M00S01343.1ri +++|* SHN UESC (CONVERT TO 1000B-WORD BLOCKS) 01694 M00S01344.1ri +++| ADD T0 01695 M00S01345.1ri +++| SHN 17 01696 M00S01346.1ri +++| STM CBUF+5*4 01697 M00S01347.1ri +++| SHN -6 01698 M00S01348.1ri +++| SCN 77 01699 M00S01349.1ri +++| STM CBUF+5*4+1 01700 M00S01350.1ri +++| LDM CBUF+5*ECSW+4 SET FLE 01701 M00S01351.1ri +++| UEPB SHN 17 01702 M00S01352.1ri +++|* SHN 17+UESC (ALLOW FOR USER EM SHIFT) 01703 M00S01353.1ri +++| STM CBUF+5*5 01704 M00S01354.1ri +++| SHN -6 01705 M00S01355.1ri +++| SCN 77 01706 M00S01356.1ri +++| STM CBUF+5*5+1 01707 M00S01357.1ri +++| UEPC UJN UEP3 CONTINUE (STANDARD ADDRESSING) 01708 M00S01358.1ri +++|* PSN (IF EXPANDED ADDRESSING MODE) 01709 M00S01359.1ri +++| 01710 M00S01360.1ri +++| LDM CBUF+5*4 RESET RAE 01711 M00S01361.1ri +++| SHN 14 01712 M00S01362.1ri +++| STM CBUF+5*4 01713 M00S01363.1ri +++| SCN 77 01714 M00S01364.1ri +++| ADM CBUF+5*4+1 01715 M00S01365.1ri +++| SHN -6 01716 M00S01366.1ri +++| STM CBUF+5*4+1 01717 M00S01367.1ri +++| LDM CBUF+5*5 RESET FLE 01718 M00S01368.1ri +++| SHN 14 01719 M00S01369.1ri +++| STM CBUF+5*5 01720 M00S01370.1ri +++| SCN 77 01721 M00S01371.1ri +++| ADM CBUF+5*5+1 01722 M00S01372.1ri +++| SHN -6 01723 M00S01373.1ri +++| STM CBUF+5*5+1 01724 M00S01374.1ri +++| UEP3 LDD CP STORE MA IN EXCHANGE PACKAGE 01725 M00S01375.1ri +++| STM CBUF+5*6+1 01726 M00S01376.1ri +++| STM CBUF+5*7+1 STORE EA IN EXCHANGE PACKAGE 01727 M00S01377.1ri +++| SHN -14 01728 M00S01378.1ri +++| STM CBUF+5*6 01729 M00S01379.1ri +++| STM CBUF+5*7 01730 M00S01380.1ri +++| LJM UEPX RETURN 01731 M00S01381.1ri +++| SPACE 4,10 01732 M00S01382.1ri +++|* COMMON DECKS. 01733 M00S01383.1ri +++| 01734 M00S01384.1ri +++| 01735 M00S01385.1ri +++| EOR$ EQU 0 SET TO POSITION AFTER EOR,S ON READ 01736 M00S01386.1ri +++| MSR$ EQU 0 SET FOR PROCESSSING MASS STORAGE ERRORS
| Line S00246 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01737 M01S00246.271l716 +++| LIST X 01738 M00S01387.1ri +++|*CALL COMPDDT
| Line S00247 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01739 M01S00247.271l716 +++| LIST * 01740 M00S01388.1ri +++| EJT$ EQU 1 ASSEMBLE EJT ADDRESSING (COMPGFP) 01741 M00S01389.1ri +++| IFP$ EQU 1 ASSEMBLE REMOTE INITIALIZATION (COMPGFP) 01742 M00S01390.1ri +++|*CALL COMPGFP
| Line S00248 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01743 M02S00248.273l780 ---|*CALL COMPPCP
| Line S00249 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 1ri30 |
Seq # *Modification Id* Act ----------------------------+ 01744 M02S00249.1ri30 ---|*CALL COMPRJC 01745 M00S01391.1ri +++|*CALL COMPRNS 01746 M00S01392.1ri +++| USE OVERLAY 01747 M00S01393.1ri +++| SPACE 4,10 01748 M00S01394.1ri +++|** BUFFER ASIGNMENTS. 01749 M00S01395.1ri +++| 01750 M00S01396.1ri +++| 01751 M00S01397.1ri +++| SBUF EQU *+2 SYSTEM SECTOR 01752 M00S01398.1ri +++| CBUF EQU SBUF+502 FIRST PART OF CONTROL POINT AREA 01753 M00S01399.1ri +++| EJBF EQU CBUF+502 EJT ENTRY 01754 M00S01400.1ri +++| EBUF EQU EJBF+5*EJTE 01755 M00S01401.1ri +++| E1RI EQU EBUF+5 OVERLAYS ORIGIN 01756 M00S01402.1ri +++| TITLE PRESET. 01757 M00S01403.1ri +++| PRS SPACE 4,25 01758 M00S01404.1ri +++|** PRS - PRESET. 01759 M00S01405.1ri +++|* 01760 M00S01406.1ri +++|* EXIT (T5) = ROLLOUT/DM* FILE EQUIPMENT. 01761 M00S01407.1ri +++|* (T6) = ROLLOUT/DM* FILE FIRST TRACK.
| Line S00250 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01762 M02S00250.273l780 ---|* = PCP NUMBER IF PSEUDO-ROLLIN. 01763 M00S01408.1ri +++|* (T7) = 0. 01764 M00S01409.1ri +++|* (DI) = *UJNI*+2.
| Line S00251 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01765 M01S00251.271l716 +++|* (PR) = 0 IF PSEUDO-ROLLIN. 01766 M00S01410.1ri +++|* (TW) = 2. 01767 M00S01411.1ri +++|* (ZR - ZR+4) = 0. 01768 M00S01412.1ri +++|* (EO) = EJT ORDINAL (NON-DMP= CALL). 01769 M00S01413.1ri +++|* (EJBF - EJBF+5*EJTE-1) = EJT ENTRY (NON-DMP= CALL). 01770 M00S01414.1ri +++|* (EF) = ERROR FLAG FROM EJT (NON-DMP= CALL) / CPA 01771 M00S01415.1ri +++|* (DMP= CALL). 01772 M00S01416.1ri +++|* (EP) = SPECIAL ENTRY POINT FLAGS. 01773 M00S01417.1ri +++|* (FA) = DM* FILE FNT ADDRESS/OFFSET (DMP= CALL).
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01774 M02S00024.271l750 ---|* (RCPH) = SERVICE CLASS UPPER BOUND CPU PRIORITY. 01775 M00S01418.1ri +++|* 01776 M00S01419.1ri +++|* USES T1, T5 - T7, CM - CM+4, CN - CN+4, FS - FS+4, EO, DI, 01777 M00S01420.1ri +++|* EF, EP, FA, ZR - ZR+4. 01778 M00S01421.1ri +++|*
| Line S01422 Modification History | |
|---|---|
M01 (Removed by) | 1ri30 |
Seq # *Modification Id* Act ----------------------------+ 01779 M01S01422.1ri30 ---|* CALLS IFP, 3RG, 3RH.
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01780 M02S00025.273l780 ---|* CALLS IFP, RJC, 3RG, 3RH.
| Line S00039 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01781 M01S00039.273l780 +++|* CALLS IFP, SIC, 3RG, 3RH. 01782 M00S01423.1ri +++|*
| Line S01424 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01783 M01S01424.271l716 ---|* MACROS CFI, EXECUTE, NFA, SFA.
| Line S00252 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01784 M02S00252.273l780 ---|* MACROS CFI, DELAY, EXECUTE, IPCP, ISTORE, NFA, SFA.
| Line S00040 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01785 M01S00040.273l780 +++|* MACROS CFI, DELAY, EXECUTE, ISTORE, NFA, SFA, SIC. 01786 M00S01425.1ri +++| 01787 M00S01426.1ri +++| 01788 M00S01427.1ri +++| PRS SUBR ENTRY/EXIT
| Line S01428 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01789 M01S01428.271l716 ---| LDK MEFL
| Line S00253 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01790 M01S00253.271l716 +++| RJM IFP INITIALIZE ROUTINE *CEA* OF *COMPGFP* 01791 M01S00254.271l716 +++| LDC UJNI+2 01792 M01S00255.271l716 +++| STD DI 01793 M01S00256.271l716 +++| LDN 2 SET CONSTANT 2 01794 M01S00257.271l716 +++| STD TW 01795 M01S00258.271l716 +++| LDN ZERL CLEAR CM ZERO WORD 01796 M01S00259.271l716 +++| CRD ZR 01797 M01S00260.271l716 +++| LDD CP 01798 M01S00261.271l716 +++| ADK TFSW GET EJT ORDINAL 01799 M01S00262.271l716 +++| CRD CM 01800 M01S00263.271l716 +++| ADK SEPW-TFSW 01801 M01S00264.271l716 +++| CRD CN 01802 M01S00265.271l716 +++| ADK TSCW-SEPW SAVE *TSCW* 01803 M01S00266.271l716 +++| CRM RCPF,ON 01804 M01S00267.271l716 +++| LDN EJTE 01805 M01S00268.271l716 +++| STD T1 01806 M01S00269.271l716 +++| LDD CM SAVE EJT ORDINAL 01807 M01S00270.271l716 +++| STD EO 01808 M01S00271.271l716 +++| SFA EJT,EO READ EJT ENTRY 01809 M01S00272.271l716 +++| CRM EJBF,T1
| Line S00273 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01810 M02S00273.273l780 ---| LDM EJBF+5*PRFE+1 SAVE ERROR FLAG
| Line S00041 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01811 M01S00041.273l780 +++| LDM EJBF+5*JSNE+4 SET PSEUDO-ROLLIN FLAG 01812 M01S00042.273l780 +++| LPN 76 01813 M01S00043.273l780 +++| LMK PCJS*2 01814 M01S00044.273l780 +++| STD PR 01815 M01S00045.273l780 +++| NJN PRS0.1 IF NOT PSEUDO-ROLLIN 01816 M01S00046.273l780 +++| LDK NCPL GET NUMBER OF CONTROL POINTS 01817 M01S00047.273l780 +++| CRD T1 01818 M01S00048.273l780 +++| ADK PCPP-NCPL GET PCP AREA POINTER 01819 M01S00049.273l780 +++| CRD CM 01820 M01S00050.273l780 +++| LDM EJBF+5*SCHE+1 PCP NUMBER 01821 M01S00051.273l780 +++| SBD T1+1 01822 M01S00052.273l780 +++| SBN 2 01823 M01S00053.273l780 +++| SHN 7 PCP AREA OFFSET 01824 M01S00054.273l780 +++| RAD CM+4 SET PCP ADDRESS 01825 M01S00055.273l780 +++| SHN -14 01826 M01S00056.273l780 +++| RAD CM+3 01827 M01S00057.273l780 +++| LDC TSIC SET INSTRUCTION RELOCATION TABLE ADDRESS 01828 M01S00058.273l780 +++| RJM SIC RELOCATE INSTRUCTIONS 01829 M01S00059.273l780 +++| PRS0.1 LDM EJBF+5*PRFE+1 SAVE ERROR FLAG
| Line S00274 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01830 M01S00274.271l716 +++| STD EF
| Line S00275 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01831 M02S00275.273l780 ---| LDD CP STORE CP NUMBER IN *RCXM* REQUEST 01832 M02S00276.273l780 ---| SHN -7 01833 M02S00277.273l780 ---| STM JECB+2
| Line S00278 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01834 M01S00278.271l716 +++| LDK MEFL 01835 M00S01429.1ri +++| CRD CM 01836 M00S01430.1ri +++| LDD CM+2 GET USER EM SHIFT COUNT (UESC) 01837 M00S01431.1ri +++| SHN -11 01838 M00S01432.1ri +++| RAM JECC 01839 M00S01433.1ri +++| STM UEPA 01840 M00S01434.1ri +++| ADN 17 01841 M00S01435.1ri +++| STM UEPB 01842 M00S01436.1ri +++| LDD CM+2
| Line S01437 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01843 M01S01437.271l716 ---| LPC 200 01844 M01S01438.271l716 ---| ZJP PRS0 IF STANDARD ADDRESSING MODE
| Line S00279 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01845 M01S00279.271l716 +++| SHN 21-7 01846 M01S00280.271l716 +++| PJN PRS1 IF STANDARD ADDRESSING MODE 01847 M00S01439.1ri +++| LDN PSNI 01848 M00S01440.1ri +++| STM UEPC ENABLE EXPANDED ADDRESSING MODE
| Line S01441 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01849 M01S01441.271l716 ---| PRS0 RJM IFP INITIALIZE ROUTINE *CEA* OF *COMPGFP* 01850 M01S01442.271l716 ---| LDC UJNI+2 01851 M01S01443.271l716 ---| STD DI 01852 M01S01444.271l716 ---| LDN 2 SET CONSTANT 2 01853 M01S01445.271l716 ---| STD TW 01854 M01S01446.271l716 ---| LDN ZERL CLEAR CM ZERO WORD 01855 M01S01447.271l716 ---| CRD ZR 01856 M01S01448.271l716 ---| LDD CP 01857 M01S01449.271l716 ---| ADK TFSW READ EJT ORDINAL WORD 01858 M01S01450.271l716 ---| CRD CM 01859 M01S01451.271l716 ---| ADK SEPW-TFSW 01860 M01S01452.271l716 ---| CRD CN 01861 M01S01453.271l716 ---| ADK TSCW-SEPW SAVE *TSCW* 01862 M01S01454.271l716 ---| CRM RCPF,ON 01863 M01S01455.271l716 ---| LDN EJTE SET EJT ENTRY LENGTH 01864 M01S01456.271l716 ---| STD T1 01865 M01S01457.271l716 ---| LDD CM SAVE EJT ORDINAL 01866 M01S01458.271l716 ---| STD EO 01867 M01S01459.271l716 ---| SFA EJT,EO 01868 M01S01460.271l716 ---| CRM EJBF,T1 01869 M01S01461.271l716 ---| LDD CN SAVE SPECIAL ENTRY POINT FLAGS
| Line S00281 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01870 M01S00281.271l716 +++| PRS1 LDD CN SAVE SPECIAL ENTRY POINT FLAGS 01871 M00S01462.1ri +++| STD EP
| Line S01463 Modification History | |
|---|---|
M01 (Removed by) | ns2738 |
Seq # *Modification Id* Act ----------------------------+ 01872 M01S01463.ns2738 ---| LDD IR+2
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | ns2738 |
Seq # *Modification Id* Act ----------------------------+ 01873 M01S00010.ns2738 +++| LDN ACPL CHECK DUAL CPU AVAILABILITY 01874 M01S00011.ns2738 +++| CRD CM 01875 M01S00012.ns2738 +++| ADN 1 01876 M01S00013.ns2738 +++| CRD FS 01877 M01S00014.ns2738 +++| LDD CM 01878 M01S00015.ns2738 +++| LMD FS 01879 M01S00016.ns2738 +++| SHN 6 01880 M01S00017.ns2738 +++| MJN PRS1.1 IF ONLY ONE CPU AVAILABLE 01881 M01S00018.ns2738 +++| ISTORE PCSA,(UJN PCSX) SET TO PRESERVE CPU SELECTION 01882 M01S00019.ns2738 +++| PRS1.1 LDD IR+2
| Line S01464 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01883 M01S01464.271l716 ---| ZJN PRS1 IF NOT DMP= CALL
| Line S00282 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01884 M01S00282.271l716 +++| ZJN PRS2 IF NOT *DMP=* CALL 01885 M00S01465.1ri +++| AOM CJSA SET *DMP=* FLAG 01886 M00S01466.1ri +++| LDD IR+4 SAVE DM* FILE FNT ADDRESS/OFFSET 01887 M00S01467.1ri +++| STD FA 01888 M00S01468.1ri +++| NFA FA,R READ DM* FILE FST ENTRY 01889 M00S01469.1ri +++| ADN FSTL 01890 M00S01470.1ri +++| CRM EJBF+5*SCHE,ON
| Line S00283 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | ns2685 |
Seq # *Modification Id* Act ----------------------------+ 01891 M02S00283.ns2685 ---| LDN LOFT-ROFT 01892 M02S00284.ns2685 ---| ERRNG LOFT-ROFT CODE DEPENDS ON VALUE 01893 M02S00285.ns2685 ---| RAM SYSA SET LOCAL FILE TYPE FOR VERIFICATION
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | ns2685 |
Seq # *Modification Id* Act ----------------------------+ 01894 M01S00007.ns2685 +++| ISTORE SYSA,(NJN SYSX) SET DM* FILE TEST
| Line S01471 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01895 M01S01471.271l716 ---| LJM PRS2 CONTINUE
| Line S00286 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01896 M01S00286.271l716 +++| LJM PRS4 CONTINUE 01897 M00S01472.1ri +++|
| Line S01473 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01898 M01S01473.271l716 ---| PRS1 LDD CP
| Line S00287 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01899 M01S00287.271l716 +++| PRS2 LDD CP
| Line S01474 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01900 M01S01474.271l716 ---| CRM CJSB,ON READ POSSIBLE *SIJS* PARAMETER
| Line S00288 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01901 M01S00288.271l716 +++| CRM CJSC,ON READ *SIJS* PARAMETERS 01902 M00S01475.1ri +++| LDM EJBF+5*JSNE+4 SAVE CONNECTION STATUS 01903 M00S01476.1ri +++| LPC 3600
| Line S01477 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01904 M01S01477.271l716 ---| SHN -1 01905 M01S01478.271l716 ---| RAM CJSC+5*0+4
| Line S00289 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01906 M01S00289.271l716 +++| RAM CJSD
| Line S01479 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01907 M01S01479.271l716 ---| LDM EJBF+5*PRFE+1 SAVE ERROR FLAG 01908 M01S01480.271l716 ---| STD EF 01909 M01S01481.271l716 ---| LDM EJBF+5*SCLE
| Line S00290 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01910 M02S00290.273l780 ---| LDM EJBF+5*JSNE+4 SET PSEUDO-ROLLIN FLAG 01911 M02S00291.273l780 ---| LPN 76 01912 M02S00292.273l780 ---| LMK PCJS*2 01913 M02S00293.273l780 ---| STD PR
| Line S00060 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01914 M01S00060.273l780 +++| LDD PR
| Line S00294 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01915 M01S00294.271l716 +++| NJP PRS3 IF NOT PSEUDO-ROLLIN
| Line S00295 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01916 M02S00295.273l780 ---| IPCP INITIALIZE *COMPPCP* ROUTINES
| Line S00296 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01917 M01S00296.271l716 +++| ISTORE RIJG,(UJN RIJ1) 01918 M01S00297.271l716 +++| LDC TCP 01919 M01S00298.271l716 +++| STM CPAI*2+SEQ+1 01920 M01S00299.271l716 +++| ISTORE TOPI*2+SEQ,(UJN RIJ2.1)
| Line S00300 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01921 M02S00300.273l780 ---| LDD DI
| Line S00061 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01922 M01S00061.273l780 +++| LDC RPC
| Line S00301 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01923 M01S00301.271l716 +++| STM CJSB 01924 M01S00302.271l716 +++| ISTORE RIJJ,(UJN RIJ3)
| Line S00303 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 01925 M02S00303.273l780 ---| LDC RJMI 01926 M02S00304.273l780 ---| STM RIJK 01927 M02S00305.273l780 ---| LDC 4000 SELECT ALTERNATE CP/PCP *JACM* OPTION 01928 M02S00306.273l780 ---| STM JECB+1 01929 M02S00307.273l780 ---| RAM RIJH 01930 M02S00308.273l780 ---| LDM EJBF+5*SCHE+1 SET PSEUDO-CONTROL POINT 01931 M02S00309.273l780 ---| STD T6 01932 M02S00310.273l780 ---| STM JECB+2 01933 M02S00311.273l780 ---| LDK NCPL SET NUMBER OF CONTROL POINTS 01934 M02S00312.273l780 ---| CRD CM 01935 M02S00313.273l780 ---| AOD CM+1 01936 M02S00314.273l780 ---| STD NC
| Line S00315 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01937 M01S00315.271l716 +++| LJM PRSX EXIT 01938 M01S00316.271l716 +++| 01939 M01S00317.271l716 +++| PRS3 LDM EJBF+5*SCLE
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01940 M02S00026.271l750 ---| SHN -6 01941 M02S00027.271l750 ---| RJM RJC GET JCB ENTRY ADDRESS 01942 M02S00028.271l750 ---| ADK SVJT GET CPU PRIORITY BOUNDS 01943 M02S00029.271l750 ---| CRD CM 01944 M02S00030.271l750 ---| LDD CM SET UPPER BOUND CPU PRIORITY 01945 M02S00031.271l750 ---| LPN 77 01946 M02S00032.271l750 ---| RAM RCPH 01947 M02S00033.271l750 ---| LDM EJBF+5*SCLE 01948 M00S01482.1ri +++| LPN 17 01949 M00S01483.1ri +++| LMN TXOT
| Line S01484 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01950 M01S01484.271l716 ---| NJN PRS2 IF NON-INTERACTIVE JOB
| Line S00318 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01951 M01S00318.271l716 +++| NJN PRS4 IF NON-INTERACTIVE JOB 01952 M00S01485.1ri +++| EXECUTE 3RH LOAD INTERACTIVE JOB PROCESSING OVERLAY 01953 M00S01486.1ri +++| LDM EJBF+5*JSNE+4 CHECK CONNECTION STATUS 01954 M00S01487.1ri +++| SHN 0-7 01955 M00S01488.1ri +++| LPN 17 01956 M00S01489.1ri +++| LMN OLCS
| Line S01490 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01957 M01S01490.271l716 ---| ZJN PRS4 IF ON-LINE INTERACTIVE JOB
| Line S00319 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01958 M01S00319.271l716 +++| ZJN PRS6 IF ON-LINE INTERACTIVE JOB 01959 M00S01491.1ri +++| LDD DI
| Line S01492 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01960 M01S01492.271l716 ---| UJN PRS3 DISABLE ON-LINE INTERACTIVE ROUTINES
| Line S00320 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01961 M01S00320.271l716 +++| UJN PRS5 DISABLE ON-LINE INTERACTIVE ROUTINES 01962 M00S01493.1ri +++|
| Line S01494 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01963 M01S01494.271l716 ---| PRS2 LDD DI DISABLE ON-LINE INTERACTIVE ROUTINES
| Line S00321 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01964 M01S00321.271l716 +++| PRS4 LDD DI DISABLE ON-LINE INTERACTIVE ROUTINES 01965 M00S01495.1ri +++| STM TOPI*2+SEQ
| Line S01496 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01966 M01S01496.271l716 ---| PRS3 STM RIJC
| Line S00322 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01967 M01S00322.271l716 +++| PRS5 STM RIJC 01968 M00S01497.1ri +++| STM RIJB 01969 M00S01498.1ri +++| STM RIJE 01970 M00S01499.1ri +++| LDD IR+2
| Line S01500 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01971 M01S01500.271l716 ---| NJN PRS5 IF DMP= CALL 01972 M01S01501.271l716 ---| PRS4 PAUSE CHECK PP COUNT 01973 M01S01502.271l716 ---| LDD CM 01974 M01S01503.271l716 ---| SBN 1 01975 M01S01504.271l716 ---| NJN PRS4 IF OTHER PP-S ASSIGNED 01976 M01S01505.271l716 ---| LJM PRS6 CONTINUE PROCESSING
| Line S00323 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01977 M01S00323.271l716 +++| NJN PRS7 IF *DMP=* CALL 01978 M01S00324.271l716 +++| PRS6 LJM PRS8 SET MASS STORAGE ADDRESS 01979 M00S01506.1ri +++|
| Line S01507 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01980 M01S01507.271l716 ---| PRS5 EXECUTE 3RG LOAD *3RG*
| Line S00325 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01981 M01S00325.271l716 +++| PRS7 EXECUTE 3RG 01982 M00S01508.1ri +++| LDC /3RG/RBFF CHANGE BUFFER ADDRESS 01983 M00S01509.1ri +++| STM CPAA 01984 M00S01510.1ri +++| LDC ** 01985 M00S01511.1ri +++| ORG *-1 01986 M00S01512.1ri +++| LOC DRFB 01987 M00S01513.1ri +++| UJN DRF2 01988 M00S01514.1ri +++| 01989 M00S01515.1ri +++| LOC *O 01990 M00S01516.1ri +++| STM DRFB 01991 M00S01517.1ri +++| LDC /3RG/RCP 01992 M00S01518.1ri +++| STM RIJD 01993 M00S01519.1ri +++| LDD DI DISABLE RA/FL ADJUSTMENT 01994 M00S01520.1ri +++| STM RIJA 01995 M00S01521.1ri +++| LDN PSNI AVOID INCLUDING NFL INCREASE ON ROLLIN 01996 M00S01522.1ri +++| STM JFLC 01997 M00S01523.1ri +++| LDD CP 01998 M00S01524.1ri +++| ADN STSW 01999 M00S01525.1ri +++| CRD CM 02000 M00S01526.1ri +++| LDD CM+1 SAVE ERROR FLAG 02001 M00S01527.1ri +++| STD EF 02002 M00S01528.1ri +++| LDD CN+2 02003 M00S01529.1ri +++| SHN 21-13
| Line S01530 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02004 M01S01530.271l716 ---| MJN PRS6 IF RESTART CALL
| Line S00326 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02005 M01S00326.271l716 +++| MJN PRS8 IF RESTART CALL 02006 M00S01531.1ri +++| AOM JFLB SET DMP= FLAG 02007 M00S01532.1ri +++| 02008 M00S01533.1ri +++|* SET ROLLOUT/DM* FILE MASS STORAGE ADDRESS. 02009 M00S01534.1ri +++|
| Line S01535 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02010 M01S01535.271l716 ---| PRS6 LDN 0 CLEAR ROLLOUT FILE SECTOR
| Line S00327 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02011 M01S00327.271l716 +++| PRS8 LDN 0 CLEAR ROLLOUT FILE SECTOR 02012 M00S01536.1ri +++| STD T7 02013 M00S01537.1ri +++| LDM EJBF+5*SCHE+1 SET ROLLOUT FILE FIRST TRACK 02014 M00S01538.1ri +++| STD T6 02015 M00S01539.1ri +++| LDM EJBF+5*SCHE SET ROLLOUT FILE EQUIPMENT 02016 M00S01540.1ri +++| STD T5 02017 M00S01541.1ri +++| SFA EST READ EST ENTRY 02018 M00S01542.1ri +++| ADK EQDE 02019 M00S01543.1ri +++| CRD CM 02020 M00S01544.1ri +++| LDD CM+4 READ WORD *DILL* OF MST ENTRY 02021 M00S01545.1ri +++| SHN 3 02022 M00S01546.1ri +++| ADN DILL 02023 M00S01547.1ri +++| CRD CM 02024 M00S01548.1ri +++| LDD CM+3 02025 M00S01549.1ri +++| SHN 21-13
| Line S01550 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02026 M01S01550.271l716 ---| PJN PRS8 IF NOT AN EXTENDED MEMORY BUFFERED DEVICE
| Line S00328 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02027 M01S00328.271l716 +++| PJN PRS12 IF NOT A BUFFERED DEVICE 02028 M00S01551.1ri +++| SHN 13-21-6 CHECK FOR UEM 02029 M00S01552.1ri +++| LPN 7 02030 M00S01553.1ri +++| LMN 4
| Line S01554 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02031 M01S01554.271l716 ---| ZJN PRS6.0 IF UEM
| Line S00329 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02032 M01S00329.271l716 +++| ZJN PRS9 IF UEM 02033 M00S01555.1ri +++| LDD CM+3 02034 M00S01556.1ri +++| LPN 7
| Line S01557 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02035 M01S01557.271l716 ---| ZJN PRS6.1 IF NO DDP PATH 02036 M01S01558.271l716 ---| PRS6.0 LDK SSTL
| Line S00330 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02037 M01S00330.271l716 +++| ZJN PRS10 IF NO DDP PATH 02038 M01S00331.271l716 +++| PRS9 LDK SSTL 02039 M00S01559.1ri +++| CRD CN 02040 M00S01560.1ri +++| LDD CN+3 02041 M00S01561.1ri +++| SHN 21-11
| Line S01562 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02042 M01S01562.271l716 ---| PJN PRS8 IF DDP ROLLOUT PATH ENABLED 02043 M01S01563.271l716 ---| PRS6.1 LDN RIDL-1 MOVE *RID* TO *RIM*
| Line S00332 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02044 M01S00332.271l716 +++| PJN PRS12 IF DDP PATH ENABLED 02045 M01S00333.271l716 +++| PRS10 LDN RIDL-1 MOVE *RID* TO *RIM* 02046 M00S01564.1ri +++| STD T1 INITIALIZE INDEX
| Line S01565 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02047 M01S01565.271l716 ---| PRS7 LDM RIDA,T1
| Line S00334 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02048 M01S00334.271l716 +++| PRS11 LDM RIDA,T1 02049 M00S01566.1ri +++| STM RIMX,T1 02050 M00S01567.1ri +++| SOD T1 DECREMENT INDEX
| Line S01568 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02051 M01S01568.271l716 ---| PJN PRS7 IF MOVE INCOMPLETE
| Line S00335 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02052 M01S00335.271l716 +++| PJN PRS11 IF MOVE INCOMPLETE 02053 M00S01569.1ri +++| LDD CM+3 02054 M00S01570.1ri +++| SHN 21-12
| Line S01571 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02055 M01S01571.271l716 ---| MJN PRS8 IF BUFFERED DEVICE
| Line S00336 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02056 M01S00336.271l716 +++| MJN PRS12 IF BUFFERED DEVICE 02057 M00S01572.1ri +++| LDC RJMI ENABLE *ENDMS* IN *JFL* 02058 M00S01573.1ri +++| STM JFLA
| Line S01574 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02059 M01S01574.271l716 ---| PRS8 LDD CP PRESET ALTERNATE RESPONSE ADDRESS 02060 M01S01575.271l716 ---| STM JECB+2
| Line S00337 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02061 M01S00337.271l716 +++| PRS12 LDD CP PRESET ALTERNATE RESPONSE ADDRESS 02062 M01S00338.271l716 +++| STM JECB+4 02063 M00S01576.1ri +++| LDN SSTL SET MEMORY CLEARING STATUS 02064 M00S01577.1ri +++| CRD CM 02065 M00S01578.1ri +++| LDD CM 02066 M00S01579.1ri +++| SHN 0-12 02067 M00S01580.1ri +++| LPN 1 02068 M00S01581.1ri +++| ADC LDNI 02069 M00S01582.1ri +++| STM AFLA 02070 M00S01583.1ri +++| STM CSMC 02071 M00S01584.1ri +++| LJM PRSX RETURN 02072 M00S01585.1ri +++| RID SPACE 4,15 02073 M00S01586.1ri +++|** RID - ROLLIN USING DIRECT TRANSFER TO CM. 02074 M00S01587.1ri +++|* 02075 M00S01588.1ri +++|* ENTRY (A) = LWA TO ROLLIN. 02076 M00S01589.1ri +++|* (CI) = FWA TO ROLLIN. 02077 M00S01590.1ri +++|* (T4) = CHANNEL. 02078 M00S01591.1ri +++|* (T5) = EQUIPMENT. 02079 M00S01592.1ri +++|* (T6) = CURRENT TRACK. 02080 M00S01593.1ri +++|* (T7) = CURRENT SECTOR. 02081 M00S01594.1ri +++|* 02082 M00S01595.1ri +++|* EXIT TO *MSR* IF MASS STORAGE ERROR 02083 M00S01596.1ri +++|* 02084 M00S01597.1ri +++|* USES CM - CM+4. 02085 M00S01598.1ri +++|* 02086 M00S01599.1ri +++|* CALLS DDT. 02087 M00S01600.1ri +++| 02088 M00S01601.1ri +++| 02089 M00S01602.1ri +++| RIDA EQU * 02090 M00S01603.1ri +++| LOC RIMX 02091 M00S01604.1ri +++| 02092 M00S01605.1ri +++| RID SUBR ENTRY/EXIT 02093 M00S01606.1ri +++| STD CM 02094 M00S01607.1ri +++| SBD FL 02095 M00S01608.1ri +++| MJN RID1 IF LWA .LT. FL 02096 M00S01609.1ri +++| LDD FL SET LWA .EQ. FL 02097 M00S01610.1ri +++| STD CM 02098 M00S01611.1ri +++| RID1 LDD CI SET RELATIVE CM ADDRESS 02099 M00S01612.1ri +++| SHN 6 02100 M00S01613.1ri +++| STD CM+4 02101 M00S01614.1ri +++| SHN -14 02102 M00S01615.1ri +++| STD CM+3 02103 M00S01616.1ri +++| LDD CM SET SECTOR COUNT 02104 M00S01617.1ri +++| SBD CI 02105 M00S01618.1ri +++| LMC /CPS/RDDS*10000 SET READ FUNCTION 02106 M00S01619.1ri +++| RJM DDT READ DIRECT TO CM 02107 M00S01620.1ri +++| PJN RIDX IF NO READ ERRORS 02108 M00S01621.1ri +++| RJM MSR PROCESS ERROR - NO RETURN 02109 M00S01622.1ri +++| RJM HNG HANG PP 02110 M00S01623.1ri +++| 02111 M00S01624.1ri +++| LOC *O 02112 M00S01625.1ri +++| RIDL EQU *-RIDA LENGTH OF *RID* 02113 M00S01626.1ri +++| 02114 M00S01627.1ri +++| ERRNG RIML-RIDL ROUTINE *RID* OVERFLOWS *RIM* 02115 M00S01628.1ri +++| SPACE 4,10
| Line S00062 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02116 M01S00062.273l780 +++|** PRESET COMMON DECKS. 02117 M01S00063.273l780 +++| 02118 M01S00064.273l780 +++| 02119 M01S00065.273l780 +++|*CALL COMPSIC 02120 M01S00066.273l780 +++| SPACE 4,10
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02121 M02S00034.271l750 ---|** PRESET COMMON DECKS. 02122 M02S00035.271l750 ---| 02123 M02S00036.271l750 ---| 02124 M02S00037.271l750 ---|*CALL COMPRJC 02125 M02S00038.271l750 ---| SPACE 4,10 02126 M00S01629.1ri +++| IFP HERE
| Line S00067 Modification History | |
|---|---|
M01 (Added by) | 273l780 |
Seq # *Modification Id* Act ----------------------------+ 02127 M01S00067.273l780 +++| TSIC SPACE 4,10 02128 M01S00068.273l780 +++|** INSTRUCTION RELOCATION TABLE AND ASSOCIATED DATA. 02129 M01S00069.273l780 +++| 02130 M01S00070.273l780 +++| 02131 M01S00071.273l780 +++| PCAD EQU CM+3 PCP ADDRESS 02132 M01S00072.273l780 +++| 02133 M01S00073.273l780 +++| TSIC BSS 0 INSTRUCTION RELOCATION TABLE 02134 M01S00074.273l780 +++| LIST D 02135 M01S00075.273l780 +++| SIC HERE 02136 M01S00076.273l780 +++| LIST * 02137 M01S00077.273l780 +++| CON 0 TERMINATE ENTRIES 02138 M00S01630.1ri +++| SPACE 4,10
| Line S01631 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02139 M01S01631.271l716 ---|* OVERFLOW CHECKS.
| Line S00339 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02140 M01S00339.271l716 +++|* CHECK FOR OVERFLOW. 02141 M00S01632.1ri +++|
| Line S01633 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02142 M01S01633.271l716 ---| USE OVERFLOW 02143 M01S01634.271l716 ---| OVERFLOW
| Line S00340 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02144 M01S00340.271l716 +++| 02145 M01S00341.271l716 +++| OVERFLOW PPFW,EPFW 02146 M00S01635.1ri +++| TTL 1RI/3RJ - PROCESS DELAYED *ALTER* FUNCTIONS. 02147 M00S01636.1ri +++| TITLE 02148 M00S01637.1ri +++| QUAL 3RJ 02149 M00S01638.1ri +++| IDENT 3RJ,E1RI PROCESS DELAYED *ALTER* FUNCTIONS. 02150 M00S01639.1ri +++| BASE M
| Line S01640 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02151 M01S01640.271l716 ---| LIST F,X 02152 M00S01641.1ri +++| SST 02153 M00S01642.1ri +++|*COMMENT 1RI - PROCESS DELAYED *ALTER* FUNCTIONS.
| Line S01643 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 02154 M01S01643.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1982.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 02155 M01S00002.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 02156 M00S01644.1ri +++| ORG E1RI 02157 M00S01645.1ri +++| 3RJ SPACE 4,15 02158 M00S01646.1ri +++|** PGA - PROCESS DELAYED *ALTER* FUNCTIONS. 02159 M00S01647.1ri +++|* 02160 M00S01648.1ri +++|* ENTRY (ZR - ZR+4) = 0. 02161 M00S01649.1ri +++|* 02162 M00S01650.1ri +++|* USES T4 - T7, CM - CM+4, CN - CN+4. 02163 M00S01651.1ri +++|* 02164 M00S01652.1ri +++|* CALLS CHG, DFM. 02165 M00S01653.1ri +++|* 02166 M00S01654.1ri +++|* MACROS MONITOR. 02167 M00S01655.1ri +++| 02168 M00S01656.1ri +++| 02169 M00S01657.1ri +++| PGA SUBR ENTRY/EXIT 02170 M00S01658.1ri +++| LDM SBUF+QBSS 02171 M00S01659.1ri +++| STD T7 02172 M00S01660.1ri +++| LDN 5 02173 M00S01661.1ri +++| STD T4 02174 M00S01662.1ri +++| LCN 0 INITIALIZE FUNCTION INDEX 02175 M00S01663.1ri +++| STD T5 02176 M00S01664.1ri +++| PGA1 AOD T5 INCREMENT FUNCTION INDEX 02177 M00S01665.1ri +++| LDD T7 02178 M00S01666.1ri +++| ZJN PGAX IF ALL FUNCTIONS WERE PROCESSED 02179 M00S01667.1ri +++| SHN 21-0 02180 M00S01668.1ri +++| STD T7 02181 M00S01669.1ri +++| PJN PGA1 IF FUNCTION NOT SELECTED 02182 M00S01670.1ri +++| LDM TGAP,T5 SET PROCESSOR ADDRESS 02183 M00S01671.1ri +++| NJN PGA2 IF PROCESSOR EXISTS FOR FUNCTION 02184 M00S01672.1ri +++| RJM CHG CONDITIONAL HANG 02185 M00S01673.1ri +++| UJN PGA1 PROCESS NEXT FUNCTION 02186 M00S01674.1ri +++| 02187 M00S01675.1ri +++| PGA2 STD T6 02188 M00S01676.1ri +++| LJM 0,T6 ENTER FUNCTION PROCESSOR 02189 M00S01677.1ri +++| 02190 M00S01678.1ri +++|* DAYFILE MESSAGE PROCESSOR. 02191 M00S01679.1ri +++| 02192 M00S01680.1ri +++| PGA3 LDC SBUF+QBSS+1*5 ISSUE MESSAGE 02193 M00S01681.1ri +++| RJM DFM 02194 M00S01682.1ri +++| PGA4 UJN PGA1 CONTINUE 02195 M00S01683.1ri +++| 02196 M00S01684.1ri +++|* *JSN,CFO* PROCESSOR. 02197 M00S01685.1ri +++| 02198 M00S01686.1ri +++| PGA5 LDD FL 02199 M00S01687.1ri +++| ZJN PGA4 IF NO CM FL ASSIGNED 02200 M00S01688.1ri +++| LDD RA 02201 M00S01689.1ri +++| SHN 6 02202 M00S01690.1ri +++| CRD CN 02203 M00S01691.1ri +++| LDD CN+3 02204 M00S01692.1ri +++| LPN 4 02205 M00S01693.1ri +++| ZJN PGA4 IF JOB IS NOT READY FOR DATA 02206 M00S01694.1ri +++| LDC SBUF+QBSS+1*5 ISSUE MESSAGE 02207 M00S01695.1ri +++| RJM DFM 02208 M00S01696.1ri +++| LDD MA REMOVE PREFIX 02209 M00S01697.1ri +++| CWM SBUF+QBSS+1*5+3,T4 02210 M00S01698.1ri +++| SBD T4 02211 M00S01699.1ri +++| CRM SBUF+QBSS+1*5,T4 02212 M00S01700.1ri +++| LDN 0 02213 M00S01701.1ri +++| STM SBUF+QBSS+5*5+2 02214 M00S01702.1ri +++| STM SBUF+QBSS+5*5+3 02215 M00S01703.1ri +++| STM SBUF+QBSS+5*5+4 02216 M00S01704.1ri +++| LDD RA MOVE DATA TO JOB CM FL 02217 M00S01705.1ri +++| SHN 6 02218 M00S01706.1ri +++| ADN 70 02219 M00S01707.1ri +++| CWM SBUF+QBSS+1*5,T4 02220 M00S01708.1ri +++| LDD CN+3 CLEAR CFO AND PAUSE FLAGS IN RA+0 02221 M00S01709.1ri +++| SCN 5 02222 M00S01710.1ri +++| STD CN+3 02223 M00S01711.1ri +++| LDD RA 02224 M00S01712.1ri +++| SHN 6 02225 M00S01713.1ri +++| CWD CN 02226 M00S01714.1ri +++| PGA6 UJP PGA4 CONTINUE 02227 M00S01715.1ri +++| 02228 M00S01716.1ri +++|* *JSN,GO* PROCESSOR. 02229 M00S01717.1ri +++| 02230 M00S01718.1ri +++| PGA7 LDC =C* GO.* SET DAYFILE MESSAGE ADDRESS 02231 M00S01719.1ri +++| STM PGAA 02232 M00S01720.1ri +++| LDN 0 02233 M00S01721.1ri +++| UJN PGA9 CAUSE PAUSE FLAG NOT TO BE SET 02234 M00S01722.1ri +++| 02235 M00S01723.1ri +++|* *JSN,PAUSE* PROCESSOR. 02236 M00S01724.1ri +++| 02237 M00S01725.1ri +++| PGA8 LDN 1 CAUSE PAUSE FLAG TO BE SET 02238 M00S01726.1ri +++| PGA9 STD T6 02239 M00S01727.1ri +++| LDC =C* PAUSE.* ISSUE DAYFILE MESSAGE 02240 M00S01728.1ri +++|* LDC =C* GO.* (PROCESSING *JSN,GO*) 02241 M00S01729.1ri +++| PGAA EQU *-1 02242 M00S01730.1ri +++| RJM DFM 02243 M00S01731.1ri +++| LDD CP CLEAR NOGO AND/OR PAUSE FLAG 02244 M00S01732.1ri +++| ADN SNSW 02245 M00S01733.1ri +++| CRD CM 02246 M00S01734.1ri +++| LDD CM+3 02247 M00S01735.1ri +++| SCN 3 02248 M00S01736.1ri +++| LMD T6 02249 M00S01737.1ri +++| STD CM+3 02250 M00S01738.1ri +++| LDD CP 02251 M00S01739.1ri +++| ADN SNSW 02252 M00S01740.1ri +++| CWD CM 02253 M00S01741.1ri +++| ADN MS2W-SNSW CLEAR MESSAGE AT *MS2W* 02254 M00S01742.1ri +++| CWD ZR 02255 M00S01743.1ri +++| LDD FL 02256 M00S01744.1ri +++| ZJN PGA10 IF NO CM FL ASSIGNED 02257 M00S01745.1ri +++| LDD RA SET/CLEAR *PAUSE* FLAG IN RA+0 02258 M00S01746.1ri +++| SHN 6 02259 M00S01747.1ri +++| CRD CM 02260 M00S01748.1ri +++| LDD CM+3 02261 M00S01749.1ri +++| SCN 3 02262 M00S01750.1ri +++| LMD T6 02263 M00S01751.1ri +++| STD CM+3 02264 M00S01752.1ri +++| LDD RA 02265 M00S01753.1ri +++| SHN 6 02266 M00S01754.1ri +++| CWD CM 02267 M00S01755.1ri +++| PGA10 LJM PGA1 CONTINUE 02268 M00S01756.1ri +++| 02269 M00S01757.1ri +++|* *JSN,ONSW* PROCESSOR. 02270 M00S01758.1ri +++| 02271 M00S01759.1ri +++| PGA11 LDM SBUF+QBSS+2 02272 M00S01760.1ri +++| SHN 6 02273 M00S01761.1ri +++| UJN PGA13 CONTINUE 02274 M00S01762.1ri +++| 02275 M00S01763.1ri +++|* *JSN,OFFSW* PROCESSOR. 02276 M00S01764.1ri +++| 02277 M00S01765.1ri +++| PGA12 LDN 0 BUILD SETTING MASK 02278 M00S01766.1ri +++| PGA13 STD T6 02279 M00S01767.1ri +++| LCN 0 BUILD CLEARING MASK 02280 M00S01768.1ri +++| LMM SBUF+QBSS+2 02281 M00S01769.1ri +++| SHN 6 02282 M00S01770.1ri +++| STM PGAC 02283 M00S01771.1ri +++| LDD CP READ SENSE SWITCH WORD 02284 M00S01772.1ri +++| ADK SNSW 02285 M00S01773.1ri +++| CRD CN 02286 M00S01774.1ri +++| LDD CN+4 SET/CLEAR SENSE SWITCHES 02287 M00S01775.1ri +++| LPC ** 02288 M00S01776.1ri +++| PGAC EQU *-1 02289 M00S01777.1ri +++| LMD T6 02290 M00S01778.1ri +++| STD CN+4 02291 M00S01779.1ri +++| LDD CP 02292 M00S01780.1ri +++| ADN SNSW 02293 M00S01781.1ri +++| CWD CN 02294 M00S01782.1ri +++| LDD FL 02295 M00S01783.1ri +++| ZJN PGA14 IF NO CM FL ASSIGNED 02296 M00S01784.1ri +++| LDD RA SET/CLEAR SWITCH IN RA+0 02297 M00S01785.1ri +++| SHN 6 02298 M00S01786.1ri +++| CRD CM 02299 M00S01787.1ri +++| LDD CM+4 02300 M00S01788.1ri +++| LMD CN+4 02301 M00S01789.1ri +++| LPN 77 02302 M00S01790.1ri +++| LMD CN+4 02303 M00S01791.1ri +++| STD CM+4 02304 M00S01792.1ri +++| LDD RA 02305 M00S01793.1ri +++| SHN 6 02306 M00S01794.1ri +++| CWD CM 02307 M00S01795.1ri +++| PGA14 LJM PGA1 CONTINUE 02308 M00S01796.1ri +++| TGAP SPACE 4,10 02309 M00S01797.1ri +++|** TGAP - TABLE OF DELAYED *ALTER* FUNCTION PROCESSORS. 02310 M00S01798.1ri +++|* 02311 M00S01799.1ri +++|* EACH ENTRY CONTAINS THE ADDRESS OF THE PROCESSOR ASSOCIATED 02312 M00S01800.1ri +++|* WITH THE FUNCTION. 02313 M00S01801.1ri +++| 02314 M00S01802.1ri +++| 02315 M00S01803.1ri +++| TGAP INDEX 02316 M00S01804.1ri +++| INDEX SSSF,PGA11 SET SENSE SWITCHES 02317 M00S01805.1ri +++| INDEX CSSF,PGA12 CLEAR SENSE SWITCHES 02318 M00S01806.1ri +++| INDEX GOSF,PGA7 PROCESS *GO* COMMAND 02319 M00S01807.1ri +++| INDEX DYSF,PGA3 PROCESS *COMMENT* COMMAND 02320 M00S01808.1ri +++| INDEX CFSF,PGA5 PROCESS *CFO* COMMAND 02321 M00S01809.1ri +++| INDEX EMSF,PGA3 ISSUE ERROR MESSAGE 02322 M00S01810.1ri +++| INDEX PASF,PGA8 PROCESS *PAUSE* COMMAND 02323 M00S01811.1ri +++| INDEX 14 02324 M00S01812.1ri +++| SPACE 4,10
| Line S01813 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02325 M01S01813.271l716 ---|* OVERFLOW CHECKS.
| Line S00342 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02326 M01S00342.271l716 +++|* CHECK FOR OVERFLOW. 02327 M00S01814.1ri +++| 02328 M00S01815.1ri +++|
| Line S01816 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02329 M01S01816.271l716 ---| USE OVERFLOW 02330 M01S01817.271l716 ---| OVERFLOW E1RI,7772
| Line S00343 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02331 M01S00343.271l716 +++| OVERFLOW E1RI,EPFW 02332 M00S01818.1ri +++| TTL 1RI/3RI - PROCESS SERVICE CLASS CHANGE. 02333 M00S01819.1ri +++| TITLE 02334 M00S01820.1ri +++| QUAL 3RI 02335 M00S01821.1ri +++| IDENT 3RI,E1RI PROCESS SERVICE CLASS CHANGE. 02336 M00S01822.1ri +++| BASE M
| Line S01823 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02337 M01S01823.271l716 ---| LIST F,X 02338 M00S01824.1ri +++| SST 02339 M00S01825.1ri +++|*COMMENT 1RI - PROCESS SERVICE CLASS CHANGE.
| Line S01826 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 02340 M01S01826.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1982.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 02341 M01S00003.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 02342 M00S01827.1ri +++| ORG E1RI 02343 M00S01828.1ri +++| QUAL$ SET 1 02344 M00S01829.1ri +++| 3RI SPACE 4,10 02345 M00S01830.1ri +++|** PSC - PROCESS SERVICE CLASS CHANGE. 02346 M00S01831.1ri +++|* 02347 M00S01832.1ri +++|* ENTRY (CN) = NEW SERVICE CLASS. 02348 M00S01833.1ri +++|* 02349 M00S01834.1ri +++|* CALLS CSC. 02350 M00S01835.1ri +++| 02351 M00S01836.1ri +++| 02352 M00S01837.1ri +++| PSC SUBR ENTRY/EXIT 02353 M00S01838.1ri +++| LDD CN 02354 M00S01839.1ri +++| RJM CSC CHANGE SERVICE CLASS 02355 M00S01840.1ri +++| UJN PSCX RETURN 02356 M00S01841.1ri +++| SPACE 4,10 02357 M00S01842.1ri +++|* COMMON DECKS. 02358 M00S01843.1ri +++| 02359 M00S01844.1ri +++| 02360 M00S01845.1ri +++| VCPT EQU /REM/VCPT 02361 M00S01846.1ri +++| VCHT EQU /REM/VCHT 02362 M00S01847.1ri +++| CPRS EQU /CPS/CPRS 02363 M00S01848.1ri +++| ABSR EQU /CPS/ABSR 02364 M00S01849.1ri +++| ABCP EQU /CPS/ABCP 02365 M00S01850.1ri +++| ABMS EQU /CPS/ABMS 02366 M00S01851.1ri +++| ABMT EQU /CPS/ABMT 02367 M00S01852.1ri +++| ABPF EQU /CPS/ABPF 02368 M00S01853.1ri +++| ABAD EQU /CPS/ABAD 02369 M00S01854.1ri +++| ABNA EQU /CPS/ABNA 02370 M00S01855.1ri +++| ABCS EQU /CPS/ABCS 02371 M00S01856.1ri +++| ABCF EQU /CPS/ABCF 02372 M00S01857.1ri +++| ABVF EQU /CPS/ABVF 02373 M00S01858.1ri +++| ABNB EQU /CPS/ABNB 02374 M00S01859.1ri +++| ABMP EQU /CPS/ABMP 02375 M00S01860.1ri +++| ABAC EQU /CPS/ABAC 02376 M00S01861.1ri +++| ABOF EQU /CPS/ABOF 02377 M00S01862.1ri +++| SSIS EQU /CPS/SSIS SET SUBSYSTEM IDENTIFICATION FIELD 02378 M00S01863.1ri +++| AST$ SET 1 ASSEMBLE SSCT/SSAT UPDATE FUNCTIONS 02379 M00S01864.1ri +++|*CALL COMPAST 02380 M00S01865.1ri +++|*CALL COMPCSC 02381 M00S01866.1ri +++|*CALL COMPRJC 02382 M00S01867.1ri +++|*CALL COMPSTA 02383 M00S01868.1ri +++| SPACE 4,10
| Line S01869 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02384 M01S01869.271l716 ---|* OVERFLOW CHECKS.
| Line S00344 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02385 M01S00344.271l716 +++|* CHECK FOR OVERFLOW. 02386 M00S01870.1ri +++| 02387 M00S01871.1ri +++|
| Line S01872 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02388 M01S01872.271l716 ---| USE OVERFLOW 02389 M01S01873.271l716 ---| OVERFLOW E1RI,7772
| Line S00345 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02390 M01S00345.271l716 +++| OVERFLOW E1RI,EPFW 02391 M00S01874.1ri +++| SPACE 4,10 02392 M00S01875.1ri +++| QUAL 02393 M00S01876.1ri +++| TTL 1RI/3RH - PROCESS ON-LINE INTERACTIVE JOBS. 02394 M00S01877.1ri +++| TITLE MAIN ROUTINES. 02395 M00S01878.1ri +++| QUAL 3RH 02396 M00S01879.1ri +++| IDENT 3RH,PRHX 02397 M00S01880.1ri +++|*COMMENT 1RI - PROCESS INTERACTIVE JOBS.
| Line S01881 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 02398 M01S01881.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1982.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 02399 M01S00004.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 02400 M00S01882.1ri +++| SPACE 4,10 02401 M00S01883.1ri +++|** 3RH - PROCESS ON-LINE INTERACTIVE JOBS. 02402 M00S01884.1ri +++| SPACE 4,10 02403 M00S01885.1ri +++| ORG E1RI 02404 M00S01886.1ri +++| PRH SUBR ENTRY/EXIT 02405 M00S01887.1ri +++| UJN PRHX RETURN 02406 M00S01888.1ri +++| EDA SPACE 4,10 02407 M00S01889.1ri +++|** EDA - ENTER JOB COMMAND. 02408 M00S01890.1ri +++|* 02409 M00S01891.1ri +++|* EXIT JOB INITIATION COMMAND MOVED TO THE COMMAND BUFFER. 02410 M00S01892.1ri +++|* *1MI* TERMINAL I/O DRIVER IS INHIBITED FROM 02411 M00S01893.1ri +++|* RECIEVING INPUT AHEAD ON COMPLETION OF ROLLIN 02412 M00S01894.1ri +++|* IF USER BREAK AND EXTENDED REPRIEVE PROCESSING 02413 M00S01895.1ri +++|* ARE CURRENT. *1AJ* WILL REISSUE THE INPUT REQUEST 02414 M00S01896.1ri +++|* SUBSEQUENT TO ERROR FLAG PROCESSING. 02415 M00S01897.1ri +++|* 02416 M00S01898.1ri +++|* USES PP, T1, CM - CM+4, CN - CN+4. 02417 M00S01899.1ri +++|*
| Line S01900 Modification History | |
|---|---|
M01 (Removed by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02418 M01S01900.ns2748 ---|* CALLS EJP.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02419 M01S00001.ns2748 +++|* CALLS EJP, RRR, SRR. 02420 M00S01901.1ri +++|* 02421 M00S01902.1ri +++|* MACROS DELAY, MONITOR, PAUSE. 02422 M00S01903.1ri +++| 02423 M00S01904.1ri +++| 02424 M00S01905.1ri +++| EDA SUBR ENTRY/EXIT
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02425 M01S00002.ns2748 +++| RJM SRR SET R-REGISTER TO IAF RA 02426 M00S01906.1ri +++| LDD TT 02427 M00S01907.1ri +++| SHN 14 02428 M00S01908.1ri +++| LMD TT+1 02429 M00S01909.1ri +++| ADN /REM/VROT 02430 M00S01910.1ri +++| CRD CN
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02431 M01S00003.ns2748 +++| RJM RRR RESTORE R-REGISTER 02432 M00S01911.1ri +++| LDD CN+1 SET COMMAND POT MEMORY POINTER 02433 M00S01912.1ri +++| STD PP 02434 M00S01913.1ri +++| LDD CN+4 CLEAR JOB CONTINUATION 02435 M00S01914.1ri +++| SCN 4 02436 M00S01915.1ri +++| STD CN+4 02437 M00S01916.1ri +++| 02438 M00S01917.1ri +++|* ENTER COMMAND AND PARAMETERS. 02439 M00S01918.1ri +++| 02440 M00S01919.1ri +++| LDC ** 02441 M00S01920.1ri +++| EDAA EQU *-1 (ZERO IF JOB STEP INITIATION) 02442 M00S01921.1ri +++| ZJN EDA2 IF JOB STEP INITIATION 02443 M00S01922.1ri +++| 02444 M00S01923.1ri +++|* INHIBIT *1MI* TERMINAL I/O DRIVER INPUT AHEAD PROCESSING 02445 M00S01924.1ri +++|* ON USER BREAK AND EXTENDED REPRIEVE PROCESSING. 02446 M00S01925.1ri +++| 02447 M00S01926.1ri +++| LDD EF OUTSTANDING ERROR FLAG 02448 M00S01927.1ri +++| LMN TIET 02449 M00S01928.1ri +++| ZJN EDA1 IF USER BREAK ONE 02450 M00S01929.1ri +++| LMN TIET&TAET 02451 M00S01930.1ri +++| NJP EDA4 IF NOT USER BREAK TWO 02452 M00S01931.1ri +++| EDA1 LDM CBUF+EECW*5 02453 M00S01932.1ri +++| SHN 21-12 02454 M00S01933.1ri +++| MJN EDA3 IF EXTENDED REPRIEVE PROCESSING 02455 M00S01934.1ri +++| LJM EDA4 COMPLETE *EDA* PROCESS 02456 M00S01935.1ri +++| 02457 M00S01936.1ri +++|* SET COMMAND BUFFER. 02458 M00S01937.1ri +++| 02459 M00S01938.1ri +++| EDA2 RJM EJP ENTER JOB PARAMETERS 02460 M00S01939.1ri +++| 02461 M00S01940.1ri +++|* RELEASE COMMAND POT MEMORY AND COMPLETE. 02462 M00S01941.1ri +++| 02463 M00S01942.1ri +++| EDA3 LDN 0 CLEAR POT MEMORY POINTER 02464 M00S01943.1ri +++| STD CN+1 02465 M00S01944.1ri +++| LDD PP COMMAND POT POINTER 02466 M00S01945.1ri +++| ZJP EDA4 IF NO COMMAND 02467 M00S01946.1ri +++| LDN ZERL DROP POT MEMORY 02468 M00S01947.1ri +++| CRD CM 02469 M00S01948.1ri +++| LDC /REM/VDPO DROP POT MEMORY REQUEST 02470 M00S01949.1ri +++| STD CM 02471 M00S01950.1ri +++| LDD PP 02472 M00S01951.1ri +++| STD CM+3 SET TO DROP ENTIRE POT CHAIN 02473 M00S01952.1ri +++| LDD TN TERMINAL CONNECTION NUMBER TO REQUEST 02474 M00S01953.1ri +++| STD CM+4 02475 M00S01954.1ri +++| LDD MA 02476 M00S01955.1ri +++| CWD CM
| Line S01956 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02477 M01S01956.271l716 ---| EDA3.1 MONITOR TSEM DROP POT MEMORY
| Line S00346 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02478 M01S00346.271l716 +++| EDA3.1 LDK ZERL 02479 M01S00347.271l716 +++| CRD CM 02480 M01S00348.271l716 +++| MONITOR TSEM 02481 M00S01957.1ri +++| LDD CM+1 02482 M00S01958.1ri +++| ZJN EDA4 IF *IAF* INACCESSIBLE OR ERROR 02483 M00S01959.1ri +++| LMC 7777 02484 M00S01960.1ri +++| NJN EDA4 IF REQUEST COMPLETE 02485 M00S01961.1ri +++| PAUSE ST 02486 M00S01962.1ri +++| LDC 3600 *TSEM* QUEUE FULL - DELAY AND RETRY 02487 M00S01963.1ri +++| STD T1 02488 M00S01964.1ri +++| EDA3.2 DELAY 02489 M00S01965.1ri +++| SOD T1 02490 M00S01966.1ri +++| ZJN EDA3.1 IF TIME TO REISSUE REQUEST 02491 M00S01967.1ri +++| UJN EDA3.2 CONTINUE TO DELAY 02492 M00S01968.1ri +++| 02493 M00S01969.1ri +++|* COMPLETE *EDA* PROCESS. 02494 M00S01970.1ri +++|
| Line S01971 Modification History | |
|---|---|
M01 (Removed by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02495 M01S01971.ns2748 ---| EDA4 LDD TT TERMINAL TABLE ADDRESS
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02496 M01S00004.ns2748 +++| EDA4 RJM SRR SET R-REGISTER TO IAF RA 02497 M01S00005.ns2748 +++| LDD TT TERMINAL TABLE ADDRESS 02498 M00S01972.1ri +++| SHN 14 02499 M00S01973.1ri +++| LMD TT+1 02500 M00S01974.1ri +++| ADN /REM/VROT 02501 M00S01975.1ri +++| CWD CN REWRITE *VROT*
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02502 M01S00006.ns2748 +++| RJM RRR RESTORE R-REGISTER 02503 M00S01976.1ri +++| UJP EDAX RETURN 02504 M00S01977.1ri +++| TOP SPACE 4,10 02505 M00S01978.1ri +++|** TOP - SKIP TERMINAL OUTPUT. 02506 M00S01979.1ri +++|* 02507 M00S01980.1ri +++|* CALLS RNS. 02508 M00S01981.1ri +++| 02509 M00S01982.1ri +++| 02510 M00S01983.1ri +++| TOP SUBR 02511 M00S01984.1ri +++| LDM SBUF+EJRO+JSNE*5+4 02512 M00S01985.1ri +++| SHN -7 02513 M00S01986.1ri +++| LPN 17 02514 M00S01987.1ri +++| LMK NICS 02515 M00S01988.1ri +++| ZJN TOPX IF NOT INTERACTIVE STATUS AT ROLLOUT 02516 M00S01989.1ri +++| TOP1 LDC BFMS+DTSF 02517 M00S01990.1ri +++| RS2. RJM RNS 02518 M00S01991.1ri +++| SHN -6 02519 M00S01992.1ri +++| NJN TOP1 IF NOT EOR 02520 M00S01993.1ri +++| STM RNS CLEAR *RNS* SO *3RF* WILL NOT BE CONFUSED 02521 M00S01994.1ri +++| UJN TOPX RETURN 02522 M00S01995.1ri +++| TITLE SUBROUTINES. 02523 M00S01996.1ri +++| EJP SPACE 4,10 02524 M00S01997.1ri +++|** EJP - ENTER JOB PARAMETERS. 02525 M00S01998.1ri +++|* 02526 M00S01999.1ri +++|* ENTRY (PP) = POT POINTER OF TERMINAL COMMAND. 02527 M00S02000.1ri +++|* 02528 M00S02001.1ri +++|* USES T1, T2, T7, T8, CM - CM+4, PP. 02529 M00S02002.1ri +++|*
| Line S02003 Modification History | |
|---|---|
M01 (Removed by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02530 M01S02003.ns2748 ---|* CALLS SPA, TCL, UPP.
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02531 M01S00007.ns2748 +++|* CALLS RRR, SPA, SRR, TCL, UPP. 02532 M00S02004.1ri +++|*
| Line S02005 Modification History | |
|---|---|
M01 (Removed by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02533 M01S02005.ns2748 ---|* MACROS MONITOR.
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02534 M01S00008.ns2748 +++|* MACROS MONITOR, NFA. 02535 M00S02006.1ri +++| 02536 M00S02007.1ri +++| 02537 M00S02008.1ri +++| EJP SUBR 02538 M00S02009.1ri +++| LDN 0 02539 M00S02010.1ri +++| STM CBUF+CSPW*5+2 CLEAR COMMAND COUNT 02540 M00S02011.1ri +++| LDM CBUF+SRUW*5 CLEAR TIME AND SRU LIMITS 02541 M00S02012.1ri +++| LPC 301 02542 M00S02013.1ri +++| STM CBUF+SRUW*5 02543 M00S02014.1ri +++| LDC 4000 SET EOR ON INPUT 02544 M00S02015.1ri +++| STM CBUF+CSPW*5+1 02545 M00S02016.1ri +++| LDD CP READ *CCL* DATA 02546 M00S02017.1ri +++| ADC JCDW 02547 M00S02018.1ri +++| CRD CM 02548 M00S02019.1ri +++| STD T8 SAVE ADDRESS OF *JCDW* 02549 M00S02020.1ri +++| LDD CM+2 CLEAR PROCEDURE NESTING LEVEL 02550 M00S02021.1ri +++| LPC 6000 02551 M00S02022.1ri +++| STD CM+2 02552 M00S02023.1ri +++| LDD T8 02553 M00S02024.1ri +++| CWD CM 02554 M00S02025.1ri +++| LDM CBUF+TXSW*5 SET SUBSYSTEM 02555 M00S02026.1ri +++| LPN 77 02556 M00S02027.1ri +++| SHN 14 02557 M00S02028.1ri +++| EJPA LMN 0 02558 M00S02029.1ri +++|* LMN XX (SUBSYSTEM CODE) 02559 M00S02030.1ri +++| SHN 6 02560 M00S02031.1ri +++| STM CBUF+TXSW*5 02561 M00S02032.1ri +++| LDC ** CHECK FOR PREPROCESSOR 02562 M00S02033.1ri +++| EJPB EQU *-1 (PREPROCESSOR COMMAND WORD COUNT) 02563 M00S02034.1ri +++| STD T1 02564 M00S02035.1ri +++| ZJN EJP1 IF NO COMMAND TO TRANSFER 02565 M00S02036.1ri +++| NFA CSBN 02566 M00S02037.1ri +++| CWM EJPC,T1 TRANSFER PREPROCESSOR COMMAND 02567 M00S02038.1ri +++| EJP1 LDD PP 02568 M00S02039.1ri +++| NJN EJP2 IF DATA TO TRANSFER 02569 M00S02040.1ri +++| STD T1 02570 M00S02041.1ri +++| LJM EJP5 NO DATA TO TRANSFER, CONTINUE 02571 M00S02042.1ri +++| 02572 M00S02043.1ri +++| EJP2 LDN /REM/VCPC READ COMMAND BUFFER 02573 M00S02044.1ri +++| STD T1
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02574 M01S00009.ns2748 +++| RJM SRR SET R-REGISTER TO IAF RA 02575 M00S02045.1ri +++| RJM SPA 02576 M00S02046.1ri +++| CRM CLBF,T1
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02577 M01S00010.ns2748 +++| RJM RRR RESTORE R-REGISTER 02578 M00S02047.1ri +++| NFA CSBN 02579 M00S02048.1ri +++| ADM EJPB 02580 M00S02049.1ri +++| CWM CLBF,T1 02581 M00S02050.1ri +++| LDC CLBF+/REM/VCPC*5-5 FIND COMMAND LENGTH 02582 M00S02051.1ri +++| STD T2 02583 M00S02052.1ri +++| EJP3 LDI T2 02584 M00S02053.1ri +++| NJN EJP4 IF LAST WORD FOUND 02585 M00S02054.1ri +++| LCN 5 02586 M00S02055.1ri +++| RAD T2 02587 M00S02056.1ri +++| SOD T1 02588 M00S02057.1ri +++| NJN EJP3 IF NOT AT MAXIMUM 02589 M00S02058.1ri +++| EJP4 LDM 4,T2 02590 M00S02059.1ri +++| ZJN EJP5 IF TERMINATOR WORD 02591 M00S02060.1ri +++| AOD T1 02592 M00S02061.1ri +++| EJP5 LDC CSBN SET FWA OF COMMAND BUFFER 02593 M00S02062.1ri +++| STM CBUF+CSPW*5+3 02594 M00S02063.1ri +++| SBD T1 SET LWA+1 02595 M00S02064.1ri +++| SBM EJPB 02596 M00S02065.1ri +++| STM CBUF+CSPW*5+4 02597 M00S02066.1ri +++| 02598 M00S02067.1ri +++|* IF A PROCEDURE FILE EXISTS, DROP TRACKS. 02599 M00S02068.1ri +++| 02600 M00S02069.1ri +++| LDM CBUF+CSSW*5 02601 M00S02070.1ri +++| SHN 21-13 02602 M00S02071.1ri +++| MJN EJP6 IF NO PROCEDURE FILE 02603 M00S02072.1ri +++| LDM CBUF+CSSW*5+1 02604 M00S02073.1ri +++| ZJN EJP6 IF NO TRACK 02605 M00S02074.1ri +++| STD CM+2 02606 M00S02075.1ri +++| LDM CBUF+CSSW*5
| Line S02076 Modification History | |
|---|---|
M01 (Removed by) | 1ri29 |
Seq # *Modification Id* Act ----------------------------+ 02607 M01S02076.1ri29 ---| LPN 77
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 1ri29 |
Seq # *Modification Id* Act ----------------------------+ 02608 M01S00001.1ri29 +++| LPC 777
| Line S02077 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02609 M01S02077.253l688 ---| STD CM+1
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02610 M01S00002.253l688 +++| LMD TH SET RETURN-ON-INACCESSIBLE BIT 02611 M01S00003.253l688 +++| STD CM+1 SET EQUIPMENT 02612 M00S02078.1ri +++| MONITOR DTKM
| Line S02079 Modification History | |
|---|---|
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02613 M01S02079.253l688 ---| LDD CM+3 SAVE PRU COUNT
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act ----------------------------+ 02614 M01S00004.253l688 +++| LDD CM+1 02615 M01S00005.253l688 +++| ZJN EJP5.1 IF DEVICE ACCESSIBLE 02616 M01S00006.253l688 +++| LDK ZERL IGNORE PRU COUNT 02617 M01S00007.253l688 +++| CRD CM 02618 M01S00008.253l688 +++| UJN EJP6 CONTINUE 02619 M01S00009.253l688 +++| 02620 M01S00010.253l688 +++| EJP5.1 LDD CM+3 SAVE PRU COUNT 02621 M00S02080.1ri +++| STM RCPE+3 02622 M00S02081.1ri +++| LDD CM+4 02623 M00S02082.1ri +++| STM RCPE+4 02624 M00S02083.1ri +++| EJP6 LDN ZERL 02625 M00S02084.1ri +++| CRD CM 02626 M00S02085.1ri +++| CRM CBUF+CSSW*5,ON 02627 M00S02086.1ri +++| LDD FL 02628 M00S02087.1ri +++| ZJN EJP8 IF NO FL 02629 M00S02088.1ri +++| ADD RA PRESET WORD COUNT = 0 FOR *CLB=* 02630 M00S02089.1ri +++| SBN 1 02631 M00S02090.1ri +++| SHN 6 02632 M00S02091.1ri +++| CWD CM 02633 M00S02092.1ri +++| 02634 M00S02093.1ri +++|* CHECK FOR CHAINED POT WHICH IMPLIES *IEDIT* COMMAND LINE. 02635 M00S02094.1ri +++|* TO BE TRANSFERRED TO FL-100B. 02636 M00S02095.1ri +++| 02637 M00S02096.1ri +++| LDD PP 02638 M00S02097.1ri +++| ZJN EJP8 IF NO COMMAND POT POINTER 02639 M00S02098.1ri +++| STD T7
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02640 M01S00011.ns2748 +++| RJM SRR SET R-REGISTER TO IAF RA 02641 M00S02099.1ri +++| RJM UPP CHECK FOR CHAIN
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02642 M01S00012.ns2748 +++| RJM RRR RESTORE R-REGISTER 02643 M00S02100.1ri +++| LDD PP 02644 M00S02101.1ri +++| ZJN EJP7 IF NO MORE POTS 02645 M00S02102.1ri +++| RJM TCL TRANSFER COMMAND LINE 02646 M00S02103.1ri +++| EJP7 LDD T7 02647 M00S02104.1ri +++| STD PP 02648 M00S02105.1ri +++| EJP8 LJM EJPX RETURN 02649 M00S02106.1ri +++| 02650 M00S02107.1ri +++| 02651 M00S02108.1ri +++| EJPC VFD 60/0 02652 M00S02109.1ri +++| VFD 60/0 02653 M00S02110.1ri +++| TCL SPACE 4,10 02654 M00S02111.1ri +++|** TCL - TRANSFER COMMAND LINE. 02655 M00S02112.1ri +++|* 02656 M00S02113.1ri +++|* ENTRY (PP) = POT POINTER OF COMMAND LINE. 02657 M00S02114.1ri +++|* 02658 M00S02115.1ri +++|* USES T1 - T5, CM - CM+4. 02659 M00S02116.1ri +++|*
| Line S02117 Modification History | |
|---|---|
M01 (Removed by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02660 M01S02117.ns2748 ---|* CALLS SPA, UPP.
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02661 M01S00013.ns2748 +++|* CALLS RRR, SPA, SRR, UPP. 02662 M00S02118.1ri +++| 02663 M00S02119.1ri +++| 02664 M00S02120.1ri +++| TCL SUBR ENTRY/EXIT 02665 M00S02121.1ri +++| LDD FL 02666 M00S02122.1ri +++| ADD RA SET ADDRESS OF FL-100 02667 M00S02123.1ri +++| SBN 1 02668 M00S02124.1ri +++| SHN 6 02669 M00S02125.1ri +++| ADN 1 02670 M00S02126.1ri +++| STD T5 02671 M00S02127.1ri +++| SHN -14 02672 M00S02128.1ri +++| STD T4 02673 M00S02129.1ri +++| LDN 0 02674 M00S02130.1ri +++| STD T3 INITIALIZE WORD COUNT 02675 M00S02131.1ri +++| LDN /REM/VCPC 02676 M00S02132.1ri +++| STD T2
| Line S02133 Modification History | |
|---|---|
M01 (Removed by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02677 M01S02133.ns2748 ---| TCL1 RJM SPA SET POT ADDRESS
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02678 M01S00014.ns2748 +++| TCL1 RJM SRR SET R-REGISTER TO IAF RA 02679 M01S00015.ns2748 +++| RJM SPA SET POT ADDRESS 02680 M00S02134.1ri +++| CRM CLBF,T2 READ ONE POT 02681 M00S02135.1ri +++| RJM UPP
| Line S00016 Modification History | |
|---|---|
M01 (Added by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02682 M01S00016.ns2748 +++| RJM RRR RESTORE R-REGISTER 02683 M00S02136.1ri +++| LDD PP 02684 M00S02137.1ri +++| ZJN TCL2 IF NO MORE POTS 02685 M00S02138.1ri +++| LDN /REM/VCPC INCREMENT WORD COUNT 02686 M00S02139.1ri +++| RAD T3 02687 M00S02140.1ri +++| SBN 76 02688 M00S02141.1ri +++| PJN TCL2 IF OVERFLOW, TRUNCATE 02689 M00S02142.1ri +++| LDD T4 02690 M00S02143.1ri +++| SHN 14 02691 M00S02144.1ri +++| ADD T5 02692 M00S02145.1ri +++| CWM CLBF,T2 02693 M00S02146.1ri +++| STD T5 02694 M00S02147.1ri +++| SHN -14 02695 M00S02148.1ri +++| STD T4 02696 M00S02149.1ri +++| UJN TCL1 CONTINUE PROCESSING 02697 M00S02150.1ri +++| 02698 M00S02151.1ri +++| TCL2 LDN 1 SET LAST POT WORD COUNT 02699 M00S02152.1ri +++| STD T2 02700 M00S02153.1ri +++| LDC CLBF+4 SET BUFFER POINTER 02701 M00S02154.1ri +++| STD T1 02702 M00S02155.1ri +++| TCL3 LDI T1 02703 M00S02156.1ri +++| ZJN TCL4 IF EOL IN BUFFER 02704 M00S02157.1ri +++| LDD T2 CHECK WORD COUNT 02705 M00S02158.1ri +++| SBN /REM/VCPC 02706 M00S02159.1ri +++| ZJN TCL4 IF END OF BUFFER 02707 M00S02160.1ri +++| AOD T2 02708 M00S02161.1ri +++| LDN 5 02709 M00S02162.1ri +++| RAD T1 02710 M00S02163.1ri +++| UJN TCL3 CHECK NEXT WORD 02711 M00S02164.1ri +++| 02712 M00S02165.1ri +++| TCL4 LDN ZERL CLEAR CM - CM+4 02713 M00S02166.1ri +++| CRD CM 02714 M00S02167.1ri +++| LDD T2 SET COMPOSITE WORD COUNT 02715 M00S02168.1ri +++| ADD T3 02716 M00S02169.1ri +++| STD CM+4 02717 M00S02170.1ri +++| LDD T4 WRITE LAST POT 02718 M00S02171.1ri +++| SHN 14 02719 M00S02172.1ri +++| ADD T5 02720 M00S02173.1ri +++| CWM CLBF,T2 02721 M00S02174.1ri +++| SBD CM+4 WRITE WORD COUNT 02722 M00S02175.1ri +++| SBN 1 02723 M00S02176.1ri +++| CWD CM 02724 M00S02177.1ri +++| LJM TCLX EXIT 02725 M00S02178.1ri +++| SPACE 4,10 02726 M00S02179.1ri +++|* COMMON DECKS. 02727 M00S02180.1ri +++| 02728 M00S02181.1ri +++|
| Line S00017 Modification History | |
|---|---|
M01 (Added by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02729 M01S00017.ns2748 +++| QUAL 02730 M01S00018.ns2748 +++| PIR$ EQU 1 SELECT ASSEMBLY OF *PIR* FOR IAF R-REG 02731 M01S00019.ns2748 +++| QUAL * 02732 M01S00020.ns2748 +++|*CALL COMPSRR 02733 M00S02182.1ri +++|*CALL COMPSPA 02734 M00S02183.1ri +++|*CALL COMPUPP 02735 M00S02184.1ri +++| 02736 M00S02185.1ri +++| SPACE 4,10 02737 M00S02186.1ri +++| CLBF EQU * COMMAND LINE BUFFER 02738 M00S02187.1ri +++| 02739 M00S02188.1ri +++| 02740 M00S02189.1ri +++| ERRNG BFMS-* 02741 M00S02190.1ri +++| TITLE INITIALIZATION. 02742 M00S02191.1ri +++| PRS SPACE 4,15 02743 M00S02192.1ri +++|** PRS - PRESET. 02744 M00S02193.1ri +++|* 02745 M00S02194.1ri +++|* ENTRY (DI) = *UJNI*+2. 02746 M00S02195.1ri +++|* (EF) = ERROR FLAG FROM EJT ENTRY. 02747 M00S02196.1ri +++|* 02748 M00S02197.1ri +++|* EXIT (TT - TT+1) = TERMINAL TABLE ADDRESS. 02749 M00S02198.1ri +++|* (EF) = 7777 IF *IAF* INACCESSIBLE. 02750 M00S02199.1ri +++|*
| Line S02200 Modification History | |
|---|---|
M01 (Removed by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02751 M01S02200.ns2748 ---|* USES T1 - T7, CM - CM+4, CN - CN+4, FS - FS+4, 02752 M01S02201.ns2748 ---|* EF, EP, TA, TN.
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02753 M01S00021.ns2748 +++|* USES EF, EP, TN, CM - CM+4, CN - CN+4, FS - FS+4, T1 - T7. 02754 M00S02202.1ri +++|*
| Line S02203 Modification History | |
|---|---|
M01 (Removed by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02755 M01S02203.ns2748 ---|* CALLS AST, CHG, STA.
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02756 M01S00022.ns2748 +++|* CALLS AST, CHG, PIR, RRR, SRR, STA. 02757 M00S02204.1ri +++|* 02758 M00S02205.1ri +++|* MACROS MONITOR. 02759 M00S02206.1ri +++| 02760 M00S02207.1ri +++| 02761 M00S02208.1ri +++| 02762 M00S02209.1ri +++| PRS SUBR ENTRY/EXIT 02763 M00S02210.1ri +++| 02764 M00S02211.1ri +++|* CHECK ACCESSIBILITY OF *IAF*. 02765 M00S02212.1ri +++| 02766 M00S02213.1ri +++| LDC IFSI+FECF*10000 02767 M00S02214.1ri +++| RJM AST GET SSCT ENTRY 02768 M00S02215.1ri +++| SHN 21-13 02769 M00S02216.1ri +++| MJN PRS1 IF *IAF* ACCESSIBLE 02770 M00S02217.1ri +++| PRS0 LDD DI DISABLE ON-LINE INTERACTIVE PROCESSING 02771 M00S02218.1ri +++| STM RIJC 02772 M00S02219.1ri +++| STM RIJE 02773 M00S02220.1ri +++| LDD EF 02774 M00S02221.1ri +++| NJN PRSX IF ERROR FLAG IS SET
| Line S02222 Modification History | |
|---|---|
M01 (Removed by) | 1ri30 |
Seq # *Modification Id* Act ----------------------------+ 02775 M01S02222.1ri30 ---| 02776 M01S02223.1ri30 ---|* SET SUSPEND ON ROLLOUT AND REQUEST ROLLOUT FLAGS. 02777 M01S02224.1ri30 ---| 02778 M01S02225.1ri30 ---| LDK 10*/CPS/ROSU+1 02779 M01S02226.1ri30 ---| STM RCPD
| Line S02227 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
M02 (Removed by) | 1ri30 |
Seq # *Modification Id* Act ----------------------------+ 02780 M02S02227.1ri30 ---| LMC 7777 SET MASK 02781 M02S02228.1ri30 ---| STM RCPC
| Line S02229 Modification History | |
|---|---|
M01 (Removed by) | 1ri30 |
Seq # *Modification Id* Act ----------------------------+ 02782 M01S02229.1ri30 ---| 02783 M01S02230.1ri30 ---|* SET DUMMY ERROR FLAG TO PREVENT RESTORING PP RECALL STACK 02784 M01S02231.1ri30 ---|* ENTRIES AND TO PREVENT *RCPM*. 02785 M01S02232.1ri30 ---| 02786 M01S02233.1ri30 ---| LCN 0
| Line S00039 Modification History | |
|---|---|
M01 (Added by) | 1ri30 |
Seq # *Modification Id* Act ----------------------------+ 02787 M01S00039.1ri30 +++| LDK 10*/CPS/ROSU SET ROLLOUT FLAG TO SUSPEND JOB 02788 M01S00040.1ri30 +++| RAM RCPD 02789 M01S00041.1ri30 +++| LCN 0 DISABLE PP AND CPU RESTART 02790 M00S02234.1ri +++| STD EF 02791 M00S02235.1ri +++| UJN PRSX RETURN 02792 M00S02236.1ri +++| 02793 M00S02237.1ri +++|* SET TERMINAL TABLE ADDRESS. 02794 M00S02238.1ri +++|
| Line S02239 Modification History | |
|---|---|
M01 (Removed by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02795 M01S02239.ns2748 ---| PRS1 LDC /REM/VCPT*200+FLSW SET *IAF* RA 02796 M01S02240.ns2748 ---| CRD CM 02797 M01S02241.ns2748 ---| LDD CM+3 02798 M01S02242.ns2748 ---| STD TA
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02799 M01S00023.ns2748 +++| PRS1 RJM PIR PRESET WITH IAF R-REGISTER 02800 M00S02243.1ri +++| LDM CBUF+5*TTNW+1 SET CONNECTION NUMBER 02801 M00S02244.1ri +++| STD TN
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02802 M01S00024.ns2748 +++| RJM SRR SET R-REGISTER TO IAF RA 02803 M00S02245.1ri +++| RJM STA SET TERMINAL TABLE ADDRESS 02804 M00S02246.1ri +++| ADN /REM/VFNT 02805 M00S02247.1ri +++| CRD T3 02806 M00S02248.1ri +++| ADN /REM/VROT-/REM/VFNT 02807 M00S02249.1ri +++| CRD CN 02808 M00S02250.1ri +++| ADN /REM/VSTT-/REM/VROT 02809 M00S02251.1ri +++| CRD FS
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02810 M01S00025.ns2748 +++| RJM RRR RESTORE R-REGISTER 02811 M00S02252.1ri +++| LDD CN+4 MAKE SURE *VROT* BIT ZERO IS NOT SET 02812 M00S02253.1ri +++| LPN 1 02813 M00S02254.1ri +++| ZJN PRS1.1 IF INTERLOCK IS CLEAR 02814 M00S02255.1ri +++| LDK SWET SET ERROR FLAG 02815 M00S02256.1ri +++| STD EF 02816 M00S02257.1ri +++| RJM CHG CONDITIONAL HANG 02817 M00S02258.1ri +++| LJM PRS0 DISABLE INTERACTIVE PROCESSING 02818 M00S02259.1ri +++| 02819 M00S02260.1ri +++| PRS1.1 LDD T3+3 TERMINATE PRIMARY FILE NAME 02820 M00S02261.1ri +++| SCN 77 02821 M00S02262.1ri +++| STD T3+3 02822 M00S02263.1ri +++| LDD CN+4 02823 M00S02264.1ri +++| LPN 4 02824 M00S02265.1ri +++| STM EDAA 02825 M00S02266.1ri +++| ZJN PRS3 IF NOT CONTINUATION 02826 M00S02267.1ri +++| PRS2 LJM PRSX RETURN 02827 M00S02268.1ri +++| 02828 M00S02269.1ri +++| PRS3 LDD EP SIMULATE *SSM=* ON NEW STEP 02829 M00S02270.1ri +++| SCN 1 02830 M00S02271.1ri +++| LMN 1 02831 M00S02272.1ri +++| STD EP 02832 M00S02273.1ri +++| LDD CP SET JOB STEP INITIATION 02833 M00S02274.1ri +++| ADC DBAW 02834 M00S02275.1ri +++| CRD CM 02835 M00S02276.1ri +++| LDD CM 02836 M00S02277.1ri +++| LPC 2777 02837 M00S02278.1ri +++| LMC 1000 02838 M00S02279.1ri +++| STD CM 02839 M00S02280.1ri +++| LDD CP 02840 M00S02281.1ri +++| ADC DBAW 02841 M00S02282.1ri +++| CWD CM 02842 M00S02283.1ri +++| LDC LDNI+0 02843 M00S02284.1ri +++| STM RCPB 02844 M00S02285.1ri +++| LDC 7677 MASK TO CLEAR SLICE FLAG 02845 M00S02286.1ri +++| STM RCPG 02846 M00S02287.1ri +++| LDD FS+3 SET SUBSYSTEM CODE 02847 M00S02288.1ri +++| LPN 77 02848 M00S02289.1ri +++| RAM EJPA 02849 M00S02290.1ri +++| LDD CN CHECK FOR PREPROCESSOR INDEX 02850 M00S02291.1ri +++| LPN 77 02851 M00S02292.1ri +++| ZJP PRS2 IF NO PREPROCESSOR INDEX PRESENT 02852 M00S02293.1ri +++| STD T1 02853 M00S02294.1ri +++| LDD CN CLEAR PREPROCESSOR INDEX 02854 M00S02295.1ri +++| SCN 77 02855 M00S02296.1ri +++| STD CN
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02856 M01S00026.ns2748 +++| RJM SRR SET R-REGISTER TO IAF RA 02857 M00S02297.1ri +++| LDD TT 02858 M00S02298.1ri +++| SHN 14 02859 M00S02299.1ri +++| LMD TT+1 02860 M00S02300.1ri +++| ADN /REM/VROT 02861 M00S02301.1ri +++| CWD CN
| Line S00027 Modification History | |
|---|---|
M01 (Added by) | ns2748 |
Seq # *Modification Id* Act ----------------------------+ 02862 M01S00027.ns2748 +++| RJM RRR RESTORE R-REGISTER 02863 M00S02302.1ri +++| LDD T1 02864 M00S02303.1ri +++| SBN TPPIL+1 02865 M00S02304.1ri +++| MJN PRS4 IF VALID PREPROCESSOR INDEX 02866 M00S02305.1ri +++| LDN 0 SET NO ERROR FLAG 02867 M00S02306.1ri +++| RJM CHG CONDITIONAL HANG 02868 M00S02307.1ri +++| LJM PRSX RETURN 02869 M00S02308.1ri +++| 02870 M00S02309.1ri +++| PRS4 LDM TPPI-1,T1 02871 M00S02310.1ri +++| SHN 6 02872 M00S02311.1ri +++| STD CM SAVE FILE FLAG 02873 M00S02312.1ri +++| SHN -14 02874 M00S02313.1ri +++| STD T2 02875 M00S02314.1ri +++| LDN 0 PRESET TRANSFERRED BYTE COUNT 02876 M00S02315.1ri +++| STD T1 02877 M00S02316.1ri +++| PRS5 AOD T2 02878 M00S02317.1ri +++| AOD T1 02879 M00S02318.1ri +++| LDM TPPS-1,T2 TRANSFER PREPROCESSOR COMMAND 02880 M00S02319.1ri +++| STM EJPC-1,T1 02881 M00S02320.1ri +++| NJN PRS5 IF TRANSFER NOT COMPLETE 02882 M00S02321.1ri +++| LDD CM 02883 M00S02322.1ri +++| ZJN PRS9 IF NO FILE NAME REQUIRED 02884 M00S02323.1ri +++| 02885 M00S02324.1ri +++|* MOVE FILE NAME. 02886 M00S02325.1ri +++| 02887 M00S02326.1ri +++| LDN T3 SET FILE NAME ADDRESS 02888 M00S02327.1ri +++| STD T2 02889 M00S02328.1ri +++| PRS6 LDI T2 MOVE BYTE 02890 M00S02329.1ri +++| STM EJPC-1,T1 02891 M00S02330.1ri +++| ZJN PRS7 IF NO CHARACTERS IN BYTE 02892 M00S02331.1ri +++| LPN 77 02893 M00S02332.1ri +++| ZJN PRS8 IF ONE CHARACTER IN BYTE 02894 M00S02333.1ri +++| AOD T1 02895 M00S02334.1ri +++| AOD T2 02896 M00S02335.1ri +++| UJN PRS6 CONTINUE TRANSFER 02897 M00S02336.1ri +++| 02898 M00S02337.1ri +++| PRS7 LDC 2R.. 02899 M00S02338.1ri +++| PRS8 LMN 1R. 02900 M00S02339.1ri +++| RAM EJPC-1,T1 STORE TERMINATOR 02901 M00S02340.1ri +++| 02902 M00S02341.1ri +++|* CALCULATE CM WORD COUNT. 02903 M00S02342.1ri +++| 02904 M00S02343.1ri +++| PRS9 AOM EJPB INCREMENT CM WORD COUNT 02905 M00S02344.1ri +++| LCN 5 DIVIDE BY 5 02906 M00S02345.1ri +++| RAD T1 02907 M00S02346.1ri +++| PJN PRS9 IF DIVISION NOT COMPLETE 02908 M00S02347.1ri +++| LJM PRSX RETURN 02909 M00S02348.1ri +++| TPPI SPACE 4,10 02910 M00S02349.1ri +++|** TPPI - TABLE OF PREPROCESSOR INDICES. 02911 M00S02350.1ri +++|* 02912 M00S02351.1ri +++|* 6/ INDEX,6/ FLAG 02913 M00S02352.1ri +++|* INDEX OFFSET INTO *TPPS* TABLE OF FIRST BYTE OF 02914 M00S02353.1ri +++|* PREPROCESSOR COMMAND. 02915 M00S02354.1ri +++|* FLAG 1 IF PRIMARY FILE NAME IS REQUIRED. 02916 M00S02355.1ri +++|* 0 OTHERWISE. 02917 M00S02356.1ri +++| 02918 M00S02357.1ri +++| 02919 M00S02358.1ri +++| TPPI VFD 6/PP1-TPPS,6/1 02920 M00S02359.1ri +++| VFD 6/PP2-TPPS,6/1 02921 M00S02360.1ri +++| TPPIL EQU *-TPPI 02922 M00S02361.1ri +++| TPPS SPACE 4,10 02923 M00S02362.1ri +++|** TPPS - TABLE OF PREPROCESSOR COMMANDS. 02924 M00S02363.1ri +++|* 02925 M00S02364.1ri +++|* THESE ENTRIES MUST BE BLANK PADDED TO GUARANTEE AN EVEN 02926 M00S02365.1ri +++|* NUMBER OF CHARACTERS IN EACH COMMAND. IF NO PRIMARY FILE 02927 M00S02366.1ri +++|* IS REQUIRED, THE COMMAND TERMINATOR MUST APPEAR IN THE 02928 M00S02367.1ri +++|* ENTRY. THE TOTAL LENGTH OF A PREPROCESSOR COMMAND MUST 02929 M00S02368.1ri +++|* NOT EXCEED SPACE RESERVED AT *EJPC*. 02930 M00S02369.1ri +++| 02931 M00S02370.1ri +++| 02932 M00S02371.1ri +++| TPPS BSS 0 02933 M00S02372.1ri +++| PP1 DATA C*$SORT,* 02934 M00S02373.1ri +++| CON 0 02935 M00S02374.1ri +++| PP2 DATA C*$PACK,* 02936 M00S02375.1ri +++| CON 0 02937 M00S02376.1ri +++| SPACE 4,10 02938 M00S02377.1ri +++|* COMMON DECKS. 02939 M00S02378.1ri +++| 02940 M00S02379.1ri +++| 02941 M00S02380.1ri +++|*CALL COMPAST 02942 M00S02381.1ri +++|*CALL COMPSTA 02943 M00S02382.1ri +++| SPACE 4,10
| Line S02383 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02944 M01S02383.271l716 ---|* OVERFLOW CHECKS.
| Line S00349 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02945 M01S00349.271l716 +++|* CHECK FOR OVERFLOW. 02946 M00S02384.1ri +++| 02947 M00S02385.1ri +++| 02948 M00S02386.1ri +++| USE OVERFLOW
| Line S00350 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02949 M01S00350.271l716 +++| 02950 M00S02387.1ri +++| E3RH EQU * LWA+1 OF *3RH* OVERLAY
| Line S02388 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02951 M01S02388.271l716 ---| OVERFLOW E1RI,7772
| Line S00351 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02952 M01S00351.271l716 +++| SPACE 4,10 02953 M01S00352.271l716 +++| OVERFLOW E1RI,EPFW 02954 M00S02389.1ri +++| TTL 1RI/3RG - PROCESS DMP= JOBS. 02955 M00S02390.1ri +++| TITLE 02956 M00S02391.1ri +++| QUAL 3RG 02957 M00S02392.1ri +++| IDENT 3RG,PRGX 02958 M00S02393.1ri +++|*COMMENT 1RI - PROCESS SPECIAL ENTRY POINT JOBS.
| Line S02394 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 02959 M01S02394.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1982.
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 02960 M01S00005.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 02961 M00S02395.1ri +++| SPACE 4,10 02962 M00S02396.1ri +++|** 3RG - PROCESS DMP= JOBS. 02963 M00S02397.1ri +++| 02964 M00S02398.1ri +++| 02965 M00S02399.1ri +++| ORG E1RI 02966 M00S02400.1ri +++| PRG SUBR ENTRY/EXIT 02967 M00S02401.1ri +++| UJN PRGX RETURN 02968 M00S02402.1ri +++| RCP SPACE 4,10 02969 M00S02403.1ri +++|** RCP - RESTORE CONTROL POINT AREA. 02970 M00S02404.1ri +++|*
| Line S02405 Modification History | |
|---|---|
M01 (Removed by) | ns2738c |
Seq # *Modification Id* Act ----------------------------+ 02971 M01S02405.ns2738c ---|* USES T1, T3, CM - CM+4, CN - CN+4.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2738c |
Seq # *Modification Id* Act ----------------------------+ 02972 M01S00001.ns2738c +++|* USES T1, T3, CM - CM+4, CN - CN+4. 02973 M00S02406.1ri +++|* 02974 M00S02407.1ri +++|* CALLS PCS, UCA, UEP. 02975 M00S02408.1ri +++|*
| Line S02409 Modification History | |
|---|---|
M01 (Removed by) | ns2738c |
Seq # *Modification Id* Act ----------------------------+ 02976 M01S02409.ns2738c ---|* MACROS MONITOR, NFA.
Proceed to Part 2
cdc/nos2.source/opl.opl871/deck/1ri.001.txt · Last modified: by 127.0.0.1