cdc:nos2.source:opl.opl871:deck:0au
Deck 0AU
9 Modifications
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M01S00001.0au +++| IDENT 0AU,UPFX 00002 M01S00002.0au +++| TITLE 0AU - UPDATE PROJECT PROFILE FILE. 00003 M01S00003.0au +++| PERIPH J 00004 M01S00004.0au +++| BASE MIXED 00005 M01S00005.0au +++| SST 00006 M01S00006.0au +++|*COMMENT 0AU - UPDATE PROJECT PROFILE FILE.
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00007 M02S00007.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP., 1976. 00008 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00009 M01S00008.0au +++| SPACE 4,10 00010 M01S00009.0au +++|*** 0AU - UPDATE PROJECT PROFILE FILE. 00011 M01S00010.0au +++|* S. L. KSANDER. 76/04/20. 00012 M01S00011.0au +++| SPACE 4,10 00013 M01S00012.0au +++|*** 0AU IS A LOCATION-FREE ROUTINE WHICH DOES THE FOLLOWING 00014 M01S00013.0au +++|* 00015 M01S00014.0au +++|* 1. UPDATES THE APPROPRIATE LEVEL-3 BLOCK PROJECT ENTRY OF 00016 M01S00015.0au +++|* THE PROJECT PROFILE FILE. 00017 M01S00016.0au +++|* 2. CLEARS CONTROL POINT AREA ACCUMULATOR OVERFLOW FLAGS 00018 M01S00017.0au +++|* AND ISSUES THE APPROPRIATE ACCOUNT DAYFILE MESSAGE. 00019 M01S00018.0au +++|* 00020 M01S00019.0au +++|* 0AU IS CALLED WHENEVER OVERFLOW OF AN ACCUMULATOR IS 00021 M01S00020.0au +++|* DETECTED OR AT END OF ACCOUNT BLOCK. 00022 M01S00021.0au +++| SPACE 4,15 00023 M01S00022.0au +++|*** ENTRY CONDITIONS. 00024 M01S00023.0au +++|* 00025 M01S00024.0au +++|* ((LA)-5) = AABB
| Line S00025 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00026 M02S00025.ns21000 ---|* AA = OVERFLOW FLAG BITS FROM *FPFW*. 00027 M01S00001.ns21000 +++|* AA = OVERFLOW FLAG BITS FROM *SRUW*. 00028 M01S00026.0au +++|* BB = FUNCTION CODE. 00029 M01S00027.0au +++|* 0 = END OF ACCOUNT BLOCK CALL. 00030 M01S00028.0au +++|* 1 = ACCUMULATOR OVERFLOW CALL. 00031 M01S00029.0au +++|* ((LA)-4) = PP ADDRESS OF TWO CM WORD JSN/SRU BLOCK. 00032 M01S00030.0au +++|* WORD 1 = 24/JSN,24/,6/SC,6/ 00033 M01S00031.0au +++|* WORD 2 = 18/,42/SRU ACCUMULATOR. 00034 M01S00032.0au +++|* JSN = JOB SEQUENCE NUMBER. 00035 M01S00033.0au +++|* SC = SERVICE CLASS. 00036 M01S00034.0au +++|* ((LA)-3) = FNT ORDINAL OF PROFILE FILE. 00037 M01S00035.0au +++|* ((LA)-2) = TRACK OF LEVEL 3 BLOCK ON PROFILE FILE. 00038 M01S00036.0au +++|* = 0, IF NO PROFILE FILE PRESENT. 00039 M01S00037.0au +++|* ((LA)-1) = SECTOR OF LEVEL 3 BLOCK ON PROFILE FILE. 00040 M01S00038.0au +++| SPACE 4,20 00041 M01S00039.0au +++|*** EXIT CONDITIONS. 00042 M01S00040.0au +++|* 00043 M01S00041.0au +++|* (A) = 0, IF SUCCESSFUL CALL. ONE OF THE FOLLOWING OCCURRED 00044 M01S00042.0au +++|* 1. END OF ACCOUNT BLOCK CALL - PROFILE FILE UPDATE 00045 M01S00043.0au +++|* PERFORMED IF PROFILE FILE PRESENT. 00046 M01S00044.0au +++|* 2. OVERFLOW CALL - NO OVERFLOW DETECTED, OR OVERFLOW 00047 M01S00045.0au +++|* FLAG CLEARED (IN ADDITION, IF SRU ACCUMULATOR, 00048 M01S00046.0au +++|* PROFILE FILE UPDATE PERFORMED AS IN 1.). 00049 M01S00047.0au +++|* ((LA)-1) = CONTROL POINT AREA ACCUMULATOR OVERFLOW 00050 M01S00048.0au +++|* FLAGS BEFORE CLEARING. 00051 M01S00049.0au +++|* THE FOLLOWING INDICATE PROFILE FILE NOT UPDATED- 00052 M01S00050.0au +++|* (A) = 1, IF SYSTEM ERROR. ONE OF THE FOLLOWING HAS OCCURED 00053 M01S00051.0au +++|* 1. *ORET* ERROR FLAG SET IN CP. 00054 M01S00052.0au +++|* 2. READ ERROR ON LEVEL-3 BLOCK. 00055 M01S00053.0au +++|* 3. VALIDATION ERROR IN LEVEL-3 BLOCK. 00056 M01S00054.0au +++|* 4. WRITE ERROR ON LEVEL-3 BLOCK. 00057 M01S00055.0au +++|* = 2, IF PROFILE FILE INTERLOCKED BY *PROFILE*. 00058 M01S00056.0au +++|* (ANY OVERFLOW FLAGS REMAIN SET). 00059 M01S00001.242l642 +++|* 00060 M01S00002.242l642 +++|* (A) .LT. 0 IF PROFILE FILE DEVICE INACCESSIBLE. 00061 M01S00001.ns2553 +++|* (T5) = EST ORDINAL OF PROFILE FILE DEVICE. 00062 M01S00057.0au +++| SPACE 4,15 00063 M01S00058.0au +++|*** ACCOUNT DAYFILE MESSAGES. 00064 M01S00059.0au +++|* 00065 M01S00060.0au +++|* THE FOLLOWING ERROR MESSAGES ARE ISSUED WHEN 00066 M01S00061.0au +++|* THE CORRESPONDING ACCUMULATOR HAS OVERFLOWED. 00067 M01S00062.0au +++|* (XXXXXX.XXX IS THE ACCUMULATOR,S OVERFLOW VALUE) 00068 M01S00063.0au +++|* 00069 M01S00064.0au +++|* *UCAD, XXXXXX.XXXKUNS.* = ADDER ACCUMULATOR. 00070 M01S00065.0au +++|* 00071 M01S00066.0au +++|* *UCPF, XXXXXX.XXXKUNS.* = PERMANENT FILE ACCUMULATOR. 00072 M01S00067.0au +++|* 00073 M01S00068.0au +++|* *UCMT, XXXXXX.XXXKUNS.* = MAGNETIC TAPE ACCUMULATOR. 00074 M01S00069.0au +++|* 00075 M01S00070.0au +++|* *UCMS, XXXXXX.XXXKUNS.* = MASS STORAGE ACCUMULATOR. 00076 M01S00071.0au +++|* 00077 M01S00001.ns2753 +++|* *UCOD, XXXXXX.XXXKUNS.* = OPTICAL DISK ACCUMULATOR. 00078 M01S00002.ns2753 +++|* 00079 M01S00072.0au +++|* *ACSO, XXXXXX.XXXUNTS.* = SRU ACCUMULATOR. 00080 M01S00073.0au +++|*
| Line S00074 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | v22l602 |
Seq # *Modification Id* Act ----------------------------+ 00081 M02S00074.v22l602 ---|* *UCMP, XXXXXX.XXXKUNS.* = MAP III ACCUMULATOR. 00082 M01S00001.v22l602 +++|* *UCMP, XXXXXX.XXXKUNS.* = MAP ACCUMULATOR. 00083 M01S00001.ns22000 +++|* 00084 M01S00002.ns22000 +++|* *UCAC, XXXXXX.XXXUNTS.* = AUC ACCUMULATOR. 00085 M01S00075.0au +++| SPACE 4,10 00086 M01S00076.0au +++|*** OPERATOR MESSAGES. 00087 M01S00077.0au +++|* 00088 M01S00078.0au +++|* NONE. 00089 M01S00079.0au +++| SPACE 4,5 00090 M01S00080.0au +++|*** ROUTINES USED. 00091 M01S00081.0au +++|* 00092 M01S00082.0au +++|* CALLS DFM, RDS, WDS. 00093 M01S00083.0au +++| SPACE 4,10 00094 M01S00084.0au +++|*CALL COMPMAC 00095 M01S00085.0au +++|*CALL COMSCPS 00096 M01S00086.0au +++|*CALL COMSMSP 00097 M01S00087.0au +++|*CALL COMSPFM 00098 M01S00088.0au +++|*CALL COMSPRO 00099 M01S00089.0au +++|*CALL COMSZOL 00100 M01S00090.0au +++|*CALL COMPREL 00101 M01S00091.0au +++| SPACE 4,10 00102 M01S00092.0au +++|**** DIRECT CELL ASSIGNMENTS. 00103 M01S00093.0au +++| 00104 M01S00094.0au +++| FA EQU 16 PROFILE FILE FNT ORDINAL 00105 M01S00095.0au +++| BA EQU 17 BUFFER ADDRESS 00106 M01S00096.0au +++| 00107 M01S00097.0au +++|**** 00108 M01S00098.0au +++| SPACE 4,10 00109 M01S00099.0au +++|**** ASSEMBLE CONSTANTS. 00110 M01S00100.0au +++| 00111 M01S00101.0au +++| EAFC EQU 0 END OF ACCOUNT BLOCK FUNCTION 00112 M01S00102.0au +++| AOFC EQU 1 ACCUMULATOR OVERFLOW FUNCTION 00113 M01S00103.0au +++| 00114 M01S00104.0au +++| MEPO EQU 3 MASS STORAGE ERROR PROCESSING OPTION 00115 M01S00105.0au +++| PFDL EQU 4000D DELAY CYCLES WAITING FOR PROFILE FILE 00116 M01S00106.0au +++| 00117 M01S00107.0au +++|**** 00118 M01S00108.0au +++| TITLE MAIN PROGRAM. 00119 M01S00109.0au +++| UPF SPACE 4,10 00120 M01S00110.0au +++|** UPF - MAIN PROGRAM. 00121 M01S00111.0au +++| 00122 M01S00112.0au +++| ORG 5 00123 M01S00113.0au +++| 00124 M01S00114.0au +++| UPF SUBR ENTRY/EXIT 00125 M01S00115.0au +++| RJM PRS PRESET 00126 M01S00116.0au +++| 00127 M01S00117.0au +++|* CHECK FOR ACCUMULATOR OVERFLOW. 00128 M01S00118.0au +++| 00129 M01S00119.0au +++| LDN RLCO CLEAR OVERFLOW FLAGS 00130 M01S00120.0au +++| STD CM+1 00131 M01S00121.0au +++| MONITOR RLMM 00132 M01S00122.0au +++| RJM IOM ISSUE OVERFLOW MESSAGES
| Line S00123 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00133 M02S00123.242l642 ---| MJN UPF2 IF SRU ACCUMULATOR OVERFLOW
| Line S00124 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00134 M02S00124.242l642 ---| UPFA LDN 0 CHECK FUNCTION CODE
| Line S00125 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00135 M02S00125.242l642 ---|* LDN (FC)&AOFC
| Line S00126 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00136 M02S00126.242l642 ---| NJN UPF2 IF NOT OVERFLOW CALL
| Line S00127 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00137 M02S00127.242l642 ---| SOM UPFC SET NORMAL COMPLETION
| Line S00128 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00138 M02S00128.242l642 ---| UJN UPF5 COMPLETE PROCESSING 00139 M01S00129.0au +++| 00140 M01S00130.0au +++|* READ LEVEL-3 BLOCK. 00141 M01S00131.0au +++| 00142 M01S00132.0au +++| UPF2 LDD T6 CHECK PROFILE FILE PRESENT 00143 M01S00133.0au +++| ZJN UPFX IF PROFILE FILE NOT PRESENT
| Line S00134 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00144 M02S00134.242l642 ---| SETMS READ 00145 M01S00135.0au +++| LDN 2 PRESET LEVEL-3 BLOCK PROJECT ENTRY INDEX 00146 M01S00136.0au +++| STD T3 00147 M01S00137.0au +++| LDM -5 CHECK SECTOR POSITION 00148 M01S00138.0au +++| SHN 21-12 00149 M01S00139.0au +++| PJN UPF3 IF FIRST ENTRY 00150 M01S00140.0au +++| LDC 5*PMWE SET SECOND ENTRY OFFSET 00151 M01S00141.0au +++| RAD T3 00152 M01S00142.0au +++| UPF3 LDD BA SET BUFFER ADDRESS 00153 M01S00143.0au +++| RAD T3 00154 M01S00144.0au +++| RAM UPFF 00155 M01S00145.0au +++| STM UPFG 00156 M01S00146.0au +++| RAM UPFH 00157 M01S00147.0au +++| LDD BA READ SECTOR 00158 M01S00148.0au +++| RJM. RDS 00159 M01S00149.0au +++| PJN UPF7 IF NO READ ERROR 00160 M01S00150.0au +++| 00161 M01S00151.0au +++|* COMPLETION PROCESSING. 00162 M01S00152.0au +++| 00163 M01S00153.0au +++| UPF4 ENDMS
| Line S00154 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00164 M02S00154.242l642 ---| UPF5 UJN UPF6 IF FILE NOT ATTACHED
| Line S00155 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00165 M02S00155.242l642 ---| UPFB EQU *-1
| Line S00156 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00166 M02S00156.242l642 ---|* PSN (FILE ATTACHED) 00167 M01S00157.0au +++| LDN RFAS RETURN PROFILE FILE 00168 M01S00158.0au +++| RJM ARF 00169 M01S00159.0au +++| UPF6 LDN 1 SET SYSTEM ERROR STATUS 00170 M01S00160.0au +++| UPFC EQU *-1 00171 M01S00161.0au +++|* LDN 0 (NORMAL COMPLETION) 00172 M01S00162.0au +++| LJM UPFX 00173 M01S00163.0au +++|
| Line S00164 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00174 M02S00164.242l642 ---| UPF7 ENDMS
| Line S00165 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00175 M02S00165.242l642 ---| 00176 M01S00166.0au +++|* UPDATE MASTER USER AND INSTALLATION SRU ACCUMULATORS. 00177 M01S00167.0au +++|
| Line S00168 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00178 M02S00168.242l642 ---| LDN ZERL CLEAR SRU ACCUMULATOR VALUE 00179 M01S00003.242l642 +++| UPF7 LDN ZERL CLEAR SRU ACCUMULATOR VALUE 00180 M01S00169.0au +++| CRD CM 00181 M01S00170.0au +++| LDN 40 INCREMENT ACCUMULATOR FOR OVERFLOW 00182 M01S00171.0au +++| STD CM+1 00183 M01S00172.0au +++| UPFD LDN 0 CHECK FUNCTION CODE 00184 M01S00173.0au +++|* LDN (FC)&AOFC 00185 M01S00174.0au +++| ZJN UPF8 IF OVERFLOW FUNCTION CODE 00186 M01S00175.0au +++| LDD MA SET CURRENT SRU ACCUMULATOR 00187 M01S00176.0au +++| CWM. *,TR 00188 M01S00177.0au +++| UPFE EQU *-1 00189 M01S00178.0au +++| SBN 2 00190 M01S00179.0au +++| CRD CM 00191 M01S00180.0au +++| UPF8 LDD MA SET MASTER/INSTALLATION ACCUMULATOR 00192 M01S00181.0au +++| CWM. 5*PMSW,TR 00193 M01S00182.0au +++| UPFF EQU *-1 00194 M01S00183.0au +++| CWD CM SET INCREMENT VALUE 00195 M01S00184.0au +++| SBN 2 00196 M01S00185.0au +++| CWD CM 00197 M01S00186.0au +++| LDN 2 SET OPERATION COUNT 00198 M01S00187.0au +++| STD CM+4 00199 M01S00188.0au +++| LDN ABIF 00200 M01S00189.0au +++| STD CM+1 00201 M01S00190.0au +++| MONITOR ACTM 00202 M01S00191.0au +++| LDD MA SET INCREMENTED VALUES 00203 M01S00192.0au +++| CRM. 5*PMSW,TR 00204 M01S00193.0au +++| UPFG EQU *-1 00205 M01S00194.0au +++| LDN PDTL SET LAST UPDATE DATE AND TIME 00206 M01S00195.0au +++| CRM. 5*PUDW-5*PMSW,ON 00207 M01S00196.0au +++| UPFH EQU *-1 00208 M01S00197.0au +++| 00209 M01S00198.0au +++|* RE-WRITE LEVEL-3 BLOCK. 00210 M01S00199.0au +++|
| Line S00200 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00211 M02S00200.242l642 ---| SETMS WRITE,RW 00212 M01S00201.0au +++| LDD BA WRITE SECTOR 00213 M01S00202.0au +++| LMK WLSF SET WRITE LAST SECTOR 00214 M01S00203.0au +++| RJM. WDS 00215 M01S00204.0au +++| MJN UPF9 IF WRITE ERROR 00216 M01S00205.0au +++| SOM UPFC SET NORMAL COMPLETION 00217 M01S00206.0au +++| UPF9 LJM UPF4 RETURN FILE AND SET STATUS 00218 M01S00207.0au +++| 00219 M01S00208.0au +++| 00220 M01S00209.0au +++| ERRNZ PISW-PMSW-2 SETUP ERROR FOR *ACTM* FUNCTION 00221 M01S00210.0au +++| ERRNZ PUDW-PMSW-1 00222 M01S00211.0au +++| TITLE SUBROUTINES. 00223 M01S00212.0au +++| ARF SPACE 4,10 00224 M01S00213.0au +++|** ARF - ATTACH/RETURN FAST ATTACH FILE. 00225 M01S00214.0au +++|* 00226 M01S00215.0au +++|* ENTRY (A) = SUBFUNCTION CODE FOR ATTACH/RETURN. 00227 M01S00216.0au +++|* (FA) = PROFILE FILE FNT ORDINAL. 00228 M01S00004.242l642 +++|* (T5) = PROFILE FILE EST ORDINAL. 00229 M01S00217.0au +++|* 00230 M01S00218.0au +++|* EXIT (A) = FUNCTION RESPONSE CODE. 00231 M01S00219.0au +++|* (CM+4) = BYTE 4 OF RESPONSE IF REJECT.
| Line S00220 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00232 M02S00220.ns22000 ---|* (T5) = EQUIPMENT NUMBER.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00233 M02S00003.242l642 ---|* (T5) = EST ORDINAL.
| Line S00221 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00234 M02S00221.242l642 ---|*
| Line S00222 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
M03 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00235 M03S00222.242l642 ---|* USES T1, T2, CM - CM+4.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00236 M02S00002.242l642 ---|* USES T1, T2, T5, CM - CM+4.
| Line S00223 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00237 M02S00223.242l642 ---|*
| Line S00224 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00238 M02S00224.242l642 ---|* CALLS SFA. 00239 M01S00005.242l642 +++|* 00240 M01S00006.242l642 +++|* USES CM - CM+4. 00241 M01S00225.0au +++|* 00242 M01S00226.0au +++|* MACROS MONITOR. 00243 M01S00227.0au +++| 00244 M01S00228.0au +++| 00245 M01S00229.0au +++| ARF SUBR ENTRY/EXIT
| Line S00230 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00246 M02S00230.242l642 ---| STD T1 SET SUBFUNCTION CODE
| Line S00231 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00247 M02S00231.242l642 ---| SFA FNT,FA FETCH FILE NAME FOR COMPARE
| Line S00232 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00248 M02S00232.242l642 ---| CRD CM
| Line S00233 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00249 M02S00233.242l642 ---| LDD CM+3 SAVE GLOBAL FILE FLAG
| Line S00234 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00250 M02S00234.242l642 ---| LPN 77
| Line S00235 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00251 M02S00235.242l642 ---| STD T2
| Line S00236 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00252 M02S00236.242l642 ---| SFA FNT,FA FETCH PROFILE FST INFORMATION
| Line S00237 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00253 M02S00237.242l642 ---| ADN FSTG
| Line S00238 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00254 M02S00238.242l642 ---| CRD CM
| Line S00239 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00255 M02S00239.242l642 ---| LDD CM
| Line S00240 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00256 M02S00240.242l642 ---| STD T5
| Line S00241 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00257 M02S00241.242l642 ---| LDD T1 SET SUBFUNCTION CODE 00258 M01S00242.0au +++| STD CM+3
| Line S00243 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00259 M02S00243.ns21000 ---| LDN PTNM SET NON-ROLLABLE MODIFY MODE 00260 M01S00003.ns21000 +++| LDC 4000+PTUP SET NON-ROLLABLE UPDATE MODE 00261 M01S00244.0au +++| STD CM+2
| Line S00245 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00262 M02S00245.242l642 ---| LDD T2 00263 M01S00007.242l642 +++| ARFA LDN 0 00264 M01S00246.0au +++| ZJN ARF1 IF NOT GLOBAL FAST ATTACH FILE
| Line S00247 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00265 M02S00247.ns22000 ---| LDD T5 SET GLOBAL FAST ATTACH EQUIPMENT NUMBER 00266 M01S00004.ns22000 +++| LDD T5 SET GLOBAL FAST ATTACH EST ORDINAL 00267 M01S00002.ns2553 +++| ARFB ADD TH IMMEDIATE RETURN IF INACCESSIBLE DEVICE 00268 M01S00003.ns2553 +++|* PSN (AFTER FILE IS ATTACHED) 00269 M01S00248.0au +++| ARF1 STD CM+1 00270 M01S00249.0au +++| LDD FA SET FNT ORDINAL 00271 M01S00250.0au +++| STD CM+4 00272 M01S00251.0au +++| MONITOR AFAM 00273 M01S00252.0au +++| LDD CM+1 SET EXIT CONDITION
| Line S00253 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00274 M02S00253.ns21000 ---| UJN ARFX RETURN 00275 M01S00004.ns21000 +++| UJP ARFX RETURN
| Line S00254 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00276 M02S00254.242l642 ---| SPACE 4,10
| Line S00255 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00277 M02S00255.242l642 ---|** COMMON DECKS.
| Line S00256 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00278 M02S00256.242l642 ---|
| Line S00257 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00279 M02S00257.242l642 ---|
| Line S00258 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00280 M02S00258.242l642 ---| FNT$ EQU 1 ASSEMBLE SYSTEM FNT ACCESS
| Line S00259 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00281 M02S00259.242l642 ---| IFP$ EQU 1 ASSEMBLE REMOTE INITIALIZATION
| Line S00260 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00282 M02S00260.242l642 ---|*CALL COMPGFP 00283 M01S00261.0au +++| BUF SPACE 4,10 00284 M01S00262.0au +++|** BUF - MASS STORAGE BUFFER 00285 M01S00263.0au +++| 00286 M01S00264.0au +++| 00287 M01S00265.0au +++| BUF EQU * 00288 M01S00266.0au +++| TITLE OVERLAID SUBROUTINES. 00289 M01S00267.0au +++| IDM SPACE 4,10 00290 M01S00268.0au +++|** IDM - ISSUE DAYFILE MESSAGE. 00291 M01S00269.0au +++|*
| Line S00270 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00292 M02S00270.ns21000 ---|* ENTRY (A) = RIGHT 2 CHARACTERS OF DAYFILE MESSAGE PREFIX.
| Line S00271 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00293 M02S00271.ns21000 ---|* (A) .LT. 0, MESSAGE PRESET IN BUFFER.
| Line S00272 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00294 M02S00272.ns21000 ---|*
| Line S00273 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00295 M02S00273.ns21000 ---|* EXIT NONE. 00296 M01S00005.ns21000 +++|* ENTRY MESSAGE PRESET IN BUFFER. 00297 M01S00274.0au +++|* 00298 M01S00275.0au +++|* CALLS DFM. 00299 M01S00276.0au +++| 00300 M01S00277.0au +++| 00301 M01S00278.0au +++| IDM SUBR ENTRY/EXIT 00302 M01S00279.0au +++| LDC AJNN+IDMA ISSUE ACCOUNT FILE MESSAGE 00303 M01S00280.0au +++| ADD LA 00304 M01S00281.0au +++| RJM. DFM
| Line S00282 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 0au1 |
Seq # *Modification Id* Act ----------------------------+ 00305 M02S00282.0au1 ---| LDC CPON+IDMA+5 ISSUE USER DAYFILE MESSAGE 00306 M01S00001.0au1 +++| LDC CDON+IDMA+5 ISSUE USER DAYFILE MESSAGE 00307 M01S00283.0au +++| ADD LA 00308 M01S00284.0au +++| RJM. DFM 00309 M01S00285.0au +++| UJN IDMX 00310 M01S00286.0au +++| 00311 M01S00287.0au +++| 00312 M01S00288.0au +++| IDMA VFD 24/4HJSNN,24/4H ,12/** 00313 M01S00289.0au +++| DATA C*UCXX, 1048.576KUNS.* 00314 M01S00290.0au +++| IOM SPACE 4,15 00315 M01S00291.0au +++|** IOM - ISSUE OVERFLOW MESSAGES. 00316 M01S00292.0au +++|* 00317 M01S00293.0au +++|* ENTRY (CM+4) = CONTROL POINT AREA OVERFLOW FLAGS (RIGHT 00318 M01S00294.0au +++|* JUSTIFIED) BEFORE CLEARED. 00319 M01S00295.0au +++|*
| Line S00296 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00320 M02S00296.242l642 ---|* EXIT (A) .LT. 0, IF SRU ACCUMULATOR OVERFLOW.
| Line S00297 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00321 M02S00297.242l642 ---|* ((LA)-1) = CONTROL POINT AREA OVERFLOW FLAGS 00322 M01S00008.242l642 +++|* EXIT ((LA)-1) = CONTROL POINT AREA OVERFLOW FLAGS 00323 M01S00298.0au +++|* (RIGHT JUSTIFIED) BEFORE CLEARED. 00324 M01S00299.0au +++|* APPROPRIATE OVERFLOW MESSAGES ISSUED. 00325 M01S00300.0au +++|* 00326 M01S00301.0au +++|* CALLS IDM. 00327 M01S00302.0au +++| 00328 M01S00303.0au +++|
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00329 M02S00006.ns22000 ---| IOM2 LDD T3 CHECK SRU ACCUMULATOR OVERFLOW
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00330 M02S00007.ns22000 ---| SHN 21-5
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | ns2753 |
Seq # *Modification Id* Act ----------------------------+ 00331 M02S00005.ns2753 ---| IOM2 LDM -1 CHECK AUC OVERFLOW 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 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 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 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00359 M02S00013.ns22000 ---| IOM3 LDM. IOMC,T1 00360 M01S00021.ns22000 +++| IOM5 LDM. IOMC,T1 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 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00365 M02S00018.ns22000 ---| PJN IOM3 IF MESSAGE MOVE NOT COMPLETE 00366 M01S00022.ns22000 +++| PJN IOM5 IF MESSAGE MOVE NOT COMPLETE 00367 M01S00019.ns21000 +++| RJM IDM ISSUE DAYFILE MESSAGE
| Line S00020 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00368 M02S00020.242l642 ---| LCN 0 00369 M01S00021.ns21000 +++| 00370 M01S00304.0au +++| IOM SUBR ENTRY/EXIT 00371 M01S00305.0au +++| LDD CM+4 SET OVERFLOW FLAGS 00372 M01S00306.0au +++| STM -1 00373 M01S00307.0au +++| STD T3
| Line S00308 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00374 M02S00308.ns22000 ---| LDN 7-2 SET INITIAL SHIFT COUNT 00375 M01S00023.ns22000 +++| LDN 7-2 SET INITIAL SHIFT COUNT 00376 M01S00309.0au +++| STD T4 00377 M01S00310.0au +++| IOM1 SOD T4 DECREMENT SHIFT COUNT
| Line S00311 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00378 M02S00311.ns22000 ---| MJN IOM2 IF ALL SHIFTS COMPLETE 00379 M01S00024.ns22000 +++| MJP IOM2 IF ALL SHIFTS COMPLETE 00380 M01S00312.0au +++| LDD T3 CHECK OVERFLOW FLAG 00381 M01S00313.0au +++| RAD T3
| Line S00314 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00382 M02S00314.ns22000 ---| SHN 21-7 00383 M01S00025.ns22000 +++| SHN 21-7 00384 M01S00315.0au +++| PJN IOM1 IF OVERFLOW FLAG NOT SET 00385 M01S00316.0au +++| LDM. IOMD-IDMA-5,T4 SET MESSAGE PREFIX 00386 M01S00317.0au +++| IOME EQU *-1 00387 M01S00318.0au +++| STM IDMA+6 00388 M01S00319.0au +++| RJM IDM 00389 M01S00320.0au +++| UJN IOM1 PROCESS REMAINING OVERFLOW FLAGS 00390 M01S00321.0au +++|
| Line S00322 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00391 M02S00322.ns21000 ---| IOM2 LDD T3 CHECK SRU ACCUMULATOR OVERFLOW
| Line S00323 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00392 M02S00323.ns21000 ---| SHN 21-5
| Line S00324 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00393 M02S00324.ns21000 ---| PJN IOM4 IF NO OVERFLOW
| Line S00325 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00394 M02S00325.ns21000 ---| LDN 11 MOVE DAYFILE MESSAGE
| Line S00326 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00395 M02S00326.ns21000 ---| STD T1
| Line S00327 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00396 M02S00327.ns21000 ---| LDD LA
| Line S00328 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00397 M02S00328.ns21000 ---| RAM IOMA
| Line S00329 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00398 M02S00329.ns21000 ---| IOM3 LDM. IOMC,T1
| Line S00330 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00399 M02S00330.ns21000 ---| IOMA EQU *-1
| Line S00331 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00400 M02S00331.ns21000 ---| STM. IDMA+5-IDMA,T1
| Line S00332 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00401 M02S00332.ns21000 ---| IOMB EQU *-1
| Line S00333 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00402 M02S00333.ns21000 ---| SOD T1
| Line S00334 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00403 M02S00334.ns21000 ---| PJN IOM3 IF MESSAGE MOVE NOT COMPLETE
| Line S00335 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00404 M02S00335.ns21000 ---| RJM IDM ISSUE DAYFILE MESSAGE
| Line S00336 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00405 M02S00336.ns21000 ---| LCN 0
| Line S00337 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00406 M02S00337.ns21000 ---| IOM4 LJM IOMX 00407 M01S00338.0au +++| 00408 M01S00339.0au +++| 00409 M01S00340.0au +++| IOMC DATA L*ACSO, 219902.325UNTS* 00410 M01S00026.ns22000 +++| 00411 M01S00027.ns22000 +++| IOMH DATA L*UCAC, 536872.911UNTS.* 00412 M01S00341.0au +++| 00413 M01S00342.0au +++| IOMD BSS 0 MESSAGE PREFIX TABLE 00414 M01S00343.0au +++| CON 2RAD 00415 M01S00344.0au +++| CON 2RPF 00416 M01S00345.0au +++| CON 2RMT 00417 M01S00346.0au +++| CON 2RMS 00418 M01S00347.0au +++| CON 2RMP 00419 M01S00348.0au +++| TITLE PRESET. 00420 M01S00349.0au +++| PRS SPACE 4,25 00421 M01S00350.0au +++|** PRS - PRESET. 00422 M01S00351.0au +++|* 00423 M01S00352.0au +++|* ENTRY ((LA)-5 - (LA)-1) = INITIAL CALLING SEQUENCE. 00424 M01S00353.0au +++|*
| Line S00354 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00425 M02S00354.242l642 ---|* EXIT (T6) = LEVEL-3 BLOCK TRACK. 00426 M01S00009.242l642 +++|* EXIT (T5) = PROFILE FILE DEVICE EST ORDINAL. 00427 M01S00010.242l642 +++|* (T6) = LEVEL-3 BLOCK TRACK. 00428 M01S00355.0au +++|* (T7) = LEVEL-3 BLOCK SECTOR. 00429 M01S00356.0au +++|* (FA) = FNT ORDINAL OF PROFILE FILE. 00430 M01S00357.0au +++|* (BA) = SECTOR BUFFER ADDRESS. 00431 M01S00358.0au +++|* (UPFA) = (UPFD) = *LDN (FC)&AOFC* 00432 M01S00359.0au +++|* (UPFE) = PARAMETER BLOCK ADDRESS. 00433 M01S00360.0au +++|* (UPFB) = SET IF PROFILE FILE PRESENT.
| Line S00361 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 00434 M02S00361.ns22000 ---|* (IOMB) = RELOCATED ADDRESS OF *IDMA+5*. 00435 M01S00028.ns22000 +++|* (IOMB) = (IOMG) = RELOCATED ADDRESS OF *IDMA+5*. 00436 M01S00362.0au +++|* (IDMA - IDMA+1) = JOB SEQUENCE NUMBER. 00437 M01S00363.0au +++|* (SFAA) = BASE FNT ADDRESS / 10. 00438 M01S00004.ns2553 +++|* (ARFB) = *PSN* IF *PROFILE* ATTACHED OR NOT NEEDED. 00439 M01S00364.0au +++|* PROFILE FILE ATTACHED IF PRESENT. 00440 M01S00365.0au +++|* DRIVER SET IF NEEDED. 00441 M01S00366.0au +++|* TO *UPFX* IF *ORET* ERROR FLAG SET OR FILE BUSY. 00442 M01S00367.0au +++|*
| Line S00368 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 00443 M02S00368.ns21000 ---|* USES T1 - T7, CM - CM+4.
| Line S00022 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00444 M02S00022.242l642 ---|* USES T1, T2, T6, T7, CM - CM+4.
| Line S00369 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00445 M02S00369.242l642 ---|*
| Line S00370 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00446 M02S00370.242l642 ---|* CALLS ARF, IFP. 00447 M01S00011.242l642 +++|* USES BA, FA, T1, T2, CM - CM+4, T5 - T5+4. 00448 M01S00012.242l642 +++|* 00449 M01S00013.242l642 +++|* CALLS ARF. 00450 M01S00371.0au +++|*
| Line S00372 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00451 M02S00372.242l642 ---|* MACROS PAUSE, SFA. 00452 M01S00014.242l642 +++|* MACROS PAUSE, SETMS, SFA. 00453 M01S00373.0au +++| 00454 M01S00374.0au +++| 00455 M01S00375.0au +++| PRS SUBR ENTRY/EXIT
| Line S00376 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00456 M02S00376.242l642 ---| RJM IFP INITIALIZE *COMPGFP* 00457 M01S00377.0au +++| LDN 1 SET JSN FOR DAYFILE MESSAGE 00458 M01S00378.0au +++| STD T1 00459 M01S00379.0au +++| LDD LA 00460 M01S00380.0au +++| RAM PRSB 00461 M01S00381.0au +++| RAM IOMB 00462 M01S00029.ns22000 +++| STM IOMG 00463 M01S00382.0au +++| RAM IOME 00464 M01S00383.0au +++| LDM -4 SET JSN/SRU PARAMETER ADDRESS 00465 M01S00384.0au +++| STM UPFE 00466 M01S00385.0au +++| STM PRSA 00467 M01S00386.0au +++| ADN 4 00468 M01S00387.0au +++| STD T2 00469 M01S00388.0au +++| PRS1 LDM. *,T1 MOVE JSN TO DAYFILE MESSAGE 00470 M01S00389.0au +++| PRSA EQU *-1 00471 M01S00390.0au +++| STM. IDMA,T1 00472 M01S00391.0au +++| PRSB EQU *-1 00473 M01S00392.0au +++| SOD T1 00474 M01S00393.0au +++| PJN PRS1 00475 M01S00394.0au +++| LDI T2 SET SERVICE CLASS 00476 M01S00395.0au +++| SHN -6 00477 M01S00396.0au +++| STM IDMA+4 00478 M01S00397.0au +++| 00479 M01S00398.0au +++|* SET PROFILE FILE POINTERS FROM PARAMETER PASS. 00480 M01S00399.0au +++|
| Line S00400 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00481 M02S00400.242l642 ---| LDM -1 SET LEVEL-3 BLOCK SECTOR
| Line S00401 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00482 M02S00401.242l642 ---| STD T7 00483 M01S00402.0au +++| LDC BUF SET BUFFER ADDRESS 00484 M01S00403.0au +++| ADD LA 00485 M01S00404.0au +++| STD BA 00486 M01S00405.0au +++| LDM -3 SET PROFILE FILE FNT ORDINAL 00487 M01S00406.0au +++| STD FA
| Line S00407 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00488 M02S00407.242l642 ---| LDM -2 SET LEVEL-3 BLOCK TRACK
| Line S00408 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00489 M02S00408.242l642 ---| STD T6
| Line S00409 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00490 M02S00409.242l642 ---| NJN PRS2 IF PROFILE FILE PRESENT
| Line S00410 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00491 M02S00410.242l642 ---| UJN PRS6 SET FUNCTION CODE 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 (Updated by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 00516 M02S00039.ns2553 ---| PRS3 LJM PRSX RETURN 00517 M01S00005.ns2553 +++| PRS3 STM ARFB 00518 M01S00006.ns2553 +++| LJM PRSX RETURN 00519 M01S00040.242l642 +++| 00520 M01S00041.242l642 +++| PRS4 SETMS IO,RW 00521 M01S00001.ns2776 +++| LDM. MSD 00522 M01S00002.ns2776 +++| SHN 21-6 00523 M01S00042.242l642 +++| MJN PRS6 IF PROFILE FILE DEVICE INACCESSIBLE 00524 M01S00411.0au +++| 00525 M01S00412.0au +++|* ATTACH PROFILE FILE FOR UPDATE. 00526 M01S00413.0au +++|
| Line S00414 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00527 M02S00414.242l642 ---| PRS2 LDN AFAS ATTACH PROFILE FILE
| Line S00415 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00528 M02S00415.242l642 ---| RJM ARF
| Line S00416 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00529 M02S00416.242l642 ---| ZJN PRS5 IF ATTACH COMPLETED
| Line S00417 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00530 M02S00417.242l642 ---| LDD CM+4
| Line S00418 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | ns21000 |
M03 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00531 M03S00418.242l642 ---| SHN 21-10
| Line S00023 Modification History | |
|---|---|
M01 (Added by) | ns21000 |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00532 M02S00023.242l642 ---| SHN 21-1
| Line S00419 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00533 M02S00419.242l642 ---| PJN PRS3 IF ATTACHED IN MODIFY MODE BY *PROFILE* 00534 M01S00043.242l642 +++| PRS5 LDN AFAS ATTACH PROFILE FILE 00535 M01S00044.242l642 +++| RJM ARF 00536 M01S00045.242l642 +++| ZJN PRS3 IF ATTACH COMPLETED 00537 M01S00007.ns2553 +++| SHN 21-11 00538 M01S00008.ns2553 +++| MJN PRS6 IF DEVICE INACCESSIBLE 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 M01S00420.0au +++| 00544 M01S00421.0au +++|* WAIT FOR OTHER *0AU* TO RELEASE PROFILE FILE. 00545 M01S00422.0au +++| 00546 M01S00423.0au +++| LDC PFDL/2 00547 M01S00424.0au +++| SBN 1 00548 M01S00425.0au +++| NJN *-1 00549 M01S00426.0au +++| PAUSE 00550 M01S00427.0au +++| LDD CM+1 CHECK ERROR FLAG
| Line S00428 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00551 M02S00428.242l642 ---| LPN 37
| Line S00429 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00552 M02S00429.242l642 ---| LMN ORET
| Line S00430 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00553 M02S00430.242l642 ---| ZJN PRS4 IF OVERRIDE ERROR FLAG SET
| Line S00431 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00554 M02S00431.242l642 ---| UJN PRS2 RETRY FILE ATTACH
| Line S00432 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00555 M02S00432.242l642 ---|
| Line S00433 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00556 M02S00433.242l642 ---| PRS3 LDN 1 SET ERROR CODE
| Line S00434 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00557 M02S00434.242l642 ---| PRS4 ADN 1 INCREMENT ERROR CODE
| Line S00435 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00558 M02S00435.242l642 ---| LJM UPFX
| Line S00436 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00559 M02S00436.242l642 ---|
| Line S00437 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00560 M02S00437.242l642 ---| PRS5 STM UPFB SET FILE ATTACHED
| Line S00438 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00561 M02S00438.242l642 ---|
| Line S00439 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00562 M02S00439.242l642 ---|* SET FUNCTION CODE.
| Line S00440 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00563 M02S00440.242l642 ---|
| Line S00441 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00564 M02S00441.242l642 ---| PRS6 LDM -5 SET FUNCTION CODE
| Line S00442 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00565 M02S00442.242l642 ---| LPN 77
| Line S00443 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00566 M02S00443.242l642 ---| LMN AOFC
| Line S00444 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00567 M02S00444.242l642 ---| RAM UPFA
| Line S00445 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00568 M02S00445.242l642 ---| STM UPFD
| Line S00446 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00569 M02S00446.242l642 ---| LJM PRSX RETURN
| Line S00447 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00570 M02S00447.242l642 ---| SPACE 4,10
| Line S00448 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00571 M02S00448.242l642 ---|** ASSEMBLE *COMPGFP* INITIALIZATION CODE.
| Line S00449 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00572 M02S00449.242l642 ---|
| Line S00450 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00573 M02S00450.242l642 ---|
| Line S00451 Modification History | |
|---|---|
M01 (Added by) | 0au |
M02 (Updated by) | 242l642 |
Seq # *Modification Id* Act ----------------------------+ 00574 M02S00451.242l642 ---| IFP HERE 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 M01S00452.0au +++| SPACE 4,10 00586 M01S00453.0au +++| OVERFLOW 5,ZAUL 00587 M01S00454.0au +++| 00588 M01S00455.0au +++| ERRNG ZAUL-BUF-503 BUFFER OVERFLOWS CALLING PROGRAM 00589 M01S00456.0au +++| END
cdc/nos2.source/opl.opl871/deck/0au.txt · Last modified: by 127.0.0.1