Gentlemen,
Thank you for your help. JOIN is the function I know less than other
features. Time to change it, since it is good thing.
I'll look at Smart DFSORT Tricks, especially I'm also author of one of
them. ;-)
(it was ~20 years ago, Frank Yeager asked me for that trick, nothing
big, just
>>I see it is candidate for REXX script, but DFSORT job seems to be more
elegant.
Radoslaw Skorupka,
As Max already shown DFSORT does have an elegant file matching capability
using JOINKEYS. Please check the smart DFSORT trick "Create files with
matching and non-matching records" which is
You can use JOIN function of DFSORT:
//ST100EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//FILE1 DD *
DSNAME01
DSNAME09
DSNAME02
DSNAME27
DSNAME04
/*
//FILE2 DD *
DSNAME09
DSNAME04
/*
//SORTOUT DD SYSOUT=*
//SYSIN DD *
JOINKEYS F1=FILE1,FIELDS=(1,44,A)
JOINKEYS F2=FILE2,FIELDS=(1,44,A)
JOIN
If you want to do it DFSORT, I think you'll have to use ICETOOL with the
SPLICE option.
Joe
On Thu, Jul 23, 2020 at 3:11 AM R.S. wrote:
> I have the following case:
>
> Large (thousands) list containing filenames,
> filea10002
> fileb10041
> filec20043
> filed39093
> longfileabc
> anotherfile
I have the following case:
Large (thousands) list containing filenames,
filea10002
fileb10041
filec20043
filed39093
longfileabc
anotherfile
...
and small (dozens) list of filename "exlusions"
longfileabc
fileb10041
...
Short list is subset of long list. All files has fixed lentgh name, no