Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
IMS abend code U0476

 
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: Sat Oct 04, 2008 4:29 pm    Post subject: IMS abend code U0476
Reply with quote

Hi,

I have a new IMS Cobol batch program which fails with a U0476 abend when I try to execute it. Here's how the JCL looks like

//EXEC PGM = DFSRRC00, PARM='DLI,FASC88FP, FASC88'

Here FASC88FP is my new ims program and FASC88 is an existing PSB. BAsically I am using existing PSB for this program. The PSB consists of the following PCBs - AGCYPCB, PRODPCB. My COBOL program looks as follows

PROCEDURE DIVISION.
ENTRY 'DLITCBL' USING AGCYPCB
PRODPCB.

FASC88 is also an IMS program but it contains a DBB call instead of DLI in the parameter list of DFSRRC00.

I am not sure what's going wrong. I checked the IMS Abend code manual and it I think my program doiesn't satisfy any of the causes of failure listed. If someone feels differently, please correct me.

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

Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Sun Oct 05, 2008 1:41 am    Post subject:
Reply with quote

Check if the below link helps you..

http://www.ibmmainframes.com/viewtopic.php?t=8078&postdays=0&postorder=asc&start=15&sid=1fc6ea2f8a238941daf5c5c1d8839ec0
Back to top
View user's profile Send private message
vaibhavkolhe

New User


Joined: 24 Feb 2005
Posts: 11

PostPosted: Sun Oct 05, 2008 10:13 am    Post subject: Reply to: IMS abend code U0476
Reply with quote

Thanks for the link. But what does an IO-PCB mean?
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Sun Oct 05, 2008 10:21 am    Post subject:
Reply with quote

The IO-PCB is for communication with terminals. Any DLI-call supplies IMS with the number of parameters passed.
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Sun Oct 05, 2008 10:30 am    Post subject:
Reply with quote

Hello again,

The general format for an IMS data communications call is, for COBOL:
Code:
CALL 'CBLTDLI' USING dli-function, io-pcb or alternate-pcb, io-area, mod-name, destination name

and for PLI
Code:
CALL PLITDLI(num-parms,dli-function, io-pcb or alternate-pcb, io-area, mod-name, destination name)

The mod-name and destination-name fields are optional. The dli-function field can contain any of the following values:

The io-pcb contains logical terminal name (8 characters), 2 characters reserved, status code (2 characters), current date (4 characters packed decimal YYYYDDD), current time (4 characters packed decimal HHMMSST), sequence number (4 characters), descriptor name (8 characters binary), and user id (8 characters). The alternate-pcb contains only the first three of these fields.
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 ASP3 ABEND IN CICS Vedant CICS 0 Fri Oct 20, 2017 3:18 pm
No new posts Speed-up/reduce CPU use of code prino PL/I & Assembler 0 Tue Sep 26, 2017 12:05 am
This topic is locked: you cannot edit posts or make replies. how to code for GDG in Rexx cvnlynn CLIST & REXX 13 Wed Aug 09, 2017 9:13 pm
This topic is locked: you cannot edit posts or make replies. rexx code to create a ps file Bharath Vikraman CLIST & REXX 4 Mon Aug 07, 2017 10:30 am
No new posts I want to retire TRX and use only Rex... Abhinav Sharma CLIST & REXX 6 Sat Jul 29, 2017 2:53 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us