Problem with set filter to

[jparada]

Hi,

In the change event of a textbox control, I do something like this:

Code: Select all

@ 3, 80 TEXTBOX txtDescArt MAXLENGTH 80 WIDTH 180 ON CHANGE { || BuscaArticulo( THIS.VALUE ) }

and here is the procedure "BuscaArticulo"

Code: Select all

PROCEDURE BuscaArticulo( cDescArt )
	If .NOT. Empty( cDescArt )
		Set Filter To cDescArt $ Articulos->f_nomb_art
	Else
		Set Filter To
	Endif
	frmArticulos.brwArticulos.REFRESH
RETURN

In this way I get the error like attached image, please take a look.

And if I change it to something like this:

Code: Select all

Set Filter To frmArticulos.txtDescArt.VALUE $ Articulos->f_nomb_art

then it works well, the question is why?, what am I doing wrong?.

BTW, It is good to use SET FILTER TO?

Please I await your comments.

Thanks

Best Regards
Javier

[luisvasquezcl]

Hola Javier
yo solucioné ese problema de la siguiente forma:
procedure Filtrar( xcampo, xvalue )
private cFiltro := xCampo+'='+HB_VALTOSTR(xvalue)
set filter to &cFiltro
dbgotop()
return
espero te sea de ayuda.
Saludos cordiales,
Luis Vasquez

[jparada]

Hola Luis,

Gracias por contestar, y gracias por tu "tip", pero tienes alguna explicación por qué esta marcando el error de la variable, estoy haciendo algo mal? (como siempre), es un bug?, o simplemente no es posible realizarlo como lo estoy tratando de implementar?. y por qué?, lo sabes?.

Gracias

Saludos Cordiales
Javier

[luisvasquezcl]

Hola Javier,
asumo que no es posible realizarlo de la forma en que lo estabas haciendo;
también hice lo mismo que tú cuando programé ese filtro pero no tengo una explicación lógica ni técnica para darte, lo siento.
Muchas veces no me detengo a pensar el por qué de las cosas... simplemente trato de avanzar.
Lo bueno es que te saliste del problema....
saludos cordiales,
Luis Vasquez.

[jparada]

Hola Luis,

Gracias por contestar,

y Gracias por tus comentarios, personalmente también hago la misma regla si algo te funciona..., pero hay ocasiones que por más explicación que busco, nada más no doy.

Gracias

Saludos Cordiales
Javier