Utilizacion de Ordwildseek - Mayusculas/minusculas

[JoseLuis]

Buenas

A ver si alguien me ayuda, estoy atascado.
Se trata de presentarme un browse con los datos procesados mediante Ordwildseek(), y una de dos, si utilizo upper, solo me presenta los datos que esten grabados en mayusculas, y si no lo hago, me presenta sólo los que estan en minuscula, necesito que me presente ambos.

Utilizo una rutina que puso aquí The Full.

llamada a la funcion:

Code: Select all

static function buscalle(aAlias)
MsgGet( "Introduzca las letras a buscar","BUSQUEDA POR CADENA EN LA CALLE",@codibus ) 
FastFilter( "*"+ Upper(alltrim(codibus) ), 4 ) //El 3 para indicar el numero del Indice
Publicas:Filtro:=.T.
return nil

Función:

Code: Select all

Function FastFilter( cCad, nOrder )
      Local nIndice := OrdNumber()
      Set order to nOrder
      index on &(upper(IndexKey())) tag temp TO tHarbourt CUSTOM ADDITIVE MEMORY      
      Set order to nOrder
      dbGotop()
      Do While OrdWildSeek( cCad, .T. )
         OrdKeyAdd( "temp" )
      Enddo 
      OrdSetFocus( "temp" )
      Browse()
Return nIndice

Un Saludo

[karinha]

https://www.4shared.com/rar/OuHf5aaDei/ORDWILD.html

[hmpaquito]

utiliza upper en la expresión del indice y reconstruyelo