cdc:nos2.source:opl.opl871:deck:pflist
Deck PFLIST
Library Member Format: MODIFY
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M00S00001.pflist +++| IDENT PFLIST1,/COMSPFS/OVLA,PFS,01,00 00002 M00S00002.pflist +++| TITLE PFLIST - LIST PF UTILITY SUMMARY FILE. 00003 M00S00003.pflist +++| ABS 00004 M00S00004.pflist +++| SST 00005 M00S00005.pflist +++| SYSCOM B1 00006 M00S00006.pflist +++| SPACE 4 00007 M00S00007.pflist +++|*COMMENT PFLIST - LIST PF UTILITY SUMMARY FILE. 00008 M00S00008.pflist +++| COMMENT COPYRIGHT CONTROL SYSTEMS INC. 1996. 00009 M00S00009.pflist +++| SPACE 4 00010 M00S00010.pflist +++|*** PFLIST - LIST PF UTILITY SUMMARY FILE. 00011 M00S00011.pflist +++|* 00012 M00S00012.pflist +++|* G. S. YODER 96/04/24. 00013 M00S00013.pflist +++| SPACE 4 00014 M00S00014.pflist +++|*** *PFLIST* IS A PERMANENT FILE UTILITY PROGRAM WHICH GENERATES 00015 M00S00015.pflist +++|* AN OUTPUT LISTING FROM A SUMMARY FILE PRODUCED BY ANOTHER 00016 M00S00016.pflist +++|* PERMANENT FILE UTILITY. *PFLIST* MAY BE CALLED FROM *PFS* OR 00017 M00S00017.pflist +++|* DIRECTLY BY A COMMAND. 00018 M00S00018.pflist +++| SPACE 4 00019 M00S00019.pflist +++|*** DAYFILE MESSAGES. 00020 M00S00020.pflist +++|* 00021 M00S00021.pflist +++|* INFORMATIVE. 00022 M00S00022.pflist +++|* 00023 M00S00023.pflist +++|* * PFLIST COMPLETE.* = PROGRAM COMPLETE. 00024 M00S00024.pflist +++|* 00025 M00S00025.pflist +++|* FATAL SYSTEM ERRORS. 00026 M00S00026.pflist +++|* 00027 M00S00027.pflist +++|* * PFLIST ABORTED.* = ERROR FLAG DETECTED ON CONTROL POINT. 00028 M00S00028.pflist +++|* 00029 M00S00029.pflist +++|* * FORMAT ERROR IN SUMMARY FILE.* 00030 M00S00030.pflist +++| SPACE 4 00031 M00S00031.pflist +++|* COMMON DECKS. 00032 M00S00032.pflist +++| 00033 M00S00033.pflist +++| 00034 M00S00034.pflist +++|*CALL COMCMAC 00035 M00S00035.pflist +++|*CALL COMCCMD 00036 M00S00036.pflist +++|*CALL COMSMLS 00037 M00S00037.pflist +++|*CALL COMSRPV 00038 M00S00038.pflist +++|*CALL COMSPFM 00039 M00S00039.pflist +++| LIST X 00040 M00S00040.pflist +++|*CALL COMSPFS 00041 M00S00041.pflist +++| LIST * 00042 M00S00042.pflist +++|*CALL COMSPFU 00043 M00S00043.pflist +++|*CALL COMSPRD 00044 M00S00044.pflist +++|*CALL COMSSFM 00045 M00S00045.pflist +++|*CALL COMSVER 00046 M00S00046.pflist +++| TITLE ASSEMBLY CONSTANTS. 00047 M00S00047.pflist +++|* ASSEMBLY CONSTANTS. 00048 M00S00048.pflist +++| 00049 M00S00049.pflist +++| 00050 M00S00050.pflist +++| DBUFL EQU 1000B SUMMARY FILE DATA BLOCK BUFFER LENGTH 00051 M00S00051.pflist +++| MSFBL EQU 10001B *COMCMSF* SORT FILES BUFFER LENGTH 00052 M00S00052.pflist +++| OUTBL EQU 10001B OUTPUT FILE BUFFER LENGTH 00053 M00S00053.pflist +++| PFLBL EQU 1001B PROCESSED FILES FILE BUFFER LENGTH 00054 M00S00054.pflist +++| SABFL EQU 1000B SUMMARY FILE ASSEMBLY BUFFER LENGTH 00055 M00S00055.pflist +++| SRTBL EQU 20000B SORT BUFFER LENGTH 00056 M00S00056.pflist +++| SUIBL EQU 10001B SUMMARY INPUT FILE BUFFER LENGTH 00057 M00S00057.pflist +++| SUMBL EQU 0 SUMMARY FILE BUFFER LENGTH 00058 M00S00058.pflist +++| 00059 M00S00059.pflist +++| 00060 M00S00060.pflist +++|* *COMSPFS* EQUIVALENCES. 00061 M00S00061.pflist +++| 00062 M00S00062.pflist +++| CPAR EQU /COMSPFS/CPL 00063 M00S00063.pflist +++| IDSA EQU /COMSPFS/PADR 00064 M00S00064.pflist +++| TITLE RESERVED LOCATIONS AND FETS. 00065 M00S00065.pflist +++| SPACE 4 00066 M00S00066.pflist +++| ORG /COMSPFS/OVLA 00067 M00S00067.pflist +++| SPACE 4 00068 M00S00068.pflist +++|** RESERVED LOCATIONS. 00069 M00S00069.pflist +++| 00070 M00S00070.pflist +++| 00071 M00S00071.pflist +++|* SUMMARY FILE DATA BLOCK STATUS. 00072 M00S00072.pflist +++| 00073 M00S00073.pflist +++| BLCW CON 0 BLOCK CONTROL WORD 00074 M00S00074.pflist +++| BLTY CON 0 TYPE OF DATA BLOCK IN BUFFER 00075 M00S00075.pflist +++| SPACE 4 00076 M00S00076.pflist +++|** FETS. 00077 M00S00077.pflist +++| 00078 M00S00078.pflist +++| 00079 M00S00079.pflist +++| SI BSS 0 SUMMARY INPUT FILE 00080 M00S00080.pflist +++| SUMMARY FILEB SUIB,SUIBL,FET=10D 00081 M00S00081.pflist +++| SPACE 4 00082 M00S00082.pflist +++|** OPERATOR AND DAYFILE MESSAGES. 00083 M00S00083.pflist +++| 00084 M00S00084.pflist +++| 00085 M00S00085.pflist +++| MSFP DATA C* ?????? FILE! PROCESSED.* 00086 M00S00086.pflist +++| BLNK DATA 30H 00087 M00S00087.pflist +++| SPACE 4 00088 M00S00088.pflist +++|** ERROR MESSAGES. 00089 M00S00089.pflist +++| 00090 M00S00090.pflist +++| 00091 M00S00091.pflist +++| ERAN DATA C* SF EXCEDES NUMBER OF ARCHIVE FILES.* 00092 M00S00092.pflist +++| ERDS DATA C* DEVICE STATUS BLOCK MISSING.* 00093 M00S00093.pflist +++| ERFE DATA C* FORMAT ERROR IN SUMMARY FILE.* 00094 M00S00094.pflist +++| TITLE MAIN ROUTINES. 00095 M00S00095.pflist +++| PFS SPACE 4,10 00096 M00S00096.pflist +++|** MAIN PROGRAM. 00097 M00S00097.pflist +++|* 00098 M00S00098.pflist +++|* CALLS CFP, CSC, ICI, OAL, OCH, OCI, PRS, RDB, SPA. 00099 M00S00099.pflist +++|* 00100 M00S00100.pflist +++|* EXIT TO *ABT* IF FATAL ERROR. 00101 M00S00101.pflist +++| 00102 M00S00102.pflist +++| 00103 M00S00103.pflist +++| PFS BSS 0 ENTRY 00104 M00S00104.pflist +++| RJ PRS PRESET PROGRAM 00105 M00S00105.pflist +++| 00106 M00S00106.pflist +++|* LOCATE ARCHIVE LABEL BLOCK IF SKIP COUNT SPECIFIED. 00107 M00S00107.pflist +++| 00108 M00S00108.pflist +++| SA5 CPAR+/COMSPFS/CPSF 00109 M00S00109.pflist +++| ZR X5,PFS3 IF NO ARCHIVE FILES TO SKIP 00110 M00S00110.pflist +++| PFS1 SA1 BLTY GET BLOCK TYPE 00111 M00S00111.pflist +++| SX1 X1-/COMSPFS/AFSB 00112 M00S00112.pflist +++| NZ X1,PFS2 IF NOT ARCHIVE LABEL BLOCK 00113 M00S00113.pflist +++| ZR X5,PFS5 IF BLOCK FOUND 00114 M00S00114.pflist +++| SX5 X5-1 COUNT BLOCK 00115 M00S00115.pflist +++| PFS2 RJ RDB READ DATA BLOCK 00116 M00S00116.pflist +++| PL X6,PFS1 IF NOT EOR 00117 M00S00117.pflist +++| SB2 ERAN * SF EXCEDES NUMBER OF ARCHIVE FILES.* 00118 M00S00118.pflist +++| EQ ABT ABORT 00119 M00S00119.pflist +++| 00120 M00S00120.pflist +++|* READ SUMMARY FILE BLOCK AND CHECK FOR SORTED OUTPUT. 00121 M00S00121.pflist +++| 00122 M00S00122.pflist +++| PFS3 RJ RDB 00123 M00S00123.pflist +++| ZR X2,PFS4 IF BLOCK TYPE IS SAME AS PREVIOUS 00124 M00S00124.pflist +++| RJ CSO CHECK FOR SORTED OUTPUT 00125 M00S00125.pflist +++| 00126 M00S00126.pflist +++|* EXECUTE BLOCK TYPE PROCESSOR. 00127 M00S00127.pflist +++| 00128 M00S00128.pflist +++| PFS4 NG X6,END IF EOR, EOF, OR EOI ENCOUNTERED 00129 M00S00129.pflist +++| SA1 TSIP+X6 GET PROCESSOR ADDRESS 00130 M00S00130.pflist +++| SB2 X1 00131 M00S00131.pflist +++| JP B2 ENTER BLOCK TYPE PROCESSOR 00132 M00S00132.pflist +++| 00133 M00S00133.pflist +++|* PROCESS ARCHIVE LABEL BLOCK. 00134 M00S00134.pflist +++| 00135 M00S00135.pflist +++| PFS5 SA1 CPAR+/COMSPFS/CPNB 00136 M00S00136.pflist +++| SA2 PFSA 00137 M00S00137.pflist +++| IX1 X2-X1 00138 M00S00138.pflist +++| ZR X1,END IF ARCHIVE FILE COUNT REACHED 00139 M00S00139.pflist +++| SX6 X2+B1 00140 M00S00140.pflist +++| SA6 PFSA COUNT ARCHIVE FILE PROCESSED 00141 M00S00141.pflist +++| MOVE 3,DBUF,AFIB SET ARCHIVE FILE LABEL INFORMATION 00142 M00S00142.pflist +++| RJ OAL OUTPUT ARCHIVE FILE LABEL INFORMATION 00143 M00S00143.pflist +++| EQ PFS3 READ NEXT BLOCK 00144 M00S00144.pflist +++| 00145 M00S00145.pflist +++|* PROCESS CATALOG IMAGE RECORD BLOCK. 00146 M00S00146.pflist +++| 00147 M00S00147.pflist +++| PFS6 ZR X2,PFS7 IF LAST BLOCK WAS CIR BLOCK 00148 M00S00148.pflist +++| RJ ICI INITIALIZE FOR CIR PROCESSING 00149 M00S00149.pflist +++| PFS7 SA1 BLCW 00150 M00S00150.pflist +++| SX6 DBUF SET CIR BUFFER POINTER 00151 M00S00151.pflist +++| SX7 X1 SET WORD COUNT 00152 M00S00152.pflist +++| RJ OCI OUTPUT CATALOG IMAGE BLOCK 00153 M00S00153.pflist +++| EQ PFS3 READ NEXT BLOCK 00154 M00S00154.pflist +++| 00155 M00S00155.pflist +++|* PROCESS CATALOG ENTRIES BLOCK. 00156 M00S00156.pflist +++| 00157 M00S00157.pflist +++| PFS8 SA0 DBUF-NWCE-1 INITIALIZE ENTRY ADDRESS 00158 M00S00158.pflist +++| ZR X2,PFS9 IF LAST BLOCK WAS CATALOG ENTRIES 00159 M00S00159.pflist +++| RJ IFL INITIALIZE FOR FILE PROCESSING 00160 M00S00160.pflist +++| PFS9 SA2 BLCW 00161 M00S00161.pflist +++| SA0 A0+NWCE+1 ADVANCE ENTRY ADDRESS 00162 M00S00162.pflist +++| SB2 X2+DBUF 00163 M00S00163.pflist +++| SB2 A0-B2 00164 M00S00164.pflist +++| PL B2,PFS3 IF BLOCK ALL PROCESSED 00165 M00S00165.pflist +++| SB4 A0 SET CATALOG ADDRESS 00166 M00S00166.pflist +++| RJ CSC CHECK SELECTION CRITERIA 00167 M00S00167.pflist +++| ZR X6,PFS9 IF NOT TO PROCESS FILE 00168 M00S00168.pflist +++| SA1 B4+NWCE 00169 M00S00169.pflist +++| BX7 X1 00170 M00S00170.pflist +++| SA7 FLST SET FILE STATUS 00171 M00S00171.pflist +++| RJ CFP COUNT FILE PROCESSED 00172 M00S00172.pflist +++| EQ PFS9 PROCESS NEXT ENTRY 00173 M00S00173.pflist +++| 00174 M00S00174.pflist +++| 00175 M00S00175.pflist +++| PFSA CON 0 ARCHIVE FILES PROCESSED COUNT 00176 M00S00176.pflist +++| TSIP SPACE 4,10 00177 M00S00177.pflist +++|* TABLE OF SUMMARY INPUT FILE BLOCK PROCESSORS. 00178 M00S00178.pflist +++| 00179 M00S00179.pflist +++| TSIP IVFD START OF TABLE 00180 M00S00180.pflist +++| IVFD /COMSPFS/SYSB,(60/SER) SYSTEM 00181 M00S00181.pflist +++| IVFD /COMSPFS/DSSB,(60/PFS3) DEVICE STATUS 00182 M00S00182.pflist +++| IVFD /COMSPFS/AFSB,(60/PFS5) ARCHIVE FILE 00183 M00S00183.pflist +++| IVFD /COMSPFS/CISB,(60/PFS6) CIR 00184 M00S00184.pflist +++| IVFD /COMSPFS/CESB,(60/PFS8) CATALOG ENTRIES 00185 M00S00185.pflist +++| IVFD /COMSPFS/MXSB,(60/PFS3) UNIDENTIFIED 00186 M00S00186.pflist +++| IVFD /COMSPFS/MXSB+1 00187 M00S00187.pflist +++| CSO SPACE 4,15 00188 M00S00188.pflist +++|** CSO - CHECK FOR SORTED OUTPUT. 00189 M00S00189.pflist +++|* 00190 M00S00190.pflist +++|* ENTRY (X3) = PREVIOUS BLOCK TYPE. 00191 M00S00191.pflist +++|* (X6) = CURRENT BLOCK TYPE. 00192 M00S00192.pflist +++|* 00193 M00S00193.pflist +++|* EXIT (X6) = CURRENT BLOCK TYPE. 00194 M00S00194.pflist +++|* (X2) .NE. 0 (NON-MATCHING BLOCK TYPE). 00195 M00S00195.pflist +++|* 00196 M00S00196.pflist +++|* USES X - 1, 2, 6. 00197 M00S00197.pflist +++|* A - 1. 00198 M00S00198.pflist +++|* 00199 M00S00199.pflist +++|* CALLS PSF, PSI. 00200 M00S00200.pflist +++| 00201 M00S00201.pflist +++| 00202 M00S00202.pflist +++| CSO SUBR ENTRY/EXIT 00203 M00S00203.pflist +++| SX1 X3-/COMSPFS/CISB 00204 M00S00204.pflist +++| NZ X1,CSO1 IF PREVIOUS BLOCK NOT CIR ENTRIES 00205 M00S00205.pflist +++| RJ PSI PROCESS SORTED CIR ENTRIES 00206 M00S00206.pflist +++| EQ CSO2 RESET BLOCK STATUS 00207 M00S00207.pflist +++| 00208 M00S00208.pflist +++| CSO1 SX1 X3-/COMSPFS/CESB 00209 M00S00209.pflist +++| NZ X1,CSOX IF PREVIOUS BLOCK NOT CATALOG ENTRIES 00210 M00S00210.pflist +++| RJ PSF PROCESS SORTED CATALOG ENTRIES 00211 M00S00211.pflist +++| CSO2 SA1 BLTY 00212 M00S00212.pflist +++| SX2 B1 INDICATE NON-MATCHING BLOCK TYPE 00213 M00S00213.pflist +++| SX6 X1 RESET BLOCK TYPE 00214 M00S00214.pflist +++| EQ CSOX RETURN 00215 M00S00215.pflist +++| TITLE SUBROUTINES. 00216 M00S00216.pflist +++| APR SPACE 4,10 00217 M00S00217.pflist +++|** APR - ABORT PROCESSOR. 00218 M00S00218.pflist +++| 00219 M00S00219.pflist +++| 00220 M00S00220.pflist +++| APR SUBR ENTRY/EXIT 00221 M00S00221.pflist +++| EQ APRX RETURN 00222 M00S00222.pflist +++| IFM SPACE 4,10 00223 M00S00223.pflist +++|** IFM - ISSUE FILE COUNT MESSAGES. 00224 M00S00224.pflist +++|* 00225 M00S00225.pflist +++|* EXIT FILE COUNT MESSAGES ISSUED TO DAYFILE. 00226 M00S00226.pflist +++|* 00227 M00S00227.pflist +++|* USES X - 1, 5, 6. 00228 M00S00228.pflist +++|* A - 1, 5. 00229 M00S00229.pflist +++|* 00230 M00S00230.pflist +++|* CALLS IFC. 00231 M00S00231.pflist +++| 00232 M00S00232.pflist +++| 00233 M00S00233.pflist +++| IFM SUBR ENTRY/EXIT 00234 M00S00234.pflist +++| SA5 IFMA 00235 M00S00235.pflist +++| RJ IFC ISSUE FILE COUNT MESSAGES 00236 M00S00236.pflist +++| EQ IFMX RETURN 00237 M00S00237.pflist +++| 00238 M00S00238.pflist +++| 00239 M00S00239.pflist +++| IFMA BSS 0 *PFLIST* MESSAGE TABLE 00240 M00S00240.pflist +++| VFD 1/1,1/1,22/0,18/MSFP,18/PRFC 00241 M00S00241.pflist +++| CON 0 END OF TABLE 00242 M00S00242.pflist +++| RDB SPACE 4,20 00243 M00S00243.pflist +++|** RDB - READ DATA BLOCK FROM SUMMARY FILE. 00244 M00S00244.pflist +++|* 00245 M00S00245.pflist +++|* EXIT (X6) = BLOCK TYPE IF BLOCK READ. 00246 M00S00246.pflist +++|* (X6) = -1 IF EOR, EOF, OR EOI ENCOUNTERED ON READ OF 00247 M00S00247.pflist +++|* BLOCK CONTROL WORD. 00248 M00S00248.pflist +++|* (X2) = 0 IF BLOCK TYPE SAME A PREVIOUS BLOCK TYPE. 00249 M00S00249.pflist +++|* (X2) .NE. 0 IF BLOCK TYPE NOT SAME AS PREVIOUS. 00250 M00S00250.pflist +++|* (X3) = PREVIOUS BLOCK TYPE. 00251 M00S00251.pflist +++|* (BLCW) = BLOCK CONTROL WORD IF BLOCK READ. 00252 M00S00252.pflist +++|* (BLTY) = BLOCK TYPE IF BLOCK READ. 00253 M00S00253.pflist +++|* (BLTY) = -1 IF EOR, EOF, OR EOI ENCOUNTERED ON READ OF 00254 M00S00254.pflist +++|* BLOCK CONTROL WORD. 00255 M00S00255.pflist +++|* DATA BLOCK READ TO *DBUF* IF NO ERROR. 00256 M00S00256.pflist +++|* TO *SER* IF ERROR IN SUMMARY FILE BLOCK. 00257 M00S00257.pflist +++|* 00258 M00S00258.pflist +++|* USES X - 1, 2, 3, 6. 00259 M00S00259.pflist +++|* A - 1, 2, 3, 6. 00260 M00S00260.pflist +++|* 00261 M00S00261.pflist +++|* MACROS READW. 00262 M00S00262.pflist +++| 00263 M00S00263.pflist +++| 00264 M00S00264.pflist +++| RDB SUBR ENTRY/EXIT 00265 M00S00265.pflist +++| 00266 M00S00266.pflist +++|* READ BLOCK CONTROL WORD AND DATA. 00267 M00S00267.pflist +++| 00268 M00S00268.pflist +++| READW SI,BLCW,1 READ BLOCK CONTROL WORD 00269 M00S00269.pflist +++| SA3 BLCW 00270 M00S00270.pflist +++| SX6 -1 SET EOR, EOF, EOI STATUS 00271 M00S00271.pflist +++| NZ X1,RDB2 IF EOR, EOF, OR EOI ENCOUNTERED 00272 M00S00272.pflist +++| SX1 X3-DBUFL-1 00273 M00S00273.pflist +++| SX6 X3 00274 M00S00274.pflist +++| BX1 -X1+X6 00275 M00S00275.pflist +++| NG X1,SER IF BAD BLOCK LENGTH 00276 M00S00276.pflist +++| READW X2,DBUF,X3 READ DATA BLOCK 00277 M00S00277.pflist +++| NZ X1,SER IF INCOMPLETE READ 00278 M00S00278.pflist +++| 00279 M00S00279.pflist +++|* IDENTIFY BLOCK TYPE. 00280 M00S00280.pflist +++| 00281 M00S00281.pflist +++| SA1 BLCW 00282 M00S00282.pflist +++| SA2 TSBI-1 00283 M00S00283.pflist +++| MX6 42 00284 M00S00284.pflist +++| BX1 X6*X1 BLOCK IDENTIFIER 00285 M00S00285.pflist +++| RDB1 SA2 A2+B1 GET NEXT ENTRY 00286 M00S00286.pflist +++| SX6 A2-TSBI SET BLOCK TYPE 00287 M00S00287.pflist +++| BX3 X2-X1 00288 M00S00288.pflist +++| ZR X2,RDB2 IF END OF ENTRIES 00289 M00S00289.pflist +++| NZ X3,RDB1 IF NO MATCH 00290 M00S00290.pflist +++| RDB2 SA3 BLTY 00291 M00S00291.pflist +++| SA6 A3 SET NEW BLOCK TYPE 00292 M00S00292.pflist +++| IX2 X6-X3 SET NEW BLOCK TYPE STATUS 00293 M00S00293.pflist +++| EQ RDBX RETURN 00294 M00S00294.pflist +++| RIP SPACE 4,10 00295 M00S00295.pflist +++|** RIP - REPRIEVE INTERRUPT PROCESSOR. 00296 M00S00296.pflist +++|* 00297 M00S00297.pflist +++|* EXIT BUSY FETS SET COMPLETE TO ALLOW TERMINATION 00298 M00S00298.pflist +++|* PROCESSING. 00299 M00S00299.pflist +++|* 00300 M00S00300.pflist +++|* MACROS COMPFET. 00301 M00S00301.pflist +++| 00302 M00S00302.pflist +++| 00303 M00S00303.pflist +++| RIP SUBR ENTRY/EXIT 00304 M00S00304.pflist +++| COMPFET (O,SU) 00305 M00S00305.pflist +++| EQ RIPX RETURN 00306 M00S00306.pflist +++| SER SPACE 4,10 00307 M00S00307.pflist +++|** SER - PROCESS SUMMARY FILE ERROR. 00308 M00S00308.pflist +++|* 00309 M00S00309.pflist +++|* EXIT TO *ABT*. 00310 M00S00310.pflist +++|* 00311 M00S00311.pflist +++|* USES B - 2. 00312 M00S00312.pflist +++| 00313 M00S00313.pflist +++| 00314 M00S00314.pflist +++| SER BSS 0 ENTRY 00315 M00S00315.pflist +++| SB2 ERFE * FORMAT ERROR IN SUMMARY FILE.* 00316 M00S00316.pflist +++| EQ ABT ABORT 00317 M00S00317.pflist +++| SPACE 4 00318 M00S00318.pflist +++|** COMMON DECKS. 00319 M00S00319.pflist +++| 00320 M00S00320.pflist +++| 00321 M00S00321.pflist +++|*CALL COMCCDD 00322 M00S00322.pflist +++|*CALL COMCCIO 00323 M00S00323.pflist +++|*CALL COMCCOD 00324 M00S00324.pflist +++|*CALL COMCCPM 00325 M00S00325.pflist +++|*CALL COMCDXB 00326 M00S00326.pflist +++|*CALL COMCEDT 00327 M00S00327.pflist +++| FCE$ EQU 0 00328 M00S00328.pflist +++|*CALL COMCFCE 00329 M00S00329.pflist +++| CHDR1 EQU /COMCFCE/CHDR1 00330 M00S00330.pflist +++| GMS$ EQU 1 USE SORT KEY MASK 00331 M00S00331.pflist +++| MWK$ EQU 1 ALLOW MULTIPLE WORD SORT KEYS 00332 M00S00332.pflist +++|*CALL COMCGMS 00333 M00S00333.pflist +++|*CALL COMCJCR 00334 M00S00334.pflist +++|*CALL COMCLFM 00335 M00S00335.pflist +++|*CALL COMCMSF 00336 M00S00336.pflist +++|*CALL COMCMVE 00337 M00S00337.pflist +++| LIST X 00338 M00S00338.pflist +++|*CALL COMCPFS 00339 M00S00339.pflist +++| LIST * 00340 M00S00340.pflist +++|*CALL COMCPFU 00341 M00S00341.pflist +++|*CALL COMCRDW 00342 M00S00342.pflist +++|*CALL COMCSCB 00343 M00S00343.pflist +++|*CALL COMCSFN 00344 M00S00344.pflist +++|*CALL COMCSNM 00345 M00S00345.pflist +++|*CALL COMCSYS 00346 M00S00346.pflist +++|*CALL COMCVDT 00347 M00S00347.pflist +++|*CALL COMCWTC 00348 M00S00348.pflist +++|*CALL COMCWTH 00349 M00S00349.pflist +++|*CALL COMCWTO 00350 M00S00350.pflist +++|*CALL COMCWTW 00351 M00S00351.pflist +++|*CALL COMCZTB 00352 M00S00352.pflist +++| TITLE BUFFERS. 00353 M00S00353.pflist +++| USE LITERALS 00354 M00S00354.pflist +++| SPACE 4 00355 M00S00355.pflist +++|** BUFFERS. 00356 M00S00356.pflist +++| 00357 M00S00357.pflist +++| 00358 M00S00358.pflist +++|* BUFFERS USED BY PRESET. 00359 M00S00359.pflist +++| 00360 M00S00360.pflist +++| DBUF BSSZ DBUFL SUMMARY FILE DATA BLOCK BUFFER 00361 M00S00361.pflist +++| SUIB BSSZ SUIBL SUMMARY INPUT FILE BUFFER 00362 M00S00362.pflist +++| OUTB BSSZ OUTBL OUTPUT FILE 00363 M00S00363.pflist +++| 00364 M00S00364.pflist +++|* BUFFERS OVERLAYING PRESET. 00365 M00S00365.pflist +++| 00366 M00S00366.pflist +++| SUMB EQU OUTB+OUTBL SUMMARY FILE (NOT USED) 00367 M00S00367.pflist +++| PFLB EQU SUMB+SUMBL PROCESSED FILES FILE 00368 M00S00368.pflist +++| MS1B EQU PFLB+PFLBL SORT FILE 1 00369 M00S00369.pflist +++| MS2B EQU MS1B+MSFBL SORT FILE 2 00370 M00S00370.pflist +++| MS3B EQU MS2B+MSFBL SORT FILE 3 00371 M00S00371.pflist +++| MS4B EQU MS3B+MSFBL SORT FILE 4 00372 M00S00372.pflist +++| SRTB EQU MS3B SORT BUFFER (OVERLAYS *MS3B* AND *MS4B*) 00373 M00S00373.pflist +++| ERRNG MSFBL*2-SRTBL SORT BUFFER OVERFLOW 00374 M00S00374.pflist +++| EBUF EQU MS4B+MSFBL+5 END OF BUFFERS 00375 M00S00375.pflist +++| TITLE PFLIST PRESET. 00376 M00S00376.pflist +++| PRS SPACE 4,15 00377 M00S00377.pflist +++|** PRS - PRESET PROGRAM. 00378 M00S00378.pflist +++|* 00379 M00S00379.pflist +++|* EXIT FILES INITIALIZED. 00380 M00S00380.pflist +++|* MESSAGES INITIALIZED. 00381 M00S00381.pflist +++|* SUMMARY FILE SYSTEM BLOCK PROCESSED. 00382 M00S00382.pflist +++|* SUMMARY FILE DEVICE STATUS BLOCK PROCESSED IF PRESENT. 00383 M00S00383.pflist +++|* 00384 M00S00384.pflist +++|* USES A - 1, 2, 6, 7. 00385 M00S00385.pflist +++|* X - 0, 1, 2, 3, 5, 6, 7. 00386 M00S00386.pflist +++|* B - 2, 3, 5, 7. 00387 M00S00387.pflist +++|* 00388 M00S00388.pflist +++|* CALLS IOF, ODV, RPS, RDB, SCB, SNM, ZTB. 00389 M00S00389.pflist +++|* 00390 M00S00390.pflist +++|* MACROS MEMORY, MOVE, REPRIEVE, READ, READW. 00391 M00S00391.pflist +++| 00392 M00S00392.pflist +++| 00393 M00S00393.pflist +++| PRS SUBR ENTRY/EXIT 00394 M00S00394.pflist +++| SB1 1 00395 M00S00395.pflist +++| MEMORY CM,,R,EBUF REQUEST REQUIRED MEMORY 00396 M00S00396.pflist +++| REPRIEVE RPVB,SET,277B SET EXTENDED REPRIEVE PROCESSING 00397 M00S00397.pflist +++| 00398 M00S00398.pflist +++|* READ USER AND FILE NAME SELECTIONS. 00399 M00S00399.pflist +++| 00400 M00S00400.pflist +++| SX0 EBUF SET SELECTION BUFFER ADDRESS 00401 M00S00401.pflist +++| RJ RPS READ PERMANENT FILE SELECTIONS 00402 M00S00402.pflist +++| 00403 M00S00403.pflist +++|* INITIALIZE SUMMARY INPUT FILE FET AND READ PREFIX TABLE. 00404 M00S00404.pflist +++| 00405 M00S00405.pflist +++| SA1 SI SET FILE NAME IN FET 00406 M00S00406.pflist +++| SA2 CPAR+/COMSPFS/CPSI 00407 M00S00407.pflist +++| MX6 -18 00408 M00S00408.pflist +++| BX6 -X6*X1 00409 M00S00409.pflist +++| BX6 X2+X6 00410 M00S00410.pflist +++| SA6 A1 00411 M00S00411.pflist +++| READ SI 00412 M00S00412.pflist +++| READW SI,DBUF,15 READ PREFIX TABLE 00413 M00S00413.pflist +++| NZ X1,SER IF INCOMPLETE READ 00414 M00S00414.pflist +++| SA1 DBUF 00415 M00S00415.pflist +++| SA2 PRSA 00416 M00S00416.pflist +++| BX1 X1-X2 00417 M00S00417.pflist +++| NZ X1,SER IF NOT PREFIX TABLE 00418 M00S00418.pflist +++| 00419 M00S00419.pflist +++|* PROCESS SYSTEM BLOCK. 00420 M00S00420.pflist +++| 00421 M00S00421.pflist +++| RJ RDB READ SYSTEM BLOCK 00422 M00S00422.pflist +++| SA1 BLCW 00423 M00S00423.pflist +++| SX6 X6-/COMSPFS/SYSB 00424 M00S00424.pflist +++| NZ X6,SER IF NOT SYSTEM BLOCK 00425 M00S00425.pflist +++| SX1 X1-13B 00426 M00S00426.pflist +++| NZ X1,SER IF NOT CORRECT WORD COUNT FOR SYSTEM BLOCK 00427 M00S00427.pflist +++| MOVE 2,PRSB,PGSC SET SUMMARY FILE CREATION TEXT IN PAGE TITL 00428 M00S00428.pflist +++| SA1 DBUF+1 00429 M00S00429.pflist +++| RJ ZTB ENSURE BLANK FILL 00430 M00S00430.pflist +++| SA6 PGSC+2 SET SUMMARY FILE CREATION DATE 00431 M00S00431.pflist +++| SA1 DBUF+2 00432 M00S00432.pflist +++| RJ ZTB ENSURE BLANK FILL 00433 M00S00433.pflist +++| SA6 PGSC+3 00434 M00S00434.pflist +++| SA1 DBUF GET UTILITY NAME 00435 M00S00435.pflist +++| MX6 42 00436 M00S00436.pflist +++| BX1 X6*X1 00437 M00S00437.pflist +++| SA2 TUTA 00438 M00S00438.pflist +++| PRS1 SA2 A2+B1 00439 M00S00439.pflist +++| ZR X2,SER IF END OF UTILITY NAMES 00440 M00S00440.pflist +++| BX3 X6*X2 UTILITY NAME 00441 M00S00441.pflist +++| BX3 X1-X3 00442 M00S00442.pflist +++| NZ X3,PRS1 IF NO MATCH ON UTILITY NAME 00443 M00S00443.pflist +++| LX2 59-0 00444 M00S00444.pflist +++| SX6 A2-TUTA 00445 M00S00445.pflist +++| SA6 OFUC SET UTILITY CODE 00446 M00S00446.pflist +++| PL X2,PRS3 IF UTILITY DOES NOT SUPPORT DEVICE BLOCK 00447 M00S00447.pflist +++| 00448 M00S00448.pflist +++|* PROCESS DEVICE STATUS BLOCK. 00449 M00S00449.pflist +++| 00450 M00S00450.pflist +++| RJ RDB READ BLOCK 00451 M00S00451.pflist +++| SB2 ERDS * DEVICE STATUS BLOCK MISSING.* 00452 M00S00452.pflist +++| SX6 X6-/COMSPFS/DSSB 00453 M00S00453.pflist +++| NZ X6,ABT IF NOT DEVICE STATUS BLOCK 00454 M00S00454.pflist +++| SA1 DBUF+2 00455 M00S00455.pflist +++| SA2 DBUF 00456 M00S00456.pflist +++| MX6 -6 00457 M00S00457.pflist +++| MX7 42 00458 M00S00458.pflist +++| BX1 -X6*X1 EXTRACT DEVICE NUMBER OF FIRST DEVICE 00459 M00S00459.pflist +++| BX7 X7*X2 00460 M00S00460.pflist +++| SX3 OFFN SELECT FAMILY NAME 00461 M00S00461.pflist +++| NZ X1,PRS2 IF FAMILY DEVICE 00462 M00S00462.pflist +++| SX3 OFPN SELECT PACK NAME 00463 M00S00463.pflist +++| PRS2 SA7 X3 SET FAMILY OR PACK NAME 00464 M00S00464.pflist +++| SA1 DBUF+1 00465 M00S00465.pflist +++| BX6 X1 00466 M00S00466.pflist +++| SA6 OFUN SET USER NAME IF AUXILIARY DEVICE 00467 M00S00467.pflist +++| RJ IOF INITIALIZE OUTPUT FILES 00468 M00S00468.pflist +++| SA1 BLCW 00469 M00S00469.pflist +++| SX6 0 SET END OF DEVICE ENTRIES 00470 M00S00470.pflist +++| SA6 DBUF+X1 00471 M00S00471.pflist +++| SX6 DBUF+2 SET DEVICE STATUS ADDRESS 00472 M00S00472.pflist +++| RJ ODV OUTPUT DEVICE STATUS 00473 M00S00473.pflist +++| EQ PRS4 CHECK ARCHIVE FILE COUNT 00474 M00S00474.pflist +++| 00475 M00S00475.pflist +++|* INITIALIZE OUTPUT FILES. 00476 M00S00476.pflist +++| 00477 M00S00477.pflist +++| PRS3 RJ IOF INITIALIZE OUTPUT FILES 00478 M00S00478.pflist +++| PRS4 SA1 CPAR+/COMSPFS/CPNB 00479 M00S00479.pflist +++| NZ X1,PRSX IF ARCHIVE FILE COUNT SPECIFIED 00480 M00S00480.pflist +++| SX6 B1 00481 M00S00481.pflist +++| SA6 A1 SET ARCHIVE FILE COUNT = 1 00482 M00S00482.pflist +++| EQ PRSX RETURN 00483 M00S00483.pflist +++| 00484 M00S00484.pflist +++| 00485 M00S00485.pflist +++| PRSA VFD 12/7700B,12/16B,36/0 00486 M00S00486.pflist +++| PRSB DATA 20HSUMMARY FILE CREATED 00487 M00S00487.pflist +++| TUTA SPACE 4,10 00488 M00S00488.pflist +++|** TUTA - TABLE OF UTILITY ATTRIBUTES. 00489 M00S00489.pflist +++| 00490 M00S00490.pflist +++| 00491 M00S00491.pflist +++| TUTA IVFD TABLE OF UTILITY NAMES 00492 M00S00492.pflist +++| IVFD /COMSPFS/LDUT,(42/0LPFLOAD,18/1) 00493 M00S00493.pflist +++| IVFD /COMSPFS/DUUT,(42/0LPFDUMP,18/1) 00494 M00S00494.pflist +++| IVFD /COMSPFS/CAUT,(42/0LPFCAT,18/1) 00495 M00S00495.pflist +++| IVFD /COMSPFS/ATUT,(42/0LPFATC,18/0) 00496 M00S00496.pflist +++| IVFD /COMSPFS/COUT,(42/0LPFCOPY,18/0) 00497 M00S00497.pflist +++| IVFD /COMSPFS/RLUT,(42/0LPFREL,18/1) 00498 M00S00498.pflist +++| IVFD /COMSPFS/LIUT,(42/0LPFLIST,18/0) 00499 M00S00499.pflist +++| IVFD /COMSPFS/RSUT,(42/0LPFRES,18/0) 00500 M00S00500.pflist +++| IVFD /COMSPFS/MXUT,(60/0) 00501 M00S00501.pflist +++| IVFD /COMSPFS/MXUT+1 00502 M00S00502.pflist +++| 00503 M00S00503.pflist +++| SPACE 4 00504 M00S00504.pflist +++|** PRESET COMMON DECKS. 00505 M00S00505.pflist +++| 00506 M00S00506.pflist +++| 00507 M00S00507.pflist +++| LIST X 00508 M00S00508.pflist +++|*CALL COMCPFP 00509 M00S00509.pflist +++| LIST * 00510 M00S00510.pflist +++| 00511 M00S00511.pflist +++| 00512 M00S00512.pflist +++| ERRPL *-EBUF-1 PRESET OVERFLOWS INTO BUFFERS 00513 M00S00513.pflist +++| SPACE 4 00514 M00S00514.pflist +++| END
cdc/nos2.source/opl.opl871/deck/pflist.txt · Last modified: by 127.0.0.1