IBM Mainframe Forum

Hi All,

I have a task that sounds incredibly simple but I cannot get to work. I have 2 input files, FB, LRECL 80. They both have a composite key (1,8,A,17,9,A).

I have to merge these two files into a single output. In the event of a duplicate keys then only the input from file 2 should be written to output.

This card outputs the duplicates from file 2, but not the unmatched records. Any help or advice would be greatly appreciated



Thanks

Coded for you - please do it yourself next time

Hello,

Purely out of curiosity, have you tried 'MERGE FIELDS' coupled with a 'SUM FIELDS=NONE'; if I have understood the problem correctly, that should give you what you're looking for.
Can you please, also share some representational data for input/s and output.

Hi Aki,

Thanks for getting back to me. I have tried 'MERGE FIELDS' coupled with a 'SUM FIELDS=NONE' but it doesn't keep the required duplicates from the second output. As an example

F1:
xxxxxxx FUL_USER <--- Key matches first record in F2. This record should be discarded
xxxxxxx GD1_USER115304594FWA
yyyyyyy FUL_USER

F2:
xxxxxxx GBL_USER <--- Key matches first record in F1. This record should be kept
LLLLLLL GD1_USER115303234FWA
ZZZZZZ FUL_USER

Desired Output
xxxxxxx GBL_USER
xxxxxxx GD1_USER115304594FWA
yyyyyyy FUL_USER
LLLLLLL GD1_USER115303234FWA
ZZZZZZ FUL_USER

Hope this helps!

Hello,

Add EQUALS to it and see if it works for you; here is what I tried:

File 1:


File 2:


SYSIN:


When the IN1 DS is FILE-1, SORTOUT:



When the IN1 DS is FILE-2, SORTOUT:



Hope this helps.

Edit: Apologies for the tacky input records, cooked them while listening to some good ol' Blues.

These users thanked the author Aki88 for the post:

JohnDev (Thu Jul 14, 2016 7:57 pm)

Thanks Aki.

That did work, the only issue is that my inputs are unsorted so to use this approach I would need 2 sort steps before the merge. I can achieve what I need with 2 steps and a merge using joinkeys as well. Is there anyway to achieve this in one step?

Thanks again for your time and help

Hello,

I want to avoid that JOINKEYS
Okies, here goes nothing (my input DS were unsorted this time; I simply shuffled the records):

Input:


Using:


Gives:


Whereas, with:


Gives:


Hope this is what you're looking for.

Edit: This was tested on ICETOOL; so I guess SYNCTOOL should work for you; can you test it once please.

Aki,

That ran with no issue using SYNCTOOL and produced the required output. Thanks again for your quick replies and considered effort.