|
View previous topic :: View next topic
|
| Author |
Message |
Annie Mary George
New User

Joined: 23 Jan 2014 Posts: 6 Location: india
|
|
|
|
Hi,
I hve used pgm=icetool ,sortcard with one keyfield (112,19,CH),but i need to do for two more fields (70,6,CH)and (78,6,PD) within same sortcard,which stores the duplicates and nonduplicates records in separate dataset . The below code works properly for onefield how to do for threefields. Give some sample
| Code: |
//STEP001 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=INPUT.FILE1,
// DISP=SHR
//NODUPES DD DSN=OUTPUT.NODUP,
// DISP=SHR
//DUPES DD DSN=OUTPUT.DUP,
// DISP=SHR
//TOOLIN DD *
SELECT FROM(SORTIN) TO(NODUPES) -
ON(112,19,CH) NODUPS
SELECT FROM(SORTIN) TO(DUPES) -
ON(112,19,CH) ALLDUPS
/*
|
|
|
| Back to top |
|
 |
Terry Heinze
JCL Moderator
Joined: 14 Jul 2008 Posts: 1248 Location: Richfield, MN, USA
|
|
|
|
| Code: |
//STEP001 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=INPUT.FILE1,
// DISP=SHR
//NODUPES DD DSN=OUTPUT.NODUP,
// DISP=SHR
//DUPES DD DSN=OUTPUT.DUP,
// DISP=SHR
//TOOLIN DD *
SELECT FROM(SORTIN) TO(NODUPES) -
ON(112,19,CH) NODUPS
SELECT FROM(SORTIN) TO(DUPES) -
ON(112,19,CH) ALLDUPS
/* |
Hit Code* after pasting your code to get the ending [/code]. |
|
| Back to top |
|
 |
Skolusu
Senior Member
Joined: 07 Dec 2007 Posts: 2205 Location: San Jose
|
|
|
|
Annie Mary George,
I am not sure as to why you need 2 passes to split the unique and duplicate records. It can all be done in a single pass with DISCARD parameter. You just need to use a separate ON statement for every field you want to validate.
Ex:
| Code: |
//TOOLIN DD *
SELECT FROM(SORTIN) TO(NODUPES) NODUPS DISCARD(DUPES) -
ON(112,19,CH) ON(70,6,CH) ON(78,6,PD)
//* |
|
|
| Back to top |
|
 |
Annie Mary George
New User

Joined: 23 Jan 2014 Posts: 6 Location: india
|
|
|
|
Hey thanks
its working |
|
| Back to top |
|
 |
|
|
 |
All times are GMT + 6 Hours |
|