Clipper On Line • Ver Tópico - Usando Hb_RegExSplit para construir um LIKE SQL

Usando Hb_RegExSplit para construir um LIKE SQL

Aqui você poderá oferecer suas Contribuições, Dicas e Tutoriais (Texto ou Vídeo) que sejam de interesse de todos.

Moderador: Moderadores

 

Usando Hb_RegExSplit para construir um LIKE SQL

Mensagempor asimoes » 26 Jan 2021 21:16

Estou usando em uma rotina de consulta por nomes, se tem forma melhor eu aceito

cTeste := ",JOAO ,, MARIA,JOSE "

   cTeste := ",JOAO ,, MARIA,JOSE "
   aLike := Hb_RegExSplit( ",", AllTrim( cTeste ) )
   
   FOR EACH oElemento IN aLike
      IF Empty( oElemento )
         Hb_aDel( aLike, oElemento:__EnumIndex, .T. )
      ENDIF   
   NEXT

   cLike := ""

   FOR EACH oElemento IN aLike
      cLike += "APC.NOME LIKE '%" + AllTrim( oElemento ) + "%'"
      IF Len( aLike ) > 1 .AND. oElemento:__EnumIndex < Len( aLike )
         cLike += " OR "
      ENDIF
   NEXT   
        cQuery := "SELECT " + ;
                      "   * " + ;
                      "FROM " + ;
                      "   CADASTROSOCIOS APC " + ;
                      "WHERE " + ;
                      cLike + ;
                      "ORDER BY " + ;
                      "   APC.NOME, APC.CODIGO"     
â–ºHarbour 3.x | Minigui xx-x | HwGuiâ—„
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

Usando Hb_RegExSplit para construir um LIKE SQL

Mensagempor asimoes » 26 Jan 2021 21:26

Isso é opcional o usuário digita no objeto get o nome que quer pesquisar
â–ºHarbour 3.x | Minigui xx-x | HwGuiâ—„
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

Usando Hb_RegExSplit para construir um LIKE SQL

Mensagempor JoséQuintas » 27 Jan 2021 08:05

Talvez um join.

Uso desse mesmo jeito no meu browse ADO, pra filtrar enquanto digita, inclusive pra valor ou data.

Temporario:Filter := "nome like .....'
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18013
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes




Retornar para Contribuições, Dicas e Tutoriais

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 14 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro