abrir tabla desde variable

On Tue, 18 Jan 2005 16:26:01 -0600, "Leopoldo Sánchez"
wrote:

Mostrar la cita

Hola, utilizo una variable publica para capturar el nombre de la tabla en la
cual deseo realizar una búsqueda incremental, esto con el fin de 'reciclar'
un form de busqueda que tengo, pero no logro abrir la tabla que necesito
según lo que se haga.

en un form x uso la tabla 'pendientes', guardo en mi variable el nombre de
la tabla y abro el form search.
select pendientes
oApp.alias = alias()
do form search.scx

Como uso sesión de datos privadas, en el init del form search pongo lo sig.
IF USED(oApp.alias)
SELECT oapp.alias
ELSE
USE MBD!oapp.alias SHARED IN 0
SELECT oapp.alias
ENDIF

pero no encuentra el alias, alguien podría decirme como hacerle?

Gracias

Pd. en el grid se pondría algo así? this.column1.ControlSource =
oapp.alias.capellidos

No confundas el nombre de la propiedad de tu objeto, con el nombre de
la tabla, con el alias.

USE (oapp.alias) ALIAS MiAlias SHARED IN 0
SELECTMiAlias



Alex Feldstein
________________________________
Microsoft Visual FoxPro MVP
Please respond in the public groups so that everybody
can benefit from the exchange.
Favor de responder en los foros públicos asi todos se benefician.
(address munged with ROT-13)

Blog: http://www.bloglines.com/blog/AlexFeldstein
Website: http://feldstein.net

Gracias Alex, al final me funcionó así

oapp.alias = 'DB!'+ALIAS()

USE (oapp.alias) ALIAS tabla SHARED IN 0
CURSORSETPROP("Buffering",5,'tabla')
SELECT tabla

Saludos
Leopoldo Sánchez
Monterrey, México



"Alex Feldstein" escribió en el mensaje
news:
| On Tue, 18 Jan 2005 16:26:01 -0600, "Leopoldo Sánchez"
| wrote:
|
| >Hola, utilizo una variable publica para capturar el nombre de la tabla en
la
| >cual deseo realizar una búsqueda incremental, esto con el fin de
'reciclar'
| >un form de busqueda que tengo, pero no logro abrir la tabla que necesito
| >según lo que se haga.
| >
| >en un form x uso la tabla 'pendientes', guardo en mi variable el nombre
de
| >la tabla y abro el form search.
| >select pendientes
| >oApp.alias = alias()
| >do form search.scx
| >
| >Como uso sesión de datos privadas, en el init del form search pongo lo
sig.
| >IF USED(oApp.alias)
| > SELECT oapp.alias
| >ELSE
| > USE MBD!oapp.alias SHARED IN 0
| > SELECT oapp.alias
| >ENDIF
| >
| >pero no encuentra el alias, alguien podría decirme como hacerle?
| >
| >Gracias
| >
| >Pd. en el grid se pondría algo así? this.column1.ControlSource | >oapp.alias.capellidos
|
| No confundas el nombre de la propiedad de tu objeto, con el nombre de
| la tabla, con el alias.
|
| USE (oapp.alias) ALIAS MiAlias SHARED IN 0
| SELECTMiAlias
|
|
|
| Alex Feldstein
| ________________________________
| Microsoft Visual FoxPro MVP
| Please respond in the public groups so that everybody
| can benefit from the exchange.
| Favor de responder en los foros públicos asi todos se benefician.
| (address munged with ROT-13)
|
| Blog: http://www.bloglines.com/blog/AlexFeldstein
| Website: http://feldstein.net

He logrado abrir la tabla a través de la propiedad de mi objeto oApp.alias
ahora tengo el siguiente problemas, quiero crear una vista parametrizada por
código para poder utilizarla en un formularo de busqueda incremental con un
txtbox y un grid, pero me sale un error al crear la vista 'vbusca'; cuando
solo abro la vista origen {la de oApp.alias} no me causa errores y abre la
vista origen.

PUBLIC TABLA
TABLA='DB!'+oapp.alias

USE (tabla) IN 0 SHARED
CURSORSETPROP("Buffering",5,(oapp.alias))
SELECT (oapp.alias)
=REQUERY(oapp.alias)
CREATE SQL VIEW vbusca AS; && aquí es donde me marca el error 'No hay
ninguna base de datos abierta o establecida como activa.'
SELECT * FROM (OAPP.ALIAS) WHERE capellidos = oapp.busca_nombre ORDER BY
capellidos

Gracias por su ayuda.
Leopoldo Sánchez
Monterrey, México



"Leopoldo Sánchez" escribió en el mensaje
news:ONW9qya$
| Hola, utilizo una variable publica para capturar el nombre de la tabla en
la
| cual deseo realizar una búsqueda incremental, esto con el fin de
'reciclar'
| un form de busqueda que tengo, pero no logro abrir la tabla que necesito
| según lo que se haga.
|
| en un form x uso la tabla 'pendientes', guardo en mi variable el nombre de
| la tabla y abro el form search.
| select pendientes
| oApp.alias = alias()
| do form search.scx
|
| Como uso sesión de datos privadas, en el init del form search pongo lo
sig.
| IF USED(oApp.alias)
| SELECT oapp.alias
| ELSE
| USE MBD!oapp.alias SHARED IN 0
| SELECT oapp.alias
| ENDIF
|
| pero no encuentra el alias, alguien podría decirme como hacerle?
|
| Gracias
|
| Pd. en el grid se pondría algo así? this.column1.ControlSource | oapp.alias.capellidos
|
| --
| Leopoldo Sánchez
| Monterrey, México
|
|
|
|

On Thu, 20 Jan 2005 13:21:28 -0600, "Leopoldo Sánchez"
wrote:

Mostrar la cita

He logrado abrir la tabla a través de la propiedad de mi objeto oApp.alias
ahora tengo el siguiente problemas, quiero crear una vista parametrizada por
código para poder utilizarla en un formularo de busqueda incremental con un
txtbox y un grid, pero me sale un error al crear la vista 'vbusca'; cuando
solo abro la vista origen {la de oApp.alias} no me causa errores y abre la
vista origen.

PUBLIC TABLA
TABLA='DB!'+oapp.alias

USE (tabla) IN 0 SHARED
CURSORSETPROP("Buffering",5,(oapp.alias))
SELECT (oapp.alias)
=REQUERY(oapp.alias)
CREATE SQL VIEW vbusca AS; && aquí es donde me marca el error 'No hay
ninguna base de datos abierta o establecida como activa.'
SELECT * FROM (OAPP.ALIAS) WHERE capellidos = oapp.busca_nombre ORDER BY
capellidos

Gracias por su ayuda.

Asegúrate de abrir la BD (el DBC)
con OPEN DATABASE/SET DATABASE TO

No uses oApp.Alias para referirte al alias cada vez.
Mejor es usar un alias fijo:

USE (tabla) ALIAS MiAlias IN 0 SHARED
SELECT MiAlias
REQUERY()

Cada vez que usas oApp.Alias debe perder tiempo accediendo
al objeto y buscando el contenido de la propiedad alias.
Haz eso una sola vez.

*NUNCA* uses PUBLIC memvars. Estas van contra los preceptos de OOP
(rompen encapsulacion). Trata de evitarlas a como sea.

HTH



Alex Feldstein
________________________________
Microsoft Visual FoxPro MVP
Please respond in the public groups so that everybody
can benefit from the exchange.
Favor de responder en los foros públicos asi todos se benefician.
(address munged with ROT-13)

Blog: http://www.bloglines.com/blog/AlexFeldstein
Website: http://feldstein.net

¿Pero que no se supone que mi base de datos ya está abierta desde que inicio
el programa?, por que se pierde?


Leopoldo Sánchez
Monterrey, México



"Alex Feldstein" escribió en el mensaje
news:
| On Thu, 20 Jan 2005 13:21:28 -0600, "Leopoldo Sánchez"
| wrote:
|
| >He logrado abrir la tabla a través de la propiedad de mi objeto
oApp.alias
| >ahora tengo el siguiente problemas, quiero crear una vista parametrizada
por
| >código para poder utilizarla en un formularo de busqueda incremental con
un
| >txtbox y un grid, pero me sale un error al crear la vista 'vbusca';
cuando
| >solo abro la vista origen {la de oApp.alias} no me causa errores y abre
la
| >vista origen.
| >
| >PUBLIC TABLA
| >TABLA='DB!'+oapp.alias
| >
| >USE (tabla) IN 0 SHARED
| >CURSORSETPROP("Buffering",5,(oapp.alias))
| >SELECT (oapp.alias)
| >=REQUERY(oapp.alias)
| >CREATE SQL VIEW vbusca AS; && aquí es donde me marca el error 'No hay
| >ninguna base de datos abierta o establecida como activa.'
| >SELECT * FROM (OAPP.ALIAS) WHERE capellidos = oapp.busca_nombre ORDER BY
| >capellidos
| >
| >Gracias por su ayuda.
|
|
| Asegúrate de abrir la BD (el DBC)
| con OPEN DATABASE/SET DATABASE TO
|
| No uses oApp.Alias para referirte al alias cada vez.
| Mejor es usar un alias fijo:
|
| USE (tabla) ALIAS MiAlias IN 0 SHARED
| SELECT MiAlias
| REQUERY()
|
| Cada vez que usas oApp.Alias debe perder tiempo accediendo
| al objeto y buscando el contenido de la propiedad alias.
| Haz eso una sola vez.
|
| *NUNCA* uses PUBLIC memvars. Estas van contra los preceptos de OOP
| (rompen encapsulacion). Trata de evitarlas a como sea.
|
| HTH
|
|
|
| Alex Feldstein
| ________________________________
| Microsoft Visual FoxPro MVP
| Please respond in the public groups so that everybody
| can benefit from the exchange.
| Favor de responder en los foros públicos asi todos se benefician.
| (address munged with ROT-13)
|
| Blog: http://www.bloglines.com/blog/AlexFeldstein
| Website: http://feldstein.net