U4038 Abend after made changes to the called program

prashantmadhav · Posted: Thu Dec 28, 2006 11:27 am

Hi all

I got U4038 Abend.Since I have a called program in my cobol program and i made changes to the called program and when compiled it again along with calling program.It showed the ABEND 4038.
But when i run the program with unmodified version of the called program.It works fine i.e. no Abends.
My requirement is such that i need the called program and i cant compile without the called program.

Please revert back soon

priyesh.agrawal · Posted: Thu Dec 28, 2006 11:41 am

prashantmadhav · Posted: Thu Dec 28, 2006 12:06 pm

No i got it while running the code

Rajen · New User Joined: 05 May 2005 Posts: 61

Hi Madhav,
If main program or called program are DB2 Program?
If yes then make sure you have bind these 2 correctly. Also you need to check both programs are using which version of Cobol.

Can you please SQLCODE for abend job. If it is -805 then it should be because you didnot bind them properly.

SQLCODE -805

-805 DBRM OR PACKAGE NAME
location-name.collection-id.dbrm-name.consistency -token NOT FOUND
IN PLAN plan-name. REASON reason

Explanation: An application program attempted to use a DBRM or package
'location-name.collection-id.dbrm-name.consistency-token' that was not
found.

dick scherrer · Posted: Fri Dec 29, 2006 1:14 am

Hello,

What did you change in the called program?

If you re-compile the UNCHANGED version of the called program and run the same test(?) job, does the abend still occur?

William Thompson · Posted: Fri Dec 29, 2006 1:42 am

For what its worth, I was getting the same thing because I kept messing around with the input and output file recform and lrecl.......

Bitneuker · Posted: Thu Jan 04, 2007 4:46 am

William Thompson · Posted: Thu Jan 04, 2007 4:57 am

Bitneuker · Posted: Thu Jan 04, 2007 3:17 pm

My guess is the problem is solved; no reaction from TS. Probably corrected the AMODE/RMODE.