Tablas en uso

LuisVzla
05 de Noviembre del 2003
Como puedo saber que cursores y tablas tengo en uno mediante codigo.

Alex
05 de Noviembre del 2003
Quetal Luis.

Te muestro una forma de saber que tablas tenes abiertas.


CLOSE ALL
USE BATE IN 0
USE BATEO IN 0
USE BAK_CLIENTES IN 0

CLEAR
=AUSED(ATablas) && Array conteniendo nombre de tablas
nCantTablas= ALEN(ATablas) && Numero de tablas abiertas
CREATE CURSOR TablasAbiertas(cTabla C(20))

FOR nContar = 1 TO nCantTablas
INSERT INTO TablasAbiertas(cTabla) Values(ALLTRIM(ATablas(nContar))) && Insera en cursor el nombre de las tabla
nContar = nContar+1
ENDFOR

Espero te sirva.


Alex Vargas