What kinds of changes were made to the database?

>Hi all,
>Bonjour tout le monde,
>
>We connects our crystal reports with a remote view.(DNS)
>I want to check the fields Of my views in the report.
>I indeed wish to check that there no were changes occurred in the fields.
>
>When I use this code, I believe the database is updated , but
>when I open the report and I check the database, he says to me
>"database is changed".
>
>That is it does not function in my code?
>

>
>LOCAL ocrapplication ,;
>   ocrreport,;
>   cName,;
>   fso,;
>   cdirectory,;
>   gnNombreDbc,;
>   SetOldDefault
>
>SetOldDefault = SET("DEFAULT()")
>
>cdirectory = "C:\cdbk70\amline\ReportsCrystal"
>
>SET DEFAULT TO ( cdirectory )
>
>gnNombreDbc = ADIR( gaBaseDonnées, '*.Rpt')  && Crée un tableau
>SET DEFAULT TO (  SetOldDefault )
>
>ocrapplication = CREATEOBJECT('CrystalRuntime.Application.8.5')
>
>
>FOR nCompteur = 1 TO gnNombreDbc     && Effectue une boucle pour connaître le nombre de bases de données
>   cName = "C:\cdbk70\amline\ReportsCrystal\" + PROPER( gaBaseDonnées( nCompteur , 1 ) )
>    WAIT WIND cName  NOWAIT     && Affiche le nom des bases de données
>
>   ocrreport  = ocrapplication.OpenReport( cName , 1 )
>   ocrreport.DATABASE.verify()
>   ocrreport.SAVEAS( cName , 2048 )
>   ocrreport = .NULL.
>ENDFOR
>
>

>
>Merci d'avance.
>Thnk in advance
>
>Bernhart MILCENT.