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

Removing Duplicates using ICETOOL


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
l.nethaji

New User


Joined: 16 Mar 2008
Posts: 90
Location: tamil nadu

PostPosted: Thu Jan 21, 2010 7:18 pm
Reply with quote

Hi ,

Can anyone help me with this. i need to remove the duplicates in my file based on the fields from (1 to 33 and 44 to 52) . I ran the below jcl but it was not successful.
Code:

//STEP1   EXEC PGM=ICETOOL                           
//TOOLMSG  DD  SYSOUT=*                               
//DFSMSG   DD  SYSOUT=*                               
//SORTIN   DD  DSN=DPRACE.D372988.TESTING,DISP=SHR   
//SORTOUT  DD  DSN=DPRACE.D372988.TESTING.OUT3,       
//             DISP=(,CATLG,DELETE),               
//             SPACE=(CYL,(120,100),RLSE),           
//             AVGREC=K           
//SORTXSUM DD  DSN=DPRACE.D372988.TESTING.XSUM3,     
//             DISP=(,CATLG,DELETE),               
//             SPACE=(CYL,(120,100),RLSE),           
//             AVGREC=K           
//TOOLIN    DD *                                     
  SELECT FROM(SORTIN) TO(SORTOUT)-                   
  ON(1,33,44,8)  FIRST DISCARD(SORTXSUM)             
/*                             

Thanks,
Nethaji
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Thu Jan 21, 2010 10:02 pm
Reply with quote

Hello,

You need to post the diagnostic info generated by the run. Include all of the message id's and text.
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA

PostPosted: Thu Jan 21, 2010 11:02 pm
Reply with quote

Well, for one thing, your syntax is wrong. It should be:

Code:

  SELECT FROM(SORTIN) TO(SORTOUT)-                   
  ON(1,33,CH) ON(44,9,CH)  FIRST DISCARD(SORTXSUM)


Note that you need a separate ON field for each key, and positions 44 to 52 have a length of 9, not 8.

If that doesn't give you what you want, then give more details of what you're trying to do including an example of the records in your input file and what you expect for output and the RECFM and LRECL of the input file.
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 -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts Shift left VB record without x00 endi... DFSORT/ICETOOL 11
No new posts how to calculate SUM value for VB fil... DFSORT/ICETOOL 1
No new posts how to calculate SUM for VB file usin... JCL & VSAM 1
No new posts Null values are considered in Total c... DFSORT/ICETOOL 6
No new posts ICETOOL to Read records SMF CEF it is... DFSORT/ICETOOL 4
Search our Forums:

Back to Top