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
 

 

JCL Syntex reqd to get only duplicate records from a file

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
Tarun Deep
Warnings : 1

New User


Joined: 10 Jun 2005
Posts: 10
Location: Hyderabad, India

PostPosted: Fri Jun 10, 2005 1:54 pm    Post subject: JCL Syntex reqd to get only duplicate records from a file
Reply with quote

Hi All
Please help me by providing the solution to the following problem.

My Input file looks like this -

AAA RECORD 1
BBB RECORD 1
BBB RECORD 2
CCC RECORD 1
DDD RECORD 1
DDD RECORD 2
DDD RECORD 3
DDD RECORD 4
EEE RECORD 1
FFF RECORD 1
GGG RECORD 1

Output file should contain only the duplicate records as following :

BBB RECORD 1
BBB RECORD 2
DDD RECORD 1
DDD RECORD 2
DDD RECORD 3
DDD RECORD 4

i.e. - I do not want those records in output file which have single entries in input file.

Please provide the syntax for this at the earliest.
Thanks in advance icon_smile.gif

Tarun
Back to top
View user's profile Send private message

sangiah

New User


Joined: 10 Jun 2005
Posts: 62

PostPosted: Fri Jun 10, 2005 2:22 pm    Post subject:
Reply with quote

you may check ICETOOL
Back to top
View user's profile Send private message
Alain Benveniste

New User


Joined: 14 Feb 2005
Posts: 88

PostPosted: Fri Jun 10, 2005 2:22 pm    Post subject: Re: JCL Syntex reqd to get only duplicate records from a fil
Reply with quote

Tarun,
Here is a DFSORT/ICETOOL job that does want you want
Code:

//STEP0001 EXEC PGM=ICETOOL                 
//DFSMSG   DD SYSOUT=*                       
//TOOLMSG  DD SYSOUT=*                       
//TOOLIN   DD *                             
  SELECT FROM(IN) TO(OUTX) ON(1,3,CH) ALLDUPS
/*   
//OUTX DD DSN=...   output file                                       
//IN       DD *                             
AAA RECORD 1                                 
BBB RECORD 1                                 
BBB RECORD 2                                 
CCC RECORD 1                                 
DDD RECORD 1                                 
DDD RECORD 2                                 
DDD RECORD 3                                 
DDD RECORD 4                                 
EEE RECORD 1                                 
FFF RECORD 1                                 
GGG RECORD 1                                 
/*

Alain
Back to top
View user's profile Send private message
Tarun Deep
Warnings : 1

New User


Joined: 10 Jun 2005
Posts: 10
Location: Hyderabad, India

PostPosted: Fri Jun 10, 2005 2:47 pm    Post subject: Re: JCL Syntex reqd to get only duplicate records from a fil
Reply with quote

Thanks a lot Alain !!
It worked absolutely fine. icon_biggrin.gif
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 -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts SORTJOIN - Copy Matched and Unmatched... Steve Ironmonger DFSORT/ICETOOL 5 Tue Jan 17, 2017 4:26 pm
No new posts Copy RECFM =VB TO FB file with RECL =... sahil41352 DFSORT/ICETOOL 3 Wed Dec 28, 2016 11:29 pm
No new posts Removing Duplicates based on certain ... chandracdac DFSORT/ICETOOL 8 Fri Dec 09, 2016 4:40 am
No new posts Add PD field from 2nd file to PD in 1st Sushant Garje DFSORT/ICETOOL 6 Thu Dec 01, 2016 4:32 pm
No new posts File Aid to File Manager conversion murali3955 IBM Tools 4 Thu Nov 24, 2016 3:41 pm


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