MVSFORUMS.com

sneha_mf · Beginner Joined: 24 Oct 2005 Posts: 4 Topics: 4

Can anyone explain me how to execute one step 100 times in one JOB without writing 100 times in same Job.

vkphani · Intermediate Joined: 05 Sep 2003 Posts: 483 Topics: 48

Please search before postimg:

http://mvsforums.com/helpboards/viewtopic.php?t=4293&highlight=execute+number

bablack · Posted: Tue Oct 25, 2005 1:56 pm Post subject:

I suggest making it an instream-proc, to simplify execution:

//MYPROC PROC
//STEP1 EXEC PGM=MYPGM
//SYSPRINT DD SYSOUT=*
.. OTHER DD STATEMENTS ..
// PEND
//MYPGM001 EXEC MYPROC
//MYPGM002 EXEC MYPROC
//MYPGM003 EXEC MYPROC
.. REPEAT 97 MORE TIMES ..

At least it is only 1 line per repetition.
_________________
Bruce A. Black
Senior Software Developer
Innovation Data Processing