View previous topic :: View next topic
|
Author |
Message |
anju82
New User
Joined: 20 May 2006 Posts: 2
|
|
|
|
How to submitt the multiple jobs with different job ids through the internal reader?
My approach is to write a cobol program in which we need to generate the the JOB's which needs to be submitted and write all these jobs onto the output dataset and point it to the SYSOUT = (*,INTRDR).
So that all these jobs will be processed.And the output dataset contains the Different jobs with different JOB ID's.can we be able to submitt multiple jobs and Can anyone let me know is this the proper approach? |
|
Back to top |
|
|
mmwife
Super Moderator
Joined: 30 May 2003 Posts: 1592
|
|
|
|
I've never had need to sumit multiple jobs, but I don't see why you couldn't string the JCL, one behind the other. That's how they're submitted outside of INTRDR.
Why don't you use IEBGENR or SORT to submit a few jobs (IEFBR14s) to test the concept? |
|
Back to top |
|
|
anju82
New User
Joined: 20 May 2006 Posts: 2
|
|
|
|
Hi Jack,
Thanks for ur reply canyou pls send me a sample JCL.
Regards,
Anju. |
|
Back to top |
|
|
mmwife
Super Moderator
Joined: 30 May 2003 Posts: 1592
|
|
|
|
Hi Anju,
Here's the SORT JCL:
Code: |
//srtjob job ....
//srtstp exec pgm=sort
//sysout dd sysout=*
//sysprint dd sysout=*
//SYSIN DD *
SORT FIELDS=COPY
//sortout dd sysout=(,intrdr)
//sortin dd data,dlm='~~' (Anju - you can use any char not found in I/P)
//tstjob1 job ....
//tststp1 exec pgm=iefbr14
//tstjob2 job ....
//tststp2 exec pgm=iefbr14
~~
|
Naturally, everthing s/b in upper case. If you use notify= in all the JCLs you should get msgs for all 3 jobs - the gener job and the 2 iefbr14 jobs. You should also see them in the JES Q.
Let me know how you make out. |
|
Back to top |
|
|
hanumanth
New User
Joined: 25 May 2006 Posts: 6 Location: pune
|
|
|
|
HI,
Please find the sample piece of code u can write end of the every JCL.
//STEP999 EXEC PGM=IEBGENER,
// COND=(1,LT)
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DSN=TEST.ADW.NASCO.D9364.JCL(FLCE96N1),DISP=SHR
//SYSUT2 DD SYSOUT=(,INTRDR)
//SYSIN DD DUMMY
Regards
Hanumanth
IBM Global service India Ltd. |
|
Back to top |
|
|
|