View previous topic :: View next topic
|
Author |
Message |
ibmmainframesyntel
Active User
Joined: 26 Feb 2007 Posts: 126 Location: Chennai
|
|
|
|
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 |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
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. |
|
Back to top |
|
|
ibmmainframesyntel
Active User
Joined: 26 Feb 2007 Posts: 126 Location: Chennai
|
|
|
|
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... |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
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. |
|
Back to top |
|
|
|