* Check if table is open exclusive by current application
IF ISEXCLUSIVE("mytable")
  ...
ENDIF
* Check if table is open exclusive by something else
TRY
  USE mytable EXCLUSIVE
CATCH TO oErr WHEN oErr.ErrorNo = 1705
  ...
ENDTRY
...