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

i have records from 1 t0 100 . i need to open records from 10 to 18 and change the values in tht ? how can i do tht ?

2 Answers   Syntel,

In your JCL, run the even numbered steps if date is even and run odd numbered steps if date is odd . Where do you generate the date ??in cobol or JCL ??

2 Answers   CSC,

How do you create a temporary dataset? Where will you use them?

2 Answers   IBM,

What are the parameter we cannot use in procedure? How many instream we can write in single jcl?

0 Answers  

Explain the function of dd disp parameter?

0 Answers  

Definition of COND parameter in JCL

5 Answers   TCS,

Explain COND used in JCL?

1 Answers   Patni,

How can an in-stream dataset be terminated?

0 Answers  

AM HAVING A FILE WHICH CONTAIN 12 DATS OUT OF WHICH 4 ARE DUPLICATES HOW TO REMOVE THE DUPLICATE FILES IN JCL? CAN I GET THE PROGRAM FOR THIS

3 Answers  

FOR a GDG, the book by 'SABA ZAMEER' says 'We can NOT ALTER the LIMIT parameter after it is defined'. (p-211). But many persons have written that it can be changed, which one is true ?

4 Answers   IBM,

in my jcl have 20 steps step1,step2,.... step20.and i have to execute step1,step2,..and skip the step3 and remaing step4,step5 are execute? i want skip step3 only? what code u can write?

3 Answers   Patni,

in ways data can be passed to a COBOL program from JCL?

0 Answers