How can a cobol program can run a jcl?

rsm_deepak · Posted: Tue Aug 01, 2006 12:56 pm

I just want to know "To write a cobol pgm that run a jcl"....

ofer71 · Posted: Tue Aug 01, 2006 4:51 pm

1. Use dynamic allocation to allocate a file to INTRDR. Write the JCL lines into this file, and then put the EOJ sign.

2. Allocate a member; Write the JCL lines into this member; Use TSO's SUBMIT to submit that member.

O.

vijayakumar.yellala · New User Joined: 19 Apr 2006 Posts: 63 Location: Chennai

Hello,

can u please elaborate this....

crrindia · Posted: Wed Aug 02, 2006 1:49 pm

Hi Can you please provide us a sample code for this.

Thanks!
Rathna.

syntelraj · New User Joined: 28 Jul 2006 Posts: 10 Location: Pune

You have to simply write the all the JCL staments into SYSOUT or output file in both the cases the output file or SYSOUT will be INTRDR i.'e internal reader.
if you are using the SYSOUT then write the staments using DISPLAY statment or if you are using as a file of 80 character length then use WRITE statement to write the JCL statements into INTRDR.

In RUNJCL code the following statement. ( either ).
//SYSOUT DD SYSOUT=(A,INTRDR) use DISPLAY statement
or
//OUTJOB DD SYSOUT=(A,INTRDR) use WRITE statement.

Hope I have answered your question.