Thanks for Kolusu and Massimo's help
We used the following JCL to filter 'CHECK' and 'ERROR' keywords.
It is fine.
Is there an easy way to filter many keywords if we have many keywords?
For example: Can we put these keywords in a dataset?
Thanks a lot!
Jason Cai
---------------------------------------------------------------
OPTION VLSCMP
INREC IFTHEN=(WHEN=GROUP,
BEGIN=(21,5,CH,GT,C' '), $ IF DATE IS > ' '
PUSH=(140:ID=9))
SORT FIELDS=COPY
OUTFIL FNAMES=SORTOUT
OUTFIL FNAMES=CHECK,INCLUDE=(1,137,SS,EQ,C'CHECK')
OUTFIL FNAMES=ERROR,INCLUDE=(1,137,SS,EQ,C'ERROR')
copy ERROR and CHECK output to ERRORA
//ST005 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//ERROR DD DSN=IBMUSER.LOG.ERRORA,DISP=SHR
//ALL DD DSN=IBMUSER.LOG.ALL,DISP=SHR
//SORTOUT DD DSN=IBMUSER.LOG.OK,
// DISP=(,CATLG),
// SPACE=(TRK,(300,300))
//SYSIN DD *
JOINKEYS F1=ERROR,FIELDS=(140,9,A),SORTED
JOINKEYS F2=ALL,FIELDS=(140,9,A),SORTED
REFORMAT FIELDS=(F2:1,137,F2:140,9)
SORT FIELDS=COPY
/*
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
