A ver,

La búsqueda que realizas con un campo INT, no tiene forma de hacerse SOFT.
Para ello, deberías realizar el índice convirtiendo a string con STR() o
STRZERO().

Claudio Torrillo

PD: Con DBF, nunca uses campos numéricos como campos claves, siempre
necesitan conversión para combinarse, lo que hace que los índices se
consulten más lentos.

-----Mensaje original-----
De: guvoaII@... [mailto:guvoaII@...] En nombre
de Adesistemas
Enviado el: martes, 29 de septiembre de 2009 08:22 a.m.
Para: guvoaII@...
Asunto: [guvoaII] busqueda

Colegas:

Utilizo este metodo para la busqueda de clientes por descripcion y me
funciona correctamente, pero no se como hacer cuando la busqueda es por
codigo, donde el codigo es INT

Ejemplo:

METHOD EditChange(oControlEvent) CLASS ClientesMantenimiento
LOCAL oControl AS Control
oControl := IIf(oControlEvent == NULL_OBJECT, NULL_OBJECT,
oControlEvent:Control)
SUPER:EditChange(oControlEvent)
//Put your changes here

DO CASE
CASE oControl:NameSym == #mBusquedaCliente

SELF:oCliente:SetOrder(2)
IF SELF:oCliente:Seek(Upper(SELF:oDCmBusquedaCliente:TextValue), TRUE )
ENDI

CASE oControl:NameSym == #mBusquedaClienteCod

SELF:oCliente:SetOrder(1)
IF SELF:oCliente:Seek(Upper(SELF:oDCmBusquedaClienteCod:TextValue),
TRUE ) esto que esta en rojo no se como hacerlo para INT o sea numerico
ENDI

ENDCASE

RETURN NIL



Muchas gracias por su ayuda.


Luengo Sergio
General Pico
La Pampa
Analista de Sistemas


[Se han eliminado los trozos de este mensaje que no contenían texto]



------------------------------------

lista auspiciada por ClipSupport Argentina
Enlaces a Yahoo! Grupos






__________ Información de ESET Smart Security, versión de la base de firmas
de virus 4466 (20090929) __________

ESET Smart Security ha comprobado este mensaje.

http://www.eset.com





__________ Información de ESET Smart Security, versión de la base de firmas
de virus 4468 (20090929) __________

ESET Smart Security ha comprobado este mensaje.

http://www.eset.com