mauvis
New User
Joined: 27 Jul 2007 Posts: 11 Location: india
|
|
|
|
hello,
I want to compare two fileds in the the file and if match found i want to write into on file and match not found i want to write in to another file.
Could please any one help me in this .... ICETOOL syntex.
Following is the scenairo for the same.
Input
Code: |
aaaaa aaaaa
bbbbb ccccc
ddddd hhhhh
ccccc ccccc
|
out put 1
Code: |
aaaaa aaaaa
ccccc ccccc
|
out put 2
Code: |
bbbbb ccccc
ddddd hhhhh
|
Thanks & Regards,
Mauvis. |
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
|
|
Here's a DFSORT/ICETOOL job that will do what you asked for.
Code: |
//S1 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN DD DSN=... input file (FB)
//OUT1 DD DSN=... output file1 (FB)
//OUT2 DD DSN=... output file2 (FB)
//TOOLIN DD *
COPY FROM(IN) USING(CTL1)
/*
//CTL1CNTL DD *
OUTFIL FNAMES=OUT1,INCLUDE=(1,5,CH,EQ,7,5,CH)
OUTFIL FNAMES=OUT2,SAVE
/*
|
I assumed your input file has RECFM=FB. If it has RECFM=VB, just change the first OUTFIL statement to:
Code: |
OUTFIL FNAMES=OUT1,INCLUDE=(5,5,CH,EQ,11,5,CH)
|
|
|