&& Где-то в программе передаешь путь к таблице
do proga1 with "c:\temp\Table1"
&& Передаешь имя/alias уже отрытой таблицы
do proga2 with "Table2"
...

procedure proga1
parameter TableName
...
use (TableName) alias LocalTable in  0 
select LocalTable
replace aaa with  111 ,bbb with  222 
...
select a.* from LocalTable a ;
where a.aaa= 222  into cursor query1
....
return

procedure proga2
parameter LocalTable
...
select (LocalTable)
replace aaa with  111 ,bbb with  222 
...
select a.* from (LocalTable) a ;
where a.aaa= 222  into cursor query1
....
return

myParm=Table1.aaa
do proga3 with myParm
* или можно:
do proga3 with Table1.aaa