deduplicating on matching keys / remaining record sums field

Wilsy · New User Joined: 29 Dec 2007 Posts: 5 Location: UK

Here is a simplified example of what I need.
I have four records on aN INPUT file as follows

D155555000030000200001
D166666000040000800007
D155555000020000400005
D166666000090001200246

I need to merge the records on the first 7 characters but at the same time sum three fields in positions 8 for 5, 13 for 5 and 18 for 5.
The OUTPUT file would then look like this

D155555000050000600006
D166666000130002000253

Any help with the statements required to achieve this is much appreciated.
Wilsy

Frank Yaeger · Posted: Wed Apr 09, 2008 8:44 pm

Wilsy,

Here's a DFSORT job that will do what you asked for:

Wilsy · New User Joined: 29 Dec 2007 Posts: 5 Location: UK

Thanks Frank
I have downloaded the manuals. They are proving helpful with some other stuff I have to do. No "code changes" (except JCL) allowed at this stage of the project for some bizzare reason but I think you can do almost anything with these sorts. Very powerful software.