>George,
>
>I actually want to compare a Production run against a database and then run a version of the application that has had changes made to the code, a test run if you will, and Identify the differences in the tables between the two runs. This will allow me to insure that I have not effected any processing that I did not intend to and also see that the changes I did want to occur actually happened. Have you seen anything that will allow me to do that? It is commonly done in the MainFrame environment, and I can't believe that there aren't similar utilities for the pc.
>
>Thanks,
>
>doug
If the structures (including data types) and range of records are the same. All you'd need to do is iterate through the fields and compare each field. Of course, you'd have to track which records were changed. For example
FOR lni = 1 TO FCOUNT()
lcfield = "SOURCE." + FIELD(lni)
lcfield2 = "TARGET." + FIELD(lni, "TARGET")
lcexpr = lcfield + "=" + lcfield2
IF NOT EVALUATE(lcexpr)
ENDIF
NEXT
Naturally, this would be inside a SCAN...ENDSCAN structure.
George
Ubi caritas et amor, deus ibi est