IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

IMS ABEND with ABEND CODE U4095


IBM Mainframe Forums -> ABENDS & Debugging
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
gauravd01

New User


Joined: 25 Aug 2008
Posts: 14
Location: india

PostPosted: Fri Jul 06, 2012 8:28 pm
Reply with quote

Hello Techies,

I am working in operations, However trying to learn Abend Analysis and Resolution for the abends we get.

Today I have come accros a abend for a COBOL-IMS job.
Details are as follows -

Code:
[06.50.58 JOB19615  IEF188I PROBLEM PROGRAM ATTRIBUTES ASSIGNED             
06.50.58 JOB19615  +$ BEGINNING OF IMSABEND DL/I DIAGNOSTIC REPORT . $     
06.50.58 JOB19615  +$ MOD=VIC793    PGM=VIC793    PSB=VIC793         $     
06.50.58 JOB19615  +$ FUNC=ISRT  STATUS=II  LEVEL=03  KEYLEN=026     $     
06.50.58 JOB19615  +$ SEG=SVHDDTL   PCB=(03)PVH       PROCOPT=A      $     
06.50.58 JOB19615  +$      ----+----1----+----2----+----3----+----4  $     
06.50.58 JOB19615  +$ KEYF=3TMJU4GN1CM129965411121401                $     
06.50.58 JOB19615  +$ SSA1=SVHROOT *--(SNDX1FLD =3TMJU4GN1CM129965)  $     
06.50.58 JOB19615  +$ SSA2=SVHDMGD *--(G5489    =4111214)            $     
06.50.58 JOB19615  +$ SSA3=SVHDDTL *--                               $     
06.50.58 JOB19615  +$ END OF IMSABEND DL/I DIAGNOSTIC REPORT . . . . $     
06.51.00 JOB19615  +AB400A      ===== ABEND-AID =====  379                 
   379                REPORT WRITTEN TO: SOSPV.SHR.ABENDAID.PRODDIR       
   379                REPORT NUMBER: 0210998                               
   379                JOB-V162DX   STEP-V162DX13                           
   379                ABEND CODE=U4095                                     
   379                  ACCESS YOUR ABEND-AID REPORTS VIA ISPF OPTION 8.20
06.51.03 JOB19615  IEA995I SYMPTOM DUMP OUTPUT  433                       
   433               USER COMPLETION CODE=4095                             
]

Could you guys please help me to understand above?

Thanks in Advance for ur Valuable suggestions & time.
Garry
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Fri Jul 06, 2012 8:32 pm
Reply with quote

379 ACCESS YOUR ABEND-AID REPORTS VIA ISPF OPTION 8.20

379 REPORT WRITTEN TO: SOSPV.SHR.ABENDAID.PRODDIR
379 REPORT NUMBER: 0210998
379 JOB-V162DX STEP-V162DX13
Back to top
View user's profile Send private message
Peter Nancollis

New User


Joined: 15 Mar 2011
Posts: 47
Location: UK

PostPosted: Sat Jul 07, 2012 2:52 am
Reply with quote

Various Messages and Codes Manuals should be your first port of call - if user directed info doesnt help [as per dbz's response]
Things may not always be as they seem [applications can abend with almost any code they want] but its a start

From the IMS M&C

4000-4093
Explanation: Reserved for customer use.
Source: IMS abends

4095
Explanation: This code indicates that an IMS TCB is being terminated abnormally because a different IMS TCB in
the control region has terminated abnormally. The initial abend will contain the abend code that describes the
problem. The 4095 abend is normal under these circumstances.
System action: IMS terminates abnormally.
Programmer response: Obtain the SDUMP or SYSUDUMP data set.
Problem determination: The dump data set contains information about the original problem. Problem analysis
should continue, using the original abend conditions.
Message DFS629I, showing the TCB abend codes other than 4095, and the other related error messages, can be
helpful for problem determination. See the message for more information.
Back to top
View user's profile Send private message
gauravd01

New User


Joined: 25 Aug 2008
Posts: 14
Location: india

PostPosted: Sat Jul 07, 2012 3:14 am
Reply with quote

Hello Gentelman,

I have gone thru the manuals and details of U4095 Abend code.
However I understood little after reading details of Abend code U4095.
I understood that there was some problem with the PVH IMS Database and it is related to some records being written or update.
But these are my guesses and not concrete analysis.
As I informed I am not in System/Application programming so don't know much of coding... icon_sad.gif
Back to top
View user's profile Send private message
gauravd01

New User


Joined: 25 Aug 2008
Posts: 14
Location: india

PostPosted: Sat Jul 07, 2012 3:17 am
Reply with quote

dbzTHEdinosauer,

I have gone thru Abend Aid report still need some expert advise like you...

[379 ACCESS YOUR ABEND-AID REPORTS VIA ISPF OPTION 8.20

379 REPORT WRITTEN TO: SOSPV.SHR.ABENDAID.PRODDIR
379 REPORT NUMBER: 0210998
379 JOB-V162DX STEP-V162DX13
]

[/quote]
Back to top
View user's profile Send private message
Peter cobolskolan

Active User


Joined: 06 Feb 2012
Posts: 104
Location: Sweden

PostPosted: Sat Jul 07, 2012 9:41 am
Reply with quote

There is a lot of information telling you about the application problem: Status-Code II at ISRT of a specific segment, and much more.
To understand this, you must be familiar with DL/I Application Programming and have an understaning of this specific database.
Why not contact the person who has this knowledge and responsible for the program and its maintenance.
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


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

PostPosted: Sat Jul 07, 2012 9:45 am
Reply with quote

Hello,

Quote:
Why not contact the person who has this knowledge and responsible for the program and its maintenance.
Or talk with the dba or other ims support. . .
Back to top
View user's profile Send private message
Prakash J

New User


Joined: 23 May 2012
Posts: 14
Location: India

PostPosted: Sat Jul 07, 2012 9:59 pm
Reply with quote

Hi,

There can be various reasons for U4095 abend. But, please check this out once again.


FUNC=ISRT STATUS=II LEVEL=03 KEYLEN=026
SEG=SVHDDTL PCB=(03)PVH PROCOPT=A

When the program tried to insert the record, the DLI found the duplicate key. Please verify if there is any duplicate data.

If you have the ABEND-AID setup at your site, please go through it to find out the problem.

- Prakash
Back to top
View user's profile Send private message
Anuj Dhawan

Superior Member


Joined: 22 Apr 2006
Posts: 6250
Location: Mumbai, India

PostPosted: Mon Jul 09, 2012 6:28 pm
Reply with quote

I'll investigate if the COBOL-Program-in-question is handling IMS STATUS=II or not - as Prakash has indicated. If it's not, chances of getting a user abend are most likely.
Back to top
View user's profile Send private message
gauravd01

New User


Joined: 25 Aug 2008
Posts: 14
Location: india

PostPosted: Fri Jul 20, 2012 2:15 am
Reply with quote

I understood how to resolve this one!
Thanks Prakash for ur letting me know what to check and how to check!

I checked with App programmer and he says same as suggested by Prakash.

Following key was the culprit. Thru this key we can find the duplicate record in the DB.

[ KEYF=3TMJU4GN1CM129965411121401][/code]
Back to top
View user's profile Send private message
Anuj Dhawan

Superior Member


Joined: 22 Apr 2006
Posts: 6250
Location: Mumbai, India

PostPosted: Fri Jul 20, 2012 2:26 pm
Reply with quote

Thanks for the follow up, it might help someone later... icon_smile.gif

Thanks,
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> ABENDS & Debugging

 


Similar Topics
Topic Forum Replies
No new posts run rexx code with jcl CLIST & REXX 15
No new posts Compile rexx code with jcl CLIST & REXX 6
No new posts ISAM and abend S03B JCL & VSAM 10
No new posts REXX code to expand copybook in a cob... CLIST & REXX 2
No new posts VSAM return code 23 - for a Random read COBOL Programming 4
Search our Forums:

Back to Top