Aprendiz_LEO
26 de Abril del 2005

Hola tengo un problema, quiero usar en modo exclusivo una tabla pero me da error porque aguien lo esta usando asi que quiero saber si existe alguna funcion o rutina para averiguar si se esta usando la tabla o no .... para yo poder usarla en modo exclusivo o intentar mas tarde...
es que necesito averiguar si la tabla esta en uso o no no importa en exclusive o shared
gracias

sgomez
26 de Abril del 2005

Tenés que detectar el error que te tira al intentar abrir la tabla, es el 1705. Ejemplo:

parameter archivo
local huboerror
on error do errores WITH ERROR( ),huboerror
use (archivo) exclusive in 0
on error
return .f.

PROCEDURE errores
PARAMETER merror,huboerror
if merror=1705
huboerror=.t.
else
messagebox("Se detecto el error "+alltrim(padl(merror,254," ")))
huboerror=.t.
endif