I have a UDF that sets the path to the tables prior to opening the tables defined in the dataenvironment:

The call should be placed in the BeforeTablesOpen event of the dataenvironment:

=SetDBCPath(thisform.Dataenvironment,gcDBCPath,"NameOfDBC")

gcDBCPath is the desired path to the production tables (can be different for different PCs); the third parameter is the name of the database (not table).

The program:

*FUNCTION SetDBCPath
LPARAMETERS poForm,pcDBCPath,pcDBCName
LOCAL lcDBCName, lcFilePath, lnNumCursors, lnNdx
lcDBCName  = FORCEEXT(pcDBCName,"DBC")
lcFilePath = ADDBS(pcDBCPath) + lcDBCName
lnNumCursors = AMEMBERS(lcProperties,poForm,2)
FOR lnNdx=1 TO lnNumCursors
   IF UPPER(LEFT(lcProperties[lnNdx],6)) = "CURSOR"
      IF ATC(lcDBCName,poForm.&lcProperties[lnNdx]..database) > 0
         poForm.&lcProperties[lnNdx]..database = lcFilePath
      ENDIF
   ENDIF
ENDFOR
RETURN

This will set the desired table path at run-time.