Radoslaw Skorupka wrote (off-list):
Can we see the solution, sample records and what does he really wanted ?
Of course with all respect to original data privacy, etc.
I'll leave it to Howard to explain what he really wanted (I do know that he
wanted the record with 'L' in 21, not '*' in 21, for the C records that had
both), but here's a scrubbed version of the input records, the
DFSORT/ICETOOL job and the output records:
IN file:
AAAAAAAAAA00000000{ *EXXXXXX
AAAAAAAAAA00000000{ *QXXXXXX
AAAAAAAAAA00000000{ *NXXXXXX
BBBBBBBBBB00000000{ *EXXXXXX
BBBBBBBBBB00000000{ *QXXXXXX
BBBBBBBBBB00000000{ *NXXXXXX
CCCCCCCCCC00000000{ *EXXXXXX
CCCCCCCCCC00000000{ *QXXXXXX
CCCCCCCCCC00000000{ LNXXXXXX
CCCCCCCCCC00000000{ *EXXXXXX
CCCCCCCCCC00000000{ *QXXXXXX
CCCCCCCCCC00000000{ *NXXXXXX
CCCCCCCCCC00000000{ *EXXXXXX
CCCCCCCCCC00000000{ *QXXXXXX
CCCCCCCCCC00000000{ LNXXXXXX
CCCCCCCCCC00000000{ *EXXXXXX
CCCCCCCCCC00000000{ *QXXXXXX
CCCCCCCCCC00000000{ *NXXXXXX
CCCCCCCCCC00000000{ *EXXXXXX
CCCCCCCCCC00000000{ *QXXXXXX
CCCCCCCCCC00000000{ LNXXXXXX
DFSORT/ICETOOL job:
//LLIA#3 EXEC PGM=ICETOOL **** SORT & ELIMINATE DUPLICATES
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN DD DSN=... input file
//OUT DD DSN=... output file
//TOOLIN DD *
SELECT FROM(IN) TO(OUT) ON(1,10,CH) ON(22,1,CH) LAST -
USING(CTL1)
/*
//CTL1CNTL DD *
SORT FIELDS=(1,10,CH,A,22,1,CH,A,21,1,CH,A)
/*
OUT file:
AAAAAAAAAA00000000{ *EXXXXXX
AAAAAAAAAA00000000{ *NXXXXXX
AAAAAAAAAA00000000{ *QXXXXXX
BBBBBBBBBB00000000{ *EXXXXXX
BBBBBBBBBB00000000{ *NXXXXXX
BBBBBBBBBB00000000{ *QXXXXXX
CCCCCCCCCC00000000{ *EXXXXXX
CCCCCCCCCC00000000{ LNXXXXXX
CCCCCCCCCC00000000{ *QXXXXXX
Frank Yaeger - DFSORT Team (IBM)
Specialties: ICETOOL, IFTHEN, OVERLAY, Symbols, Migration
=> DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort/
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
