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

Abend U4083 while running a DB2-Cobol program


IBM Mainframe Forums -> DB2
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Richa Jain

New User


Joined: 18 Mar 2008
Posts: 35
Location: Gurgaon

PostPosted: Wed Oct 01, 2008 2:34 pm
Reply with quote

I am getting the below abend while running a DB2-Cobol program

USER COMPLETION CODE=4083 REASON CODE=00000004

Can anyone tell me the reason/ solution to resolve this abend?


Thanks
Richa
Back to top
View user's profile Send private message
Anuj Dhawan

Superior Member


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

PostPosted: Wed Oct 01, 2008 2:48 pm
Reply with quote

Well, this is a user abend, should be documented in your program logic..
Back to top
View user's profile Send private message
uthamkumarchandra

New User


Joined: 26 Sep 2008
Posts: 1
Location: Bangalore

PostPosted: Wed Oct 01, 2008 2:52 pm
Reply with quote

I believe you need to check the logic of the program. Some times the error may occur due to data if the expected data is not found the program will be coded in a way that it should abend.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8697
Location: Dubuque, Iowa, USA

PostPosted: Wed Oct 01, 2008 5:02 pm
Reply with quote

U4xxx abends are almost always Language Environment abend codes. The 4083 LE abend code means:
Quote:
U4083 (X'FF3')


Explanation: The back chain was found in error. The reason code describes the most likely cause of the abend.


Reason codes:


X'01' (1) A save area loop exists. The save area points to itself or another save area incorrectly points to a higher save area. X'02' (2) Traversal of the back chain resulted in a program check. X'03' (3) Under normal conditions, all save area chains should end with a save area pointed to by CEECAADDSA. In this case, the save area chain terminated with a back chain pointer of 0. X'04' (4) Under normal conditions, all save areas are presumed to be word-aligned. Either a linkage stack has been encountered with the character string of "F1SA' (X'C6F1E2C1') in a backward pointer field of the save area chain, or a misaligned (non-word) boundary save area is in the chain. Examine the save area chain to determine which is the case. X'05' (5) A condition was raised before the allocation of the main stack frame, or after the main routine terminated. X'06'(6) The dsa format was not set to up or down. X'07'(7) The save area chain cannot be reached or is non-existent. The pointer referencing the back chain is set to 0 (R13). X'08'(8) A save area on the chain points to itself. X'09'(9) Under normal conditions, all XPLINK save areas are presumed to be quad-word-aligned (the starting address must end in 0. Either a linkage stack has been encountered with the character string of FISA (X'C6F1E2C1' in a backward pointer field of the save area chain, or a misaligned (non-quad-word) boundary XPLINK save area is in the chain. Examine the save area chain to determine which is the case. X'0F' (15) The save area chain is not intact. Programmer Response: For applications that generate their own save areas, ensure the save areas are chained together correctly; all save areas must be addressable in AMODE(31). It may be helpful to generate a system dump of the original error by using run-time options TERMTHDACT(UAIMM) and TRAP(ON,NOSPIE). For other types of applications, a storage overlay problem has probably occurred. System Action: Enclave terminated.
Probably the key sentence is the last one -- storage overlay problem. Find it and fix it.
Back to top
View user's profile Send private message
Sachinincsc

New User


Joined: 01 Oct 2008
Posts: 11
Location: Philadelphia, USA

PostPosted: Wed Oct 01, 2008 7:31 pm
Reply with quote

Check the DB2DIAG.

Your code is not able to make connection with DB2 i think.. Try regenerating the COMPOSITE as well.
I also got this error and for me it was a BAD composite generation.
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 -> DB2

 


Similar Topics
Topic Forum Replies
No new posts Replace each space in cobol string wi... COBOL Programming 3
No new posts Using API Gateway from CICS program CICS 0
No new posts Running REXX through JOB CLIST & REXX 13
No new posts COBOL -Linkage Section-Case Sensitive COBOL Programming 1
No new posts COBOL ZOS Web Enablement Toolkit HTTP... COBOL Programming 0
Search our Forums:

Back to Top