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

Need help on DB2 Reorg with DISCARD option


IBM Mainframe Forums -> DB2
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
honeykun

New User


Joined: 16 Apr 2007
Posts: 3
Location: philippines

PostPosted: Thu Jun 18, 2009 11:20 am
Reply with quote

Hi folks,

I am having problems with my JCL that runs a DB2 Reorg with Discard option. Below is the code:

//STEP010 EXEC PGM=DSNUTILB,
// PARM=(TDB2,'REORG'),
// REGION=0M
//STEPLIB DD DISP=SHR,DSN=SYS3.DB2.BMCTOOLS.SY2.LOAD
// DD DISP=SHR,DSN=TDB2.DSNEXIT
// DD DISP=SHR,DSN=TDB2.DSNLOAD
//ABNLIGNR DD DUMMY
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
REORG TABLESPACE TSG.TSSAMP
LOG NO
SORTDATA
SORTKEYS
SORTDEVT WORK
SORTNUM 12
COPYDDN (SYSCOPY)
DISCARDDN (SYSDISC)
SHRLEVEL REFERENCE
UNLOAD CONTINUE
DISCARD FROM TABLE TSG.TBSAMP
WHEN TB_DATE < CURRENT_DATE - 2 YEAR
STATISTICS
TABLE (ALL)
INDEX (ALL)
KEYCARD
FREQVAL
NUMCOLS 4
COUNT 10
//*

I tried using
DISCARD FROM TABLE TSG.TBSAMP
WHEN TB_DATE < CURRENT_DATE - 2 YEAR

and

DISCARD FROM TABLE TSG.TBSAMP
WHEN TB_DATE < CURRENT DATE - 2 YEAR

But I am getting an error:
DSNU049I DSNUGPRS - INVALID OPERAND 'CURRENT_DATE' FOR KEYWORD 'FROM'

and
DSNU049I DSNUGPRS - INVALID OPERAND 'CURRENT' FOR KEYWORD 'FROM'

Hope you could help me sort this out! Thanks in advance!
Back to top
View user's profile Send private message
sushanth bobby

Senior Member


Joined: 29 Jul 2008
Posts: 1020
Location: India

PostPosted: Thu Jun 18, 2009 10:08 pm
Reply with quote

HoneyHun,

Where is DD statement for SYSDISC.
Check out DB2 V9.1 utility guide & Reference there is an example in PG 530.

Thank You,
Sushanth
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 -> DB2

 


Similar Topics
Topic Forum Replies
No new posts Reorg abended with REASON=X'00E40347' DB2 2
No new posts SCOPE PENDING option -check data DB2 2
No new posts OUTFIL with SAVE option DFSORT/ICETOOL 7
No new posts CICS vs LE: STORAGE option CICS 0
No new posts INSYNC option with same function as I... JCL & VSAM 0
Search our Forums:

Back to Top