View previous topic :: View next topic
|
Author |
Message |
Ramsee
New User
Joined: 06 Jan 2011 Posts: 53 Location: Chennai
|
|
|
|
Hi All,
I am new to REXX programming and trying to SUBMIT a JCL via REXX pgm.
The JCL needs to get the input dynamically from the REXX pgm, so i have used SKELETON TAILORING approach to execute the JCL.
The steps i followed,
1.Got the Inputs from the USER. (No issues in getting the inputs)
2.Validated the inputs(No issues in validation the inputs)
3.Calling the JCL(here Issue is happening)
a. Here i have created a PDS for the SKELETON JCL and created the member and used '&' as a Qualifier to extract input from REXX pgm.
b. I have included the SKELETION LIBRARY in my program as well
Please find the below snipet.
Quote: |
ADDRESS ISPEXEC
"LIBDEF ISPSLIB DATASET ID('TEST.SKELE')"
"FTOPEN TEMP"
SKUSR=USERID() /*this is used a &SKUSER in SKELETION JCL*/
"FTINCL JCL" /* this is the name of the member in TEST.SKELE PDS */
"FTCLOSE"
"VGET ZTEMPF"
"SUBMIT '"ZTEMPF"'" |
Once i try to execute the REXX Pgm i am directly comming out of the SESSOIN means i am getting
" Invalid SERVICE NAME"
the Severe error listing is
Application : ISR
Function : COMMAND EX
SERVICE : SUBMIT
ERROR MESSAGE ID ISPS102
I am not able to find the error, please suggest me what is the mistake i have done here and thanks in advance for the time. |
|
Back to top |
|
|
Akatsukami
Global Moderator
Joined: 03 Oct 2009 Posts: 1788 Location: Bloomington, IL
|
|
|
|
Your mistake is in executing ADDRESS ISPEXEC on a line by itself. This causes all future strings to be sent to ISPF. SUBMIT is not an ISPF service, so sending that string to ISPF causes the error. Execute ADDRESS TSO prior to the SUBMIT. |
|
Back to top |
|
|
Ramsee
New User
Joined: 06 Jan 2011 Posts: 53 Location: Chennai
|
|
|
|
Thanks a Ton Mr.Akatsukami. My job job ran successfully. |
|
Back to top |
|
|
|