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
 

 

Call fails with 4038 abend

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

New User


Joined: 18 Sep 2006
Posts: 2

PostPosted: Mon Sep 18, 2006 1:26 pm    Post subject: Call fails with 4038 abend
Reply with quote

I have a program CALL that fails with a 4038 abend and I can't see why. The call is dynamic, using a variable that contains the program name. The called program clean compiles. I tried changing both to use EXEC CICS LINK instead and this worked OK, so the program is obviously acceptable to CICS in that format. I just can't see why it should fail when called. Yes, it does use GOBACK.

I'm certain that it's the call itself and not the called program, because an inserted TRACEID statement (first line) is never executed.

Any ideas?
Back to top
View user's profile Send private message

JeffM

New User


Joined: 18 Sep 2006
Posts: 2

PostPosted: Tue Sep 19, 2006 6:27 am    Post subject: Re: Call fails with 4038 abend
Reply with quote

After some more digging, I found that an IGZ module failed to load. It seems that this module is AMODE=31 and my called program was AMODE=24. I recompiled using AMODE=31 and the call then worked. It seems LE doesn't like the mix, so even though CICS could load the program, LE couldn't.
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 Invoke Webservice Fails with DFHPI100... divated CICS 2 Thu Nov 24, 2016 5:57 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 Cobol EZASOKET call to SETSOCKOPT fails Andi1982 COBOL Programming 6 Thu Oct 06, 2016 7:12 pm


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