FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Utilizacion de Ordwildseek - Mayusculas/minusculas
Posts: 428
Joined: Thu Oct 19, 2006 12:28 PM
Utilizacion de Ordwildseek - Mayusculas/minusculas
Posted: Wed Aug 08, 2018 04:46 PM
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 (fw): Select all Collapse
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 (fw): Select all Collapse
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
--------------------------

Saludos



Jose Luis
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM
Re: Utilizacion de Ordwildseek - Mayusculas/minusculas
Posted: Thu Aug 09, 2018 01:23 PM
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 1515
Joined: Thu Oct 30, 2008 02:37 PM
Re: Utilizacion de Ordwildseek - Mayusculas/minusculas
Posted: Thu Aug 09, 2018 07:02 PM

utiliza upper en la expresión del indice y reconstruyelo

Continue the discussion