>Is there a way to easily change the absolute Database and/or CursorSource path(s) to a relative path at runtime (say, in the form's LoadEvent method) without having to manually write a line of code for each cursor in the dataenvironment?
>
>Thanks!
>
>Adam Nettles

lcNewDbc = getfile('DBC')
WITH thisform.dataenvironment
  .closetables
  lnMembers=amembers(arrObj,thisform.dataenvironment,1)
  FOR ix=1 to lnMembers
    IF Upper(arrObj[ix,2])='OBJECT'
      WITH eval('.'+arrObj[ix,1])
        IF upper(.baseclass) = 'CURSOR' and atc('dbc',.Database)>0
          .database = lcNewDbc
        ENDIF
      ENDWITH
    ENDIF
  ENDFOR
  .opentables
ENDWITH

Cetin