TRY
>   USE HOME(2) + "data\customer" IN 0 EXCLUSIVE
>CATCH TO oErr
>   IF oErr.ErrNo = 1705
>      ? "Could not get exclusive use of customer table"
>   ELSE
>      THROW oErr
>   ENDif
>FINALLY
>   CLOSE DATA ALL
>ENDTRY