cdc:nos2.source:opl.opl871:deck:0pt
Deck 0PT
Library Member Format: MODIFY
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M00S00001.0pt +++| IDENT 0PT,RPFX 00002 M00S00002.0pt +++| TITLE 0PT - RESET PRIMARY FILE. 00003 M00S00003.0pt +++| PERIPH J 00004 M00S00004.0pt +++| BASE MIXED 00005 M00S00005.0pt +++| SST 00006 M00S00006.0pt +++|*COMMENT 0PT - RESET PRIMARY FILE.
| Line S00007 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00007 M01S00007.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORPORATION, 1981.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00008 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00009 M00S00008.0pt +++| RPF SPACE 4,10 00010 M00S00009.0pt +++|*** RPF - RESET PRIMARY FILE. 00011 M00S00010.0pt +++|* P. D. FARRELL. 81/09/10. 00012 M00S00011.0pt +++| RPF SPACE 4,10 00013 M00S00012.0pt +++|*** RPF IS A LOCATION-FREE, ZERO-LEVEL OVERLAY TO 00014 M00S00013.0pt +++|* BE USED TO RESET THE PRIMARY FILE POINTERS IN THE JOB 00015 M00S00014.0pt +++|* EJT ENTRY. 00016 M00S00015.0pt +++| RPF SPACE 4,10 00017 M00S00016.0pt +++|*** CALL. 00018 M00S00017.0pt +++|*
| Line S00018 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00019 M01S00018.ns22000 ---|* ((LA)-3) = NEW EQUIPMENT NUMBER.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2358 |
Seq # *Modification Id* Act ----------------------------+ 00020 M02S00001.ns2358 ---|* ((LA)-3) = NEW EST ORDINAL.
| Line S00019 Modification History | |
|---|---|
M01 (Removed by) | ns2358 |
Seq # *Modification Id* Act ----------------------------+ 00021 M01S00019.ns2358 ---|* ((LA)-2) = NEW FIRST TRACK.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2358 |
Seq # *Modification Id* Act ----------------------------+ 00022 M01S00001.ns2358 +++|* ENTRY (FS - FS+4) = FST INFORMATION FOR NEW FILE.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00023 M01S00001.242l642 +++|* 00024 M01S00002.242l642 +++|* EXIT (A) = 0. 00025 M00S00020.0pt +++| RPF SPACE 4,10 00026 M00S00021.0pt +++|** DEFINITION COMMON DECKS. 00027 M00S00022.0pt +++| 00028 M00S00023.0pt +++| 00029 M00S00024.0pt +++|*CALL COMPMAC 00030 M00S00025.0pt +++|*CALL COMPREL 00031 M00S00026.0pt +++|*CALL COMSZOL
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2358 |
Seq # *Modification Id* Act ----------------------------+ 00032 M01S00002.ns2358 +++| SPACE 4,10 00033 M01S00003.ns2358 +++|**** DIRECT LOCATION ASSIGNMENTS. 00034 M01S00004.ns2358 +++| 00035 M01S00005.ns2358 +++| 00036 M01S00006.ns2358 +++| FS EQU 20 - 24 FST INFORMATION (5 LOCATIONS) 00037 M01S00007.ns2358 +++| 00038 M01S00008.ns2358 +++|**** 00039 M00S00027.0pt +++| RPF TITLE MAIN ROUTINE. 00040 M00S00028.0pt +++| RPF SPACE 4,10 00041 M00S00029.0pt +++|** RPF - MAIN ROUTINE.
| Line S00030 Modification History | |
|---|---|
M01 (Removed by) | ns2358 |
Seq # *Modification Id* Act ----------------------------+ 00042 M01S00030.ns2358 ---|*
| Line S00031 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | ns2358 |
Seq # *Modification Id* Act ----------------------------+ 00043 M02S00031.ns2358 ---|* ENTRY ((LA)-3) = NEW EQUIPMENT NUMBER.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2358 |
Seq # *Modification Id* Act ----------------------------+ 00044 M02S00002.ns2358 ---|* ENTRY ((LA)-3) = NEW EST ORDINAL.
| Line S00032 Modification History | |
|---|---|
M01 (Removed by) | ns2358 |
Seq # *Modification Id* Act ----------------------------+ 00045 M01S00032.ns2358 ---|* ((LA)-2) = NEW FIRST TRACK. 00046 M01S00033.ns2358 ---|*
| Line S00034 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
M02 (Removed by) | ns2358 |
Seq # *Modification Id* Act ----------------------------+ 00047 M02S00034.ns2358 ---|* EXIT NEW EQUIPMENT NUMBER AND NEW FIRST TRACK SET
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2358 |
Seq # *Modification Id* Act ----------------------------+ 00048 M02S00003.ns2358 ---|* EXIT NEW EST ORDINAL AND NEW FIRST TRACK SET
| Line S00035 Modification History | |
|---|---|
M01 (Removed by) | ns2358 |
Seq # *Modification Id* Act ----------------------------+ 00049 M01S00035.ns2358 ---|* IN THE JOB EJT ENTRY. 00050 M01S00036.ns2358 ---|* 00051 M01S00037.ns2358 ---|* USES CM - CM+4. 00052 M01S00038.ns2358 ---|* 00053 M01S00039.ns2358 ---|* MACROS MONITOR, SFA. 00054 M00S00040.0pt ---| 00055 M00S00041.0pt ---| 00056 M00S00042.0pt ---| ORG 5 00057 M00S00043.0pt ---| RPF SUBR ENTRY/EXIT 00058 M00S00044.0pt ---| LDD LA RELOCATE INSTRUCTION 00059 M00S00045.0pt ---| RAM RPFA 00060 M00S00046.0pt ---| 00061 M00S00047.0pt ---|* FORMAT *UTEM* MONITOR REQUEST. 00062 M00S00048.0pt ---|
| Line S00049 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00063 M01S00049.ns22000 ---| LDM -3 SET NEW EQUIPMENT NUMBER
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2358 |
Seq # *Modification Id* Act ----------------------------+ 00064 M02S00004.ns2358 ---| LDM -3 SET NEW EST ORDINAL
| Line S00050 Modification History | |
|---|---|
M01 (Removed by) | ns2358 |
Seq # *Modification Id* Act ----------------------------+ 00065 M01S00050.ns2358 ---| STM RPFB+3 00066 M01S00051.ns2358 ---| LDM -2 SET NEW FIRST TRACK
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | ns2358 |
Seq # *Modification Id* Act ----------------------------+ 00067 M01S00009.ns2358 +++| LDD FS SET NEW EST ORDINAL 00068 M01S00010.ns2358 +++| STM RPFB+3 00069 M01S00011.ns2358 +++| LDD FS+1 SET NEW FIRST TRACK 00070 M00S00052.0pt +++| STM RPFB+4 00071 M00S00053.0pt +++| 00072 M00S00054.0pt +++|* SET EJT ADDRESS AND ISSUE MONITOR REQUEST. 00073 M00S00055.0pt +++| 00074 M00S00056.0pt +++| LDD CP READ EJT ORDINAL WORD 00075 M00S00057.0pt +++| ADK TFSW 00076 M00S00058.0pt +++| CRD CM 00077 M00S00059.0pt +++| SFA EJT,CM SET EJT ADDRESS 00078 M00S00060.0pt +++| STD CM+4 00079 M00S00061.0pt +++| SHN -14 00080 M00S00062.0pt +++| STD CM+3 00081 M00S00063.0pt +++| LDN 0 00082 M00S00064.0pt +++| STD CM+2 00083 M00S00065.0pt +++| LDN 1 SET REQUEST LENGTH 00084 M00S00066.0pt +++| STD CM+1 00085 M00S00067.0pt +++| LDD MA WRITE PARAMETERS TO MESSAGE BUFFER 00086 M00S00068.0pt +++| CWM. RPFB,ON 00087 M00S00069.0pt +++| RPFA EQU *-1 00088 M00S00070.0pt +++| MONITOR UTEM ISSUE MONITOR REQUEST
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00089 M01S00003.242l642 +++|* LDN 0 00090 M00S00071.0pt +++| LJM RPFX RETURN 00091 M00S00072.0pt +++| 00092 M00S00073.0pt +++| 00093 M00S00074.0pt +++| RPFB VFD 1/0,5/PRFE,6/21D,6/0,42/0 00094 M00S00075.0pt +++| RPF SPACE 4,10 00095 M00S00076.0pt +++|** EXECUTABLE COMMON DECKS. 00096 M00S00077.0pt +++| 00097 M00S00078.0pt +++| 00098 M00S00079.0pt +++| EJT$ EQU 1 ASSEMBLE EJT ADDRESSING (COMPGFP) 00099 M00S00080.0pt +++|*CALL COMPGFP 00100 M00S00081.0pt +++| RPF SPACE 4,10 00101 M00S00082.0pt +++| RSTR RESTORE INSTRUCTIONS 00102 M00S00083.0pt +++| RPF SPACE 4,10 00103 M00S00084.0pt +++|** OVERFLOW TEST. 00104 M00S00085.0pt +++| 00105 M00S00086.0pt +++|
| Line S00087 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00106 M01S00087.242l642 ---| ERRNG ZPTL-* OVERLAY LENGTH OVERFLOW
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00107 M01S00004.242l642 +++| OVERFLOW 5,ZPTL 00108 M00S00088.0pt +++| 00109 M00S00089.0pt +++| 00110 M00S00090.0pt +++| END
cdc/nos2.source/opl.opl871/deck/0pt.txt · Last modified: (external edit)