How to check whether dataset exists or not

ibmmainframesyntel · Posted: Thu Mar 08, 2007 8:34 pm

In the PROC

//MYPROC PROC MIDAS=,NUD=
//*
//SCHECK1 EXEC PGM=IEFBR14,PARM='NUMGL.&MIDAS..&NUD..MAININD'
//*

using IEFBR14,what u are doing?

After this if the dataset is not found what it will be?

weather it will be JCLERROR or RC=08

let me knw

thank you

dick scherrer · Posted: Thu Mar 08, 2007 9:26 pm

Hello,

IEFBR14 is just an example in this case to demonstrate the symbolic parameter substitution. Instead of IEFBR14 you would use your own program (TTT to continue the example above).

From the dataset name constructed from the constants and the variables, create the LISTCAT control statement shown above.

When you execute the IDCAMS step, you will get a return code not a JCL error.

ibmmainframesyntel · Posted: Fri Mar 09, 2007 10:12 am

Ok..

hw to mention the the listcat entries...

LISTCAT ENTRIES('resolved entry name passed from PARM')

I don't knw...

pls tell me....

the output of the program will have the expanded dataset name
by substituting the symbolic parameters..

that i got itt.

but hw i mention the output in LISTCAT(' ')

let me knw...

dick scherrer · Posted: Fri Mar 09, 2007 10:26 am

Hello,

In your program that recieves the parm info, define an output file with a length of 80. In the jcl for running the program inclulde a DD statement for this file and it will have DISP=(,CATLG,DELETE). Place this output file on dasd and use it as input to a following IDCAMS step.

In your working-storage create an 01 LISTCAT-CTL that has fillers set up with the constant LISTCAT control info. In that same 01, declare a field where you will move the complete dsn.

Once you have the control statement in working-storage, write the 80-byte output record from that LISTCAT control statement.

Good luck and let us know if you would like anyh other info.