×
INTELLIGENT WORK FORUMS
FOR COMPUTER PROFESSIONALS

Log In

Come Join Us!

Are you a
Computer / IT professional?
Join Tek-Tips Forums!
  • Talk With Other Members
  • Be Notified Of Responses
    To Your Posts
  • Keyword Search
  • One-Click Access To Your
    Favorite Forums
  • Automated Signatures
    On Your Posts
  • Best Of All, It's Free!
  • Students Click Here

*Tek-Tips's functionality depends on members receiving e-mail. By joining you are opting in to receive e-mail.

Posting Guidelines

Promoting, selling, recruiting, coursework and thesis posting is forbidden.

Students Click Here

Jobs

Internal Reader not submitting the copied JCL

Internal Reader not submitting the copied JCL

Internal Reader not submitting the copied JCL

(OP)
Hi,

I have a JCL that will invoke another JCL by using the internal reader. (see below code)

//STEP01    EXEC PGM=IEBGENER                           
//SYSUT1    DD   DSN=JS01.CNTL.LIB2(BJSJSA10),DISP=SHR  
//SYSUT2    DD   SYSOUT=(A,INTRDR)                       
//SYSPRINT  DD   SYSOUT=*                               
//SYSIN     DD   DUMMY           

The problem is that when i try to check for the output files that is generated by JS01.CNTL.LIB2(BJSJSA10) there are no datasets generated. I checked JCL log and i can see that the BJSJSA10 JCL is being copied to the internal reader. However i also saw something in the sysprint.

********************************* TOP OF DATA *************************
DATA SET UTILITY - GENERATE                                            
IEB352I WARNING: ONE OR MORE OF THE OUTPUT DCB PARMS COPIED FROM INPUT
                                                                       
PROCESSING ENDED AT EOD                                                
******************************** BOTTOM OF DATA ***********************

i'm really not sure why the JCL is not producing any ouput dataset when invoked using the internal reader.  

RE: Internal Reader not submitting the copied JCL

The warning message is mearly saying that since the default DCB parameters for SYSOUT=A on SYSUT2 do not match the DCB parameters for the dataset on SYSUT1, and it is a straight copy request, the SYSUT2 DCB parameters are adjusted to be compantible with those in the SYSUT1 dataset.

Without seeing the contents of JS01.CNTL.LIB2(BJSJSA10), it is impossible to help you further.

RE: Internal Reader not submitting the copied JCL

Does JS01.CNTL.LIB2(BJSJSA10) contain a valid JOB card?  If it does you shoulb be able to find that JOB's exec info (JES/SYSMSG, JCL, etc.) on the sysout Q.

Regards, Jack.

"A problem well stated is a problem half solved" -- Charles F. Kettering
 

RE: Internal Reader not submitting the copied JCL

(OP)
Hi All,

I was able to find another solution to submitting a JCL inside another JCL by using a different utility(IKJEFT1A) and not by the internal reader.

//EZM7ATL1 JOB (206500,TEST,,,,0000),'ZIT 7.1,EZM7',           
//            MSGCLASS=T,MSGLEVEL=(1,1),CLASS=G,NOTIFY=EZM7    
/STEP01    EXEC PGM=IKJEFT1A                                  
//SYSTSPRT  DD   SYSOUT=*                                      
//SYSTSIN   DD *                                               
          SUBMIT  'JS01.CNTL.LIB2(BJSJSA10)'                   
/*                                                             
Thanks for the replies though. :)

 

RE: Internal Reader not submitting the copied JCL

You might run a test with the original jcl changing the internal reader DD to sysout B rather than A.

Seem to remember places where the internal reader was "punch" rather than "print". . .  

 

Red Flag This Post

Please let us know here why this post is inappropriate. Reasons such as off-topic, duplicates, flames, illegal, vulgar, or students posting their homework.

Red Flag Submitted

Thank you for helping keep Tek-Tips Forums free from inappropriate posts.
The Tek-Tips staff will check this out and take appropriate action.

Reply To This Thread

Posting in the Tek-Tips forums is a member-only feature.

Click Here to join Tek-Tips and talk with other members! Already a Member? Login

Close Box

Join Tek-Tips® Today!

Join your peers on the Internet's largest technical computer professional community.
It's easy to join and it's free.

Here's Why Members Love Tek-Tips Forums:

Register now while it's still free!

Already a member? Close this window and log in.

Join Us             Close