Claudio:

Muchas gracias por tu respuesta.

Lo voy a tenes en cuenta.

Luengo Sergio
General Pico
La Pampa
Analista de Sistemas
----- Original Message -----
From: Claudio Torrillo
To: guvoaII@...
Sent: Wednesday, September 30, 2009 6:08 AM
Subject: RE: [guvoaII] busqueda


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







__________ Información de NOD32, revisión 4470 (20090930) __________

Este mensaje ha sido analizado con NOD32 antivirus system
http://www.nod32.com


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