FoxPro/Visual FoxPro - TABLA VACIA

UTILIZANDO LA INSTRUCCION
SET DELETE ON
Y DELETE
PARA ELIMINAR ARCHIVOS COMO SABER EN UNA TABLA QUE YA NO HAY REGISTROS PARA SER ELIMNADOS YA QUE FISICAMENTE NO LOS ESTOY BORRANDO SI NO SIMPLEMENTE LOS ESTOY MARCANDO PARA SER ELIMINADOS COMO SABER CUANDO YA ESTAN MARCADOS TODOS LOS REGISTRO DE UNA TABLA.

GRACIAS

Podrian haber formas mejores de hacerlo....

Genera un select que te tire todo los que no este borrados en un cursor
despues utilizas RECCOUNT() para saber si hay registros en el cursor

Algo asi:

selec * from tabla where !deleted() into cursor "r"
selec r
?reccount()

SI reccount>=1 entonces todavia hay registros en la tabla que no estan borrados.

Saludos

cantidad_registros = 0
SELECT mitabla
COUNT FOR !DELETED() TO cantidad_registros
IF cantidad_registros > 0 &&hay registros
=messagebox('hay registros no marcados')
**Pon cualquier codido aqui
ENDIF