lparameters poDataEnvironment local lnCursors, laCursors(1), lnCnt, lcSource, lcAlias lnCursors = amembers(laCursors, poDataEnvironment, 2) for lnCnt = 1 to lnCursors lcSource = alltrim(laCursors(lnCnt))+".CursorSource" lcAlias = alltrim(laCursors(lnCnt))+".Alias" poDataEnvironment.&lcSource = gPath+"\"+poDataEnvironment.&lcAlias+".dbf" endforPlaced it as a program file called cursors.prg and then in the Forms Data Environment in its BeforeOpenTables Event we have following code line:
do prgs\cursors.prg with thisThen gPath was a global variable which contains the path to the data folder. We use free tables though.