Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Rexx Stored Procedure

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

New User


Joined: 08 Aug 2008
Posts: 17
Location: Boulder Colorado

PostPosted: Wed Sep 24, 2008 11:06 pm    Post subject: Rexx Stored Procedure
Reply with quote

I have a Cobol/DB2 program that is calling a Rexx Stored Procedure. Within the Rexx I am trying to execute a SUBMIT command but receive error IKJ79204I - You attempted to run an unsupported function in a dynamic TSO environment. Has anybody encountered this before?
Back to top
View user's profile Send private message

superk

Moderator Team Head


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

PostPosted: Wed Sep 24, 2008 11:13 pm    Post subject: Reply to: Rexx Stored Procedure
Reply with quote

SUBMIT is a TSO/E command. Is this exec running in a TSO/E Address Space (PGM=IKJEFT01)?
Back to top
View user's profile Send private message
David Joyce

New User


Joined: 08 Aug 2008
Posts: 17
Location: Boulder Colorado

PostPosted: Thu Sep 25, 2008 12:01 am    Post subject: Reply to: Rexx Stored Procedure
Reply with quote

Kevin,
JCL is not being used to submit this process. I have a clist, which executes a DB2/Cobol program, which calls a Rexx Stored Procedure, whcih executes the Rexx where I am attempting the SUBMIT command. Is there a way to establish a TSO/E environment in the Rexx prior to executing the SUBMIT command? Thanks.
Back to top
View user's profile Send private message
David Joyce

New User


Joined: 08 Aug 2008
Posts: 17
Location: Boulder Colorado

PostPosted: Thu Sep 25, 2008 12:38 am    Post subject: Reply to: Rexx Stored Procedure
Reply with quote

Kevin,
If I execute the Rexx using TSO EX 'pds.name(rexxname)' the SUBMIT command executes. What is the difference in the environment setup between how I am currently calling the Rexx and the TSO EX execution?
Back to top
View user's profile Send private message
David Joyce

New User


Joined: 08 Aug 2008
Posts: 17
Location: Boulder Colorado

PostPosted: Thu Sep 25, 2008 2:37 am    Post subject: Reply to: Rexx Stored Procedure
Reply with quote

RESOLUTION
add a DD to the WLM started task:
//SBMITJCL DD SYSOUT=(,INTRDR)

in the rexx write the jcl to this DD but make sure you have /*EOF as the last card of the JCL. This causes the internal reader to be flushed immediately and the job to be submitted.
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Thu Sep 25, 2008 10:37 am    Post subject:
Reply with quote

David,

Indeed, writing JCL directly to internal reader would be my first choice when I want to submit a job outside of TSO.

Alternatively, one can establish a TSO environment programmatically using IKJTSOEV service.

O.
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
No new posts REXX cdoe to purge a JOB from spool a... Sulabh Agrawal CLIST & REXX 11 Thu Mar 09, 2017 11:36 am
No new posts Overriding PS data in rexx Shaheen Shaik CLIST & REXX 8 Fri Mar 03, 2017 5:08 pm
No new posts Query on DB2 WLM stored procedures ashek15 DB2 8 Sun Feb 12, 2017 11:13 pm
No new posts REXX compiled via RXTCOMP sergeyken CLIST & REXX 7 Tue Feb 07, 2017 9:41 pm
No new posts Calling procedure with multiple entri... steve-myers PL/I & Assembler 5 Fri Jan 27, 2017 3:33 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us