After running the jcl for copying the source code from CA Panvelt library to user pds, we are getting RC 8.
Code:
//TEST1 JOB GP1ELT,'TEST',
// NOTIFY=&SYSUID,MSGCLASS=Y,CLASS=T,
// REGION=0K,MSGLEVEL=(1,1)
//STEPNAME EXEC PGM=PANÄ1 <--- PAN#1 Utility
//STEPLIB DD DSN=SYSKF.PANLOAD,DISP=SHR <--- System Library containing PAN#1 Utility
//PANDD1 DD DSN=AVRT.PAN.KLIB,DISP=SHR <--- CA Panavelt Library containting source code
//* PDS MUST BE ALLOCATED BEFORE THIS JOB IS SUBMITTED.
//PDSOUT DD DSN=TEST.PDS1,DISP=SHR <--- Test Library to which source code needs to be copied
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
++OPTION OUTPUT,PDSOUT,MEMBERNAMETOBECOPIED
++WRITE WORK,MEMBERNAMETOBECOPIED
/*
According to the manual,
Reason: All volumes of a multi-volume library are not in original creation sequence or are not at the same level of operation. If the condition is discovered at the beginning of a CA-Panvalet execution, the program is terminated. If the condition is discovered at the end of a CA-Panvalet execution, the results of the program are unpredictable. This message also appears under these circumstances:
• When the CA-Panvalet library release number being used is higher than the CA-Panvalet program's release number.The CA-Panvalet program can only be of a higher or equal release number than that of the library.
• When you specify DEFER as a subparameter of the UNIT parameter and the volume containing the CA-Panvalet library is not mounted. CA-Panvalet attempts to perform validity checking on the library prior to opening it for processing. If the volume is not available at this time, the error condition occurs.
• If PANDD1 is allocated to an invalid file (PDS, ISAM, DUMMY, and so on) or if the DISP is NEW for other than PAN#4.
.jpg)
