How to retain the Duplicates in the one records?

Answer Posted / kk

Hi,

Using sort Utilities,
some fields=None,xsum
//STEP010 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SORTIN DD DSN=TEST.XSUM.INPUT,DISP=SHR
//SORTOUT DD DSN=TEST.XSUM.OUTPUT,DISP=SHR
//SORTXSUM DD DSN=TEST.XSUM.OUTPUT.XSUM,DISP=SHR
//SYSIN DD *
SORT FIELDS=(2,10,CH,A)
SUM FIELDS=NONE,XSUM

Is This Answer Correct ?    15 Yes 4 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

Why is it necessary that file needs to be opened in I-O mode for REWRITE?

748


here is my requirement A1 is alphanumeric with value 'A1B2C3D4' as defined below 05 A1 PIC X(8) VALUE IS 'A1B2C3D4' but i need to have A2,A3 as ABCD & 1234 repectively...... A2 = ABCD A3 = 1234 Can you please explain me what are the different ways to do it?

6836


How do you reference the following file formats from cobol programs?

696


What is the difference between goback, stop run and exit program in cobol?

932


How to find out the closest prime number of an input number? I believe it has something to do with SEARCH and COBOL Linear Array.

3722






How do you define a variable of comp-1 and comp-2?

707


) what is the difference between AID and HANDLE AID?

1637


What is amode(24), amode(31), rmode(24) and rmode(any) (applicable to only mvsesa enterprise server) ?

678


What rules are followed by the search verb.

638


how can i see junk values in dclgen or in hostvariable of comp ?

2546


How to change size of Initial number of records to *NOMAX for ALL PF files from perticular library, how can I do that

2734


Explain how to differentiate call by context by comparing it to other calls?

689


Write some characteristics of cobol as means of business language.

621


Write a cobol program making use of the redefine clause.

739


)If there are 10 steps in GDG, if I want to refer the step2 after step5 . what should I do?

1525