Eliminar registros

En realidad no puedes eliminar físicamente registros mientras la tabla no este de modo exclusivo, pero lo que si puedes hacer es tener una pequeña rutina de verificación en donde compruebes si ya esta abierta si no lo esta la abres de modo exclusivo para eliminar y si la quieres abrir de modo SHARED debes averiguar si esta abierta de modo exclusivo, si no la podrás abrir, si la encuentra ocupada le envías el mensaje al usuario que se esta realizando el proceso de borrado y que debe intentarlo nuevamente.
Con la siguiente función puedes averiguar si esta abierta o no la tabla, el nombre de la tabla lo envías con el parámetro WTABLA, y para saber si la puedes abrir o no la variable WESTABLA te lo indica, cabe decirte también que antes de llamar la función inicializes la variable WESTABLA para que al regresar, puedas obtener el valor de dicha variable.
Func abrirtabl
Para wtabla
nErrorenTabla=.f.
ON ERROR DO gestionError WITH Error()
USE (WTABLA) EXCL
IF !nErrorenTabla
STORE "A" TO WESTABLA
else
STORE "C" TO WESTABLA
Endif
On error
RETURN
Proc GestionError
PARAM nError
IF nError=1705
nErrorenTabla=.t.
ENDIF
RETURN