Answer / harsha

it will copy eliminated duplicates in to another file

Answer / pradeep

XSUM is just to store the bypassed data during a SORT JCL.

For example see the below given JCL,
//STEPSORT EXEC PGM=SORT
//SORTIN DD DISP=SHR,DSN=XXX.PV.SUMIN.SAMF
//SORTOF01 DD DISP=SHR,DSN=XXX.PV.SUMOUT.SAMF
//SORTXSUM DD DSN=XXX.PV.DUPLIC.SAMF,
// DISP=(NEW,CATLG,DELETE),UNIT=SYSDA,
// SPACE=(TRK,(50,50),RLSE),
// DCB=(RECFM=FB,LRECL=60,BLKSIZE=0)
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=(1,1,CH,A)
OUTFIL FILES=01,INCLUDE=(6,6,CH,EQ,C' ')
SUM FIELDS=NONE,XSUM
/*

Answer / uma

Hi friends,
I need some clarification regarding sorting.
//S010 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SORTIN DD DSN=MSI1390.TEST.INFILE,DISP=SHR
//SORTOUT DD DSN=MSI1390.TEST.OUTFILE1,DISP=SHR
//SORTXSUM DD DSN=MSI1390.TEST.OUTFILE2,DISP=SHR
//SYSIN DD *
SORT FIELDS=(2,10,CH,A)
SUM FIELDS=NONE,XSUM
/*
by using the above code, am facing the error message :
"ICE172A E XSUM IS NOT SUPPORTED - USE ICETOOL SELECT IF
APPROPRIATE"

Now i want the unique records in SORTOUT and the eliminated
duplicates in SORTXSUM...How can i do this?
also...we dont know the difference b/w DFSORT and
SYNCSORT...how and when to use SYNCSORT
Please suggest

Answer / pradeep

the error "ICE172A" says that the SORT Tool used by your
shop is ICETOOL and so the SYNCSORT tool options cannot be
used in this case. If you would like to confirm what is the
sort tool that your shop is using, try to do a Quick ref
(eg: QW SORT) at the command line and find which is the
tool that is installed. Also, you can achive similar
results by using the NODUPS options with ICETOOL. There is
a difference b/w NODUPS and SUM FIELDS=NONE. NODUPS will
eliminate all the related duplicate records along with its
first occurrence, but, in SYNCSORT, the first occurence of
the duplicate record will not be removed from the main
input file.
Hope this answers!!

Answer / murali

DFSORT does not support the XSUM parameter provided by a
competitive sort
product to write records deleted by SUM processing to a
SORTXSUM DD data
set. However, ICETOOL’s SELECT operator can perform the same
function as
XSUM with FIELDS=NONE. For example, this ICETOOL job:


u can use by this way

//S1EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//SORTIN DD DSN=...
SUM Control Statement
//SORTOUT DD DSN=...
//SORTXSUM DD DSN=...
//TOOLIN DD *
SELECT FROM(SORTIN) TO(SORTOUT)-
ON(5,4,CH) FIRST DISCARD(SORTXSUM)
/*

Answer / uma

Thankyou pradeep.
can any one please provide me some details about ICETOOL
and its Usage...also any working code or some study
material.

Answer / sethu

Pls refer the link
http://www.geocities.com/srcsinc/drona/programming/languages
/jcl/jcl.sort.html

What is the difference between the JOBLIB and the STEPLIB statements?

3 Answers  

how you will define a temporary dataset in jcl?

1 Answers   IBM,

How do you restart a step in JCL?

12 Answers   HSBC,

what is the purpose of coding notify parameter in job statement?

0 Answers   IBM,

I have 3 duplicate records in a file . I want to eliminate 1st, 2nd and copy 3rd one only . HOW ?

3 Answers   CTS, DELL,

HOW TO CONVERT VARIABLE BLOCK TO FIXED BLOCK ?

1 Answers   IBM,

How to copy VSAM files without using REPRO

3 Answers   ADP,

what is the purpose of SYSOUT parameter in the DD statement?

1 Answers  

what are the types of abends that occur on job failure? And explain the possible causes of these

0 Answers  

How to view the hexa decimal value thru file aid if copy book is not present for that particular data

1 Answers  

What 3 guidelines do we have to follow when concatenating DD statements?

3 Answers  

how to identify the file used in the JCL is an VSAM file. Just seeing the JCL code how can we track the file as VSAM file?

6 Answers   CSC,