|
I have used the sourcecompare program that is available on the iseries, but I have better results (for my environment) using 3rd party tools, as ExamDiff from prestosoft, and beyond compare, by scooter software, and Araxis Merge, for beautiful 3 way compares. You can download you source files to a pc, and then compare, I wrote a Java GUI program, to browse source files across different iseries, to retrieve the source, to my PC for comparing... This allows me to grab source from a previous version of our vendors software, compare it to our custom version, and then do a 3-way compare to the new version of our vendors software. Tim > -----Original Message----- > From: rpg400-l-bounces@xxxxxxxxxxxx [SMTP:rpg400-l-bounces@xxxxxxxxxxxx] > On Behalf Of RPower@xxxxxxxxxx > Sent: Friday, September 03, 2004 9:16 AM > To: RPG programming on the AS400 / iSeries > Subject: Compare Source > > Posted this yesterday but it doesn't look like it went thru. > > Well, > I've just come across an interesting anomaly I think. Doing a compare > source on a new and old source that had two blocks of code inserted. > Anyway, after I do the compare source I get my new code matched to certain > > > lines and the output looks really weird. Here's what I'm talking about > > > ----+----1----+----2----+----3----+----4----+----5----+----6----+----7---- > +----8----+----9----+---10 > > > MAT= 389 > I - * Warning Message if rounded hours are 0 and months are > 0 > INS= 5 0000390 > I - c if (hours(x) = 0) and (months(x) <> 0) > 0000391 > I - c except warning3 0000392 > I - c eval warnings_ctr = warnings_ctr + 1 > 0000393 > I - c endif 0000394 > MAT= 48 > >>I - c eval warnings_ctr = warnings_ctr + 1 > INS= 5 0000443 > >>I - c endif 0000444 > I - * Warning Message if rounded hours are 0 and months are > 0 > 0000445 > I - c if (hours(x) = 0) and (months(x) <> 0) > 0000446 > I - c except warning3 0000447 > MAT= 316 > > The weird part is that the statements that are bolded are not in correct > sequence. It should read: > > ----+----1----+----2----+----3----+----4----+----5----+----6----+----7---- > +----8----+----9----+---10 > > > MAT= 48 > > I - * Warning Message if rounded hours are 0 and months are > 0 > 0000445 > I - c if (hours(x) = 0) and (months(x) <> 0) > 0000446 > I - c except warning3 0000447 > I - c eval warnings_ctr = warnings_ctr + 1 > INS= 5 0000443 > I - c endif 000044 > > Now those two lines of code seem to be matching up with another set of if > statements. Any ideas on how the compare source works and why this is > happening? > > > Ron Power > Programmer > Information Services > City Of St. John's, NL > P.O. Box 908 > St. John's, NL > A1C 5M2 > Tel: 709-576-8132 > Email: rpower@xxxxxxxxxx > Website: http://www.stjohns.ca/ > __________________________________________________________________________ > _ > Success is going from failure to failure without a loss of enthusiasm. - > Sir Winston Churchill > > > This e-mail communication and accompanying documents is intended only for > the individual or entity to which it is addressed and may contain > information that is confidential, privileged or exempt from disclosure > under applicable law. Any use of this information by individuals or > entities other than the intended recipient is strictly prohibited. If you > have received this in error, please notify the sender and delete all the > copies (electronic or otherwise) immediately. > -- > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list > To post a message email: RPG400-L@xxxxxxxxxxxx > To subscribe, unsubscribe, or change list options, > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l > or email: RPG400-L-request@xxxxxxxxxxxx > Before posting, please take a moment to review the archives > at http://archive.midrange.com/rpg400-l. > This e-mail message, including any attachments, is for the sole use of the intended recipient(s) and may contain confidential or privileged information. Any unauthorized review, use, disclosure or distribution is prohibited. If you are not the intended recipient, please contact the sender by reply e-mail and destroy the message.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
midrange.com
