Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
4038 ABEND when Calling a CICS/DB2 program

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

New User


Joined: 16 Aug 2005
Posts: 6

PostPosted: Mon Oct 10, 2005 8:02 pm    Post subject: 4038 ABEND when Calling a CICS/DB2 program
Reply with quote

hi,
i have a cics-cobol-db2 as a main program. My main program is calling a subprogram which is a cobol-db2 program. can i use link/xctl for the subprogram though it doesn't have any cics statements in it. when i m using 'call' for the subprogram i m getting 4038 abend. plz help.
Back to top
View user's profile Send private message
References
PostPosted: Mon Oct 10, 2005 8:02 pm    Post subject: Re: 4038 ABEND when Calling a CICS/DB2 program Reply with quote

priya

Moderator


Joined: 24 Jul 2003
Posts: 624
Location: Bangalore

PostPosted: Wed Nov 02, 2005 3:03 am    Post subject:
Reply with quote

Fortunately, there is a place to find exactly what caused a 4038 abend. Just look at where ever you have the CESE transient data queue pointing (a lot of shops have it pointing to SYSOUT, so you may have to browse CICS output in SDSF or similar product). There will be a message that pretty much spells out the cause of the abend (in most cases, it is something simple, like a resource not defined).
Back to top
View user's profile Send private message
yogesh

New User


Joined: 27 May 2005
Posts: 19

PostPosted: Fri Nov 11, 2005 6:08 pm    Post subject: Re: 4038 ABEND when Calling a CICS/DB2 program
Reply with quote

u must have missed the stop run statement
or may be stop run is coded in the calling program
Back to top
View user's profile Send private message
venkat.c
Warnings : 1

New User


Joined: 11 Dec 2005
Posts: 6

PostPosted: Fri Dec 16, 2005 1:49 pm    Post subject: Re: 4038 ABEND when Calling a CICS/DB2 program
Reply with quote

hi dude

1.u wud have missed a stop run in the program

2.If u want the control to return back to the main program use Link else u can use xctl which wont return the control back to the calling prog...

3.no problem in using xctl or link if u dont have cics in the program to be called ....
Back to top
View user's profile Send private message
khamarutheen

Senior Member


Joined: 23 Aug 2005
Posts: 678
Location: chennai

PostPosted: Fri Dec 16, 2005 2:45 pm    Post subject: 4038
Reply with quote

Hi frnd,

Ur PDS/PS file may be used/altered by some other job while the calling job uses that for some other purpose... so check it out... it's is also a possibility not a solution
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> ABENDS & Debugging All times are GMT + 6 Hours
Page 1 of 1