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
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
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 ---|
00174 M01S00164.242l642 ---| UPF7 ENDMS
00175 M01S00165.242l642 ---|
00176 M00S00166.0au ---|* UPDATE MASTER USER AND INSTALLATION SRU ACCUMULATORS.
00177 M00S00167.0au ---|
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
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