Re: Flat file comparision -- MIDRANGE-L

Peter, thanks! will try below.

________________________________
From: Peter Connell <Peter.Connell@xxxxxxxxxx>
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
Sent: Monday, 22 July 2013, 15:41
Subject: RE: Flat file comparision

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.