Re: Flat file comparison

On 22 Jul 2013 15:13, A Paul wrote:

<<SNIP>>

So my question is since the COMPARE file is not column oriented
file, how to read this file and check for the difference ( if
difference is 0) AND incorporate into the code 0 and send an email
subsequently ?
<<SNIP>>

The question is moot. The Compare Physical File Member utility issues a completion message SPC6001 "CMPPFM ended normally. No differences found." when there are no mis-compares between the compared members. Receive the last message issued [like in Peter's example, but RCVMSG MSGTYPE(*LAST), and after the CMPPFM vs after the QSH], and if that SPC6001 is the message issued for the Compare request then the files are known to be the same.

Yet... and I am not recommending to do so, the output file data could be processed just as any other data file [e.g. RCVF], regardless the data is not defined in a relational manner. However doing so must first accept the *assumption* that the language and layout\positions of the data are predictable. But if doing that, use of the CMPTYPE(*FILE) instead of using a line comparison would make more sense, to limit the review of the flat-file as OUTFILE, to just one row of the output; e.g. from a RPTTYPE(*SUMMARY), the row with "TOTAL MEMBERS PROCESSED HAD NO CHANGES" could have its numeric compared for the value "1" [given all necessary assumptions are met].

Regards, Chuck

Gary Thompson Monday, 22 July 2013, 13:46 wrote:

Note that 187 lines "match"
Note that 0 lines are reported for each of the 7
possible types of change (PAIRED+NONPAIRED,REFORMATTED,etc).

I hope this helps answer your question.

A Paul on Monday, July 22, 2013 11:38 AM wrote:

Thanks. I did CMPPFM , here is my *output into a file. Could you
help me how to read this file and send message if there are no
differences between files.

File . . . . . . : COMPARE Library . . . . : ADMLIB Member . . . . . : COMPARE Record . . . . . : 1 Control . . . . . Column . . . . . : 1 Find . . . . . .
.
*...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8....+....9....+....0....+....1....+....2....+....3
1 IBM COMPARE V6R1M0 080215 07/22/13 11:12 PAGE 1
NEW: ADMLIB/ADMFILE(ADMFILE) OLD:
ADMLIB/ADM.FILE(ADM.FILE)

LINE COMPARE SUMMARY AND
STATISTICS

NUMBER OF LINE MATCHES...............................................: 187
TOTAL CHANGES (PAIRED+NONPAIRED CHNG)................................: 0
<<SNIP>>