I am having a requirement to pass the files dynamically and submit a JCL
My JCL residing in 'MYID.TEST.JCL(MYJOB)'
//JOBCARD --------------------> HAVING A JOB CARD
//STEP01 EXEC PGM=SORT
//SORTIN DD DSN=&INPUT1,DISP=SHR
//SORTOUT DD DSN=&OUTPUT1,DISP=(NEW,CATLG,DELETE),
//SYSOUT DD SYSOUT=*
//SYSIN DD *
REXX Used to invoke the above JCL
"LIBDEF ISPLIB DATASET ID('MYID.TEST.JCL')"
"LIBDEF ISPFILE DATASET ID('MYID.TEST.JCL')"
SAY 'PLEASE ENTER THE INPUT:"
PULL INPUT1 --> (INPUT FILE DSN USED IN MY JCL)
SAY 'PLEASE ENTER THE OUTPUT:"
PULL OUTPUT1 --> (OUTPUT FILE DSN USED IN MY JCL)
"FTINCL MYJOB" --> MEMBER NAME
When i am executing the above rexx, My job is submitting fine but the files which i am giving were not getting substituted and i am getting JCL error as 'DATA SET NOT FOUND'
Joined: 03 Oct 2009 Posts: 1790 Location: Bloomington, IL
If you have not re-typed (and thereby loaded with typos) this skeleton and exec, then they had slightly less chance of working than I have of being elected king of the world. To choose only one such error, note the use of different quotes at the beginning and end of your prompts.
Please copy-and-paste, not re-type, your code and enclose it in Code tags for a non-zero chance of receiving meaningful help.