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
 

 

How to avoid ABEND 4038?

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

New User


Joined: 13 Apr 2007
Posts: 59
Location: Bangalore

PostPosted: Mon Mar 10, 2008 2:27 pm    Post subject: How to avoid ABEND 4038?
Reply with quote

Hi ,

I am getting the Abend 4038 continuously, with file status 46. I have checked the LRECl, specified in job and program. Both are same. What can be the reason?

I am attcahing my log herewith,

Quote:
LE COND CODE=IGZ0020S / EXPECTED COMP CODE=U4038
IEF450I TEST310M WGM310MI - ABEND=S000 U4038 REASON=00000001 532

Could you please help me in this?
Thnx, Reni
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 Mar 11, 2008 12:03 am    Post subject:
Reply with quote

Hi,

U4038 is generic abend, it can have multiple reasons behind. Status code 46 is something to do with READ in COBOL program, check it.
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 Mar 11, 2008 12:17 am    Post subject:
Reply with quote

Hi,

Check for these:

Quote:
A sequential READ statement was attempted on a file open in the input or I-O mode and no valid next record had been established because:

1. The preceding READ statement was unsuccessful but did not cause an at end condition.
2. The preceding READ statement caused an at end condition.
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 IMS region inactive - User abend code... gthmrj IMS DB/DC 5 Tue Mar 07, 2017 12:29 pm
No new posts Display ZEDLMSG without Pressing F1 &... anandgbe CLIST & REXX 8 Thu Dec 15, 2016 4:20 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


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