MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Can i call an IMS database from my REXX EXEC?

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> TSO and ISPF
View previous topic :: View next topic  
Author Message
bade_miya
Beginner


Joined: 10 Dec 2003
Posts: 110
Topics: 38

PostPosted: Sat Nov 20, 2004 10:47 am    Post subject: Can i call an IMS database from my REXX EXEC? Reply with quote

Hi all,

I know this question has been asked before because i got this link while searching.

http://www.mvsforums.com/helpboards/viewtopic.php?t=2691&highlight=ims

But i couldnt get what i am looking for from the answers given. Let me explain my requirement.

I have a rexx exec. Now i have to invoke that rexx exec from ISPF(like "tso imsrexx"). In this exec i have to access a IMS database. I went through the the manual provided by kolusu in the above said post. But the examples provided didnt seem to work. Is there any prior setup needed before running the exec.
I dont know whether i am understanding the manuals correctly, but i think it says how to invoke a rexx exec from an ims program or region? Please correct me if i am wrong. If any one have prior experience in writing such an exec, please provide me with a sample code.

thanks
bade_miya
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12376
Topics: 75
Location: San Jose

PostPosted: Mon Nov 22, 2004 9:07 am    Post subject: Reply with quote

bade_miya,

Check this link for example rexx DLI calls

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DFSP20F3/3.1.4.3?SHELF=&DT=20020906094838&CASE=

Hope this helps...

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
bade_miya
Beginner


Joined: 10 Dec 2003
Posts: 110
Topics: 38

PostPosted: Wed Nov 24, 2004 7:41 am    Post subject: Reply with quote

Hi Kolusu,
Thanks for the link. I tried this sample code earlier also before posting the query in the forum. Its giving me a return code of -3. I changed "IOPCB" to the input PCB name we use in our shop. Still its returning the same return code. Should we do any other setting before running this?
I am attaching the code i tried to run.

[code:1:b1c52960bd]
/*REXX*/
IO = "IOPCB" /* IMS Name for I/O PCB */
OutMsg="Hello World"
Address REXXTDLI "ISRT IO OutMsg"
If RC
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12376
Topics: 75
Location: San Jose

PostPosted: Wed Nov 24, 2004 8:59 am    Post subject: Reply with quote

bade_miya,

IVPREXX (copy of DFSREXX0 program) must be installed as an IMS transaction program. IVP (Installation Verification Program) installs the program. Also check if you completed all the tasks listed on page before running your exec

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DFSP20F3/3.1?DT=20020906094838

Hope this helps...

Cheers

kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> TSO and ISPF All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group