cdc:nos2.source:opl.opl871:deck:0df
Deck 0DF
6 Modifications
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M01S00001.0df +++| IDENT 0DF,DRFX 00002 M01S00002.0df +++| PERIPH J 00003 M01S00003.0df +++| BASE MIXED 00004 M01S00004.0df +++| SST 00005 M01S00005.0df +++|*COMMENT 0DF - DROP FILE.
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00006 M02S00006.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORP. 1979. 00007 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00008 M01S00007.0df +++| TITLE 0DF - DROP FILE. 00009 M01S00008.0df +++| SPACE 4,10 00010 M01S00009.0df +++|*** 0DF - DROP FILE. 00011 M01S00010.0df +++|* G. R. MANSFIELD. 70/07/30. 00012 M01S00011.0df +++|* R. E. TATE. 70/11/30. 00013 M01S00012.0df +++|* M. E. MADDEN. 73/04/01. 00014 M01S00013.0df +++|* D. D. SADLER 75/01/18. 00015 M01S00014.0df +++|* P. D. HAAS. 85/01/20. 00016 M01S00015.0df +++| SPACE 4,10 00017 M01S00016.0df +++|*** 0DF IS A LOCATION FREE ROUTINE TO BE USED FOR 00018 M01S00017.0df +++|* DROPPING ANY SYSTEM FILE. 00019 M01S00018.0df +++|* 00020 M01S00019.0df +++|* ALL FILES ARE REMOVED FROM THE LOCAL FNT 00021 M01S00020.0df +++|* AND THE ASSIGNED EQUIPMENT OR TRACKS WILL BE RELEASED. 00022 M01S00021.0df +++|* THE JOBS MASS STORAGE PRU LIMIT IS ALSO INCREMENTED, UNLESS 00023 M01S00022.0df +++|* BIT 0 OF ((LA)-1) IS SET. 00024 M01S00023.0df +++|* *0DF* DOES NOT SET THE FILE BUSY BEFORE DROPPING. 00025 M01S00024.0df +++|* NOTE - *0DF* WILL HANG WITH AN *HNGM* MONITOR FUNCTION 00026 M01S00025.0df +++|* FOR THE FOLLOWING CONDITIONS - 00027 M01S00026.0df +++|* 1. FNT ADDRESS FOR FILE TO BE DROPPED IS ZERO. 00028 M01S00027.0df +++|* 2. FILE TYPE IN FNT ENTRY IS ILLEGAL. 00029 M01S00028.0df +++|* 3. PROCESSOR IS NOT DEFINED FOR THE FILE TYPE. 00030 M01S00029.0df +++| SPACE 4,10 00031 M01S00030.0df +++|*** ENTRY CONDITIONS. 00032 M01S00031.0df +++|* 00033 M01S00032.0df +++|* 00034 M01S00033.0df +++|* (FA) = 12/FNT ENTRY RELATIVE ADDRESS IN NFL 00035 M01S00034.0df +++|* 00036 M01S00035.0df +++|* ((LA)-1) = 10/, 1/D, 1/R 00037 M01S00036.0df +++|* 00038 M01S00037.0df +++|* WHERE - 00039 M01S00038.0df +++|* 00040 M01S00039.0df +++|* D = PROCESS *ROFT* FILES. THIS SHOULD ONLY BE SET BY
| Line S00040 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | ns2685 |
Seq # *Modification Id* Act ----------------------------+ 00041 M02S00040.ns2685 ---|* *1AJ* DURING JOB TERMINATION, TO ALLOW THE DM*
| Line S00041 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | ns2685 |
Seq # *Modification Id* Act ----------------------------+ 00042 M02S00041.ns2685 ---|* FILE TO BE RELEASED. 00043 M01S00001.ns2685 +++|* *1RO* DURING ERROR PROCESSING OR BY *1AJ* DURING 00044 M01S00002.ns2685 +++|* *DMP=* PROGRAM ABNORMAL TERMINATION PROCESSING TO 00045 M01S00003.ns2685 +++|* ALLOW THE DM* FILE TO BE RELEASED. 00046 M01S00042.0df +++|* 00047 M01S00043.0df +++|* R = RESOURCE UPDATE CONTROL. FOR MAGNETIC TAPE 00048 M01S00044.0df +++|* FILES AND PERMANENT FILES ON PACKS (FOR 00049 M01S00045.0df +++|* SUBSEQUENT CALL TO *0RF*/*0RT*). 00050 M01S00046.0df +++|* 0 = *RETURN* FILE. 00051 M01S00047.0df +++|* 1 = *UNLOAD* FILE (DOES NOT DECREMENT RESOURCE 00052 M01S00048.0df +++|* FILE COUNT). 00053 M01S00049.0df +++| SPACE 4,10 00054 M01S00050.0df +++|*** EXIT CONDITIONS. 00055 M01S00051.0df +++|* 00056 M01S00052.0df +++|* 00057 M01S00053.0df +++|* (A) = (FA) = 0 IF OPERATION COMPLETED SUCCESSFULLY. 00058 M01S00054.0df +++|* 00059 M01S00055.0df +++|* (A) .LT. 0 IF MASS STORAGE DEVICE INACCESSIBLE.
| Line S00056 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | ns2553 |
Seq # *Modification Id* Act ----------------------------+ 00060 M02S00056.ns2553 ---|* 00061 M01S00001.ns2553 +++|* (T5) = EST ORDINAL OF INACCESSIBLE DEVICE, IF INACCESSIBLE. 00062 M01S00002.ns2553 +++|* NOTE - THE INACCESSIBLE DEVICE MAY BE A DEVICE OTHER 00063 M01S00003.ns2553 +++|* THAN THE ONE ON WHICH THE FILE BEING RETURNED 00064 M01S00004.ns2553 +++|* RESIDES. 00065 M01S00005.ns2553 +++|* (FA) = FNT ORDINAL, IF DEVICE INACCESSIBLE. 00066 M01S00006.ns2553 +++|* FNT LEFT BUSY, IF DEVICE INACCESSIBLE. 00067 M01S00057.0df +++|* (FS - FS+4) = FST WORD OF FNT ENTRY. 00068 M01S00058.0df +++| SPACE 4,10 00069 M01S00059.0df +++|** 0-LEVEL OVERLAYS CALLED. 00070 M01S00060.0df +++|* 00071 M01S00061.0df +++|* 00072 M01S00062.0df +++|* *0DQ*, *0FA*, *0PT*, *0RF*, *0RP*, *0RT*. 00073 M01S00063.0df +++| SPACE 4,10 00074 M01S00064.0df +++|** COMMON DECKS. 00075 M01S00065.0df +++| 00076 M01S00066.0df +++| 00077 M01S00067.0df +++|*CALL COMPMAC 00078 M01S00068.0df +++|*CALL COMPREL 00079 M01S00069.0df +++|*CALL COMSCPS 00080 M01S00070.0df +++|*CALL COMSLFD 00081 M01S00071.0df +++|*CALL COMSZOL 00082 M01S00072.0df +++| SPACE 4,10 00083 M01S00073.0df +++|**** DIRECT LOCATION ASSIGNMENTS. 00084 M01S00074.0df +++| 00085 M01S00075.0df +++| 00086 M01S00076.0df +++| T8 EQU 16 CHECKPOINT REQUEST 00087 M01S00077.0df +++| FS EQU 20 - 24 FST INFORMATION (5 LOCATIONS) 00088 M01S00078.0df +++| QA EQU 26 00089 M01S00079.0df +++| FA EQU 57 FNT ENTRY RELATIVE ADDRESS IN NFL 00090 M01S00080.0df +++| 00091 M01S00081.0df +++|**** 00092 M01S00082.0df +++| TITLE MAIN ROUTINE. 00093 M01S00083.0df +++| DRF SPACE 4,10 00094 M01S00084.0df +++|** DRF - MAIN ROUTINE. 00095 M01S00085.0df +++| 00096 M01S00086.0df +++| 00097 M01S00087.0df +++| ORG 5 00098 M01S00088.0df +++| DRF SUBR ENTRY/EXIT 00099 M01S00089.0df +++| LJM IFP IDENTIFY AND EXECUTE FILE PROCESSOR 00100 M01S00090.0df +++| EZO SPACE 4,25 00101 M01S00091.0df +++|** EZO - EXECUTE ZERO-LEVEL OVERLAY. 00102 M01S00092.0df +++|* 00103 M01S00093.0df +++|* ENTRY (A) = OVERLAY NAME. 00104 M01S00094.0df +++|* (FA) = RELATIVE FNT ADDRESS IN NFL. 00105 M01S00095.0df +++|* (FS - FS+4) = FST INFORMATION. 00106 M01S00096.0df +++|* ((OVL)-1) = FLAGS. 00107 M01S00097.0df +++|* 00108 M01S00098.0df +++|* EXIT (A) = (FA) = 0. 00109 M01S00099.0df +++|* 00110 M01S00100.0df +++|* ERROR TO *DRFX* IF MASS STORAGE DEVICE INACCESSIBLE. 00111 M01S00101.0df +++|* 00112 M01S00102.0df +++|* CALLS EXR, *0DQ*, *0FA*, *0PT*, *0RF*, *0RP*, *0RT*. 00113 M01S00103.0df +++|* 00114 M01S00104.0df +++|* MACROS EXECUTE. 00115 M01S00105.0df +++| 00116 M01S00106.0df +++| 00117 M01S00107.0df +++| EZO BSS 0 00118 M01S00108.0df +++| EXECUTE 0DQ,= 00119 M01S00109.0df +++| EXECUTE 0FA,= 00120 M01S00110.0df +++| EXECUTE 0PT,= 00121 M01S00111.0df +++| EXECUTE 0RF,= 00122 M01S00112.0df +++| EXECUTE 0RP,= 00123 M01S00113.0df +++| EXECUTE 0RT,= 00124 M01S00114.0df +++| RJM. EXR 00125 M01S00115.0df +++| PJN DRF2 IF NO INACCESSIBLE DEVICE ERROR 00126 M01S00116.0df +++| NFA FA,R 00127 M01S00117.0df +++| ADN FSTL RESTORE FST INFORMATION 00128 M01S00118.0df +++| CRD FS 00129 M01S00119.0df +++| LCN 0 00130 M01S00120.0df +++| DRF1 UJN DRFX EXIT 00131 M01S00121.0df +++| 00132 M01S00122.0df +++| DRF2 UJN *+2 CHECK EQUIPMENT ASSIGNED 00133 M01S00123.0df +++| DRFA EQU DRF2 00134 M01S00124.0df +++| UJN PFT4 CONTINUE WITH *0RF* CALL 00135 M01S00125.0df +++| 00136 M01S00126.0df +++| DRF3 LDC 0 00137 M01S00127.0df +++| DRFB EQU *-1
| Line S00128 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 00138 M02S00128.282l826 ---| ZJN DRF4 IF EQUIPMENT NOT ASSIGNED 00139 M01S00001.282l826 +++| ZJN DRF4 IF NOT TO RELEASE EQUIPMENT 00140 M01S00129.0df +++| STD CM+1 00141 M01S00130.0df +++| MONITOR DEQM RELEASE ASSIGNED EQUIPMENT 00142 M01S00131.0df +++| 00143 M01S00132.0df +++|* CLEAR FNT ENTRY IN NFL. 00144 M01S00133.0df +++| 00145 M01S00134.0df +++| DRF4 LDD FA SET RELATIVE FNT ADDRESS 00146 M01S00135.0df +++| STD CM+4 00147 M01S00136.0df +++| LDN DLFS SELECT DELETE LOCAL FILE 00148 M01S00137.0df +++| STD CM+1 00149 M01S00138.0df +++| MONITOR PLFM CLEAR FNT ENTRY 00150 M01S00139.0df +++|* LDN 0 00151 M01S00140.0df +++| STD FA 00152 M01S00141.0df +++| UJN DRFX EXIT 00153 M01S00142.0df +++| PFT SPACE 4,30 00154 M01S00143.0df +++|** PFT - RELEASE PERMANENT FILE. 00155 M01S00144.0df +++|* 00156 M01S00145.0df +++|* USES CM - CM+4. 00157 M01S00146.0df +++|* 00158 M01S00147.0df +++|* CALLS EZO. 00159 M01S00148.0df +++|* 00160 M01S00149.0df +++|* MACROS MONITOR, NFA, SFA. 00161 M01S00150.0df +++|*
| Line S00151 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00162 M02S00151.274l797 ---|* NOTE LOADING *0FA*, *0PT*, *0RF*, *0RP*, OR *0RT* AND THEIR
| Line S00152 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00163 M02S00152.274l797 ---|* PARAMETERS OVERLAYS CODE BEGINNING AT *PFT*. 00164 M01S00001.274l797 +++|* NOTE LOADING *0FA*, *0OD*, *0PT*, *0RF*, *0RP*, OR *0RT* 00165 M01S00002.274l797 +++|* AND THEIR PARAMETERS OVERLAYS CODE STARTING AT *PFT*. 00166 M01S00153.0df +++|* 00167 M01S00154.0df +++|* *0FA* IS CALLED TO RETURN A PERMANENT FILE FOR 00168 M01S00155.0df +++|* WHICH A MATCHING FAST-ATTACH FNT ENTRY WAS FOUND. 00169 M01S00156.0df +++|* 00170 M01S00003.274l797 +++|* *0OD* IS CALLED TO RETURN ALL OPTICAL DISK FILES. 00171 M01S00157.0df +++|* *OPT* IS CALLED TO CLEAR THE PRIMARY FILE POINTERS 00172 M01S00158.0df +++|* IN THE JOB EJT ENTRY WHEN DROPPING THE PRIMARY FILE. 00173 M01S00159.0df +++|* 00174 M01S00160.0df +++|* *0RP* IS CALLED TO RETURN ALL OTHER PERMANENT FILES. 00175 M01S00161.0df +++|* 00176 M01S00162.0df +++|* *0RF* IS CALLED AFTER *0RP* TO DECREMENT THE JOB 00177 M01S00163.0df +++|* RESOURCE COUNTS WHENEVER THE PERMANENT FILE IS THE 00178 M01S00164.0df +++|* LAST DIRECT ACCESS FILE ATTACHED TO THIS JOB THAT 00179 M01S00165.0df +++|* RESIDES ON A SPECIFIC REMOVABLE AUXILIARY PACK. 00180 M01S00166.0df +++|* 00181 M01S00167.0df +++|* *0RT* IS CALLED FOR ALL FILES ASSIGNED TO TAPE
| Line S00168 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00182 M02S00168.274l797 ---|* EQUIPMENT (*MT*, *NT*, OR *TE*) TO CLEAR THE
| Line S00169 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00183 M02S00169.274l797 ---|* ASSOCIATED VSN FILE ENTRY AND TO DECREMENT THE 00184 M01S00004.274l797 +++|* EQUIPMENT (*MT*, *NT*, *CT*, *AT* OR *TE*) TO CLEAR 00185 M01S00005.274l797 +++|* THE ASSOCIATED VSN FILE ENTRY AND TO DECREMENT THE 00186 M01S00170.0df +++|* JOB RESOURCE COUNTS. 00187 M01S00171.0df +++| 00188 M01S00172.0df +++| 00189 M01S00173.0df +++| PFT4 LDN 5 FLAG *0RP* PROCESSING COMPLETED 00190 M01S00174.0df +++| STD FS+1 00191 M01S00175.0df +++| NFA FA,R STORE FST (FIRST TRACK BYTE CLEAR) 00192 M01S00176.0df +++| ADN FSTL 00193 M01S00177.0df +++| CWD FS 00194 M01S00178.0df +++| AOM DRFA-OVL ENABLE DELETION OF FNT ENTRY 00195 M01S00179.0df +++| PFT5 LDM -1-OVL GET *0DF* PARAMETER WORD 00196 M01S00180.0df +++| LPN 1 00197 M01S00181.0df +++| STM -1 SET RESOURCE UPDATE CONTROL 00198 M01S00182.0df +++| LDC 3R0RF 00199 M01S00183.0df +++| LJM EZO-OVL LOAD AND EXECUTE *0RF* 00200 M01S00184.0df +++| 00201 M01S00185.0df +++| 00202 M01S00186.0df +++| OVL EQU *+1 ZERO-LEVEL OVERLAY LOAD ADDRESS 00203 M01S00187.0df +++| 00204 M01S00188.0df +++| 00205 M01S00189.0df +++| PFT BSS 0 ENTRY 00206 M01S00190.0df +++| LDD CM+3 SET FILE MODE 00207 M01S00191.0df +++| LPN 77 00208 M01S00192.0df +++| STM OVL-1 SET *0RP* PARAMETER WORD 00209 M01S00193.0df +++| LDD FS+4 CHECK FILE TYPE 00210 M01S00194.0df +++| SHN 21-12 00211 M01S00195.0df +++| PJN PFT1 IF NOT FAFT 00212 M01S00196.0df +++| LDC 2RFA SET *0FA* CALL 00213 M01S00197.0df +++| STM EZOA 00214 M01S00198.0df +++| PFT1 SFA EST,FS FETCH EST ENTRY 00215 M01S00199.0df +++| ADK EQDE 00216 M01S00200.0df +++| CRD CM 00217 M01S00201.0df +++| LDD CM+4 00218 M01S00202.0df +++| SHN 3 00219 M01S00203.0df +++| ADN MDGL 00220 M01S00204.0df +++| CRD CM 00221 M01S00205.0df +++| LDD CM 00222 M01S00206.0df +++| SHN 0-12 00223 M01S00207.0df +++| LMN 3 00224 M01S00208.0df +++| NJN DRF5 IF NOT REMOVABLE AUXILIARY DEVICE 00225 M01S00209.0df +++| LDD FA 00226 M01S00210.0df +++| STD CM+4 SET RELATIVE FNT ADDRESS 00227 M01S00211.0df +++| LDN DLCS 00228 M01S00212.0df +++| STD CM+1 00229 M01S00213.0df +++| MONITOR PLFM COUNT FILES ATTACHED ON DEVICE 00230 M01S00214.0df +++| SOD CM+3 00231 M01S00215.0df +++| NJN DRF5 IF NOT LAST FILE 00232 M01S00216.0df +++| 00233 M01S00217.0df +++|* PROCESS LAST FILE ON A REMOVABLE AUXILIARY DEVICE. 00234 M01S00218.0df +++| 00235 M01S00219.0df +++| LDD FS+1 00236 M01S00220.0df +++| SHN 0-13 00237 M01S00221.0df +++| NJN PFT3 IF *0RP* NOT YET CALLED 00238 M01S00222.0df +++| LDN OVL 00239 M01S00223.0df +++| RAD LA 00240 M01S00224.0df +++| LDD FS+1 00241 M01S00225.0df +++| NJN PFT2 IF INTERMEDIATE PROCESSING STATE 00242 M01S00226.0df +++| LJM PFT4-OVL DECREMENT RESOURCE COUNTS 00243 M01S00227.0df +++| 00244 M01S00228.0df +++| PFT2 LJM PFT5-OVL CONTINUE PROCESSING 00245 M01S00229.0df +++| 00246 M01S00230.0df +++| PFT3 SOM DRFA ENABLE *0RF* PROCESSING 00247 M01S00231.0df +++| 00248 M01S00232.0df +++|* SET ZERO-LEVEL OVERLAY ENTRY CONDITIONS. 00249 M01S00233.0df +++| 00250 M01S00234.0df +++| DRF5 LDN OVL ADJUST LOAD ADDRESS 00251 M01S00235.0df +++| RAD LA 00252 M01S00236.0df +++| LDC 3R0RP SET OVERLAY NAME 00253 M01S00237.0df +++| EZOA EQU *-1 00254 M01S00238.0df +++| LJM EZO-OVL EXECUTE OVERLAY 00255 M01S00239.0df +++| IFP SPACE 4,15 00256 M01S00240.0df +++|** IFP - IDENTIFY FILE PROCESSOR. 00257 M01S00241.0df +++|* 00258 M01S00242.0df +++|* ENTRY (FA) = FNT ENTRY RELATIVE ADDRESS IN NFL. 00259 M01S00243.0df +++|* 00260 M01S00244.0df +++|* EXIT TO FILE PROCESSORS WITH FOLLOWING - 00261 M01S00245.0df +++|* (A) = 2. 00262 M01S00246.0df +++|* (T8) = CHECKPOINT REQUEST. 00263 M01S00247.0df +++|* (CM - CM+4) = FNT ENTRY. 00264 M01S00248.0df +++|* (FS - FS+4) = FST INFORMATION. 00265 M01S00249.0df +++|* 00266 M01S00250.0df +++|* USES T1. 00267 M01S00251.0df +++|* 00268 M01S00252.0df +++|* MACROS MONITOR, NFA. 00269 M01S00253.0df +++| 00270 M01S00254.0df +++| 00271 M01S00255.0df +++| IFP BSS 0 ENTRY 00272 M01S00256.0df +++| LDM -1 CHECK *DROP ROFT* FLAG 00273 M01S00257.0df +++| LPN 2 00274 M01S00258.0df +++| NJN IFP1 IF *ROFT* FILE TO BE DROPPED 00275 M01S00259.0df +++| STM TFTY+ROFT CLEAR PROCESSOR 00276 M01S00260.0df +++| IFP1 LDD FA 00277 M01S00261.0df +++| ZJN IFP2 IF NO FNT ADDRESS 00278 M01S00262.0df +++| NFA FA,R 00279 M01S00263.0df +++| CRD CM READ FNT 00280 M01S00264.0df +++| ADN FSTL 00281 M01S00265.0df +++| CRD FS 00282 M01S00266.0df +++| LDD CM+4 GET FILE TYPE 00283 M01S00267.0df +++| SHN -6 00284 M01S00268.0df +++| SBN MXFT 00285 M01S00269.0df +++| PJN IFP2 IF ILLEGAL FILE TYPE 00286 M01S00270.0df +++| ADC TFTY+MXFT SET TABLE ADDRESS 00287 M01S00271.0df +++| ADD LA 00288 M01S00272.0df +++| STD T1 00289 M01S00273.0df +++| LDI T1 00290 M01S00274.0df +++| NJN IFP3 IF PROCESSOR PRESENT 00291 M01S00275.0df +++| IFP2 MONITOR HNGM HANG PP 00292 M01S00276.0df +++|* LDN 0 00293 M01S00277.0df +++| LJM DRFX EXIT 00294 M01S00278.0df +++| 00295 M01S00279.0df +++| IFP3 LPC 3777 SET PROCESSOR ADDRESS 00296 M01S00280.0df +++| STM IFPA 00297 M01S00281.0df +++| LMI T1 SET CHECKPOINT REQUEST 00298 M01S00282.0df +++| STD T8 00299 M01S00283.0df +++| LDN 2 00300 M01S00284.0df +++| LJM * EXIT TO FILE PROCESSOR 00301 M01S00285.0df +++| IFPA EQU *-1 00302 M01S00286.0df +++| TFTY SPACE 4,10 00303 M01S00287.0df +++|** TFTY - TABLE OF FILE TYPE PROCESSORS. 00304 M01S00288.0df +++|* 00305 M01S00289.0df +++|* ENTRY 1 WORD. 00306 M01S00290.0df +++|* INDEXED BY FILE TYPE. 00307 M01S00291.0df +++|* 00308 M01S00292.0df +++|*T, 1/C, 11/ADDR
Figure
00309 M01S00293.0df +++|* 00310 M01S00294.0df +++|* C = CHECKPOINT REQUEST. 00311 M01S00295.0df +++|* ADDR = ADDRESS OF FILE PROCESSOR. 00312 M01S00296.0df +++| 00313 M01S00297.0df +++| 00314 M01S00298.0df +++| TFTY INDEX 00315 M01S00299.0df +++| 00316 M01S00300.0df +++| INDEX INFT,INP+4000 INPUT 00317 M01S00301.0df +++| INDEX QFFT,QUE+4000 QUEUED = DROP FILE 00318 M01S00302.0df +++| 00319 M01S00303.0df +++| INDEX ROFT,RFA ROLLOUT = RELEASE FILE 00320 M01S00304.0df +++|* INDEX ROFT,0 (IF *ROFT* FILE ILLEGAL) 00321 M01S00305.0df +++| INDEX LIFT,LIB LIBRARY 00322 M01S00306.0df +++| INDEX PTFT,PTY PRIMARY 00323 M01S00307.0df +++| 00324 M01S00308.0df +++| INDEX PMFT,PFT PERMANENT = 0RP 00325 M01S00309.0df +++| INDEX SYFT,SYS SYSTEM FILE TYPE 00326 M01S00310.0df +++| INDEX LOFT,RFA LOCAL FILE TYPE = DROP FILE 00327 M01S00311.0df +++| INDEX MXFT 00328 M01S00312.0df +++| LIB TITLE FILE TYPE PROCESSORS. 00329 M01S00313.0df +++| LIB SPACE 4,20 00330 M01S00314.0df +++|** LIB - PROCESS LIBRARY FILE. 00331 M01S00315.0df +++|* 00332 M01S00316.0df +++|* EXIT TO *SYS*. 00333 M01S00317.0df +++|* IF THE TRACK INTERLOCK BIT (BIT 11 OF FST BYTE 4) 00334 M01S00318.0df +++|* IS SET, THE TRACK INTERLOCK ON THE FIRST TRACK IS 00335 M01S00319.0df +++|* CLEARED. IF THE PF ACTIVITY BIT (BIT 3 OF FUT BYTE 2) 00336 M01S00320.0df +++|* IS SET, THE PF ACTIVITY COUNT FOR THAT EQUIPMENT 00337 M01S00321.0df +++|* IS DECREMENTED. 00338 M01S00322.0df +++|* 00339 M01S00323.0df +++|* USES CM - CM+4. 00340 M01S00324.0df +++|* 00341 M01S00325.0df +++|* MACROS MONITOR, NFA. 00342 M01S00326.0df +++| 00343 M01S00327.0df +++| 00344 M01S00328.0df +++| LIB BSS 0 ENTRY 00345 M01S00329.0df +++| LDD FS+4 CHECK TRACK INTERLOCK 00346 M01S00330.0df +++| SHN 21-11 00347 M01S00331.0df +++| PJN LIB1 IF INTERLOCK NOT SET 00348 M01S00332.0df +++| LDD FS+1 00349 M01S00333.0df +++| STD CM+2 00350 M01S00334.0df +++| LDD FS SET EST ORDINAL 00351 M01S00335.0df +++| STD CM+1 00352 M01S00336.0df +++| LDN CTIS SELECT CLEARING OF TRACK INTERLOCK 00353 M01S00337.0df +++| STD CM+3 00354 M01S00338.0df +++| MONITOR STBM CLEAR INTERLOCK 00355 M01S00339.0df +++| LIB1 NFA FA,R READ *FUTL* WORD OF FNT 00356 M01S00340.0df +++| ADN FUTL 00357 M01S00341.0df +++| CRD CM 00358 M01S00342.0df +++| LDD CM+2 00359 M01S00343.0df +++| LPN 10 00360 M01S00344.0df +++| ZJN LIB2 IF PF ACTIVITY BIT NOT SET 00361 M01S00345.0df +++| LDD FS 00362 M01S00346.0df +++| STD CM+1 00363 M01S00347.0df +++| LDN DPAS DECREMENT PF ACTIVITY 00364 M01S00348.0df +++| STD CM+3 00365 M01S00349.0df +++| MONITOR STBM 00366 M01S00350.0df +++| LIB2 LJM SYS RETURN SYSTEM FILE 00367 M01S00351.0df +++| INP SPACE 4,15 00368 M01S00352.0df +++|** INP - PROCESS INPUT FILE. 00369 M01S00353.0df +++|* 00370 M01S00354.0df +++|* EXIT TO *DRFX*, IF INPUT FILE IS CONTROL STATEMENT FILE. 00371 M01S00355.0df +++|* TO *RFA*, IF NOT CONTROL STATEMENT FILE. 00372 M01S00356.0df +++|* 00373 M01S00357.0df +++|* MACROS NFA. 00374 M01S00358.0df +++| 00375 M01S00359.0df +++| 00376 M01S00360.0df +++| INP BSS 0 ENTRY 00377 M01S00361.0df +++| LDC FNTN CHECK FNT RELATIVE ADDRESS 00378 M01S00362.0df +++| LMD FA 00379 M01S00363.0df +++| NJN INP2 IF NOT CONTROL STATEMENT FILE 00380 M01S00364.0df +++| LDD CM+4 00381 M01S00365.0df +++| SCN 77 CHANGE FILE NAME TO -INPUT*- 00382 M01S00366.0df +++| RAM INPB+4 00383 M01S00367.0df +++| AOD FS+4 SET STATUS COMPLETE 00384 M01S00368.0df +++| LDD LA 00385 M01S00369.0df +++| RAM INPA 00386 M01S00370.0df +++| NFA FA,R 00387 M01S00371.0df +++| CWM. INPB,ON REWRITE FILE NAME 00388 M01S00372.0df +++| INPA EQU *-1 00389 M01S00373.0df +++| ADK FSTL-1 STORE FILE STATUS 00390 M01S00374.0df +++| CWD FS 00391 M01S00375.0df +++| LDN 0 00392 M01S00376.0df +++| LJM DRFX EXIT 00393 M01S00377.0df +++| 00394 M01S00378.0df +++| INP2 LDN 0 00395 M01S00379.0df +++| UJN RFA RELEASE FILE ASSIGNMENT 00396 M01S00380.0df +++| 00397 M01S00381.0df +++| 00398 M01S00382.0df +++| INPB VFD 42/6LINPUT*,6/1,12/NDST 00399 M01S00383.0df +++| PTY SPACE 4,10 00400 M01S00384.0df +++|** PTY - PROCESS PRIMARY FILE. 00401 M01S00385.0df +++|* 00402 M01S00386.0df +++|* EXIT TO *RFA*. 00403 M01S00387.0df +++|* 00404 M01S00388.0df +++|* USES CM - CM+4. 00405 M01S00389.0df +++| 00406 M01S00390.0df +++| 00407 M01S00391.0df +++| PTY BSS 0 ENTRY 00408 M01S00392.0df +++| LDD CP 00409 M01S00393.0df +++| ADN TFSW 00410 M01S00394.0df +++| CRD CM 00411 M01S00395.0df +++| LDN 0 CLEAR PRIMARY FILE RELATIVE ADDRESS 00412 M01S00396.0df +++| STD CM+1 00413 M01S00397.0df +++| LDD CP 00414 M01S00398.0df +++| ADN TFSW 00415 M01S00399.0df +++| CWD CM 00416 M01S00400.0df +++| LDN 1 00417 M01S00401.0df +++|* UJN RFA RELEASE FILE ASSIGNMENT 00418 M01S00402.0df +++| QUE SPACE 4,10 00419 M01S00403.0df +++|** QUE - PROCESS QUEUE FILE. 00420 M01S00404.0df +++|* 00421 M01S00405.0df +++|* EXIT TO *RFA*. 00422 M01S00406.0df +++| 00423 M01S00407.0df +++| 00424 M01S00408.0df +++| QUE EQU INP2 00425 M01S00409.0df +++| SYS SPACE 4,10 00426 M01S00410.0df +++|** SYS - PROCESS SYSTEM FILE. 00427 M01S00411.0df +++|* 00428 M01S00412.0df +++|* EXIT TO *DRF3*. 00429 M01S00413.0df +++| 00430 M01S00414.0df +++| 00431 M01S00415.0df +++| SYS EQU DRF3 00432 M01S00416.0df +++| RFA SPACE 4,25 00433 M01S00417.0df +++|** RFA - RELEASE FILE ASSIGNMENT. 00434 M01S00418.0df +++|* 00435 M01S00419.0df +++|* ENTRY (A) = 0 IF QUEUE FILE. 00436 M01S00420.0df +++|* = 1 IF PRIMARY FILE. 00437 M01S00421.0df +++|* = 2 FOR OTHER FILE TYPES. 00438 M01S00422.0df +++|* (T8) = CHECKPOINT REQUEST. 00439 M01S00423.0df +++|* (FA) = FNT ADDRESS. 00440 M01S00424.0df +++|* (FS - FS+4) = FST INFORMATION. 00441 M01S00425.0df +++|* 00442 M01S00426.0df +++|* EXIT TO *DRF5* TO LOAD AND EXECUTE - 00443 M01S00427.0df +++|* *0DQ* IF QUEUE FILE. 00444 M01S00006.274l797 +++|* *0OD* IF OPTICAL DISK FILE. 00445 M01S00428.0df +++|* *0PT* IF PRIMARY FILE. 00446 M01S00429.0df +++|* *0RT* IF TAPE FILE. 00447 M01S00430.0df +++|* TO *SYS* FOR ALL OTHER FILES. 00448 M01S00431.0df +++|* 00449 M01S00432.0df +++|* USES T2, QA, CM - CM+4. 00450 M01S00433.0df +++|* 00451 M01S00434.0df +++|* CALLS RMS. 00452 M01S00435.0df +++|* 00453 M01S00436.0df +++|* MACROS SFA. 00454 M01S00437.0df +++| 00455 M01S00438.0df +++| 00456 M01S00439.0df +++| RFA BSS 0 ENTRY 00457 M01S00440.0df +++| STD T2 00458 M01S00441.0df +++| LDM -1 SET RETURN / UNLOAD FLAG 00459 M01S00442.0df +++| LPN 1 00460 M01S00443.0df +++| STM OVL-1 00461 M01S00444.0df +++| LDD FS 00462 M01S00445.0df +++| ZJN RFA3 IF EST ORDINAL ZERO 00463 M01S00446.0df +++| SFA EST 00464 M01S00447.0df +++| ADK EQDE READ EST ENTRY 00465 M01S00448.0df +++| CRD CM 00466 M01S00449.0df +++| LDD CM CHECK EQUIPMENT TYPE 00467 M01S00450.0df +++| SHN 21-13 00468 M01S00451.0df +++| PJN RFA6 IF NOT MASS STORAGE 00469 M01S00452.0df +++| SOD T2 00470 M01S00453.0df +++| MJN RFA2 IF QUEUE FILE 00471 M01S00454.0df +++| RJM RMS RELEASE MASS STORAGE SPACE 00472 M01S00455.0df +++| LDD T2 00473 M01S00456.0df +++| NJN RFA3 IF NOT PRIMARY FILE 00474 M01S00457.0df +++| STD FS 00475 M01S00458.0df +++| STD FS+1 00476 M01S00459.0df +++| LDC 2RPT SELECT *0PT* 00477 M01S00460.0df +++| RFA1 STM EZOA 00478 M01S00461.0df +++| LJM DRF5 LOAD AND EXECUTE OVERLAY 00479 M01S00462.0df +++| 00480 M01S00463.0df +++| RFA2 LDD FS+1 00481 M01S00464.0df +++| NJN RFA4 IF FILE USED 00482 M01S00465.0df +++| RFA3 LJM SYS DELETE FNT ENTRY 00483 M01S00466.0df +++| 00484 M01S00467.0df +++| RFA4 LDN 0 SELECT QFT SEARCH 00485 M01S00468.0df +++| STD QA 00486 M01S00469.0df +++| STM OVL-1 RELEASE DISK SPACE 00487 M01S00470.0df +++| LDC 2RDQ
| Line S00471 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00488 M02S00471.274l797 ---| RFA5 UJN RFA1 LOAD AND EXECUTE *0DQ* 00489 M01S00007.274l797 +++| UJN RFA1 LOAD AND EXECUTE *0DQ* 00490 M01S00472.0df +++|
| Line S00473 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 00491 M02S00473.282l826 ---| RFA6 SHN 13-12 00492 M01S00002.282l826 +++| RFA6 LDD CM+3 CHECK DEVICE TYPE 00493 M01S00003.282l826 +++| LMC 2RNT 00494 M01S00004.282l826 +++| ZJN RFA8 IF TAPE DEVICE 00495 M01S00005.282l826 +++| LMC 2RMT&2RNT 00496 M01S00006.282l826 +++| ZJN RFA8 IF TAPE DEVICE 00497 M01S00007.282l826 +++| LMC 2RCT&2RMT 00498 M01S00008.282l826 +++| ZJN RFA8 IF TAPE DEVICE 00499 M01S00009.282l826 +++| LMC 2RAT&2RCT 00500 M01S00010.282l826 +++| ZJN RFA8 IF TAPE DEVICE 00501 M01S00011.282l826 +++| LDD CM 00502 M01S00012.282l826 +++| SHN 21-12 00503 M01S00474.0df +++| MJN RFA7 IF ALLOCATABLE DEVICE 00504 M01S00475.0df +++| LDD FS 00505 M01S00001.ns2511 +++| LPC 777 00506 M01S00476.0df +++| STM DRFB SET EQUIPMENT TO RELEASE
| Line S00477 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 00507 M02S00477.282l826 ---|
| Line S00478 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 00508 M02S00478.282l826 ---|* CHECK FOR TAPE EQUIPMENT.
| Line S00479 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 00509 M02S00479.282l826 ---|
| Line S00480 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 00510 M02S00480.282l826 ---| RFA7 LDD CM+3 EXAMINE DEVICE TYPE
| Line S00481 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | 274l797 |
M03 (Updated by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 00511 M03S00481.282l826 ---| LPC 3777
| Line S00482 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 00512 M02S00482.282l826 ---| LMC 2RNT
| Line S00483 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 00513 M02S00483.282l826 ---| ZJN RFA8 IF *NT*
| Line S00484 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 00514 M02S00484.282l826 ---| LMC 2RMT&2RNT
| Line S00485 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 00515 M02S00485.282l826 ---| ZJN RFA8 IF *MT*
| Line S00486 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | 274l797 |
M03 (Updated by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 00516 M03S00486.282l826 ---| LMC 2RTE&2RMT
| Line S00487 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | 274l797 |
M03 (Updated by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 00517 M03S00487.282l826 ---| NJN RFA3 IF NOT *TE*
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Updated by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 00518 M02S00008.282l826 ---| LMC 2RCT&2RMT
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Updated by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 00519 M02S00009.282l826 ---| ZJN RFA8 IF *CT*
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Updated by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 00520 M02S00010.282l826 ---| LMC 2RAT&2RCT
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Updated by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 00521 M02S00011.282l826 ---| ZJN RFA8 IF *AT*
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | 274l797 |
M02 (Updated by) | 282l826 |
Seq # *Modification Id* Act ----------------------------+ 00522 M02S00012.282l826 ---| LMC 2RTE&2RAT 00523 M01S00013.282l826 +++| RFA7 LDD CM+3 CHECK DEVICE TYPE 00524 M01S00014.282l826 +++| LMC 2RTE 00525 M01S00013.274l797 +++| ZJN RFA8 IF *TE* 00526 M01S00014.274l797 +++| LMC 2ROD&2RTE 00527 M01S00015.274l797 +++| NJP RFA3 IF NOT *OD* 00528 M01S00016.274l797 +++| LDC 2ROD SET *0OD* OVERLAY 00529 M01S00017.274l797 +++| STM RFAA 00530 M01S00488.0df +++| RFA8 LDD FS+2 00531 M01S00489.0df +++| LPN 77 ISOLATE RANDOM ADDRESS 00532 M01S00490.0df +++| STD FS+2 00533 M01S00491.0df +++| LDD FS+4 00534 M01S00492.0df +++| SHN 21-2 00535 M01S00493.0df +++| MJN RFA9 IF PREVIOUS *0RT* REJECT 00536 M01S00494.0df +++| SHN 2-21 00537 M01S00495.0df +++| STD FS+4 00538 M01S00496.0df +++| RFA9 LDC 2RRT
| Line S00497 Modification History | |
|---|---|
M01 (Added by) | 0df |
M02 (Updated by) | 274l797 |
Seq # *Modification Id* Act ----------------------------+ 00539 M02S00497.274l797 ---| UJN RFA5 LOAD AND EXECUTE *0RT* 00540 M01S00018.274l797 +++|* LDC 2ROD (IF OPTICAL DISK) 00541 M01S00019.274l797 +++| RFAA EQU *-1 00542 M01S00020.274l797 +++| UJP RFA1 LOAD AND EXECUTE *0RT* OR *0OD* 00543 M01S00498.0df +++| RMS SPACE 4,15 00544 M01S00499.0df +++|** RMS - RELEASE MASS STORAGE. 00545 M01S00500.0df +++|* 00546 M01S00501.0df +++|* ENTRY (FA) = FNT ENTRY RELATIVE ADDRESS IN NFL. 00547 M01S00502.0df +++|* (T8) = CHECKPOINT REQUEST. 00548 M01S00503.0df +++|* (FS - FS+4) = FST INFORMATION. 00549 M01S00504.0df +++|* 00550 M01S00505.0df +++|* USES CM - CM+4. 00551 M01S00506.0df +++|* 00552 M01S00507.0df +++|* MACROS MONITOR. 00553 M01S00508.0df +++| 00554 M01S00509.0df +++| 00555 M01S00510.0df +++| RMS SUBR ENTRY/EXIT 00556 M01S00511.0df +++| LDD FS+1 00557 M01S00512.0df +++| ZJN RMSX IF FILE UNUSED 00558 M01S00513.0df +++| STD CM+2 00559 M01S00514.0df +++| LDD FS 00560 M01S00515.0df +++| LMD T8 MERGE CHECKPOINT REQUEST 00561 M01S00516.0df +++| STD CM+1 00562 M01S00517.0df +++| MONITOR DTKM DROP TRACKS 00563 M01S00518.0df +++| 00564 M01S00519.0df +++|* INCREMENT PRU LIMIT FIELD IN CONTROL POINT AREA. 00565 M01S00520.0df +++|* ACTUAL COUNT OF SECTORS RETURNED VIA DTKM IS IN CM+3 - CM+4. 00566 M01S00521.0df +++| 00567 M01S00522.0df +++| LDN CICS INCREMENT CP AREA FIELD FUNCTION CODE 00568 M01S00523.0df +++| STD CM 00569 M01S00524.0df +++| LDK ACLW ADDRESS OF MASS STORAGE SECTOR LIMIT 00570 M01S00525.0df +++| STD CM+1 00571 M01S00526.0df +++| LDN 0D*100+18D POSITION AND WIDTH OF LIMIT FIELD 00572 M01S00527.0df +++| STD CM+2 00573 M01S00528.0df +++| LDD MA UADM FUNCTION MESSAGE BUFFER CONTENTS 00574 M01S00529.0df +++| CWD CM 00575 M01S00530.0df +++| LDN 1 SET UADM REQUEST COUNT AND NO DROP OF PPU 00576 M01S00531.0df +++| STD CM+1 00577 M01S00532.0df +++| STD CM+2 00578 M01S00533.0df +++| MONITOR UADM INCREMENT MASS STORAGE SECTOR LIMIT 00579 M01S00534.0df +++|* LDN 0 00580 M01S00535.0df +++| UJN RMSX RETURN 00581 M01S00536.0df +++| SPACE 4,10 00582 M01S00537.0df +++| RSTR RESTORE INSTRUCTIONS 00583 M01S00538.0df +++| OVERFLOW SPACE 4,10 00584 M01S00539.0df +++|** OVERFLOW CHECKS. 00585 M01S00540.0df +++|* 00586 M01S00541.0df +++|* BYTES WHICH CAN BE ADDED BEFORE *OVL* IN *0DF* 00587 M01S00542.0df +++|* AND STILL ALLOW *0DQ*, *0FA*, *0PT*, *0RF*, *0RP*, AND 00588 M01S00543.0df +++|* *0RT* TO LOAD. 00589 M01S00544.0df +++| 00590 M01S00545.0df +++| 00591 M01S00546.0df +++| ERRNG ZDFL-OVL-ZDQL CHECK LENGTH OF *0DQ* 00592 M01S00547.0df +++| ERRNG ZDFL-OVL-ZFAL CHECK LENGTH OF *0FA* 00593 M01S00021.274l797 +++| ERRNG ZDFL-OVL-ZODL CHECK LENGTH OF *0OD* 00594 M01S00548.0df +++| ERRNG ZDFL-OVL-ZPTL CHECK LENGTH OF *0PT* 00595 M01S00549.0df +++| ERRNG ZDFL-OVL-ZRFL CHECK LENGTH OF *0RF* 00596 M01S00550.0df +++| ERRNG ZDFL-OVL-ZRPL CHECK LENGTH OF *0RP* 00597 M01S00551.0df +++| ERRNG ZDFL-OVL-ZRTL CHECK LENGTH OF *0RT* 00598 M01S00552.0df +++| 00599 M01S00553.0df +++| ERRNG ZDFL-* BYTES WHICH CAN BE ADDED TO *0DF* 00600 M01S00554.0df +++| 00601 M01S00555.0df +++| END
cdc/nos2.source/opl.opl871/deck/0df.txt · Last modified: by 127.0.0.1