> ***
> *** ---------------------------------------------
> ***
>
> procedure tblOpen
> parameters xAlias
> * assuming the table was not opened yet.
> private all like x*
>
> xError= 0
>
> on error do tblOpen1
> select 0
> use (xAlias)
OOPS. Forgot an On Error statement here.
> if xError= 0
> return .t. && your table was opened succesfully
> else
> return .f. && could not open the table due to inaccessability
> endif
If things have the tendency to go your way, do not worry. It won't last. Jules Renard.