Issue:
- R14.6 can't initialize a Panvalet library with DISP=OLD or SHR.
When PAN#4 is executed and the PANLIB exists, the following messages are generated
which are not issued in R14.5.
***** FILE PANDD1 NOT DISP=NEW ***** * ERROR MESSAGE = PV060 *
++CLEAR
***** PANVALET EXECUTION TERMINATED ***** * ERROR MESSAGE = PV069 *
Environment:
- Not dependent on the version of OS.
- Can capture with the Base component of R14.6.
Steps to Reproduce:
1. Create new Panvalet library.
2. Initialize it again using DISP=OLD or SHR.
3. Receive the PV060 and PV069 errors.
//STEP01 EXEC PGM=PAN#4
//STEPLIB DD DSN=Prefix.Panvalet.CBA3LINK,DISP=SHR
//SYSPRINT DD SYSOUT=*
//PANDD1 DD DSN=Prefix.User.PANLIB,DISP=(,CATLG,DELETE),
// UNIT=SYSDA,SPACE=(TRK,5),DCB=DSORG=DA,VOL=SER=volume
//SYSIN DD *
++CLEAR
/*
//*
//STEP02 EXEC PGM=PAN#4
//STEPLIB DD DSN=Prefix.Panvalet.CBA3LINK,DISP=SHR
//SYSPRINT DD SYSOUT=*
//PANDD1 DD DSN=Prefix.User.PANLIB,DISP=OLD or SHR
//SYSIN DD *
++CLEAR
/*
//
Cause:
The r14.6 design was changed in order to prevent corruption of Panvalet library by unintended initialization.
Resolution:
If your site deliberately reinitializes PANLIBs, first apply RO84662, then $2SF003 before executing PAN#4 with DISP=OLD or SHR like R14.5.
Special $2SF003 is created in Prefix.CBA3SAMP(SPECLMVS) when RO84662 is applied, so RO84662 must be applied first.