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

how do u define a file in cobol and jcl ?

2 Answers   TCS,

If i have defined an temperory dataset in step2, how can i call back or use the same dataset in step5 of the same job

4 Answers   UST,

Do we need to code DCB parameters when using DISP position as MOD?

1 Answers   Accenture,

What is default if we don't specify RD parameter at all ?

1 Answers   IBM,

I found in one of the jcl, gdg version being mentioned as : abc.def.ghi(-0) Can anyone tell me how referring the version as (-0) is different from referring it as (0)

2 Answers  

describe the exec statement,its meaning ,syntax and keywords?

3 Answers  

Step 1 RC 4 Step 2 Step 3 I want to know the COND parameter which can be coded in step 2 or 3. Step 2 should be executed based on Step 1 RC and Step 3 should not be executed based on step 1's RC

0 Answers  

What is S322 abend ?

5 Answers  

what is the function of iebcompr?....is it compare record length or characteristics of a dataset?...pls explain with examples.......

2 Answers  

What is the function of job statement in jcl?

0 Answers  

what is pupose and meaning of the REGION keyword and what jcl statement is it associated with?

1 Answers  

Using DELETE what type of file can you delete? a)SEQUENTIAL FILE B)INDEXED FILE C) D) Some options were there..i cant remember

3 Answers   HSBC,