submit all the member in a PDS as batch JOB

jeevajeeva · New User Joined: 13 May 2006 Posts: 17

hi,

i have a PDS consist more than 100 members i need to submit all the members as batch jobs at one shot.

is there any way to do that?

Sahoo · New User Joined: 08 Jun 2006 Posts: 53

You can write a rexx to sumit all the Jobs.

Get the member list by using
x = outtrap("i.",'*',"concat")
" listds " "'" || word(dsn,1) || "' members "
x = outtrap("off")

Then in a loop sumit the Jobs using
do J = 7 to i.0
JCLConcat = dsn||"("||strip(i.J)||")"
address tso "Submit '"JCLConcat"'"
end

jeevajeeva · New User Joined: 13 May 2006 Posts: 17

hi,

its ok,

but is there any JCL or TSO command to do the same.

if yes then post the JCl

superk · Posted: Sat Jul 01, 2006 5:04 pm

Use TSO PRINTDS to convert the entire PDS into a single sequential dataset. Then, submit that dataset.

jeevajeeva · New User Joined: 13 May 2006 Posts: 17

hi superk,

after submitting the job how can i convert the sequential dataset into PDS.

Hanfur · Active User Joined: 21 Jun 2006 Posts: 104

Jeev,
Put XDC left to the jobname in spool and give space parameters and name to save that as sequential file.

Sahoo's soln too work but you need to give your PDS name (where all of ur job resides ) to DSN as DSN=XXXX.YYYY.JCLDATASET in the above REXX to work..

-Han.