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
 

 

Getting U3042 abend in a IMS/DB2 program

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

New User


Joined: 29 Nov 2005
Posts: 49

PostPosted: Wed Nov 15, 2006 11:35 am    Post subject: Getting U3042 abend in a IMS/DB2 program
Reply with quote

Hello Friends,

I am getting U3042 abend in a IMS/DB2 program. The first sql statement itself fails without giving any sql error. Actually I am invoking IMS-DB2 program thru IMS transaction. When control comes to first statement of SQL in xpeditor it is abending with U3042.

Please help me on this.

Regards,
Sunny.
Back to top
View user's profile Send private message

Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Thu Nov 16, 2006 5:05 pm    Post subject:
Reply with quote

We need more information. Please check Abend assist.
Back to top
View user's profile Send private message
mahapatrasoumya

New User


Joined: 13 Apr 2006
Posts: 7

PostPosted: Wed Nov 22, 2006 4:00 pm    Post subject:
Reply with quote

Please check your jcl and make sure that , you are using the corrct RESLIB library . If you use wrong RESLIB library it might give this error.
Example for production you have to use PROD.RESLIB , for test you have to use TEST.RESLIB.
Back to top
View user's profile Send private message
sbalajibe

New User


Joined: 15 Aug 2005
Posts: 62

PostPosted: Fri Dec 15, 2006 12:43 pm    Post subject:
Reply with quote

I Am also facing same problem as Sunny. Can please suggest me the solution
Sunny: Did u find out the solution....? plese share

Regards
Balaji
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Fri Dec 15, 2006 2:35 pm    Post subject:
Reply with quote

Looks like you need the system programmer to determine which IMS module causes the abend. He should check register 15 according to the manual:

Quote:
Code 3042

3042
Explanation:
Module DFSESPR0 issues this abend after detecting error. DFSESPR0 also issues this abend due to errors detected in lower level modules. The module detecting the error sets the abend code for DFSESPR0 to issue.

System action:
The TCB in the dependent region, under which these modules run, is terminated.

Programmer response:
Bytes 1 and 2 of Register 15 contain a hexadecimal value representing the module name that detected the nonzero return code. To determine the module name, refer to the categories describing the various conditions detected by IMS modules in Return Codes and Function Codes. Bytes 3 and 4 of Register 15 contain the hexadecimal return code passed back by the external subsystem exit or the lower level module.

System Operator Response:
Notify the system programmer.

Problem determination:
4, 5, 6, 7


Related topics:
IMS Abend Codes 3000 - 4095


The manual may be found here. Also check if all libraries are concatenated in your JCL.
Back to top
View user's profile Send private message
sbalajibe

New User


Joined: 15 Aug 2005
Posts: 62

PostPosted: Tue Dec 26, 2006 4:54 pm    Post subject:
Reply with quote

U have to add the dd statement
//DFSESL DD DSN=&LIB6..RESLIB,
// DISP=SHR
// DD DISP=SHR,
// DSN=SYS4.DB2.DB3T.SDSNLOAD
// DD DISP=SHR,
//DSN=SYS4.DB2.DB3T.SDSNEXIT

ADD u r reslib and DB2 libraries

regards
Balaji
Back to top
View user's profile Send private message
upadhya_k
Warnings : 1

New User


Joined: 15 Jun 2007
Posts: 6
Location: bangalore

PostPosted: Thu Nov 29, 2007 6:55 pm    Post subject: Reply to: Getting U3042 abend in a IMS/DB2 program
Reply with quote

Hi,


I am geting the same abend and I have checked with the JCls also.. I have included the proper RESLIB statements... Could anybodu please help me out in this regard...

[/img]
Back to top
View user's profile Send private message
wendybarnett

New User


Joined: 14 Jun 2009
Posts: 2
Location: South Africa

PostPosted: Wed Jun 17, 2009 9:54 am    Post subject: Reply to: Getting U3042 abend in a IMS/DB2 program
Reply with quote

The RTT module must be in a PDS not PDS/E.
Once they re-linked it into IMS's reslib versus DB2's sdsnload, the U3042 went away.
The difference seems to be PDS versus PDSE, and furthermore, the RTT seems to be
searched for each and every tran even though there is a match of PSB <-
DB2 plan. The steplib of their startup proc only has the ims pds reslib
and their DFSESL DD has both the DB2 SDSNLOAD, SDSNEXIT, and IMS RESLIB.

PDSE is allowed for DB2 loadlib in the DFSESL DD statement. PQ82493 and PQ84553 describes it .
Let me know if the above helps. If not , please send the requested dump + logrec information.
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: Wed Jun 17, 2009 10:15 am    Post subject: Reply to: Getting U3042 abend in a IMS/DB2 program
Reply with quote

Hello Wendy and welcome to the forum,

We have been looking for one such as you icon_smile.gif

Don't be concerned if there are not so many replies to this topic as it has been inactive for about a year and a half.

I expect there are others more current you may find interesting.

Thanks for joining,

d
Back to top
View user's profile Send private message
wendybarnett

New User


Joined: 14 Jun 2009
Posts: 2
Location: South Africa

PostPosted: Thu Jun 18, 2009 1:24 pm    Post subject: Reply to: Getting U3042 abend in a IMS/DB2 program
Reply with quote

Thank you.
We in Africa are alittle behind icon_biggrin.gif
We only going to DB2 v 8 now.
For a quick workaround to get our system up we found that moving the RTT module from the DB2 LOADLIB to the IMS RESLIB solved the problem, it seems IMS not partial to PDS/E.
Back to top
View user's profile Send private message
anilbidave

New User


Joined: 12 Nov 2006
Posts: 1
Location: pune

PostPosted: Mon Sep 26, 2011 11:11 pm    Post subject: Reply to: Getting U3042 abend in a IMS/DB2 program
Reply with quote

Thanks All for your Valuable support...Its working
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7308

PostPosted: Mon Sep 26, 2011 11:20 pm    Post subject: Reply to: Getting U3042 abend in a IMS/DB2 program
Reply with quote

I'm biting. What is working?
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 IMS region inactive - User abend code... gthmrj IMS DB/DC 5 Tue Mar 07, 2017 12:29 pm
No new posts SQL query not working in Cobol program. CuriousMainframer COBOL Programming 14 Wed Feb 22, 2017 5:56 pm
No new posts Executing OO COBOL program invoking J... Virendra Shambharkar COBOL Programming 2 Tue Jan 10, 2017 6:37 pm
No new posts Need Suggestion on COBOL program vickey_dw COBOL Programming 5 Thu Jan 05, 2017 10:55 pm
No new posts I can not compile my program PL1 V3.R... Miguel Fernandez PL/I & Assembler 13 Tue Dec 06, 2016 8:30 pm


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