> Using ICETOOL I am able to group message that begin with BIP2977I
> from the SYSLOG. Now that I have the groups of BIP2977I messages,
> I would only like to keep only a group that contains ".NAI":
Ben,
You can use the trick of Joinkeys to match the file to itself . Try this
untested example.
//STEP0100 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//INA DD DISP=SHR,DSN=OPS.SYSLOG.WEEKLY(0)
//INB DD DISP=SHR,DSN=OPS.SYSLOG.WEEKLY(0)
//SORTOUT DD SYSOUT=*
//SYSIN DD *
OPTION COPY
JOINKEYS F1=INA,FIELDS=(154,9,A),SORTED,NOSEQCK
JOINKEYS F2=INB,FIELDS=(154,9,A),SORTED,NOSEQCK
REFORMAT FIELDS=(F1:1,150)
/*
//JNF1CNTL DD *
OPTION VLSHRT
INREC IFTHEN=(WHEN=GROUP,RECORDS=4,
BEGIN=(64,9,CH,EQ,C'+BIP2977I'),
PUSH=(154:ID=8)),
IFTHEN=(WHEN=(154,1,CH,GT,C' '),
OVERLAY=(162:C'P'))
/*
//JNF2CNTL DD *
OPTION VLSHRT
INREC IFTHEN=(WHEN=GROUP,RECORDS=4,
BEGIN=(64,9,CH,EQ,C'+BIP2977I'),
PUSH=(154:ID=8)),
IFTHEN=(WHEN=(154,1,CH,GT,C' ',AND,
001,150,SS,EQ,C'.NAI'),
OVERLAY=(162:C'P'))
/*
Thanks,
Kolusu
DFSORT Development
IBM Corporation
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
