Syncsort copy n records based on field of 1t record

GSaikrishna · New User Joined: 24 May 2008 Posts: 13 Location: India

Hi all,

I have a requirement where I need to sort group of record based on field of 1st record only.

Skolusu · Posted: Tue Mar 30, 2010 11:57 pm

GSaikrishna,

check out the Smart DFSORT trick "Include or omit groups of records/Sort groups of records" here

www.ibm.com/support/docview.wss?rs=114&uid=isg3T7000094

GSaikrishna · New User Joined: 24 May 2008 Posts: 13 Location: India

Sorry Skolusu..

My requirement was not there in sorttrk pdf.

Among series of 5 records

based on 1st record field we need to sort
such that all other 4 records also should be copied along with 1st record.

Is that possible using dfsort/icetool ?

Thanks

dick scherrer · Posted: Wed Mar 31, 2010 2:27 am

Hello,

Skolusu · Posted: Wed Mar 31, 2010 3:09 am

GSaikrishna,

Did you even look at the example in the Sort trick document? You provide very little information. Show us in detail , how the first record is identified and which field from the 1st record needs to be used to sort the group of records. What is the LRECL/RECFM of the input and output files?

Frank Yaeger · Posted: Wed Mar 31, 2010 3:25 am

GSaikrishna,

Also, tell us how the A1 records fit in. They don't seem to be part of the 5 record groups so how are they to be sorted vs those groups?

GSaikrishna · New User Joined: 24 May 2008 Posts: 13 Location: India

My file is group of cashletter.

A1 is like header for a each cashletter.

All records followed by A1 till next A1 is a bundle.

Record B* followed by field is header for bundle. field is the one which I need to sort.

For each cashletter they can be many bundles.

My file is a VB file record length is 500.

Thanks.

Skolusu · Posted: Wed Mar 31, 2010 9:48 pm

GSaikrishna,

with little information you provided, here is a DFSORT JCL which will give you the desired results. I assumed that A1 record is just a header and it has nothing else on that record and we can create it by using a Header3

I also assumed that the field you want to Sort is at pos 13( inclusive of RDW) for a length of 6 bytes . The record B has 'x' at position 7 (inclusive of RDW) which has the field to be sorted

GSaikrishna · New User Joined: 24 May 2008 Posts: 13 Location: India

Thanks so much Skolusu.

Sorry for not making clear for you

Skolusu · Posted: Thu Apr 01, 2010 1:59 am

GSaikrishna · New User Joined: 24 May 2008 Posts: 13 Location: India

"********* end of 2nd cashletter in input********* is just a comment you can understand. Its not in the file..

AnYYYY/MM/DD000

in A reocrd A is common always

n is number ranging 1 to 5 ( mon to friday )

n = 2 is for tuesday, it varies for day

YYYY/MM/DD is the date

Yes 15 bytes is only data for header of each cashletter

25sai is the record having 12 digit number and it is header of bundle for every cash letter

following 4 records after 25sai are 1 bundle..

I am trying it to do in easytrieve and I am finding problem there also.

Is it possible to close and open a file in easytrieve ?

Thanks

Skolusu · Posted: Thu Apr 01, 2010 2:54 am

GSaikrishna,

The following DFSORT JCL will give you the desired results.

dick scherrer · Posted: Thu Apr 01, 2010 3:26 am

Hello,

With Easytrieve, COBOL, Assembler or any other programming language it is nearly always wrong to open and close files over and over.

Organizations that review code before turnover/promotion to Production will reject such code.

As SKolusu mentions, you are making this far too difficult (unless, we still do not understand the issue). . .

GSaikrishna · New User Joined: 24 May 2008 Posts: 13 Location: India

I tried by extracting all 25sai records into a file in sort order and started framing the output file by easytrieve or cobol in what ever i needed format

My requirement in simple to say is

25sai record followed by 4 records will be a group. or set ( total 5 records )

my sort key is only in 25sai record which is 12 digit number.

I need to copy group of 25sai set into output based on 12 digit number.

here if I have A record before 25sai record , i need to copy it along with my set ( 6 records= 1 A record + 1 25sai record + 4 records set )

else only ( 25sai record + 4 records ) which will be 5 records.

I know I am irritating with my requests.

Thanks,
Sai

Skolusu · Posted: Mon Apr 05, 2010 8:40 pm

GSaikrishna,

Did you try running the job I provided ?

GSaikrishna · New User Joined: 24 May 2008 Posts: 13 Location: India

I have run your job but it throwed me syntax error.

I was using syncsort older version and it could nt have new features when=group work in my LPAR.

Thanks,
Sai

Frank Yaeger · Posted: Wed Apr 07, 2010 1:42 am

Why did you post in the DFSORT Forum if you are using Syncsort?????

I'm locking this thread. Please post in the appropriate Forum in the future instead of wasting peoples' time!