book
Article ID: 102923
calendar_today
Updated On:
Issue/Introduction
We would like to ADD some member from PDS to CA Panvalet library by using the wildcard which name begins with ABC.
For example;
++ADD ABC*,JCL
How to use the wildcards for member name in the CA Panvalet ++ADD processing ?
Resolution
You can't use the wildcard in the ++ADD processing. So, you must specify the member name in the ++ADD statement. Or, you must target all members by the ++USING PAN0 and ++ADD *,type.
The following is the workaround.
Please add all members to a Temporary Panvalet library first and copy the ABCxxxxxxx members by the ++TRANSFER.
//*
//STEP01 EXEC PGM=PAN#4
//STEPLIB DD DSN=PANVLT.R146.SP00.CBA3LINK,DISP=SHR
//SYSPRINT DD SYSOUT=*
//PANDD1 DD DSN=USER.PANVLT.TEMPLIB,
// DISP=(,CATLG,DELETE),VOL=SER=WORK01,
// UNIT=SYSDA,SPACE=(CYL,2),DCB=DSORG=DA
//SYSIN DD *
++CLEAR
/*
//*
//STEP02 EXEC PGM=PAN#1,REGION=4096K
//STEPLIB DD DSN=PANVLT.R146.SP00.CBA3LINK,DISP=SHR
//SYSPRINT DD SYSOUT=*
//PANDD1 DD DSN=USER.PANVLT.TEMPLIB,DISP=SHR
//INBPAM DD DSN=USER.INPUT.PDS,DISP=SHR
//INBSAM DD DSN=USER.INPUT.PDS,DISP=SHR
//SYSIN DD *
++USING PAN0
++ADD *,JCL
/*
//*
//STEP03 EXEC PGM=PAN#2,PARM='OPEN=INP'
//STEPLIB DD DSN=PANVLT.R146.SP00.CBA3LINK,DISP=SHR
//SYSPRINT DD SYSOUT=*
//PANDD1 DD DSN=USER.PANVLT.TEMPLIB,DISP=SHR
//SYSPUNCH DD DSN=USER.TEST.SYSIN,DISP=(,CATLG,DELETE),
// UNIT=SYSDA,SPACE=(TRK,(1,1)),VOL=SER=WORK01,
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//SYSIN DD *
++USING PGP
+-TRANSFER
++PRINT 0-UP,NAME=CBL
/*
//*
//STEP04 EXEC PGM=PAN#2,PARM='OPEN=INP'
//STEPLIB DD DSN=PANVLT.R146.SP00.CBA3LINK,DISP=SHR
//SYSPRINT DD SYSOUT=*
//PANDD1 DD DSN=USER.PANVLT.TEMPLIB,DISP=SHR
//PANDD2 DD DSN=USER.PANVLT.NEWLIB,DISP=SHR
//SYSIN DD *
++OPTION OUTPUT
// DD DSN=USER.TEST.SYSIN,DISP=(OLD,DELETE)
/*
//