cdc:nos2.source:opl.opl871:deck:0au
Deck 0AU
Library Member Format: MODIFY
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M00S00001.0au +++| IDENT 0AU,UPFX 00002 M00S00002.0au +++| TITLE 0AU - UPDATE PROJECT PROFILE FILE. 00003 M00S00003.0au +++| PERIPH J 00004 M00S00004.0au +++| BASE MIXED 00005 M00S00005.0au +++| SST 00006 M00S00006.0au +++|*COMMENT 0AU - UPDATE PROJECT PROFILE FILE.
| Line S00007 Modification History | |
|---|---|
M01 (Removed by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00007 M01S00007.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP., 1976.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00008 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00009 M00S00008.0au +++| SPACE 4,10 00010 M00S00009.0au +++|*** 0AU - UPDATE PROJECT PROFILE FILE. 00011 M00S00010.0au +++|* S. L. KSANDER. 76/04/20. 00012 M00S00011.0au +++| SPACE 4,10 00013 M00S00012.0au +++|*** 0AU IS A LOCATION-FREE ROUTINE WHICH DOES THE FOLLOWING 00014 M00S00013.0au +++|* 00015 M00S00014.0au +++|* 1. UPDATES THE APPROPRIATE LEVEL-3 BLOCK PROJECT ENTRY OF 00016 M00S00015.0au +++|* THE PROJECT PROFILE FILE. 00017 M00S00016.0au +++|* 2. CLEARS CONTROL POINT AREA ACCUMULATOR OVERFLOW FLAGS 00018 M00S00017.0au +++|* AND ISSUES THE APPROPRIATE ACCOUNT DAYFILE MESSAGE. 00019 M00S00018.0au +++|* 00020 M00S00019.0au +++|* 0AU IS CALLED WHENEVER OVERFLOW OF AN ACCUMULATOR IS 00021 M00S00020.0au +++|* DETECTED OR AT END OF ACCOUNT BLOCK. 00022 M00S00021.0au +++| SPACE 4,15 00023 M00S00022.0au +++|*** ENTRY CONDITIONS. 00024 M00S00023.0au +++|* 00025 M00S00024.0au +++|* ((LA)-5) = AABB
| Line S00025 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00026 M01S00025.ns21000 ---|* AA = OVERFLOW FLAG BITS FROM *FPFW*.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00027 M01S00001.ns21000 +++|* AA = OVERFLOW FLAG BITS FROM *SRUW*. 00028 M00S00026.0au +++|* BB = FUNCTION CODE. 00029 M00S00027.0au +++|* 0 = END OF ACCOUNT BLOCK CALL. 00030 M00S00028.0au +++|* 1 = ACCUMULATOR OVERFLOW CALL. 00031 M00S00029.0au +++|* ((LA)-4) = PP ADDRESS OF TWO CM WORD JSN/SRU BLOCK. 00032 M00S00030.0au +++|* WORD 1 = 24/JSN,24/,6/SC,6/ 00033 M00S00031.0au +++|* WORD 2 = 18/,42/SRU ACCUMULATOR. 00034 M00S00032.0au +++|* JSN = JOB SEQUENCE NUMBER. 00035 M00S00033.0au +++|* SC = SERVICE CLASS. 00036 M00S00034.0au +++|* ((LA)-3) = FNT ORDINAL OF PROFILE FILE. 00037 M00S00035.0au +++|* ((LA)-2) = TRACK OF LEVEL 3 BLOCK ON PROFILE FILE. 00038 M00S00036.0au +++|* = 0, IF NO PROFILE FILE PRESENT. 00039 M00S00037.0au +++|* ((LA)-1) = SECTOR OF LEVEL 3 BLOCK ON PROFILE FILE. 00040 M00S00038.0au +++| SPACE 4,20 00041 M00S00039.0au +++|*** EXIT CONDITIONS. 00042 M00S00040.0au +++|* 00043 M00S00041.0au +++|* (A) = 0, IF SUCCESSFUL CALL. ONE OF THE FOLLOWING OCCURRED 00044 M00S00042.0au +++|* 1. END OF ACCOUNT BLOCK CALL - PROFILE FILE UPDATE 00045 M00S00043.0au +++|* PERFORMED IF PROFILE FILE PRESENT. 00046 M00S00044.0au +++|* 2. OVERFLOW CALL - NO OVERFLOW DETECTED, OR OVERFLOW 00047 M00S00045.0au +++|* FLAG CLEARED (IN ADDITION, IF SRU ACCUMULATOR, 00048 M00S00046.0au +++|* PROFILE FILE UPDATE PERFORMED AS IN 1.). 00049 M00S00047.0au +++|* ((LA)-1) = CONTROL POINT AREA ACCUMULATOR OVERFLOW 00050 M00S00048.0au +++|* FLAGS BEFORE CLEARING. 00051 M00S00049.0au +++|* THE FOLLOWING INDICATE PROFILE FILE NOT UPDATED- 00052 M00S00050.0au +++|* (A) = 1, IF SYSTEM ERROR. ONE OF THE FOLLOWING HAS OCCURED 00053 M00S00051.0au +++|* 1. *ORET* ERROR FLAG SET IN CP. 00054 M00S00052.0au +++|* 2. READ ERROR ON LEVEL-3 BLOCK. 00055 M00S00053.0au +++|* 3. VALIDATION ERROR IN LEVEL-3 BLOCK. 00056 M00S00054.0au +++|* 4. WRITE ERROR ON LEVEL-3 BLOCK. 00057 M00S00055.0au +++|* = 2, IF PROFILE FILE INTERLOCKED BY *PROFILE*. 00058 M00S00056.0au +++|* (ANY OVERFLOW FLAGS REMAIN SET).
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00059 M01S00001.242l642 +++|* 00060 M01S00002.242l642 +++|* (A) .LT. 0 IF PROFILE FILE DEVICE INACCESSIBLE.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 00061 M01S00001.ns2553 +++|* (T5) = EST ORDINAL OF PROFILE FILE DEVICE. 00062 M00S00057.0au +++| SPACE 4,15 00063 M00S00058.0au +++|*** ACCOUNT DAYFILE MESSAGES. 00064 M00S00059.0au +++|* 00065 M00S00060.0au +++|* THE FOLLOWING ERROR MESSAGES ARE ISSUED WHEN 00066 M00S00061.0au +++|* THE CORRESPONDING ACCUMULATOR HAS OVERFLOWED. 00067 M00S00062.0au +++|* (XXXXXX.XXX IS THE ACCUMULATOR,S OVERFLOW VALUE) 00068 M00S00063.0au +++|* 00069 M00S00064.0au +++|* *UCAD, XXXXXX.XXXKUNS.* = ADDER ACCUMULATOR. 00070 M00S00065.0au +++|* 00071 M00S00066.0au +++|* *UCPF, XXXXXX.XXXKUNS.* = PERMANENT FILE ACCUMULATOR. 00072 M00S00067.0au +++|* 00073 M00S00068.0au +++|* *UCMT, XXXXXX.XXXKUNS.* = MAGNETIC TAPE ACCUMULATOR. 00074 M00S00069.0au +++|* 00075 M00S00070.0au +++|* *UCMS, XXXXXX.XXXKUNS.* = MASS STORAGE ACCUMULATOR. 00076 M00S00071.0au +++|*
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2753 |
Seq # *Modification Id* Act ----------------------------+ 00077 M01S00001.ns2753 +++|* *UCOD, XXXXXX.XXXKUNS.* = OPTICAL DISK ACCUMULATOR. 00078 M01S00002.ns2753 +++|* 00079 M00S00072.0au +++|* *ACSO, XXXXXX.XXXUNTS.* = SRU ACCUMULATOR. 00080 M00S00073.0au +++|*
| Line S00074 Modification History | |
|---|---|
M01 (Removed by) | v22l602 |
Seq # *Modification Id* Act ----------------------------+ 00081 M01S00074.v22l602 ---|* *UCMP, XXXXXX.XXXKUNS.* = MAP III ACCUMULATOR.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | v22l602 |
Seq # *Modification Id* Act ----------------------------+ 00082 M01S00001.v22l602 +++|* *UCMP, XXXXXX.XXXKUNS.* = MAP ACCUMULATOR.
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00083 M01S00001.ns22000 +++|* 00084 M01S00002.ns22000 +++|* *UCAC, XXXXXX.XXXUNTS.* = AUC ACCUMULATOR. 00085 M00S00075.0au +++| SPACE 4,10 00086 M00S00076.0au +++|*** OPERATOR MESSAGES. 00087 M00S00077.0au +++|* 00088 M00S00078.0au +++|* NONE. 00089 M00S00079.0au +++| SPACE 4,5 00090 M00S00080.0au +++|*** ROUTINES USED. 00091 M00S00081.0au +++|* 00092 M00S00082.0au +++|* CALLS DFM, RDS, WDS. 00093 M00S00083.0au +++| SPACE 4,10 00094 M00S00084.0au +++|*CALL COMPMAC 00095 M00S00085.0au +++|*CALL COMSCPS 00096 M00S00086.0au +++|*CALL COMSMSP 00097 M00S00087.0au +++|*CALL COMSPFM 00098 M00S00088.0au +++|*CALL COMSPRO 00099 M00S00089.0au +++|*CALL COMSZOL 00100 M00S00090.0au +++|*CALL COMPREL 00101 M00S00091.0au +++| SPACE 4,10 00102 M00S00092.0au +++|**** DIRECT CELL ASSIGNMENTS. 00103 M00S00093.0au +++| 00104 M00S00094.0au +++| FA EQU 16 PROFILE FILE FNT ORDINAL 00105 M00S00095.0au +++| BA EQU 17 BUFFER ADDRESS 00106 M00S00096.0au +++| 00107 M00S00097.0au +++|**** 00108 M00S00098.0au +++| SPACE 4,10 00109 M00S00099.0au +++|**** ASSEMBLE CONSTANTS. 00110 M00S00100.0au +++| 00111 M00S00101.0au +++| EAFC EQU 0 END OF ACCOUNT BLOCK FUNCTION 00112 M00S00102.0au +++| AOFC EQU 1 ACCUMULATOR OVERFLOW FUNCTION 00113 M00S00103.0au +++| 00114 M00S00104.0au +++| MEPO EQU 3 MASS STORAGE ERROR PROCESSING OPTION 00115 M00S00105.0au +++| PFDL EQU 4000D DELAY CYCLES WAITING FOR PROFILE FILE 00116 M00S00106.0au +++| 00117 M00S00107.0au +++|**** 00118 M00S00108.0au +++| TITLE MAIN PROGRAM. 00119 M00S00109.0au +++| UPF SPACE 4,10 00120 M00S00110.0au +++|** UPF - MAIN PROGRAM. 00121 M00S00111.0au +++| 00122 M00S00112.0au +++| ORG 5 00123 M00S00113.0au +++| 00124 M00S00114.0au +++| UPF SUBR ENTRY/EXIT 00125 M00S00115.0au +++| RJM PRS PRESET 00126 M00S00116.0au +++| 00127 M00S00117.0au +++|* CHECK FOR ACCUMULATOR OVERFLOW. 00128 M00S00118.0au +++| 00129 M00S00119.0au +++| LDN RLCO CLEAR OVERFLOW FLAGS 00130 M00S00120.0au +++| STD CM+1 00131 M00S00121.0au +++| MONITOR RLMM 00132 M00S00122.0au +++| RJM IOM ISSUE OVERFLOW MESSAGES
| Line S00123 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00133 M01S00123.242l642 ---| MJN UPF2 IF SRU ACCUMULATOR OVERFLOW 00134 M01S00124.242l642 ---| UPFA LDN 0 CHECK FUNCTION CODE 00135 M01S00125.242l642 ---|* LDN (FC)&AOFC 00136 M01S00126.242l642 ---| NJN UPF2 IF NOT OVERFLOW CALL 00137 M01S00127.242l642 ---| SOM UPFC SET NORMAL COMPLETION 00138 M01S00128.242l642 ---| UJN UPF5 COMPLETE PROCESSING 00139 M00S00129.0au +++| 00140 M00S00130.0au +++|* READ LEVEL-3 BLOCK. 00141 M00S00131.0au +++| 00142 M00S00132.0au +++| UPF2 LDD T6 CHECK PROFILE FILE PRESENT 00143 M00S00133.0au +++| ZJN UPFX IF PROFILE FILE NOT PRESENT
| Line S00134 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00144 M01S00134.242l642 ---| SETMS READ 00145 M00S00135.0au +++| LDN 2 PRESET LEVEL-3 BLOCK PROJECT ENTRY INDEX 00146 M00S00136.0au +++| STD T3 00147 M00S00137.0au +++| LDM -5 CHECK SECTOR POSITION 00148 M00S00138.0au +++| SHN 21-12 00149 M00S00139.0au +++| PJN UPF3 IF FIRST ENTRY 00150 M00S00140.0au +++| LDC 5*PMWE SET SECOND ENTRY OFFSET 00151 M00S00141.0au +++| RAD T3 00152 M00S00142.0au +++| UPF3 LDD BA SET BUFFER ADDRESS 00153 M00S00143.0au +++| RAD T3 00154 M00S00144.0au +++| RAM UPFF 00155 M00S00145.0au +++| STM UPFG 00156 M00S00146.0au +++| RAM UPFH 00157 M00S00147.0au +++| LDD BA READ SECTOR 00158 M00S00148.0au +++| RJM. RDS 00159 M00S00149.0au +++| PJN UPF7 IF NO READ ERROR 00160 M00S00150.0au +++| 00161 M00S00151.0au +++|* COMPLETION PROCESSING. 00162 M00S00152.0au +++| 00163 M00S00153.0au +++| UPF4 ENDMS
| Line S00154 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00164 M01S00154.242l642 ---| UPF5 UJN UPF6 IF FILE NOT ATTACHED 00165 M01S00155.242l642 ---| UPFB EQU *-1 00166 M01S00156.242l642 ---|* PSN (FILE ATTACHED) 00167 M00S00157.0au +++| LDN RFAS RETURN PROFILE FILE 00168 M00S00158.0au +++| RJM ARF 00169 M00S00159.0au +++| UPF6 LDN 1 SET SYSTEM ERROR STATUS 00170 M00S00160.0au +++| UPFC EQU *-1 00171 M00S00161.0au +++|* LDN 0 (NORMAL COMPLETION) 00172 M00S00162.0au +++| LJM UPFX 00173 M00S00163.0au +++|
| Line S00164 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00174 M01S00164.242l642 ---| UPF7 ENDMS 00175 M01S00165.242l642 ---| 00176 M00S00166.0au +++|* UPDATE MASTER USER AND INSTALLATION SRU ACCUMULATORS. 00177 M00S00167.0au +++|
| Line S00168 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00178 M01S00168.242l642 ---| LDN ZERL CLEAR SRU ACCUMULATOR VALUE
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00179 M01S00003.242l642 +++| UPF7 LDN ZERL CLEAR SRU ACCUMULATOR VALUE 00180 M00S00169.0au +++| CRD CM 00181 M00S00170.0au +++| LDN 40 INCREMENT ACCUMULATOR FOR OVERFLOW 00182 M00S00171.0au +++| STD CM+1 00183 M00S00172.0au +++| UPFD LDN 0 CHECK FUNCTION CODE 00184 M00S00173.0au +++|* LDN (FC)&AOFC 00185 M00S00174.0au +++| ZJN UPF8 IF OVERFLOW FUNCTION CODE 00186 M00S00175.0au +++| LDD MA SET CURRENT SRU ACCUMULATOR 00187 M00S00176.0au +++| CWM. *,TR 00188 M00S00177.0au +++| UPFE EQU *-1 00189 M00S00178.0au +++| SBN 2 00190 M00S00179.0au +++| CRD CM 00191 M00S00180.0au +++| UPF8 LDD MA SET MASTER/INSTALLATION ACCUMULATOR 00192 M00S00181.0au +++| CWM. 5*PMSW,TR 00193 M00S00182.0au +++| UPFF EQU *-1 00194 M00S00183.0au +++| CWD CM SET INCREMENT VALUE 00195 M00S00184.0au +++| SBN 2 00196 M00S00185.0au +++| CWD CM 00197 M00S00186.0au +++| LDN 2 SET OPERATION COUNT 00198 M00S00187.0au +++| STD CM+4 00199 M00S00188.0au +++| LDN ABIF 00200 M00S00189.0au +++| STD CM+1 00201 M00S00190.0au +++| MONITOR ACTM 00202 M00S00191.0au +++| LDD MA SET INCREMENTED VALUES 00203 M00S00192.0au +++| CRM. 5*PMSW,TR 00204 M00S00193.0au +++| UPFG EQU *-1 00205 M00S00194.0au +++| LDN PDTL SET LAST UPDATE DATE AND TIME 00206 M00S00195.0au +++| CRM. 5*PUDW-5*PMSW,ON 00207 M00S00196.0au +++| UPFH EQU *-1 00208 M00S00197.0au +++| 00209 M00S00198.0au +++|* RE-WRITE LEVEL-3 BLOCK. 00210 M00S00199.0au +++|
| Line S00200 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00211 M01S00200.242l642 ---| SETMS WRITE,RW 00212 M00S00201.0au +++| LDD BA WRITE SECTOR 00213 M00S00202.0au +++| LMK WLSF SET WRITE LAST SECTOR 00214 M00S00203.0au +++| RJM. WDS 00215 M00S00204.0au +++| MJN UPF9 IF WRITE ERROR 00216 M00S00205.0au +++| SOM UPFC SET NORMAL COMPLETION 00217 M00S00206.0au +++| UPF9 LJM UPF4 RETURN FILE AND SET STATUS 00218 M00S00207.0au +++| 00219 M00S00208.0au +++| 00220 M00S00209.0au +++| ERRNZ PISW-PMSW-2 SETUP ERROR FOR *ACTM* FUNCTION 00221 M00S00210.0au +++| ERRNZ PUDW-PMSW-1 00222 M00S00211.0au +++| TITLE SUBROUTINES. 00223 M00S00212.0au +++| ARF SPACE 4,10 00224 M00S00213.0au +++|** ARF - ATTACH/RETURN FAST ATTACH FILE. 00225 M00S00214.0au +++|* 00226 M00S00215.0au +++|* ENTRY (A) = SUBFUNCTION CODE FOR ATTACH/RETURN. 00227 M00S00216.0au +++|* (FA) = PROFILE FILE FNT ORDINAL.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00228 M01S00004.242l642 +++|* (T5) = PROFILE FILE EST ORDINAL. 00229 M00S00217.0au +++|* 00230 M00S00218.0au +++|* EXIT (A) = FUNCTION RESPONSE CODE. 00231 M00S00219.0au +++|* (CM+4) = BYTE 4 OF RESPONSE IF REJECT.
| Line S00220 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00232 M01S00220.ns22000 ---|* (T5) = EQUIPMENT NUMBER.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00233 M02S00003.242l642 ---|* (T5) = EST ORDINAL.
| Line S00221 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00234 M01S00221.242l642 ---|*
| Line S00222 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00235 M02S00222.242l642 ---|* USES T1, T2, CM - CM+4.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00236 M02S00002.242l642 ---|* USES T1, T2, T5, CM - CM+4.
| Line S00223 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00237 M01S00223.242l642 ---|* 00238 M01S00224.242l642 ---|* CALLS SFA.
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00239 M01S00005.242l642 +++|* 00240 M01S00006.242l642 +++|* USES CM - CM+4. 00241 M00S00225.0au +++|* 00242 M00S00226.0au +++|* MACROS MONITOR. 00243 M00S00227.0au +++| 00244 M00S00228.0au +++| 00245 M00S00229.0au +++| ARF SUBR ENTRY/EXIT
| Line S00230 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00246 M01S00230.242l642 ---| STD T1 SET SUBFUNCTION CODE 00247 M01S00231.242l642 ---| SFA FNT,FA FETCH FILE NAME FOR COMPARE 00248 M01S00232.242l642 ---| CRD CM 00249 M01S00233.242l642 ---| LDD CM+3 SAVE GLOBAL FILE FLAG 00250 M01S00234.242l642 ---| LPN 77 00251 M01S00235.242l642 ---| STD T2 00252 M01S00236.242l642 ---| SFA FNT,FA FETCH PROFILE FST INFORMATION 00253 M01S00237.242l642 ---| ADN FSTG 00254 M01S00238.242l642 ---| CRD CM 00255 M01S00239.242l642 ---| LDD CM 00256 M01S00240.242l642 ---| STD T5 00257 M01S00241.242l642 ---| LDD T1 SET SUBFUNCTION CODE 00258 M00S00242.0au +++| STD CM+3
| Line S00243 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00259 M01S00243.ns21000 ---| LDN PTNM SET NON-ROLLABLE MODIFY MODE
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00260 M01S00003.ns21000 +++| LDC 4000+PTUP SET NON-ROLLABLE UPDATE MODE 00261 M00S00244.0au +++| STD CM+2
| Line S00245 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00262 M01S00245.242l642 ---| LDD T2
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00263 M01S00007.242l642 +++| ARFA LDN 0 00264 M00S00246.0au +++| ZJN ARF1 IF NOT GLOBAL FAST ATTACH FILE
| Line S00247 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00265 M01S00247.ns22000 ---| LDD T5 SET GLOBAL FAST ATTACH EQUIPMENT NUMBER
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00266 M01S00004.ns22000 +++| LDD T5 SET GLOBAL FAST ATTACH EST ORDINAL
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 00267 M01S00002.ns2553 +++| ARFB ADD TH IMMEDIATE RETURN IF INACCESSIBLE DEVICE 00268 M01S00003.ns2553 +++|* PSN (AFTER FILE IS ATTACHED) 00269 M00S00248.0au +++| ARF1 STD CM+1 00270 M00S00249.0au +++| LDD FA SET FNT ORDINAL 00271 M00S00250.0au +++| STD CM+4 00272 M00S00251.0au +++| MONITOR AFAM 00273 M00S00252.0au +++| LDD CM+1 SET EXIT CONDITION
| Line S00253 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00274 M01S00253.ns21000 ---| UJN ARFX RETURN
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00275 M01S00004.ns21000 +++| UJP ARFX RETURN
| Line S00254 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00276 M01S00254.242l642 ---| SPACE 4,10 00277 M01S00255.242l642 ---|** COMMON DECKS. 00278 M01S00256.242l642 ---| 00279 M01S00257.242l642 ---| 00280 M01S00258.242l642 ---| FNT$ EQU 1 ASSEMBLE SYSTEM FNT ACCESS 00281 M01S00259.242l642 ---| IFP$ EQU 1 ASSEMBLE REMOTE INITIALIZATION 00282 M01S00260.242l642 ---|*CALL COMPGFP 00283 M00S00261.0au +++| BUF SPACE 4,10 00284 M00S00262.0au +++|** BUF - MASS STORAGE BUFFER 00285 M00S00263.0au +++| 00286 M00S00264.0au +++| 00287 M00S00265.0au +++| BUF EQU * 00288 M00S00266.0au +++| TITLE OVERLAID SUBROUTINES. 00289 M00S00267.0au +++| IDM SPACE 4,10 00290 M00S00268.0au +++|** IDM - ISSUE DAYFILE MESSAGE. 00291 M00S00269.0au +++|*
| Line S00270 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00292 M01S00270.ns21000 ---|* ENTRY (A) = RIGHT 2 CHARACTERS OF DAYFILE MESSAGE PREFIX. 00293 M01S00271.ns21000 ---|* (A) .LT. 0, MESSAGE PRESET IN BUFFER. 00294 M01S00272.ns21000 ---|* 00295 M01S00273.ns21000 ---|* EXIT NONE.
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00296 M01S00005.ns21000 +++|* ENTRY MESSAGE PRESET IN BUFFER. 00297 M00S00274.0au +++|* 00298 M00S00275.0au +++|* CALLS DFM. 00299 M00S00276.0au +++| 00300 M00S00277.0au +++| 00301 M00S00278.0au +++| IDM SUBR ENTRY/EXIT 00302 M00S00279.0au +++| LDC AJNN+IDMA ISSUE ACCOUNT FILE MESSAGE 00303 M00S00280.0au +++| ADD LA 00304 M00S00281.0au +++| RJM. DFM
| Line S00282 Modification History | |
|---|---|
M01 (Removed by) | 0au1 |
Seq # *Modification Id* Act ----------------------------+ 00305 M01S00282.0au1 ---| LDC CPON+IDMA+5 ISSUE USER DAYFILE MESSAGE
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | 0au1 |
Seq # *Modification Id* Act ----------------------------+ 00306 M01S00001.0au1 +++| LDC CDON+IDMA+5 ISSUE USER DAYFILE MESSAGE 00307 M00S00283.0au +++| ADD LA 00308 M00S00284.0au +++| RJM. DFM 00309 M00S00285.0au +++| UJN IDMX 00310 M00S00286.0au +++| 00311 M00S00287.0au +++| 00312 M00S00288.0au +++| IDMA VFD 24/4HJSNN,24/4H ,12/** 00313 M00S00289.0au +++| DATA C*UCXX, 1048.576KUNS.* 00314 M00S00290.0au +++| IOM SPACE 4,15 00315 M00S00291.0au +++|** IOM - ISSUE OVERFLOW MESSAGES. 00316 M00S00292.0au +++|* 00317 M00S00293.0au +++|* ENTRY (CM+4) = CONTROL POINT AREA OVERFLOW FLAGS (RIGHT 00318 M00S00294.0au +++|* JUSTIFIED) BEFORE CLEARED. 00319 M00S00295.0au +++|*
| Line S00296 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00320 M01S00296.242l642 ---|* EXIT (A) .LT. 0, IF SRU ACCUMULATOR OVERFLOW. 00321 M01S00297.242l642 ---|* ((LA)-1) = CONTROL POINT AREA OVERFLOW FLAGS
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00322 M01S00008.242l642 +++|* EXIT ((LA)-1) = CONTROL POINT AREA OVERFLOW FLAGS 00323 M00S00298.0au +++|* (RIGHT JUSTIFIED) BEFORE CLEARED. 00324 M00S00299.0au +++|* APPROPRIATE OVERFLOW MESSAGES ISSUED. 00325 M00S00300.0au +++|* 00326 M00S00301.0au +++|* CALLS IDM. 00327 M00S00302.0au +++| 00328 M00S00303.0au +++|
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00329 M02S00006.ns22000 ---| IOM2 LDD T3 CHECK SRU ACCUMULATOR OVERFLOW 00330 M02S00007.ns22000 ---| SHN 21-5
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | ns2753 |
Seq # *Modification Id* Act ----------------------------+ 00331 M02S00005.ns2753 ---| IOM2 LDM -1 CHECK AUC OVERFLOW
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns2753 |
Seq # *Modification Id* Act ----------------------------+ 00332 M01S00003.ns2753 +++| IOM2 LDM -1 CHECK OPTICAL DISK OVERFLOW 00333 M01S00004.ns2753 +++| SHN 21-10 00334 M01S00005.ns2753 +++| PJN IOM2.1 IF NO OVERFLOW 00335 M01S00006.ns2753 +++| LDC 2ROD 00336 M01S00007.ns2753 +++| STM IDMA+6 00337 M01S00008.ns2753 +++| RJM IDM 00338 M01S00009.ns2753 +++| IOM2.1 LDM -1 CHECK AUC OVERFLOW
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00339 M01S00006.ns22000 +++| SHN 21-7 00340 M01S00007.ns22000 +++| PJN IOM4 IF NO OVERFLOW 00341 M01S00008.ns22000 +++| LDN 11 MOVE DAYFILE MESSAGE 00342 M01S00009.ns22000 +++| STD T1 00343 M01S00010.ns22000 +++| LDD LA 00344 M01S00011.ns22000 +++| RAM IOMF 00345 M01S00012.ns22000 +++| IOM3 LDM. IOMH,T1 00346 M01S00013.ns22000 +++| IOMF EQU *-1 00347 M01S00014.ns22000 +++| STM. IDMA+5-IDMA,T1 00348 M01S00015.ns22000 +++| IOMG EQU *-1 00349 M01S00016.ns22000 +++| SOD T1 00350 M01S00017.ns22000 +++| PJN IOM3 IF MESSAGE MOVE NOT COMPLETE 00351 M01S00018.ns22000 +++| RJM IDM ISSUE DAYFILE MESSAGE 00352 M01S00019.ns22000 +++| IOM4 LDD T3 CHECK SRU ACCUMULATOR OVERFLOW 00353 M01S00020.ns22000 +++| SHN 21-5
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00354 M01S00008.ns21000 +++| PJN IOMX IF NO OVERFLOW 00355 M01S00009.ns21000 +++| LDN 11 MOVE DAYFILE MESSAGE 00356 M01S00010.ns21000 +++| STD T1 00357 M01S00011.ns21000 +++| LDD LA 00358 M01S00012.ns21000 +++| RAM IOMA
| Line S00013 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00359 M02S00013.ns22000 ---| IOM3 LDM. IOMC,T1
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00360 M01S00021.ns22000 +++| IOM5 LDM. IOMC,T1
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00361 M01S00014.ns21000 +++| IOMA EQU *-1 00362 M01S00015.ns21000 +++| STM. IDMA+5-IDMA,T1 00363 M01S00016.ns21000 +++| IOMB EQU *-1 00364 M01S00017.ns21000 +++| SOD T1
| Line S00018 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00365 M02S00018.ns22000 ---| PJN IOM3 IF MESSAGE MOVE NOT COMPLETE
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00366 M01S00022.ns22000 +++| PJN IOM5 IF MESSAGE MOVE NOT COMPLETE
| Line S00019 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00367 M01S00019.ns21000 +++| RJM IDM ISSUE DAYFILE MESSAGE
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00368 M02S00020.242l642 ---| LCN 0
| Line S00021 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00369 M01S00021.ns21000 +++| 00370 M00S00304.0au +++| IOM SUBR ENTRY/EXIT 00371 M00S00305.0au +++| LDD CM+4 SET OVERFLOW FLAGS 00372 M00S00306.0au +++| STM -1 00373 M00S00307.0au +++| STD T3
| Line S00308 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00374 M01S00308.ns22000 ---| LDN 7-2 SET INITIAL SHIFT COUNT
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00375 M01S00023.ns22000 +++| LDN 7-2 SET INITIAL SHIFT COUNT 00376 M00S00309.0au +++| STD T4 00377 M00S00310.0au +++| IOM1 SOD T4 DECREMENT SHIFT COUNT
| Line S00311 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00378 M01S00311.ns22000 ---| MJN IOM2 IF ALL SHIFTS COMPLETE
| Line S00024 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00379 M01S00024.ns22000 +++| MJP IOM2 IF ALL SHIFTS COMPLETE 00380 M00S00312.0au +++| LDD T3 CHECK OVERFLOW FLAG 00381 M00S00313.0au +++| RAD T3
| Line S00314 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00382 M01S00314.ns22000 ---| SHN 21-7
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00383 M01S00025.ns22000 +++| SHN 21-7 00384 M00S00315.0au +++| PJN IOM1 IF OVERFLOW FLAG NOT SET 00385 M00S00316.0au +++| LDM. IOMD-IDMA-5,T4 SET MESSAGE PREFIX 00386 M00S00317.0au +++| IOME EQU *-1 00387 M00S00318.0au +++| STM IDMA+6 00388 M00S00319.0au +++| RJM IDM 00389 M00S00320.0au +++| UJN IOM1 PROCESS REMAINING OVERFLOW FLAGS 00390 M00S00321.0au +++|
| Line S00322 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00391 M01S00322.ns21000 ---| IOM2 LDD T3 CHECK SRU ACCUMULATOR OVERFLOW 00392 M01S00323.ns21000 ---| SHN 21-5 00393 M01S00324.ns21000 ---| PJN IOM4 IF NO OVERFLOW 00394 M01S00325.ns21000 ---| LDN 11 MOVE DAYFILE MESSAGE 00395 M01S00326.ns21000 ---| STD T1 00396 M01S00327.ns21000 ---| LDD LA 00397 M01S00328.ns21000 ---| RAM IOMA 00398 M01S00329.ns21000 ---| IOM3 LDM. IOMC,T1 00399 M01S00330.ns21000 ---| IOMA EQU *-1 00400 M01S00331.ns21000 ---| STM. IDMA+5-IDMA,T1 00401 M01S00332.ns21000 ---| IOMB EQU *-1 00402 M01S00333.ns21000 ---| SOD T1 00403 M01S00334.ns21000 ---| PJN IOM3 IF MESSAGE MOVE NOT COMPLETE 00404 M01S00335.ns21000 ---| RJM IDM ISSUE DAYFILE MESSAGE 00405 M01S00336.ns21000 ---| LCN 0 00406 M01S00337.ns21000 ---| IOM4 LJM IOMX 00407 M00S00338.0au +++| 00408 M00S00339.0au +++| 00409 M00S00340.0au +++| IOMC DATA L*ACSO, 219902.325UNTS*
| Line S00026 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00410 M01S00026.ns22000 +++| 00411 M01S00027.ns22000 +++| IOMH DATA L*UCAC, 536872.911UNTS.* 00412 M00S00341.0au +++| 00413 M00S00342.0au +++| IOMD BSS 0 MESSAGE PREFIX TABLE 00414 M00S00343.0au +++| CON 2RAD 00415 M00S00344.0au +++| CON 2RPF 00416 M00S00345.0au +++| CON 2RMT 00417 M00S00346.0au +++| CON 2RMS 00418 M00S00347.0au +++| CON 2RMP 00419 M00S00348.0au +++| TITLE PRESET. 00420 M00S00349.0au +++| PRS SPACE 4,25 00421 M00S00350.0au +++|** PRS - PRESET. 00422 M00S00351.0au +++|* 00423 M00S00352.0au +++|* ENTRY ((LA)-5 - (LA)-1) = INITIAL CALLING SEQUENCE. 00424 M00S00353.0au +++|*
| Line S00354 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00425 M01S00354.242l642 ---|* EXIT (T6) = LEVEL-3 BLOCK TRACK.
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00426 M01S00009.242l642 +++|* EXIT (T5) = PROFILE FILE DEVICE EST ORDINAL. 00427 M01S00010.242l642 +++|* (T6) = LEVEL-3 BLOCK TRACK. 00428 M00S00355.0au +++|* (T7) = LEVEL-3 BLOCK SECTOR. 00429 M00S00356.0au +++|* (FA) = FNT ORDINAL OF PROFILE FILE. 00430 M00S00357.0au +++|* (BA) = SECTOR BUFFER ADDRESS. 00431 M00S00358.0au +++|* (UPFA) = (UPFD) = *LDN (FC)&AOFC* 00432 M00S00359.0au +++|* (UPFE) = PARAMETER BLOCK ADDRESS. 00433 M00S00360.0au +++|* (UPFB) = SET IF PROFILE FILE PRESENT.
| Line S00361 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00434 M01S00361.ns22000 ---|* (IOMB) = RELOCATED ADDRESS OF *IDMA+5*.
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00435 M01S00028.ns22000 +++|* (IOMB) = (IOMG) = RELOCATED ADDRESS OF *IDMA+5*. 00436 M00S00362.0au +++|* (IDMA - IDMA+1) = JOB SEQUENCE NUMBER. 00437 M00S00363.0au +++|* (SFAA) = BASE FNT ADDRESS / 10.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 00438 M01S00004.ns2553 +++|* (ARFB) = *PSN* IF *PROFILE* ATTACHED OR NOT NEEDED. 00439 M00S00364.0au +++|* PROFILE FILE ATTACHED IF PRESENT. 00440 M00S00365.0au +++|* DRIVER SET IF NEEDED. 00441 M00S00366.0au +++|* TO *UPFX* IF *ORET* ERROR FLAG SET OR FILE BUSY. 00442 M00S00367.0au +++|*
| Line S00368 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00443 M01S00368.ns21000 ---|* USES T1 - T7, CM - CM+4.
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00444 M02S00022.242l642 ---|* USES T1, T2, T6, T7, CM - CM+4.
| Line S00369 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00445 M01S00369.242l642 ---|* 00446 M01S00370.242l642 ---|* CALLS ARF, IFP.
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00447 M01S00011.242l642 +++|* USES BA, FA, T1, T2, CM - CM+4, T5 - T5+4. 00448 M01S00012.242l642 +++|* 00449 M01S00013.242l642 +++|* CALLS ARF. 00450 M00S00371.0au +++|*
| Line S00372 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00451 M01S00372.242l642 ---|* MACROS PAUSE, SFA.
| Line S00014 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00452 M01S00014.242l642 +++|* MACROS PAUSE, SETMS, SFA. 00453 M00S00373.0au +++| 00454 M00S00374.0au +++| 00455 M00S00375.0au +++| PRS SUBR ENTRY/EXIT
| Line S00376 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00456 M01S00376.242l642 ---| RJM IFP INITIALIZE *COMPGFP* 00457 M00S00377.0au +++| LDN 1 SET JSN FOR DAYFILE MESSAGE 00458 M00S00378.0au +++| STD T1 00459 M00S00379.0au +++| LDD LA 00460 M00S00380.0au +++| RAM PRSB 00461 M00S00381.0au +++| RAM IOMB
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00462 M01S00029.ns22000 +++| STM IOMG 00463 M00S00382.0au +++| RAM IOME 00464 M00S00383.0au +++| LDM -4 SET JSN/SRU PARAMETER ADDRESS 00465 M00S00384.0au +++| STM UPFE 00466 M00S00385.0au +++| STM PRSA 00467 M00S00386.0au +++| ADN 4 00468 M00S00387.0au +++| STD T2 00469 M00S00388.0au +++| PRS1 LDM. *,T1 MOVE JSN TO DAYFILE MESSAGE 00470 M00S00389.0au +++| PRSA EQU *-1 00471 M00S00390.0au +++| STM. IDMA,T1 00472 M00S00391.0au +++| PRSB EQU *-1 00473 M00S00392.0au +++| SOD T1 00474 M00S00393.0au +++| PJN PRS1 00475 M00S00394.0au +++| LDI T2 SET SERVICE CLASS 00476 M00S00395.0au +++| SHN -6 00477 M00S00396.0au +++| STM IDMA+4 00478 M00S00397.0au +++| 00479 M00S00398.0au +++|* SET PROFILE FILE POINTERS FROM PARAMETER PASS. 00480 M00S00399.0au +++|
| Line S00400 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00481 M01S00400.242l642 ---| LDM -1 SET LEVEL-3 BLOCK SECTOR 00482 M01S00401.242l642 ---| STD T7 00483 M00S00402.0au +++| LDC BUF SET BUFFER ADDRESS 00484 M00S00403.0au +++| ADD LA 00485 M00S00404.0au +++| STD BA 00486 M00S00405.0au +++| LDM -3 SET PROFILE FILE FNT ORDINAL 00487 M00S00406.0au +++| STD FA
| Line S00407 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00488 M01S00407.242l642 ---| LDM -2 SET LEVEL-3 BLOCK TRACK 00489 M01S00408.242l642 ---| STD T6 00490 M01S00409.242l642 ---| NJN PRS2 IF PROFILE FILE PRESENT 00491 M01S00410.242l642 ---| UJN PRS6 SET FUNCTION CODE
| Line S00015 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00492 M01S00015.242l642 +++| SFA FNT READ FNT ENTRY 00493 M01S00016.242l642 +++| CRD CM 00494 M01S00017.242l642 +++| ADN FSTG SET PROFILE FILE DEVICE EST ORDINAL 00495 M01S00018.242l642 +++| CRD T5 00496 M01S00019.242l642 +++| LDD CM+3 SET GLOBAL FILE STATUS 00497 M01S00020.242l642 +++| LPN 77 00498 M01S00021.242l642 +++| RAM ARFA 00499 M01S00022.242l642 +++| LDM -1 SET LEVEL-3 BLOCK SECTOR 00500 M01S00023.242l642 +++| STD T7 00501 M01S00024.242l642 +++| LDM -5 EXTRACT FUNCTION CODE 00502 M01S00025.242l642 +++| LPN 77 00503 M01S00026.242l642 +++| LMN AOFC 00504 M01S00027.242l642 +++| STD T1 00505 M01S00028.242l642 +++| RAM UPFD 00506 M01S00029.242l642 +++| LDD CP FETCH CONTROL POINT AREA OVERFLOW FLAGS 00507 M01S00030.242l642 +++| ADN SRUW 00508 M01S00031.242l642 +++| CRD CM 00509 M01S00032.242l642 +++| LDD CM+1 CHECK SRU ACCUMULATOR OVERFLOW 00510 M01S00033.242l642 +++| LPN 40 00511 M01S00034.242l642 +++| ADD T1 00512 M01S00035.242l642 +++| ZJN PRS2 IF NO NEED TO ACCESS PROFILE FILE 00513 M01S00036.242l642 +++| LDM -2 00514 M01S00037.242l642 +++| PRS2 STD T6 00515 M01S00038.242l642 +++| NJN PRS4 IF PROFILE FILE PRESENT
| Line S00039 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
M02 (Removed by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 00516 M02S00039.ns2553 ---| PRS3 LJM PRSX RETURN
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 00517 M01S00005.ns2553 +++| PRS3 STM ARFB 00518 M01S00006.ns2553 +++| LJM PRSX RETURN
| Line S00040 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00519 M01S00040.242l642 +++| 00520 M01S00041.242l642 +++| PRS4 SETMS IO,RW
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act ----------------------------+ 00521 M01S00001.ns2776 +++| LDM. MSD 00522 M01S00002.ns2776 +++| SHN 21-6
| Line S00042 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00523 M01S00042.242l642 +++| MJN PRS6 IF PROFILE FILE DEVICE INACCESSIBLE 00524 M00S00411.0au +++| 00525 M00S00412.0au +++|* ATTACH PROFILE FILE FOR UPDATE. 00526 M00S00413.0au +++|
| Line S00414 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00527 M01S00414.242l642 ---| PRS2 LDN AFAS ATTACH PROFILE FILE 00528 M01S00415.242l642 ---| RJM ARF 00529 M01S00416.242l642 ---| ZJN PRS5 IF ATTACH COMPLETED 00530 M01S00417.242l642 ---| LDD CM+4
| Line S00418 Modification History | |
|---|---|
M01 (Removed by) | ns21000 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00531 M02S00418.242l642 ---| SHN 21-10
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00532 M02S00023.242l642 ---| SHN 21-1
| Line S00419 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00533 M01S00419.242l642 ---| PJN PRS3 IF ATTACHED IN MODIFY MODE BY *PROFILE*
| Line S00043 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00534 M01S00043.242l642 +++| PRS5 LDN AFAS ATTACH PROFILE FILE 00535 M01S00044.242l642 +++| RJM ARF 00536 M01S00045.242l642 +++| ZJN PRS3 IF ATTACH COMPLETED
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 00537 M01S00007.ns2553 +++| SHN 21-11 00538 M01S00008.ns2553 +++| MJN PRS6 IF DEVICE INACCESSIBLE
| Line S00046 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00539 M01S00046.242l642 +++| LDD CM+4 00540 M01S00047.242l642 +++| LPN 2 CHECK REJECT 00541 M01S00048.242l642 +++| LMN 2 00542 M01S00049.242l642 +++| NJN PRS6 IF ATTACHED IN MODIFY MODE BY *PROFILE* 00543 M00S00420.0au +++| 00544 M00S00421.0au +++|* WAIT FOR OTHER *0AU* TO RELEASE PROFILE FILE. 00545 M00S00422.0au +++| 00546 M00S00423.0au +++| LDC PFDL/2 00547 M00S00424.0au +++| SBN 1 00548 M00S00425.0au +++| NJN *-1 00549 M00S00426.0au +++| PAUSE 00550 M00S00427.0au +++| LDD CM+1 CHECK ERROR FLAG
| Line S00428 Modification History | |
|---|---|
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00551 M01S00428.242l642 ---| LPN 37 00552 M01S00429.242l642 ---| LMN ORET 00553 M01S00430.242l642 ---| ZJN PRS4 IF OVERRIDE ERROR FLAG SET 00554 M01S00431.242l642 ---| UJN PRS2 RETRY FILE ATTACH 00555 M01S00432.242l642 ---| 00556 M01S00433.242l642 ---| PRS3 LDN 1 SET ERROR CODE 00557 M01S00434.242l642 ---| PRS4 ADN 1 INCREMENT ERROR CODE 00558 M01S00435.242l642 ---| LJM UPFX 00559 M01S00436.242l642 ---| 00560 M01S00437.242l642 ---| PRS5 STM UPFB SET FILE ATTACHED 00561 M01S00438.242l642 ---| 00562 M01S00439.242l642 ---|* SET FUNCTION CODE. 00563 M01S00440.242l642 ---| 00564 M01S00441.242l642 ---| PRS6 LDM -5 SET FUNCTION CODE 00565 M01S00442.242l642 ---| LPN 77 00566 M01S00443.242l642 ---| LMN AOFC 00567 M01S00444.242l642 ---| RAM UPFA 00568 M01S00445.242l642 ---| STM UPFD 00569 M01S00446.242l642 ---| LJM PRSX RETURN 00570 M01S00447.242l642 ---| SPACE 4,10 00571 M01S00448.242l642 ---|** ASSEMBLE *COMPGFP* INITIALIZATION CODE. 00572 M01S00449.242l642 ---| 00573 M01S00450.242l642 ---| 00574 M01S00451.242l642 ---| IFP HERE
| Line S00050 Modification History | |
|---|---|
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00575 M01S00050.242l642 +++| LMN ORET 00576 M01S00051.242l642 +++| NJN PRS5 IF NOT OPERATOR OVERRIDE 00577 M01S00052.242l642 +++| LDN 1 00578 M01S00053.242l642 +++| PRS6 LJM UPFX EXIT 00579 M01S00054.242l642 +++| SPACE 4,10 00580 M01S00055.242l642 +++|** COMMON DECKS. 00581 M01S00056.242l642 +++| 00582 M01S00057.242l642 +++| 00583 M01S00058.242l642 +++| FNT$ EQU 1 ASSEMBLE SYSTEM FNT ACCESS 00584 M01S00059.242l642 +++|*CALL COMPGFP 00585 M00S00452.0au +++| SPACE 4,10 00586 M00S00453.0au +++| OVERFLOW 5,ZAUL 00587 M00S00454.0au +++| 00588 M00S00455.0au +++| ERRNG ZAUL-BUF-503 BUFFER OVERFLOWS CALLING PROGRAM 00589 M00S00456.0au +++| END
cdc/nos2.source/opl.opl871/deck/0au.txt · Last modified: by 127.0.0.1