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
 

 

IMS DB and REXX Return code

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC
View previous topic :: :: View next topic  
Author Message
karthickpearl

New User


Joined: 13 Apr 2010
Posts: 35
Location: Chennai

PostPosted: Tue Jun 07, 2011 1:57 pm    Post subject: IMS DB and REXX Return code
Reply with quote

Hi guys,

I've successfully connected the IMSDB with a transaction from online region using a rexx code. I face issues in handling the return codes of the IMS calls.

Below is my code:
Code:
Address REXXTDLI
DataBase='#6'     
SSA1='IMSDB1(BEEQ'bc')'
   'GU DATABASE chk SSA1'       


Below is my output for an invalid key (in my message queue):
Code:

DFS3160I IMS CMD=GU DATABASE chk SSA1                       
DFS3161I REXXTDLI Call=GU   RC=0900 Reason=0000 Status="GE"


When I print the RC variable it gives a value of 2304.
How can I get the actual return code/ status/ reason that are in my message queue viz. RC=0900 Reason=0000 Status="GE"

Can somebody help me as I'm stuck up here.

Thanks in advance for your help.
Back to top
View user's profile Send private message

Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 1800
Location: UK

PostPosted: Tue Jun 07, 2011 2:05 pm    Post subject:
Reply with quote

'900'x is 2304 decimal. Does that help?
Back to top
View user's profile Send private message
karthickpearl

New User


Joined: 13 Apr 2010
Posts: 35
Location: Chennai

PostPosted: Tue Jun 07, 2011 2:08 pm    Post subject: Reply to: IMS DB and REXX Return code
Reply with quote

That didn't stirke for me earlier.. Thank u...

But is there a way to get the status as well?

And I need one more information, possibly a link containing list of status and reutrn codes.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Tue Jun 07, 2011 8:17 pm    Post subject:
Reply with quote

Hello,

At the top of the page is a link to "IBM Manuals" which contains 4 volumes of IMS messsage/code info.

Also, pay special attention to the:
Using LookAt to look up message explanations link -
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/handheld/Connected/BOOKS/DFSMC3H1/2.5?

as the LookAt facility may be used for many, many things. . .
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 -> IMS DB/DC All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts REXX to view the PGM or PROC jackzhang75 CLIST & REXX 11 Tue Jun 20, 2017 1:20 am
No new posts DB2 Program abending without giving a... rahulgarg14 DB2 7 Mon May 29, 2017 8:10 pm
This topic is locked: you cannot edit posts or make replies. Need help on If condition continuatio... ashok_uddaraju CLIST & REXX 4 Fri May 19, 2017 8:55 am
No new posts Job failing with USER = 4093 REASON C... Pradeepa S ABENDS & Debugging 1 Wed May 17, 2017 3:35 pm
No new posts COBOL Code Parsers and Lineage Establ... balimanja COBOL Programming 2 Tue May 02, 2017 3:30 am


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