MVSFORUMS.com

THRIVIKRAM · Beginner Joined: 03 Oct 2005 Posts: 70 Topics: 34

Hello,

I have about 80 jobs in which a particular step does the same task(TASK-1) (with differnent Input parameters passed as a JCLPARM) in every job.Since this step is failing frequently,the jobs are going into Error Q which is to be overcomed.

I thought of an Idea such that each job(JOB-1) triggers another job(JOB-2). Content of JOB-2 is to do the TASK-1. so even if JOB-2 abends JOB-1 will not go to Error Q.(The JOB-2 can be solved later)

I am thinking to use the concept of INTERNAL READER for this.
//INITRD EXEC PGM=COPYANY,
//INFILE DD DSN=PDS name(Member name),DISP=SHR
//OUTFILE DD SYSOUT=A,INTRDR),DCB=RECFM=F,LRECL=80)

Inside the member,I wrote JCL-2 to do TASK-1.

But now the problem is, I have to write 80 members inside the PDS name for all the 80 JCL-1's.

Is there any way to pass parameters to the Member name so that a single JCL-2 will be called by all JCL-1's by passing the required PARMS.

Thanks,
Thrivikram.

THRIVIKRAM · Beginner Joined: 03 Oct 2005 Posts: 70 Topics: 34

Hello,

If not INTERNAL READER,is there any other way such that the triggered job will not effect the Return Code of the triggering job and the triggering job can send data to the triggered job.

Thanks,
Thrivikram.

Bill Dennis · Posted: Tue Jul 18, 2006 7:47 am Post subject:

I would suggest a CLIST or REXX step that could accept your parameter and modify the skeleton and then do a SUBMIT. Search the ISPF forum for SUBMIT JCL MODIFY and look at what others have done.
Click here http://www.mvsforums.com/helpboards/viewtopic.php?t=5805&highlight=submit+modify+jcl for a sample.
_________________
Regards,
Bill Dennis

Disclaimer: My comments on this foorum are my own and do not represent the opinions or suggestions of any other person or business entity.

THRIVIKRAM · Beginner Joined: 03 Oct 2005 Posts: 70 Topics: 34

Bill Dennis,

Thanks for the response.

CLIST or REXX is not allowed in my project.
Regarding the Link given,I tried understanding the code,but I could not.

Thnaks,
Thrivikram.

German Castillo · Posted: Wed Jul 26, 2006 3:45 am Post subject:

Hello

Maybe using JCl // IF .. ELSE .. ENDIF Logic would help you in the above cases?
_________________
Best wishes,

German Castillo

Steve Coalbran · Posted: Mon Aug 14, 2006 10:10 am Post subject:

ofer71 · Posted: Mon Aug 14, 2006 1:56 pm Post subject:

You can use ISPF skeletons from within COBOL/Assembler.

o.
________
buy herbalaire

coolman · Posted: Mon Aug 14, 2006 3:26 pm Post subject:

Do you have a scheduler that you use for submitting jobs? If you have one, I'm sure that you would have the option of turning off the error tracking for a particular step. In this case, if it works good otherwise, it wouldn't get into the Queue and your can probably run SDSF in batch, or SAR in batch to parse the job outputs to see which of those steps didn't work
________
Harley-Davidson FLHRCI