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
 

 

IMS abend code U0476 in COBOL subroutine - Please help!!

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC
View previous topic :: :: View next topic  
Author Message
vaibhavkolhe

New User


Joined: 24 Feb 2005
Posts: 11

PostPosted: Wed Oct 22, 2008 8:02 pm    Post subject: IMS abend code U0476 in COBOL subroutine - Please help!!
Reply with quote

Ok. Here's my case:

I have an existing non-IMS program which needs to be converted to an IMS program. The non-IMS program is a plain COBOL module and it calls another COBOL subroutine which retrieves data from an IMS database. The call is pretty simple DLI call. Let's say the calling program is called P1 and called program(IMS subroutine) is P2. I have coded the PCB name in the linkage section of the called module(P2) and also there is an entry DLITCBL using <pcb-name>. The call to P2 is a static call and both the P1 & P2 loads are in the same load library.

The JCL used for testing has the following parms in EXEC step

EXEC PGM=DFSRRC00,COND=(16,EQ),
PARM='DLI,P1,<psb-name>

Since P1 is non-IMS it has been compiled and linkedited using Changeman with no IMS batch precompile. However P2 has been compiled & linkedited using IMS batch precompile option. When I run this job, it fails with a U0476 abend and it fails in P2 where there is a CBLTDLI call. I don't know what is going wrong? I compiled linkedited P1 in IMS option buit it faiuled with a S0C4, so I am sure that's not the way to go. Can anyone tell me the possible causes

- Do P1 & P2 have to be linkedited using a single Linkedit card?
- Do I need to change some parameter on the EXEC step?
- Do I need to code something additional in the LINKAGE SECTION of the called program?

Please reply urgently since I need to provide the test results by Friday.

Thanks

VK
Back to top
View user's profile Send private message

dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Wed Oct 22, 2008 9:22 pm    Post subject:
Reply with quote

Hello,

Quote:
Please reply urgently since I need to provide the test results by Friday.
If you have that kind of time constraint, your best bet for a quick resolution is the dba or other developers on your system.
Back to top
View user's profile Send private message
vaibhavkolhe

New User


Joined: 24 Feb 2005
Posts: 11

PostPosted: Thu Oct 23, 2008 9:32 am    Post subject: Reply to: IMS abend code U0476 in COBOL subroutine - Please
Reply with quote

Thanks. I have consulted a few developers but they have not worked on IMS/Cobol subroutines so they are not very sure. I am trying a few things and hope to fix it, but if anyone can provide a response it'd be a great help.

Thanks VK
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Thu Oct 23, 2008 9:36 am    Post subject:
Reply with quote

Hello,

Something you might try is to include IMS in p1. . .

Not very elegant, but might get you over the hurdle until a proper way is posted.
Back to top
View user's profile Send private message
Sandy Zimmer

Active Member


Joined: 13 Jun 2007
Posts: 826
Location: Wilmington, DE

PostPosted: Thu Oct 23, 2008 5:11 pm    Post subject:
Reply with quote

You said that it statically linked - not dynamically. You have answered your own question " Do P1 & P2 have to be linkedited using a single Linkedit card?"

Your JCL exec statement is indicating that P1 is IMS and that it has a PSB. Is it and does it?
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 -> IMS DB/DC All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Job failing with USER = 4093 REASON C... Pradeepa S ABENDS & Debugging 1 Wed May 17, 2017 3:35 pm
This topic is locked: you cannot edit posts or make replies. Cobol GUI (like Editor) Kala Mainframe COBOL Programming 14 Wed May 10, 2017 12:30 pm
No new posts IMS T-Pipe queue counts in a COBOL Pr... Siva NKK Kothamasu IMS DB/DC 0 Tue May 09, 2017 6:31 pm
No new posts COBOL Code Parsers and Lineage Establ... balimanja COBOL Programming 2 Tue May 02, 2017 3:30 am
No new posts Cobol upgrade - source code missing f... gthmrj IBM Tools 1 Wed Apr 26, 2017 6:04 pm


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