cdc:nos2.source:opl.opl871:common:compvpa
Common COMPVPA
1 Modification
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M01S00001.compvpa +++| CTEXT COMPVPA - VALIDATE PRIVILEGED ANALYST. 00002 M01S00002.compvpa +++| SPACE 4,10 00003 M01S00003.compvpa +++| IF -DEF,QUAL$,1 00004 M01S00004.compvpa +++| QUAL COMPVPA 00005 M01S00005.compvpa +++| BASE MIXED
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00006 M02S00006.281l803 ---|* COMMENT COPYRIGHT CONTROL DATA CORP. 1984. 00007 M01S00001.281l803 +++|* COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00008 M01S00007.compvpa +++| VPA SPACE 4,10 00009 M01S00008.compvpa +++|*** VPA - VALIDATE PRIVILEGED ANALYST. 00010 M01S00009.compvpa +++|* S. C. CHAMPION. 84/04/11. 00011 M01S00010.compvpa +++|* P. C. SMITH. 87/11/16. 00012 M01S00011.compvpa +++| VPA SPACE 4,10 00013 M01S00012.compvpa +++|*** *VPA* VALIDATES USER ACCESS TO PRIVILEGED ANALYST OPERATIONS. 00014 M01S00013.compvpa +++|* 00015 M01S00014.compvpa +++|* EXIT (A) = 0, IF PRIVILGED ANALYST OPERATIONS ALLOWED. 00016 M01S00015.compvpa +++|* (A) .NE. 0, IF USER DOES NOT HAVE *CPAM* VALIDATION, 00017 M01S00016.compvpa +++|* OR IF PRIVILEGED ANALYST MODE IS DISABLED. 00018 M01S00017.compvpa +++|* 00019 M01S00018.compvpa +++|* USES CM - CM+4. 00020 M01S00019.compvpa +++|* 00021 M01S00020.compvpa +++|* MACROS NFA. 00022 M01S00021.compvpa +++| 00023 M01S00022.compvpa +++| 00024 M01S00023.compvpa +++| VPA3 LDN 1 DENY PRIVILEGED ANALYST OPERATIONS 00025 M01S00024.compvpa +++| 00026 M01S00025.compvpa +++| VPA SUBR ENTRY/EXIT 00027 M01S00026.compvpa +++| LDD CP 00028 M01S00027.compvpa +++| ADK SEPW 00029 M01S00028.compvpa +++| CRD CM 00030 M01S00029.compvpa +++| LDD CM 00031 M01S00030.compvpa +++| SHN 21-2 00032 M01S00031.compvpa +++| PJN VPA1 IF CALLER NOT *SSJ=* 00033 M01S00032.compvpa +++| LDD CM+3 00034 M01S00033.compvpa +++| LPN 37 00035 M01S00034.compvpa +++| ADD CM+4 00036 M01S00035.compvpa +++| ZJN VPA1 IF NO *SSJ=* PARAMETER BLOCK PRESENT 00037 M01S00036.compvpa +++| NFA SSJN+AACS READ *AACW* FROM *SSJ=* PARAMETER BLOCK 00038 M01S00037.compvpa +++| UJN VPA2 CHECK FOR *CPAM* VALIDATION BIT 00039 M01S00038.compvpa +++| 00040 M01S00039.compvpa +++| VPA1 LDD CP READ *AACW* FROM CONTROL POINT AREA 00041 M01S00040.compvpa +++| ADK AACW 00042 M01S00041.compvpa +++| VPA2 CRD CM 00043 M01S00042.compvpa +++| LDD CM+2 00044 M01S00043.compvpa +++| SHN 21-3 00045 M01S00044.compvpa +++| PJN VPA3 IF *CPAM* VALIDATION BIT NOT SET 00046 M01S00045.compvpa +++| LDK SSTL CHECK IF PRIVILEGED ANALYST MODE ENABLED 00047 M01S00046.compvpa +++| CRD CM 00048 M01S00047.compvpa +++| LDD CM+3 00049 M01S00048.compvpa +++| SHN 21-6 00050 M01S00049.compvpa +++| MJP VPA3 IF PRIVILEGED ANALYST MODE DISABLED 00051 M01S00050.compvpa +++| LDN 0 GRANT PERMISSION 00052 M01S00051.compvpa +++| UJP VPAX RETURN 00053 M01S00052.compvpa +++| SPACE 4,10 00054 M01S00053.compvpa +++| BASE * 00055 M01S00054.compvpa +++| QUAL$ IF -DEF,QUAL$ 00056 M01S00055.compvpa +++| QUAL * 00057 M01S00056.compvpa +++| VPA EQU /COMPVPA/VPA 00058 M01S00057.compvpa +++| QUAL$ ENDIF 00059 M01S00058.compvpa +++| ENDX 00060 M01S00014.compvpa +++|COMPVSP 00061 M01S00003.compvpa +++| QUAL$ IF -DEF,QUAL$ 00062 M01S00004.compvpa +++| QUAL COMPVSP 00063 M01S00005.compvpa +++| QUAL$ ENDIF
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Yanked) (Updated by) | @000005 |
Seq # *Modification Id* Act ----------------------------+ 00064 M02S00006.@000005 ---| COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1982. 00065 M01S00001.@000005 +++|* COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992. 00066 M01S00007.compvpa +++| SPACE 4 00067 M01S00008.compvpa +++|*** COMPVSP - VALIDATE SERVICE CLASS PARAMETER. 00068 M01S00009.compvpa +++|* 00069 M01S00010.compvpa +++|* B. M. SLIWINSKI. 82/10/04. 00070 M01S00011.compvpa +++| SPACE 4,10 00071 M01S00012.compvpa +++|*** *COMPVSP* VALIDATES THE SERVICE CLASS PARAMETER ON COMMANDS. 00072 M01S00013.compvpa +++|* 00073 M01S00014.compvpa +++|* IF *VSP$* IS DEFINED, THE TWO CHARACTER SERVICE CLASS 00074 M01S00015.compvpa +++|* PARAMETER IS CHECKED FOR VALIDITY. 00075 M01S00016.compvpa +++|* 00076 M01S00017.compvpa +++|* IF *CUV$* IS DEFINED, *COMPVSP* WILL ALSO CHECK IF THE 00077 M01S00018.compvpa +++|* SERVICE CLASS IS VALID FOR THE USER. THAT IS, IT WILL 00078 M01S00019.compvpa +++|* CHECK IF THE SERVICE CLASS IS DEFINED IN THE VALIDATION 00079 M01S00020.compvpa +++|* MASK OF THE USER AND IN THE *SCT* ENTRY FOR THE CURRENT 00080 M01S00021.compvpa +++|* ORIGIN TYPE OF THE USER. FOR SUBSYSTEMS AND SSJ= JOBS, ONLY 00081 M01S00022.compvpa +++|* THE ORIGIN TYPE *SCT* ENTRY WILL BE CHECKED. 00082 M01S00001.281l803 +++|* ALSO, IF *CUV$* IS DEFINED, THE CALLING PROGRAM MUST DEFINE 00083 M01S00002.281l803 +++|* THE *SCLASS* MACRO WITH A REMOTE BLOCK DEFINITION OF THE 00084 M01S00003.281l803 +++|* FOLLOWING FORMAT. SEE *COMSSCD* FOR MORE INFORMATION. 00085 M01S00004.281l803 +++|* .A IFC NE,$NM$SSSC$ 00086 M01S00005.281l803 +++|* .SCLVSP RMT 00087 M01S00006.281l803 +++|* INDEX NM,MN_MK 00088 M01S00007.281l803 +++|* .SCLVSP RMT 00089 M01S00008.281l803 +++|* .A ENDIF 00090 M01S00023.compvpa +++|* 00091 M01S00024.compvpa +++|* IF *CJL$* IS DEFINED, *COMPVSP* WILL CHECK IF THE NUMBER OF 00092 M01S00025.compvpa +++|* JOBS CURRENTLY IN THAT SERVICE CLASS IS AT THE SERVICE LIMIT. 00093 M01S00026.compvpa +++| SPACE 4,10 00094 M01S00027.compvpa +++|** VSP - VALIDATE SERVICE CLASS PARAMETER. 00095 M01S00028.compvpa +++|* 00096 M01S00029.compvpa +++|* ENTRY (A) = TWO CHARACTER DISPLAY CODE SERVICE CLASS 00097 M01S00030.compvpa +++|* MNEMONIC RIGHT JUSTIFIED (IF *VSP$* DEFINED). 00098 M01S00031.compvpa +++|* (A) = SERVICE CLASS VALUE (IF *VSP$* NOT DEFINED). 00099 M01S00032.compvpa +++|* (OT) = ORIGIN TYPE (IF *CUV$* DEFINED). 00100 M01S00033.compvpa +++|* (T3) .NE. 0 IF SUBSYSTEM OR SSJ= JOB (*CUV$* DEFINED). 00101 M01S00034.compvpa +++|* (CN+2 - CN+4) = SERVICE CLASS VALIDATION MASK. 00102 M01S00035.compvpa +++|* 00103 M01S00036.compvpa +++|* EXIT (A) = 0 IF NO ERROR. 00104 M01S00037.compvpa +++|* = 1 IF UNDEFINED SERVICE CLASS MNEMONIC. 00105 M01S00038.compvpa +++|* = 2 IF SERVICE CLASS NOT VALID FOR USER. 00106 M01S00039.compvpa +++|* = 3 IF SERVICE CLASS AT SERVICE LIMIT. 00107 M01S00040.compvpa +++|* (T2) = SERVICE CLASS VALUE IF NO ERROR. 00108 M01S00001.@000003 +++|* (CN) = JOB COUNT FOR SERVICE CLASS (*CJL$* DEFINED). 00109 M01S00041.compvpa +++|*
| Line S00042 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Yanked) (Updated by) | @000001 |
Seq # *Modification Id* Act ----------------------------+ 00110 M02S00042.@000001 ---|* USES T2, CM - CM+4, CN - CN+4. 00111 M01S00001.@000001 +++|* USES T1, T2, CM - CM+4, CN - CN+4. 00112 M01S00043.compvpa +++|* 00113 M01S00044.compvpa +++|* CALLS RJC. 00114 M01S00045.compvpa +++|* 00115 M01S00046.compvpa +++|* XREF COMPRJC, COMSSCD. 00116 M01S00047.compvpa +++| 00117 M01S00048.compvpa +++| 00118 M01S00049.compvpa +++| VSP SUBR ENTRY/EXIT
| Line S00050 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Yanked) (Updated by) | @000001 |
Seq # *Modification Id* Act ----------------------------+ 00119 M02S00050.@000001 ---| STD T2 SAVE SERVICE CLASS 00120 M01S00051.compvpa +++| VSP$ IF DEF,VSP$ 00121 M01S00002.@000001 +++| STD T1 SAVE SERVICE CLASS 00122 M01S00052.compvpa +++| LDN 1 INITIALIZE TABLE INDEX
| Line S00053 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Yanked) (Updated by) | @000001 |
Seq # *Modification Id* Act ----------------------------+ 00123 M02S00053.@000001 ---| STD T1
| Line S00054 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Yanked) (Updated by) | @000001 |
Seq # *Modification Id* Act ----------------------------+ 00124 M02S00054.@000001 ---| VSP1 LDM TSCP,T1 CHECK FOR VALID SERVICE CLASS 00125 M01S00003.@000001 +++| STD T2 00126 M01S00004.@000001 +++| VSP1 LDM TSCP,T2 CHECK FOR VALID SERVICE CLASS 00127 M01S00055.compvpa +++| ZJN VSP2 IF END OF TABLE
| Line S00056 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Yanked) (Updated by) | @000001 |
Seq # *Modification Id* Act ----------------------------+ 00128 M02S00056.@000001 ---| LMD T2 00129 M01S00005.@000001 +++| LMD T1 00130 M01S00057.compvpa +++| ZJN VSP3 IF MATCH FOUND
| Line S00058 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Yanked) (Updated by) | @000001 |
Seq # *Modification Id* Act ----------------------------+ 00131 M02S00058.@000001 ---| AOD T1 INCREMENT TABLE INDEX 00132 M01S00006.@000001 +++| AOD T2 INCREMENT TABLE ENTRY 00133 M01S00059.compvpa +++| UJN VSP1 CHECK NEXT ENTRY 00134 M01S00060.compvpa +++| 00135 M01S00061.compvpa +++| VSP2 LDN 1 INDICATE SERVICE CLASS NOT DEFINED 00136 M01S00062.compvpa +++| UJN VSPX RETURN 00137 M01S00063.compvpa +++| 00138 M01S00064.compvpa +++| VSP3 BSS 0 CONTINUE VALIDATION 00139 M01S00007.@000001 +++| VSP$ ELSE 00140 M01S00008.@000001 +++| STD T2 SAVE SERVICE CLASS 00141 M01S00065.compvpa +++| VSP$ ENDIF 00142 M01S00066.compvpa +++| 00143 M01S00067.compvpa +++| CUV$ IF DEF,CUV$ 00144 M01S00068.compvpa +++| LDD T2 00145 M01S00069.compvpa +++| SBN MXJC 00146 M01S00070.compvpa +++| MJN CUV1 IF VALID SERVICE CLASS 00147 M01S00071.compvpa +++| LDN 1 INDICATE SERVICE CLASS NOT DEFINED 00148 M01S00072.compvpa +++| UJP VSPX RETURN 00149 M01S00073.compvpa +++|
| Line S00074 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00150 M02S00074.281l803 ---| ERRPL MXJC-30 VALIDATION MASK LARGER THAN 24 BITS 00151 M01S00075.compvpa +++| CUV1 LDN 4 DETERMINE BYTE INDEX 00152 M01S00076.compvpa +++| STD T4 00153 M01S00077.compvpa +++| LDD T2 00154 M01S00078.compvpa +++| SBN 12D 00155 M01S00079.compvpa +++| MJN CUV2 IF NOT CORRECT BYTE 00156 M01S00080.compvpa +++| SOD T4 SET BYTE INDEX
| Line S00081 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Yanked) (Updated by) | @000004 |
Seq # *Modification Id* Act ----------------------------+ 00157 M02S00081.@000004 ---| CUV2 LDN JBCP GET JOB CONTROL AREA POINTER 00158 M01S00001.@000004 +++| CUV2 LDK JBCP GET JOB CONTROL AREA POINTER 00159 M01S00082.compvpa +++| CRD CM 00160 M01S00083.compvpa +++| LDD CM GET *SCT* ENTRY FOR ORIGIN TYPE 00161 M01S00084.compvpa +++| SHN 14 00162 M01S00085.compvpa +++| ADD CM+1 00163 M01S00086.compvpa +++| ADD OT 00164 M01S00087.compvpa +++| CRD CM 00165 M01S00088.compvpa +++| LDM TSCM,T2 GET SERVICE CLASS MASK BIT 00166 M01S00089.compvpa +++| ZJN CUV3 IF INVALID SERVICE CLASS 00167 M01S00090.compvpa +++| STM CUVA 00168 M01S00091.compvpa +++| STM CUVB 00169 M01S00092.compvpa +++| LDM CM,T4 CHECK *SCT* ENTRY 00170 M01S00093.compvpa +++| LPC * 00171 M01S00094.compvpa +++| CUVA EQU *-1 (MASK BIT) 00172 M01S00095.compvpa +++| ZJN CUV3 IF NOT VALID 00173 M01S00096.compvpa +++| LDD CP GET ORIGIN TYPE OF CALLER 00174 M01S00097.compvpa +++| ADK JOTW 00175 M01S00098.compvpa +++| CRD CM 00176 M01S00099.compvpa +++| LDD CM+3 00177 M01S00100.compvpa +++| LPN 17 00178 M01S00101.compvpa +++| LMK SYOT 00179 M01S00102.compvpa +++| NJN CUV2.1 IF NOT SYSTEM ORIGIN JOB 00180 M01S00103.compvpa +++| LDD T3 00181 M01S00104.compvpa +++| NJN CUV4 IF SUBSYSTEM OR SSJ= JOB 00182 M01S00105.compvpa +++| REL$ IF DEF,REL$ 00183 M01S00106.compvpa +++| CUV2.1 LDM. CN,T4 CHECK VALIDATION MASK 00184 M01S00107.compvpa +++| REL$ ELSE 00185 M01S00108.compvpa +++| CUV2.1 LDM CN,T4 CHECK VALIDATION MASK 00186 M01S00109.compvpa +++| REL$ ENDIF 00187 M01S00110.compvpa +++| LPC * 00188 M01S00111.compvpa +++| CUVB EQU *-1 (MASK BIT) 00189 M01S00112.compvpa +++| NJN CUV4 IF VALID SERVICE CLASS 00190 M01S00113.compvpa +++| CUV3 ADN 2 INDICATE SERVICE CLASS NOT VALID FOR USER 00191 M01S00114.compvpa +++| UJP VSPX RETURN 00192 M01S00115.compvpa +++| 00193 M01S00116.compvpa +++| CUV4 BSS 0 CONTINUE VALIDATION 00194 M01S00117.compvpa +++| CUV$ ENDIF 00195 M01S00118.compvpa +++| 00196 M01S00119.compvpa +++| CJL$ IF DEF,CJL$ 00197 M01S00120.compvpa +++| LDD T2 00198 M01S00121.compvpa +++| RJM RJC READ JOB CONTROL WORD 00199 M01S00122.compvpa +++| ZJN CJL1 IF NO SERVICE CLASS DEFINED 00200 M01S00123.compvpa +++| ADN SVJT GET SERVICE LIMIT 00201 M01S00124.compvpa +++| CRD CM 00202 M01S00125.compvpa +++| ADN JCTT-SVJT 00203 M01S00126.compvpa +++| CRD CN 00204 M01S00127.compvpa +++| LDD CN 00205 M01S00128.compvpa +++| SBD CM+3 00206 M01S00129.compvpa +++| MJN CJL2 IF BELOW LIMIT 00207 M01S00130.compvpa +++| LDN 2 INDICATE SERVICE CLASS FULL 00208 M01S00131.compvpa +++| CJL1 ADN 1 00209 M01S00132.compvpa +++| UJP VSPX RETURN 00210 M01S00133.compvpa +++| 00211 M01S00134.compvpa +++| CJL2 BSS 0 INDICATE NO ERROR 00212 M01S00135.compvpa +++| CJL$ ENDIF 00213 M01S00136.compvpa +++| 00214 M01S00137.compvpa +++| LDN 0 INDICATE NO ERROR 00215 M01S00138.compvpa +++| UJP VSPX RETURN 00216 M01S00139.compvpa +++| 00217 M01S00140.compvpa +++| CUV$ IF DEF,CUV$ 00218 M01S00141.compvpa +++| TSCM SPACE 4,10 00219 M01S00142.compvpa +++|** TSCM - TABLE OF SERVICE CLASS MASK BIT DEFINITIONS. 00220 M01S00143.compvpa +++|* 00221 M01S00144.compvpa +++|* THIS TABLE IS INDEXED BY SERVICE CLASS. 00222 M01S00145.compvpa +++| 00223 M01S00146.compvpa +++| 00224 M01S00147.compvpa +++| TSCM INDEX
| Line S00148 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00225 M02S00148.281l803 ---| INDEX SYSC,STMK SYSTEM
| Line S00149 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00226 M02S00149.281l803 ---| INDEX BCSC,BCMK BATCH
| Line S00150 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00227 M02S00150.281l803 ---| INDEX RBSC,RBMK REMOTE BATCH
| Line S00151 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00228 M02S00151.281l803 ---| INDEX TSSC,TSMK TIMESHARING
| Line S00152 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00229 M02S00152.281l803 ---| INDEX DISC,DIMK DETACHED INTERACTIVE
| Line S00153 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00230 M02S00153.281l803 ---| INDEX NSSC,NSMK NETWORK SUPERVISOR
| Line S00154 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00231 M02S00154.281l803 ---| INDEX MASC,MAMK MAINTENANCE
| Line S00155 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00232 M02S00155.281l803 ---| INDEX CTSC,CTMK COMMUNICATION TASK
| Line S00156 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00233 M02S00156.281l803 ---| INDEX I0SC,I0MK INSTALLATION CLASS 0
| Line S00157 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00234 M02S00157.281l803 ---| INDEX I1SC,I1MK INSTALLATION CLASS 1
| Line S00158 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00235 M02S00158.281l803 ---| INDEX I2SC,I2MK INSTALLATION CLASS 2
| Line S00159 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00236 M02S00159.281l803 ---| INDEX I3SC,I3MK INSTALLATION CLASS 3 00237 M01S00009.281l803 +++| LIST D 00238 M01S00010.281l803 +++| .SCLVSP HERE 00239 M01S00160.compvpa +++| INDEX MXSC 00240 M01S00001.@000002 +++| LIST * 00241 M01S00161.compvpa +++| CUV$ ENDIF 00242 M01S00162.compvpa +++| VSP$ IF DEF,VSP$ 00243 M01S00163.compvpa +++| TSCP SPACE 4,10 00244 M01S00164.compvpa +++|** TSCP - TABLE OF SERVICE CLASS PARAMETERS. 00245 M01S00165.compvpa +++| 00246 M01S00166.compvpa +++| 00247 M01S00167.compvpa +++| TSCP BSS 0
| Line S00168 Modification History | |
|---|---|
M01 (Added by) | compvpa |
M02 (Yanked) (Updated by) | @000001 |
Seq # *Modification Id* Act ----------------------------+ 00248 M02S00168.@000001 ---| DATA H+NMSC+ 00249 M01S00009.@000001 +++| DATA H+"NMSC"+ 00250 M01S00169.compvpa +++| CON 0 END OF TABLE 00251 M01S00170.compvpa +++| VSP$ ENDIF 00252 M01S00171.compvpa +++| SPACE 4 00253 M01S00172.compvpa +++| QUAL$ IF -DEF,QUAL$ 00254 M01S00173.compvpa +++| QUAL * 00255 M01S00174.compvpa +++| VSP EQU /COMPVSP/VSP 00256 M01S00175.compvpa +++| QUAL$ ENDIF 00257 M01S00176.compvpa +++| ENDX
cdc/nos2.source/opl.opl871/common/compvpa.txt · Last modified: by 127.0.0.1