ALIAS - TEXTO COMPLETO
Publicado por Santiago (42 intervenciones) el 23/03/2005 10:03:45
Holas.
En el programa principal abro cada una de las tablas llamando al procedimiento pchkusotab (verlo enseguida), enviando como parámetro el nombre de la tabla, que tengo almacenado en una variable pública.
PROCEDURE pchkusotab(vnomtab)
LOCAL vruttab
vruttab = "DATA\" + vnomtab + ".dbf"
IF NOT USED([&vruttab]) THEN
USE &vruttab IN 0 ALIAS (vnomtab) SHARED
ENDIF
ENDPROC
En otras palabras, en el programa principal tengo, para la tabla tprc, por ejemplo:
PUBLIC ktprc
ktprc = "tprc"
pckkusotab(ktprc)
Como puede verse en el procedimiento, el alias es el mismo nombre de la tabla. Sin embargo, cuando entro a un formulario y necesito hacer LOCK(ktprc), me dice que el ALIAS no existe.
¿Por qué razón se pierde el alias? Es claro que si vuelvo a abrir las tablas ANTES de bloquear (llamando nuevamente al procedimiento pchkusotab en el LOAD o el INIT del formulario), el LOCK funciona correctamente.
¿Qué debo hacer para no tener que abrir nuevamente tablas y que los alias funcionen todo el tiempo?
Mil gracias por su ayuda.
En el programa principal abro cada una de las tablas llamando al procedimiento pchkusotab (verlo enseguida), enviando como parámetro el nombre de la tabla, que tengo almacenado en una variable pública.
PROCEDURE pchkusotab(vnomtab)
LOCAL vruttab
vruttab = "DATA\" + vnomtab + ".dbf"
IF NOT USED([&vruttab]) THEN
USE &vruttab IN 0 ALIAS (vnomtab) SHARED
ENDIF
ENDPROC
En otras palabras, en el programa principal tengo, para la tabla tprc, por ejemplo:
PUBLIC ktprc
ktprc = "tprc"
pckkusotab(ktprc)
Como puede verse en el procedimiento, el alias es el mismo nombre de la tabla. Sin embargo, cuando entro a un formulario y necesito hacer LOCK(ktprc), me dice que el ALIAS no existe.
¿Por qué razón se pierde el alias? Es claro que si vuelvo a abrir las tablas ANTES de bloquear (llamando nuevamente al procedimiento pchkusotab en el LOAD o el INIT del formulario), el LOCK funciona correctamente.
¿Qué debo hacer para no tener que abrir nuevamente tablas y que los alias funcionen todo el tiempo?
Mil gracias por su ayuda.
Valora esta pregunta


0