La Web del Programador: Comunidad de Programadores
 
    Pregunta:  3757 - ESTADO DE UNA TABLA
Autor:  Eduardo
En Foxpro 2.6 , como puedo saber el estado de una tabla , no esta usada , si esta usada en que forma , exclusiva o no exclusiva , la funcion used("tabla") me da la respuesta de ese solo puesto de trabajo pero en un sistema de multiusuarios ?
Gracias

  Respuesta:  René Abdala Rojas
Bueno la siguiente es una forma de saber si la tabla que piensas usar esta ocupada por otro usuario es una pequeña función a la que solo le tienes que enviar el parametro wtabla que debe llevar la ruta y el nombre de la tabla que necesitas saber si esta usada o no.

FUNC ABRIRTABL
PARA WTABLA
nErrorenTabla=.f.
ON ERROR DO gestionError WITH Error()
STORE WTABLA+" EXCLUSIVE" TO WTABLA
USE &WTABLA
IF !nErrorenTabla
STORE "A" TO WESTABLA
else
STORE "C" TO WESTABLA
ENDIF
ON ERROR
RETURN

Con la variable WESTABLA sabes si esta usada o no con "A" esta libre y con "C" esta usada, espero que te sirva de algo, un cordial saludo desde SANTAFE DE BOGOTA, COLOMBIA,