How to check whether a particular member is present in a PDS

chanti · New User Joined: 22 Nov 2008 Posts: 30 Location: hyderabad

How to check whether a particular member is present in a PDS using any utility or any way can we do it in a JCL

I know it can be done in REXX but searching for a way in a JCL as i have a requirement as shown below

COPY01 EXEC PGM=IEBGENER
SYSPRINT DD SYSOUT=*
SYSOUT DD SYSOUT=*
SYSIN DD DUMMY
SYSUT1 DD DSN=XXX.YYY(M1),DISP=SHR
DD DSN=XXX.YYY(M2),DISP=SHR
SYSUT2 DD DSN=XXX.ZZZZ(YYYY),DISP=SHR

the problem is M2 isn't being Created in the above Step, hence this step(copy01) is failing and the sysut2 isn't created

Looking for help on this

Thanks,
Chanti.

dbzTHEdinosauer · Posted: Fri May 18, 2012 4:53 pm

M2 does not exist in pds XXX.YYY?

then why have you included it in SYSUT1?

Pandora-Box · Posted: Fri May 18, 2012 5:11 pm

Already discussed
Please check here

dbzTHEdinosauer · Posted: Fri May 18, 2012 5:16 pm

normally, one insures that dataset names provided on (input) dd statements
are of datasets that exist.

the utility used to determine if a dataset exists,
should have been the utility to generate the jcl for your iebgener step.

why don't you explain why you have a dd statement for a non-existing file?

and the thread referenced by Pandora's Box
is just that.

using IEHLIST and parsing with sort could provide the answers,

but than again,
why a dsn that does not exist?

Pandora-Box · Posted: Fri May 18, 2012 5:21 pm

Or there could be some Psychic guy who is deleting your member purposely???

dick scherrer · Posted: Fri May 18, 2012 6:57 pm

Hello,

If you explain what you are tryijng to accomplish (rather than how you have already tried to implement), someone may have a suggestion.

chanti · New User Joined: 22 Nov 2008 Posts: 30 Location: hyderabad

Actually M2 is created in the above step, if the program doesn't do well M2 isn't being created

As i cant control the program to create M2, i need to handle below in the JCL

I want the IEBGENER step to be run regardless whether M2 is created or not

Thanks,
Chanti.

Pandora-Box · Posted: Fri May 18, 2012 7:59 pm

Nic Clouston · Posted: Fri May 18, 2012 7:59 pm

Run your copy to copy M! only. Next step do something to check if M2 exists (rexx and set return code?). 3rd step do,or not do depending on condition codes, second copy. Or check first and then either do your IEBGENER as posted or a different gener step to copy only M1.

dick scherrer · Posted: Fri May 18, 2012 8:00 pm

Hello,

Then you need a different approach.

One alternative might be to have an "empty" M2 member and this is overwritten with data when appropriate. The M2 member would be emptied just before it might be created (depending on how the run processes).

This way the member would always exist and there would be no jcl error. . .

chanti · New User Joined: 22 Nov 2008 Posts: 30 Location: hyderabad

Creation of M2 isn't under our control...

Thanks all for your valuable suggestions..

For me, Dick Scherrer idea of creating an empty member would be good..

i'm still looking for better solution, if found will keep you posted

Thanks,
Chanti

dbzTHEdinosauer · Posted: Fri May 18, 2012 8:21 pm

how about telling us what you need to do, (description of requirements/resources/etc...)
not how you have decided to do it.

Pandora-Box · Posted: Fri May 18, 2012 8:22 pm

Dick you stole words from my fingers :-D

I could see your typing speed indeed :-P

dick scherrer · Posted: Fri May 18, 2012 8:24 pm

chanti · New User Joined: 22 Nov 2008 Posts: 30 Location: hyderabad

as i already quoted

"I want the IEBGENER step to be run regardless whether M2 is created or not"

Thanks,
Chanti

dbzTHEdinosauer · Posted: Fri May 18, 2012 8:52 pm

the only way to determine if M2 exists or not is to access the PDS Directory.

to do so,
run some utility program (IEHLIST) to print the directory,
followed by something (SORT) to parse the listing and generate an appropriate rc

or

run a rexx step to generate the RC

you can not mod to the member to create it if it is not there with the DISP parms
as you can with a QSAM file.

the decision of which method to used is based on
whether or not
you want an 'empty' M2?

once you have answered that question (empty M2)
you can follow Nic's advice here

Marso · Posted: Sat May 19, 2012 3:27 am