Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist 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
Uday Kumar Thota

New User


Joined: 30 Oct 2019
Posts: 1
Location: India

PostPosted: Wed Oct 30, 2019 8:43 pm    Post subject: Abend S000 U0000 REASON=00000000
Reply with quote

Hi,

I wrote an IMS batch program (IMS - DB / DLI) to.it consists of two steps step1 was executed succeefully but the control was not at all reaching to the second step 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. the below is the jcl used to execute I was attached the JCL in the document could you please check and suggest


Cheers,
Uday Kumar Thota.
Back to top
View user's profile Send private message

Gnanas N

Active Member


Joined: 06 Sep 2007
Posts: 792
Location: Chennai, India

PostPosted: Wed Oct 30, 2019 10:25 pm    Post subject:
Reply with quote

Please check this link.

http://ibmmainframes.com/about22226.html
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 2247
Location: Hampshire, UK

PostPosted: Thu Oct 31, 2019 1:03 am    Post subject: Reply to: Abend S000 U0000 REASON=00000000
Reply with quote

Please cut and paste your data and use the code tags to maintain the spacing. Attachmentsare not a good idea as people may not be allowed to open them, some may nt want to in case there are viruses or malware and some just because "why should they? You want help so provide the information without people having to do extra work."
Back to top
View user's profile Send private message
enrico-sorichetti

Senior Member


Joined: 14 Mar 2007
Posts: 10631
Location: italy

PostPosted: Thu Oct 31, 2019 3:04 am    Post subject: Reply to: Abend S000 U0000 REASON=00000000
Reply with quote

Downloaded and inlined the attachment

Code:
//BBW040   EXEC RUNZXI,PROG=BBW040,PSB=BBW040                           
//IEFRDER  DD  DSN=SYSGEN.WORK.BBW040.BACKOZM.DLILOG,                   
//             BLKSIZE=22528,LRECL=22524,RECFM=VB,                     
//             SPACE=(CYL,(5,50),RLSE),                                 
//             DISP=(NEW,CATLG,CATLG)                                   
//BA0ACCD        DD  DSN=ICAACC.WORK.GBYYNF.AGNTACCS.DBDATA,DISP=(OLD) 
//BA0ACCE        DD  DSN=ICAACC.WORK.GBYYNF.AGNTAREA.DBDATA,DISP=(OLD) 
//RECON1    DD  DSN=SYSGEN.MAST.CPYD.RECON1.KSDS,DISP=SHR               
//RECON2    DD  DSN=SYSGEN.MAST.CPYD.RECON2.KSDS,DISP=SHR               
//RECON3    DD  DSN=SYSGEN.MAST.CPYD.RECON3.KSDS,DISP=SHR               
//AGYEXCEP DD  DSN=ICAACC.WORK.BBW040.EXCEPT.DATA,DCB=(RECFM=FB,       
//             BLKSIZE=27960,LRECL=60),SPACE=(CYL,(20,10),RLSE),       
//             DISP=(NEW,CATLG,DELETE),UNIT=3390                       
//BCSYSDTE DD  DSN=ICAACC.DEVL.GBYYNF.BCSYSDTE.KSDS,DISP=(SHR)         
//PRINT30  DD  SYSOUT=B                                                 
//*                                                                     
//BBW050   EXEC RUNZXI,PROG=BBW050,PSB=BBW050                           
//STEPLIB DD  DSN=ICAACC.UNI3.LM.BATCH.LOAD,DISP=SHR   
//IEFRDER  DD  DSN=SYSGEN.WORK.BBW050.BACKOZM.DLILOG,                   
//             BLKSIZE=22528,LRECL=22524,RECFM=VB,                     
//             SPACE=(CYL,(5,50),RLSE),                                 
//             DISP=(NEW,CATLG,CATLG)                                   
//BA0ACCD        DD  DSN=ICAACC.WORK.GBYYNF.AGNTACCS.DBDATA,DISP=(OLD) 
//BA0ACCE        DD  DSN=ICAACC.WORK.GBYYNF.AGNTAREA.DBDATA,DISP=(OLD) 
//BA0ACBD        DD  DSN=ICAACC.WORK.GBYYNF.BRCHACCS.DBDATA,DISP=(OLD) 
//BA0ACB2        DD  DSN=ICAACC.WORK.GBYYNF.BRCHACCS.DBSX2,DISP=(OLD)   
//RECON1    DD  DSN=SYSGEN.MAST.CPYD.RECON1.KSDS,DISP=SHR               
//RECON2    DD  DSN=SYSGEN.MAST.CPYD.RECON2.KSDS,DISP=SHR               
//RECON3    DD  DSN=SYSGEN.MAST.CPYD.RECON3.KSDS,DISP=SHR               
//BREXCEP  DD  DSN=ICAACC.WORK.BBW050.EXCEPT.DATA,DCB=(RECFM=FB,       
//             BLKSIZE=27960,LRECL=60),SPACE=(CYL,(20,10),RLSE),       
//             DISP=(NEW,CATLG,DELETE),UNIT=3390                       
//BCSYSDTE DD  DSN=ICAACC.DEVL.GBYYNF.BCSYSDTE.KSDS,DISP=(SHR)         
//PRINT30  DD  SYSOUT=B                                                 
/*                                                                                     


the formatting was already clobbered
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 End the job into error / abend state wik123 JCL & VSAM 3 Wed Sep 11, 2019 6:37 pm
No new posts How to check ASRA ABEND TivyaWorld CICS 2 Fri Aug 09, 2019 1:08 pm
No new posts S0C7 abend while running a Cobol Program amitc23 COBOL Programming 2 Tue May 07, 2019 4:06 pm
No new posts S0C4 Reason Code 10 cz016m COBOL Programming 1 Thu May 02, 2019 7:13 am
No new posts Additional PCB denied abend prasun007 IMS DB/DC 1 Tue Feb 26, 2019 2:46 am

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