to merge 2 records of the input file using SORT

kanna · Post by **kanna** » Fri Jan 30, 2009 3:50 pm

Hi ,
I am trying to concatenate the 2nd record of the input file to the first record.Ex:
Input records:
A1 ubi123445576667
A2 dcfregtttg0000000
A1 abggteghy888888
A2 reftehdys1111111

Expected Output is:
A1 ubi123445576667 A2 dcfregtttg0000000
A1 abggteghy888888 A2 reftehdys1111111

Both the records are present in the same file. That is the problem.

Can this be achieved using sort? Can somebody help me in this?

kanna · Post by **kanna** » Fri Jan 30, 2009 4:05 pm

I know that it can be achieved by split and merge. My question is, can we achieve this in 1 sort step?

arrbee · Post by **arrbee** » Fri Jan 30, 2009 7:46 pm

Hi,

What is the RECFM & LRECL of your file?

Thanks.

Frank Yaeger · Post by **Frank Yaeger** » Fri Jan 30, 2009 8:43 pm

Kanna,

You can use a DFSORT job like the following to do what you asked for:

Code: Select all

//S1    EXEC  PGM=ICEMAN
//SYSOUT    DD  SYSOUT=*
//SORTIN DD *
A1 ubi123445576667
A2 dcfregtttg0000000
A1 abggteghy888888
A2 reftehdys1111111
/*
//SORTOUT DD SYSOUT=*
//SYSIN    DD    *
  OPTION COPY
  INREC IFTHEN=&#40;WHEN=INIT,BUILD=&#40;20&#58;1,20&#41;&#41;,
        IFTHEN=&#40;WHEN=GROUP,RECORDS=2,PUSH=&#40;1&#58;20,18&#41;&#41;
  OUTFIL STARTREC=2,SAMPLE=2
/*

kanna · Post by **kanna** » Mon Feb 02, 2009 9:39 am

Thanks Frank yeager! But how could i achieve the same in syncsort?

Frank Yaeger · Post by **Frank Yaeger** » Mon Feb 02, 2009 9:21 pm

I'm a DFSORT developer. DFSORT and Syncsort are competitive products. I'm happy to answer questions on DFSORT and DFSORT's ICETOOL, but I don't answer questions on Syncsort.

kanna · Post by **kanna** » Tue Feb 03, 2009 8:24 am

Thanks Frank!

Anuj Dhawan · Post by **Anuj Dhawan** » Tue Feb 03, 2009 1:29 pm

kanna wrote:how could i achieve the same in syncsort?

You may try the given JCL as is by replacing PGM=ICEMAN to PGM=SORT.

Frank Yaeger · Post by **Frank Yaeger** » Tue Feb 03, 2009 9:37 pm

Anuj,

PGM=ICEMAN and PGM=SORT are equivalent for both products. There's no need to do that replacement. If the job won't work on Syncsort with PGM=ICEMAN, then it won't work with PGM=SORT.

Anuj Dhawan · Post by **Anuj Dhawan** » Wed Feb 04, 2009 12:36 pm

Yes Big B,

I understand this & follow you - but I've seen (met even) some "idiots" who are beaten by the word "ICEXXXX" where XXXX can be MAN, TOOL..this philosphy of them I never understand..and that's why my previous reply comes in.

Frank Yaeger · Post by **Frank Yaeger** » Wed Feb 04, 2009 8:14 pm

Yes, I understand. But if you're going to suggest they try PGM=SORT instead of PGM=ICEMAN, you should indicate there's no difference between the two rather then imply there is.

Anuj Dhawan · Post by **Anuj Dhawan** » Thu Feb 05, 2009 10:12 am

Taken your words Big B, will keep these in mind for future suggestions, Thanks.

Have a good one..

Ad

Frank Yaeger · Post by **Frank Yaeger** » Fri Feb 06, 2009 3:53 am

Big B?

Anuj Dhawan · Post by **Anuj Dhawan** » Fri Feb 06, 2009 10:08 am

oh ..Big B= Big Brother= Elder Brother..

hope it's not a bother ..I use this salutation affectionately for those who I respect ..

.

Regards,
Ad

Frank Yaeger · Post by **Frank Yaeger** » Fri Feb 06, 2009 9:04 pm

Oh, it's not a bother. I just hadn't heard the term before so was curious what it meant.

mainframegurukul.com