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
 

 

ABEND U4039 while calling a subroutine

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
Susanta

Active User


Joined: 17 Nov 2009
Posts: 118
Location: India

PostPosted: Mon Nov 15, 2010 3:25 pm    Post subject: ABEND U4039 while calling a subroutine
Reply with quote

Getting abend while calling a subroutine with group item having one pointer.

Please help.

Call statement is like below:

CALL SUB-PGM USING WS-A

Structure of WS-A :

01 WS-A
05 ws-VAR pic x(10).
05 ws-pointer pointer

The ABEND i am getting at the call statement and is ABEND U4039 .

Please Help.
Back to top
View user's profile Send private message

expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Mon Nov 15, 2010 3:29 pm    Post subject:
Reply with quote

Your own program built on site or from a proprietry software package.

If your own shop - read the code and see why the abend is happeneing
If product software - read the manuals.
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10210
Location: italy

PostPosted: Mon Nov 15, 2010 3:31 pm    Post subject: Reply to: ABEND U4039 .
Reply with quote

Uxxxx are User abends and depend on the program being used and the environment

the first thing to look at are the manuals, not ask a forum

I looked at the manuals on Your behalf and ...

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/CEEA1020/CCONTENTS?SHELF=CEE1BK20&DN=SC28-1942-08&DT=20000117144116

Quote:
U4039 (X'FC7')
Explanation: Language Environment is requesting a system abend dump due to an unhandled severity 2, 3, or 4 condition. This does not necessarily indicate an error condition.


Programmer Response: Refer to the original unhandled condition.


System Action: Language Environment continues with termination.



Research the job log for the original abend
Back to top
View user's profile Send private message
Susanta

Active User


Joined: 17 Nov 2009
Posts: 118
Location: India

PostPosted: Mon Nov 15, 2010 4:37 pm    Post subject:
Reply with quote

It was a problem with memory.
Now i kept REGION=0M and the program works fine.

Previously i kep REGION=8M and it was giving user abend.

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

Senior Member


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

PostPosted: Tue Nov 16, 2010 8:14 pm    Post subject:
Reply with quote

Susanta wrote:
It was a problem with memory.
LOL - whose memory? icon_wink.gif. you talk about memory and you've used REGION parameter!

Terminology is critical in IT...by Robert Sample. icon_smile.gif
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 -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. Calling REXX code from ISPF panel sanchita dey TSO/ISPF 4 Mon Jan 02, 2017 5:13 pm
No new posts IMS BMP program causes 878 system abend Artemk IMS DB/DC 7 Tue Nov 22, 2016 8:26 pm
No new posts abend sort based on count records in ... anatol DFSORT/ICETOOL 5 Mon Oct 17, 2016 10:10 pm
No new posts hot to get details when "EXEC CI... Andi1982 CICS 11 Tue Sep 20, 2016 5:01 pm
No new posts "DFSRRC00 vs IKJEFT01" for ... arunsoods All Other Mainframe Topics 5 Fri Aug 12, 2016 9:54 pm


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