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]