Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
ABEND - U4038

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> ABENDS & Debugging
View previous topic :: :: View next topic  
Author Message
Mariraj

New User


Joined: 09 Jul 2007
Posts: 59
Location: Chennai

PostPosted: Wed Jul 30, 2008 4:56 pm    Post subject: ABEND - U4038
Reply with quote

Code:
A COBOL run-time condition, IGZ0033S, occurred during execution of     
program AB100100.  The expected completion code is U4038.               
                                                                       
*******************************************                             
*            Analysis of Error            *                             
*******************************************                             
                                                                       
                                                                       
An attempt was made to pass a parameter located above the 16MB line to a
program in AMODE(24) but the called program will not be able to address
the parameter.                                                         
                                                                       
Make sure that the parameter is located in storage accessible to an     
AMODE(24) program.  If the calling program is compiled with the RENT   
option, the DATA(24) may be used.  If the calling program is compiled   
with the NORENT option, the RMODE(24) option may be used.  Also make   
sure that linkedit, binder, or genmod overrides are not responsible for
this error.                                                             

The IBM message that corresponds to the condition is:             
                                                                 
 IGZ0033S An attempt was made to pass a parameter address above 16
          megabytes to AMODE(24) program XY101100.


The programs are compiled and linked using CHGMAN.

Could someone tell me how to solve this issue?
Back to top
View user's profile Send private message

Garry Carroll

Senior Member


Joined: 08 May 2006
Posts: 1005
Location: Dublin, Ireland / Edinburgh, Scotland

PostPosted: Wed Jul 30, 2008 5:06 pm    Post subject:
Reply with quote

The Analysis of Error tells you what the problem is.

You have an AMODE(31) program which is calling an AMODE(24) program and the caller is using 31-bit variables. Either have the caller changed to have variables "below" or change the called program to be able to address "above".

Regards,
Garry.
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


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

PostPosted: Wed Jul 30, 2008 5:06 pm    Post subject:
Reply with quote

Hi,

Some previous topic on the same issue-

http://www.ibmmainframes.com/viewtopic.php?t=28780&highlight=u4038
http://www.ibmmainframes.com/viewtopic.php?t=28939&highlight=u4038
http://www.ibmmainframes.com/viewtopic.php?t=4836&highlight=u4038

BTW, please post the SYSOUT as well.
Back to top
View user's profile Send private message
Mariraj

New User


Joined: 09 Jul 2007
Posts: 59
Location: Chennai

PostPosted: Wed Jul 30, 2008 7:41 pm    Post subject:
Reply with quote

Thanks to both of you.
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 -> ABENDS & Debugging All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to force a select query to abend neo4u DB2 5 Mon Apr 23, 2018 1:36 pm
No new posts Need help with 002-030 ABEND in TSO R... Terry Tallian TSO/ISPF 0 Sat Mar 17, 2018 1:13 am
No new posts How to resolve U4038? SRUTHI DRAVIDAMANI COBOL Programming 5 Sun Feb 25, 2018 12:35 pm
No new posts Need help with ABEND RC=S806 RSN=4 an... chong.zhou All Other Mainframe Topics 3 Fri Feb 09, 2018 12:17 am
No new posts IMS error U4038 while executing my PL... abdulrafi IMS DB/DC 2 Thu Feb 08, 2018 1:05 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us