LOL Peter - I do have to disagree about simplicity - option 54 and F4 in PDM, fill in a couple blanks, maybe choose the summary option - ba-da-boom!
----- Original Message -----
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.
midrange.com
