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
 

 

Abend S000 U0000 REASON=00000000

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

New User


Joined: 27 Feb 2007
Posts: 20
Location: Chennai

PostPosted: Mon Jun 25, 2007 1:07 pm    Post subject: Abend S000 U0000 REASON=00000000
Reply with quote

Hi,

I wrote an IMS batch program (IMS - DB / DLI) to download two databases to two flat files in some required format. But while runtime JCL is abending with the abend code S000 and U0000.

I am unable to spot the error. The JCL is correct to my knowledge.

Prompt replies would be highly appreciated.

icon_smile.gif

Cheers,
Phoenix
Back to top
View user's profile Send private message

Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Mon Jun 25, 2007 7:30 pm    Post subject:
Reply with quote

Has your program done anything at all? Did it in fact read any segment and what status-code did you receive? Could it be you read all segments ignoring the GB status-code? Give us this information and any additional so we can help you out. Could this be of help?
Back to top
View user's profile Send private message
Phoenix

New User


Joined: 27 Feb 2007
Posts: 20
Location: Chennai

PostPosted: Tue Jun 26, 2007 12:34 pm    Post subject: Re: Abend S000 U0000 REASON=00000000
Reply with quote

Hi George,

The output datasets are not created at all and i am not able to get any output .

Actually we are expanding the database to include some new segments with the same old data. So we need to download the data to a flat file and then expand & reload it with another program. But it seems its not even touching the program at all.

The SYSOUT is not coming in the outlist so i guess the control is not reaching the program.

Heres' the JCL used to execute it.

Code:
 
//STEPNAME EXEC PGM=DFSRRC00,PARM='DLI,PGMNAME,PSBNAME,50,00'
//DFSRESLB DD DSN=IMS.RESLIB,DISP=SHR                       
//IMS      DD DSN=IMS.P.DBDLIB,DISP=SHR                     
//         DD DSN=IMS.P.PSBLIB,DISP=SHR                     
//IEFRDER  DD DUMMY                                         
//SYSUDUMP DD SYSOUT=*                                       
//DATABAS1 DD DSN=DATABASE.FIRST,DISP=SHR                   
//INDEX1   DD DSN=VSAM.INDEXFOR.DATABASE.FIRST,DISP=SHR     
//DATABAS2 DD DSN=DATABASE.SECOND,DISP=SHR                   
//DATABAS3 DD DSN=DATABASE.THIRD,DISP=SHR                   
//INDEX1   DD DSN=VSAM.INDEXFOR.DATABASE.THIRD,DISP=SHR     
//OUTONE   DD DSN=OUTPUT.TEST.DOWNLOAD.ONE.                 
//         DISP=(NEW,CATLG,DELETE),                         
//         UNIT=SYSDA,SPACE=(CYL,(100,10),RLSE),             
//         RECFM=FB,LRECL=055,BLKSIZE=0                     
//OUTTWO   DD DSN=OUTPUT.TEST.DOWNLOAD.TWO,                 
//         DISP=(NEW,CATLG,DELETE),                         
//         UNIT=SYSDA,SPACE=(CYL,(100,10),RLSE),             
//         RECFM=FB,LRECL=135,BLKSIZE=0   
//DFSVSAMP DD *                           
IOBF=(4096,10)                           
IOBF=(8192,10)                           
2048,5                                   
4096,5                                   
/*                                       
//CNTLPAGE DD SYSOUT=*                   
//SYSOUT   DD SYSOUT=*                   
//*                                       
//                                       



Hope this aids in a better understanding
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Tue Jun 26, 2007 2:37 pm    Post subject:
Reply with quote

OUTONE containes an error; what is the dot doing there instead of the comma?
Back to top
View user's profile Send private message
Phoenix

New User


Joined: 27 Feb 2007
Posts: 20
Location: Chennai

PostPosted: Tue Jun 26, 2007 2:44 pm    Post subject: Re: Abend S000 U0000 REASON=00000000
Reply with quote

That is just a typo George, but anyway i found the error icon_idea.gif .

I was including IO-PCB in an IMS-DB batch program icon_redface.gif and it is working fine now.


Thanks for all your help.

Cheers,
Phoenix.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Tue Jun 26, 2007 2:48 pm    Post subject:
Reply with quote

Well that's a relief. Thank you for answering and good luck.
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 IMS region inactive - User abend code... gthmrj IMS DB/DC 5 Tue Mar 07, 2017 12:29 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 hot to get details when "EXEC CI... Andi1982 CICS 11 Tue Sep 20, 2016 5:01 pm
No new posts S213-14 ABEND explantion Apurva Mehta JCL & VSAM 5 Thu Jul 07, 2016 10:56 pm


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