Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
How to call a cobol program from REXX

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
Author Message
blackzero

New User


Joined: 20 Mar 2008
Posts: 6
Location: INDIA

PostPosted: Tue Jul 08, 2008 10:04 pm    Post subject: How to call a cobol program from REXX
Reply with quote

Hi,

I need to call a cobol program from a rexx program. I tried the option ADDRESS LINKPGM 'PGM-NAME' but its not working. When i try to the rexx it errors

1. REXX code is in the PDS ABC.REXX
2. COBOL code is in the PDS ABC.COBOL
3. COBOL LOAD module is in the PDS ABC.LOAD

Please suggest me if there is any way to do it.

Can you please provide me the complete REXX code for this.
Back to top
View user's profile Send private message
References
PostPosted: Tue Jul 08, 2008 10:04 pm    Post subject: Re: How to call a cobol program from REXX Reply with quote

Pedro

Senior Member


Joined: 01 Sep 2006
Posts: 406
Location: work

PostPosted: Tue Jul 08, 2008 10:11 pm    Post subject: Reply to: How to call a cobol program from REXX
Reply with quote

Quote:
When i try to the rexx it errors

More details?

How about?:
Code:
Address TSO "CALL 'ABC.LOAD(PGM-NAME)' "
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 1907
Location: Israel

PostPosted: Tue Jul 08, 2008 10:14 pm    Post subject:
Reply with quote

You can try LIBDEF ISPLLIB followed by SELECT PGM.

O.
Back to top
View user's profile Send private message
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 3184
Location: Charlotte,NC USA

PostPosted: Tue Jul 08, 2008 11:32 pm    Post subject: Reply to: How to call a cobol program from REXX
Reply with quote

I have found that Address LINKMVS always works well when the exec is running in a non-TSO/E address space:
Code:

/* REXX */
Address LINKMVS "MYPROG PARAMETERS"
Back to top
View user's profile Send private message
blackzero

New User


Joined: 20 Mar 2008
Posts: 6
Location: INDIA

PostPosted: Wed Jul 09, 2008 4:53 pm    Post subject:
Reply with quote

Thanks everyone

Code:

Address TSO "CALL 'ABC.LOAD(PGM-NAME)' "


can be used to call the module

Thanks again.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1