I still think it doesn't get much easier than the example I posted using the cmp command 
CHGVAR &CMD ('cmp -s' *BCAT &FILE1 *BCAT &FILE2)
QSH CMD(&CMD)
RCVMSG MSGTYPE(*COMP) MSGDTA(&MSGDTA) MSGID(&MSGID)
IF (&MSGID=QSH0005 *AND %BIN(&MSGDTA)=1 ) DO
	SNDPGMMSG MSGID(CPF9898) MSGF(QCPFMSG) MSGDTA('Files are different')
ENDDO
Peter
-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of A Paul
Sent: Tuesday, 23 July 2013 5:38 a.m.
To: Midrange Systems Technical Discussion
Subject: Re: Flat file comparision
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 btw 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
 REFORMATTED LINES....................................................:         0
 PAIRED CHANGES (REFM+PAIRED INS/DEL).................................:         0
 NEW FILE LINE INSERTIONS.............................................:         0
 NON-PAIRED INSERTS...................................................:         0
 OLD FILE LINE DELETIONS..............................................:         0
 NON-PAIRED DELETIONS.................................................:         0
 NEW FILE LINES PROCESSED.............................................:       187
 OLD FILE LINES PROCESSED.............................................:       187                                                  
                                                                                                                                   
 LISTING-TYPE = DIFF     PHYSICAL-COMPARE-COLUMNS =    1:266    LONGEST LINE = 266
 PROCESSING OPTIONS SPECIFIED : NONE
 
________________________________
 From: Mark S Waterbury <mark.s.waterbury@xxxxxxxxxxxxx>
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
Sent: Saturday, 20 July 2013, 12:16
Subject: Re: Flat file comparision
  
CMPPFM does not look at "attributes" of the files, but just compares the 
data in the physical file members.
Why not try this command, before ruling it out? =-O
On 7/20/2013 11:58 AM, A Paul wrote:
I believe CMPPFM display that two files are different(even if two files are identical in terms of contents of the files) if it finds differences in timestamp fields.  My vendor sends a file everyday and it does not have date in it, I am only looking to compare the content of the files and if both are identical throw an alert.  I don't think CMPPFM may work.
As an Amazon Associate we earn from qualifying purchases.