I have the following JCL which is producing 1 record for each of the matching lines, as I want.
However, I am struggling to understand if it is possible to produce a seperate file of the unmatched items, I know this can be done with 2 input files, but can it be done with just one? Thanks.
//SPLICE03 EXEC PGM=ICETOOL,COND=(0,NE)
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//INFILE1 DD DSN=DEA.........
//OUT2 DD DSN=DEA.........
// DISP=(NEW,CATLG,DELETE),
// SPACE=(CYL,(100,50),RLSE)
//TOOLIN DD *
SPLICE FROM(INFILE1) TO(OUT2) ON(5,37,CH) WITH(103,4) -
WITHALL KEEPNODUPS USING(CTL1)
/*
//CTL1CNTL DD *
OUTFIL FNAMES=OUT2,
OUTREC=(5,102)
//*
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//INFILE1 DD DSN=DEA.........
//OUT2 DD DSN=DEA.........
// DISP=(NEW,CATLG,DELETE),
// SPACE=(CYL,(100,50),RLSE)
//TOOLIN DD *
SPLICE FROM(INFILE1) TO(OUT2) ON(5,37,CH) WITH(103,4) -
WITHALL KEEPNODUPS USING(CTL1)
/*
//CTL1CNTL DD *
OUTFIL FNAMES=OUT2,
OUTREC=(5,102)
//*
