MVSFORUMS.com

grimpeur · Beginner Joined: 10 Jul 2006 Posts: 16 Topics: 5

Hi,

I am bringing myself up to speed with Rexx/DB2 appl. programming and have a query regarding error message handling.
If I get a negative SQL code in my program I would like to display the meaningful DB2 error message, such as:-

-904 UNSUCCESSFUL EXECUTION CAUSED BY AN UNAVAILABLE RESOURCE. REASON 00C90081, TYPE OF RESOURCE 00000210, AND RESOURCE NAME DDBDATA .SDBTS1 .00000001

I can display the content of SQLERRMC, but this just gives me the variable parts of the above message (reason-code, resource-type and resource-name), as follows...

00C90081:00000210:DDBDATA .SDBTS1 .00000001

Is there a technique for generating the entire message complete with meaningful text?

Apologies if I missed something obvious - I haven't used Rexx much at all so please be gentle!

Thanks!

kolusu · Posted: Fri Aug 15, 2008 11:35 am Post subject:

grimpeur,

The table partition DDBDATA .SDBTS1 .00000001 is stopped. You need to find out the reason as to why the partition is stopped

Kolusu

grimpeur · Beginner Joined: 10 Jul 2006 Posts: 16 Topics: 5

Sorry for any confusion - I stopped the TS deliberately to simulate an error.

My question is can I get from anywhere the full text of the error message (in this case "-904 UNSUCCESSFUL EXECUTION CAUSED BY AN UNAVAILABLE RESOURCE.... etc etc...") rather than just the variable parts of it, so that this can be displayed/output as a meaningful error message when the program abends?

At the moment, I only seem to be able to display the variable parts, ie 00C90081:00000210:DDBDATA .SDBTS1 .00000001 which represent the reason-code, resource-type and resource-name. However this is not that great without the full text of the -904 message.

It's not just -904s I'm concerned about - I would like to provide a full error message with text and variables merged together when the prog ends.

Should I have posted this in the Application Programming fourm?

Thanks again.

Nic Clouston · Posted: Fri Aug 15, 2008 2:03 pm Post subject:

Not 100% certain on this but I think you would have to hardcode all the error messages in your rexx program and have an error routine that will complete the message before displaying it. I always found that the return code and reason code were sufficient but I was only using one table at a time.
_________________
Utility and Program control cards are NOT, repeat NOT, JCL.

kolusu · Posted: Fri Aug 15, 2008 2:34 pm Post subject:

grimpeur,

You can copy all the Error codes and messages listed in here and format the message

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DSNMCJ12/CCONTENTS

Kolusu

jim haire · Beginner Joined: 30 Dec 2002 Posts: 140 Topics: 40

I think if you return the contents of SQLCA.SQLMSG you can return the error message you have shown above.

Terry_Heinze · Posted: Sat Aug 16, 2008 12:52 am Post subject:

Can I assume that REXX cannot call 'DSNTIAR' like COBOL can?
_________________
....Terry

grimpeur · Beginner Joined: 10 Jul 2006 Posts: 16 Topics: 5

Hardcoding all the possible error messages is not a realistic option. I'm amazed there isn't an obvious way of doing this!
Thanks for the responses though... I tried displaying SQLCA.SQLMSG but could not get that to work - also I couldn't find any reference to SQLMSG in the manual.
Will investigate use of DSNTIAR but would welcome any further comments in the meantime.
Thanks.

IEFBR14 · Posted: Mon Aug 18, 2008 10:51 am Post subject:

You can call DSNTIAR from Rexx

grimpeur · Beginner Joined: 10 Jul 2006 Posts: 16 Topics: 5

Thanks IEFBR14 I will look into that (unless anybody has a code snippet they would be willing to share Laughing

)

kolusu · Posted: Mon Aug 18, 2008 3:57 pm Post subject:

untested code collected from the net