Sorting two files and writing in to three output files

raak

Hi,

I have a requirement in which I have 2 files, let's say FileA and FileB.

Consider it like this.

FileA
key01 100
key02 200
key03 300

FileB
key01 100
key02 250
key04 400

Both the Input files will be in the sorted order of their Key(First 5 bytes).
Input files are of LRECL 80.

I want
1) The records in FileA and FileB which has same key and different amounts in one file.
2) The records which are there in only fileA(Based on key) in second output file.
3) The records which are there only in FileB(Based on key) in third output file.

All those records which has same key and amount in both the files should not come in any of these output files.
So in the above shown example, my output should be

OUTPUT1
Key02 200 (amount value taken from 1st file)

OUTPUT2
key03 300

OUTPUT3
key04 400

And since the record 'key01 100' is coming in both files, it should be skipped.

I searched for some similar requirement in the earlier posts, but coulnot lay my hands on any..

muthuvel

Is it a must that the three files should be produced only by sort?If it is easytrieve or COBOL i believe things will be simple .

raak · Posted: Fri Mar 30, 2007 1:33 pm Post subject:

hey

I want it using Sort only. Using Cobol i can code a program, but my concern is if the input file contains millions of records, then it might cause perfomance degradation for Cobol.
I think Sort will be faster in that case.. ( I THINK

)

anyway i need a sort step to do this part if possible..

any help ???????

expat · Posted: Fri Mar 30, 2007 1:36 pm Post subject:

Which sort product are you using ?

I have done some things remotely similar using DFSORT.

raak · Posted: Fri Mar 30, 2007 1:41 pm Post subject:

Can u explain on that Expat... am using DFSORT ...

expat · Posted: Fri Mar 30, 2007 1:50 pm Post subject:

Hi Raak,

here's the url for the ICETOOL utility, and I will try and find an example of the code that will help you. No doubt Frank will give you something far more efficient than mine, but if it help .........

http://www-304.ibm.com/jct01004c/systems/support/storage/software/sort/mvs/icetool/index.html

expat · Posted: Fri Mar 30, 2007 2:03 pm Post subject:

expat · Posted: Fri Mar 30, 2007 2:13 pm Post subject:

Sorry, I forgot to add that you can create all three output files in one job step.

I have the luxury of having specific record types to work with to make record selection easier, but if you have nothing like that in your files you may have to reformat them with "A" in a specific column for FILEA, "B" for records from FILEB, etc. etc.

I'm not the greatest user of ICETOOL and it is really great for things like this, and I'm sure that Frank will far more helpful with this utility than I ever can.

Good luck.

raak · Posted: Fri Mar 30, 2007 3:12 pm Post subject:

Hi

Expat, thanks for ur immediate responses.....

let me ask u a doubt.

Using the code given above, the first SELECT will eliminate ALL the duplicate records from the input files.

using the COPY i can then split this file into two based on their presence in 1st file or 2nd file.
My question is, how can i identify a key which is present in both the files but with different amounts.. ( like the KEY02 in my example)
I want to write such records in to another file..

expat · Posted: Fri Mar 30, 2007 3:38 pm Post subject:

Yes, I think that the code will remove all of the duplicates which will give you your OUTPUT 1.

If there is no way of telling from which file the records have come from, you may have to reformat the records before processing them.

Some thing silly like F1 in columns 1+2 for file 1 records and F2 for file 2 records. And after you have processed them to reformat by removing the F1 & F2 inserts.

I sort of get the feeling I'm confusing you more than helping here

Alain Benveniste · Active User Joined: 14 Feb 2005 Posts: 90

raak,

Do you have duplicates in file 1 & 2 ?

Alain

GlobalGyan · New User Joined: 31 Jan 2006 Posts: 17

I did something like this some time back...

I dont have the ICETOOL CNTL ... but then I coded a COBOL program for this, the code executed 50% faster than SORT ... maybe that time I did not ask Frank ;-).

raak · Posted: Fri Mar 30, 2007 8:46 pm Post subject:

Hi Alain,

I don't have any duplicates in my file 1 or 2..

Any updates???

Frank Yaeger · Posted: Fri Mar 30, 2007 9:39 pm Post subject:

Raak,

Here's a DFSORT/ICETOOL job that will do what you asked for. I assumed your amount field was 3 digits in positions 7-9. - if that's not the case, then the job can be changed appropriately.

Rahulbhutkar · New User Joined: 30 Mar 2007 Posts: 1 Location: mumbai

Hi Frank,

I am very new to mainframe & learning sort. If u could explain me splice and control card 1 & 2 it would be gr8 on my side.

Thanks,
Rahul