Oops, reply was sent before I knew it.

procedure Opendbf
local llSucces, lcAlias, lcExcl
lcAlias = evl(this.c_Alias,this.c_Table)
lcExcl = this.c_Excl

if file(this.c_Path+this.c_Table+".dbf") .or. (empty(this.c_Path) .and. file(this.c_Table+".dbf"))
use (this.c_Table) alias &lcAlias order 0 &lcExcl
endif

endproc