>
> Hi Fox heads.
> I'm running FPW 2.x on Novell Netware 4.10 and when i try to open a table already opened by other user (with SET EXCLUSIVE ON in one of the users) my system locks. I need a way to detect the status of the file before the USE command.
> Thanks
Amir,
If your systems locks as you say, you might want to change the setting
of your SET REPROCESSING. From HELP it must be set to -1. Set to
another setting that might be convenient, but then ...
You should 'Trap' the error. To my knowledge there are three error
numbers that control this: 3,108,1705. If you have an error handler,
you should treat these errors as exceptions, and set some kind of global
variable to indicate that an error has occured. Otherwise you might
implement the following:
***
*** ---------------------------------------------
***
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)
if xError= 0
return .t. && your table was opened succesfully
else
return .f. && could not open the table due to inaccessability
endif
***
***
***
procedure tblOpen1
on error
if inlist(error(),3,108,1705)
xError= 1
endif
HTH
Marc
If things have the tendency to go your way, do not worry. It won't last. Jules Renard.