Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
How to submit a JCL thru REXX

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
yogeshbabu

New User


Joined: 30 Nov 2005
Posts: 19
Location: India

PostPosted: Wed Mar 22, 2006 9:30 am    Post subject: How to submit a JCL thru REXX
Reply with quote

Hi all,

I need to submit a JCL thru REXX by overiding the file name every time. My requirement is like, I need to perform a string search in a PS and direct the search results to a PS. For that I want to create a JCL and invoke ISRSUPC utility (search) and override the PS filenames every time.
Can anyone help me in doing this ? Is there any other way of achieving the above requirement?

Thanks & Regards,
Yogesh
Back to top
View user's profile Send private message

KMK

New User


Joined: 29 Jul 2005
Posts: 18

PostPosted: Wed Mar 22, 2006 12:46 pm    Post subject:
Reply with quote

To submit JCL through REXX you can use the TSO command in REXX

ADDRESS TSO
"SUBMIT '<Dsn name>'"

This will submit the jcl present in the dsn.
Back to top
View user's profile Send private message
bonniem

New User


Joined: 09 Aug 2005
Posts: 67

PostPosted: Wed Mar 22, 2006 1:44 pm    Post subject:
Reply with quote

Create a rexx to create your search JCL taking the input and output dsns and search string as input. write the JCL into a PS of lrecl 80 and submit using tso sub '<PS name>'
Back to top
View user's profile Send private message
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4650
Location: Raleigh, NC, USA

PostPosted: Wed Mar 22, 2006 5:06 pm    Post subject: Re: How to submit a JCL thru REXX
Reply with quote

QUEUE the JCL records into the data stack. After the last record, QUEUE a terminator of "$$". Then, issue the TSO command "SUBMIT * END($$)":

Code:

QUEUE "//MYJOB JOB (...),CLASS=X,MSGCLASS=X"
QUEUE "//STEP1 EXEC PGM=ISRSUPC,..."
...
QUEUE "//*"
QUEUE "$$"
o = OUTTRAP("output.",,"CONCAT")       
"SUBMIT * END($$)"
o = OUTTRAP(OFF)                       
Back to top
View user's profile Send private message
yogeshbabu

New User


Joined: 30 Nov 2005
Posts: 19
Location: India

PostPosted: Wed Mar 22, 2006 8:06 pm    Post subject: Re: How to submit a JCL thru REXX
Reply with quote

Hi,

Thanks for you inputs. I am new to rexx. can you explain me the OUTTRAP in detail
o = OUTTRAP("output.",,"CONCAT")
o = OUTTRAP(OFF)


Thanks & Regards,
Yogesh
Back to top
View user's profile Send private message
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4650
Location: Raleigh, NC, USA

PostPosted: Thu Mar 23, 2006 1:47 am    Post subject: Re: How to submit a JCL thru REXX
Reply with quote

OUTTRAP is a TSO/E external function that traps output from commands.

See here for more details.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. GDG gen check using REXX raghuraman123 CLIST & REXX 6 Wed Apr 18, 2018 9:18 pm
No new posts How to control Panel Attributes throu... rsshanmugam CLIST & REXX 3 Mon Feb 26, 2018 9:51 pm
No new posts Find a string in PS file opened in br... mukkas CLIST & REXX 3 Sat Feb 24, 2018 2:15 pm
No new posts How to get the output from submit com... Joanna2016 CLIST & REXX 10 Tue Feb 06, 2018 7:26 am
This topic is locked: you cannot edit posts or make replies. how to get Job information from IOF u... rsshanmugam CLIST & REXX 13 Mon Feb 05, 2018 4:22 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us