IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Abend S000|U4049 CN(INTERNAL) in IMS/DB


IBM Mainframe Forums -> IMS DB/DC
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
chhabraravneet

New User


Joined: 04 Oct 2007
Posts: 49
Location: Mumbai

PostPosted: Thu Jul 12, 2012 9:46 pm
Reply with quote

Hi,

I am trying to submit one of my IMS job...and getting the below abend:

Code:
 IAT6108 JOB TWSCNRCT (JOB14458) ENDED,COMP CD=S000|U4049 CN(INTERNAL)       
 IAT6108 JOB TWSCNRCT STEP=TWSCN001,PROC=NONE     CN(INTERNAL)               
 ***         



Code:
//*********************************************************************
//TWSCN001 EXEC PGM=DFSRRC00,PARM='ULU,DFSURGU0,PQDA02D2,,,,,,,,,,,N' 
//*TWSCN001 EXEC PGM=DFSRRC00,PARM='ULU,DFSURGU0,PQDA03D2,,,,,,,,,,,N'
.
.
.
 //TW0040D4  DD  *                                                     
 /*                                                                     
 //NSXSYSIN DD *                                                       
  UNLOAD( DBDNAME(PQDA02D2)                                             
   USEREXITOPTIONS( MODULENAME(TW0040PP) COBOL2 INITIALIZE             
     SEGMENTMODIFYOPTION (YES)                                         
     INTERFACE(HSSR)                                                   
     CONCATENATEDKEYREQUIRED                                           
     SKIPDBR))                                                         
 //*                                                                   
 /*                                                                     

can anyone tell me the possible reason for this..i dont have any clue about this one ...

thanks in advance...
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10873
Location: italy

PostPosted: Thu Jul 12, 2012 9:53 pm
Reply with quote

what about REsearching the IMS manuals Yourself ?
Back to top
View user's profile Send private message
chhabraravneet

New User


Joined: 04 Oct 2007
Posts: 49
Location: Mumbai

PostPosted: Thu Jul 12, 2012 9:55 pm
Reply with quote

Also..i looked in the dump of this job..and i found that the there was some problem in the segment initialization.below is the return code:

DB(PQDA01D2) SEGMENT(PQWCFORM) INITIALIZATION COMPLETE TECH(SH) T10
DB(PQDA01D2) SEGMENT(PQWCGSTA) EXPANSION REQUEST ERROR RETURN CODE(08860004)
OB TWSCNRCT (JOB14360) BYTES EXCEEDED
@TCPA87.TWSCNRCT.JOB14360.D0000022.? SYSOUT
DUMP suppressed by DAE.
User completion code 3923
Time 11.46.45 Seq 00000 CPU 00 ASID 00E5
PSW at abend 077C2000 9B10155E ILC 2 INTC 0D S/Pri/31/GT
Data at PSW 1B101558 - C05E1810 0A0D4810 91A84111
Active CSECT module NSXHPHRR address 1B101500 offset 000000
Executing module DPIEXIT+02255E EPA 1B0DF000
Recovery exit entered for Task Issued SVC 13
Enabled RB was in control at time of error
Back to top
View user's profile Send private message
Anuj Dhawan

Superior Member


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

PostPosted: Fri Jul 13, 2012 6:58 pm
Reply with quote

It's tough to answer something meangful with what you've posted. Your first post says IMS abend U4049 while the latest post says:
Quote:
User completion code 3923

You're executing HD Reorganization Unload utility (DFSURGU0) to reorganize IMS full-function databases. The question is - is it first time you execute this at your shop?
Back to top
View user's profile Send private message
Peter Nancollis

New User


Joined: 15 Mar 2011
Posts: 47
Location: UK

PostPosted: Sat Jul 14, 2012 5:11 am
Reply with quote

Does you job have access to all the correct BMC libs ?
Back to top
View user's profile Send private message
Prakash J

New User


Joined: 23 May 2012
Posts: 14
Location: India

PostPosted: Sat Jul 14, 2012 6:45 pm
Reply with quote

Hi,

I am not sure about this. Just by looking at the dump, a guess.

In case, if you are increasing the segment length, please check the new length matches the total bytes specified in the DBD and the unload dataset LRECL ( it'll be variable blocked, so Total Bytes + 4 + increased Bytes).

Just wanted to let you know to check out. Thanks.

- Prakash
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> IMS DB/DC

 


Similar Topics
Topic Forum Replies
No new posts ISAM and abend S03B JCL & VSAM 10
No new posts Abend S0C4 11 (Page Translation Excep... PL/I & Assembler 16
No new posts WER999A - UNSUCCESSFUL SORT 8ED U Ab... SYNCSORT 5
No new posts the system or user abend SF0F R=NULL COBOL Programming 0
No new posts Need to get an DLI abend like U0200 IMS DB/DC 2
Search our Forums:

Back to Top