Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search 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
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
References
PostPosted: Fri Jun 10, 2005 1:54 pm    Post subject: Re: JCL Syntex reqd to get only duplicate records from a file Reply with quote

sangiah

Active 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

Active User


Joined: 14 Feb 2005
Posts: 89

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
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1