* If everything is saved, we scan all the views to requery
IF NOT ThisForm.lModified
   IF AMEMBERS(laCursor,ThisForm.DataEnvironment,2)>0
      FOR lnCompteur=1 TO ALEN(laCursor)
         loCursor=EVAL('ThisForm.DataEnvironment.'+laCursor[lnCompteur])
         IF VARTYPE(loCursor)='O' AND UPPER(loCursor.BaseClass)='CURSOR'
            lcAlias=loCursor.Alias
            ...
         ENDIF
      NEXT
   ENDIF
ENDIF