How to use the wildcards for member name in the CA Panvalet ++ADD processing ?
search cancel

How to use the wildcards for member name in the CA Panvalet ++ADD processing ?

book

Article ID: 102923

calendar_today

Updated On:

Products

Panvalet

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 ?

Environment

z/OS

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)
/*
//