Fórum Ajuda com essa SQL #335594

03/01/2007

0

bom dia, tenho essa SQL

          qryPesquisa.Close;
          qryPesquisa.SQL.Clear;
          qryPesquisa.SQL.Add(´Select * from CadImovel         ´ +
                              ´Where Para_Im   = :pPara        ´ +
                              ´and   Tipo_Im   = :pTipo        ´ +
                              ´and   Local_Im  = :pLocal       ´ +
                              ´and   Estado_Im = :pEstado      ´ +
                              ´and   Bairro_Im = :pBairro      ´ +
                              ´and   Valor_Im Between :pVlrMin ´ +
                              ´and                    :pVlrMax ´ +
                              ´Order By End_Im                 ´);

          qryPesquisa.ParamByName(´pPara´).AsString   := sAfimIm;
          qryPesquisa.ParamByName(´pTipo´).AsString   := sTipoIm;
          qryPesquisa.ParamByName(´pLocal´).AsString  := sPosIm;
          qryPesquisa.ParamByName(´pEstado´).AsString := sSitIm;
[b]          qryPesquisa.ParamByName(´pBairro´).AsString := UpperCase(sBairro);[/b]
          qryPesquisa.ParamByName(´pVlrMin´).AsFloat  := sValorMin;
          qryPesquisa.ParamByName(´pVlrMax´).AsFloat  := sValorMax;
          qryPesquisa.Open;

Gostaria de saber como faço para trazer todas as formas (maiusculo, minusculo, 1ª maiusculo) no seguinte parametro:

[b:ccbf7396d3]qryPesquisa.ParamByName(´pBairro´).AsString := UpperCase(sBairro);[/b:ccbf7396d3]


Tem alguma forma mais facil para trazer tudo? Ou terei que ´mexer´ no BD e colocar tudo em maiusculo? Se sim, como fazer de forma automática? O sistema já está rodando em vários clientes...


Uso D5, Paradox, componentes BDE


Facc

Facc

Responder

Posts

03/01/2007

Facc

bom dia, tenho essa SQL
          qryPesquisa.Close;
          qryPesquisa.SQL.Clear;
          qryPesquisa.SQL.Add(´Select * from CadImovel         ´ +
                              ´Where Para_Im   = :pPara        ´ +
                              ´and   Tipo_Im   = :pTipo        ´ +
                              ´and   Local_Im  = :pLocal       ´ +
                              ´and   Estado_Im = :pEstado      ´ +
                              ´and   Bairro_Im = :pBairro      ´ +
                              ´and   Valor_Im Between :pVlrMin ´ +
                              ´and                    :pVlrMax ´ +
                              ´Order By End_Im                 ´);

          qryPesquisa.ParamByName(´pPara´).AsString   := sAfimIm;
          qryPesquisa.ParamByName(´pTipo´).AsString   := sTipoIm;
          qryPesquisa.ParamByName(´pLocal´).AsString  := sPosIm;
          qryPesquisa.ParamByName(´pEstado´).AsString := sSitIm;
[b]          qryPesquisa.ParamByName(´pBairro´).AsString := UpperCase(sBairro);[/b]
          qryPesquisa.ParamByName(´pVlrMin´).AsFloat  := sValorMin;
          qryPesquisa.ParamByName(´pVlrMax´).AsFloat  := sValorMax;
          qryPesquisa.Open;
Gostaria de saber como faço para trazer todas as formas (maiusculo, minusculo, 1ª maiusculo) no seguinte parametro: [quote:fb940292e0][b:fb940292e0]qryPesquisa.ParamByName(´pBairro´).AsString := UpperCase(sBairro);[/b:fb940292e0]


Tem alguma forma mais facil para trazer tudo? Ou terei que ´mexer´ no BD e colocar tudo em maiusculo? Se sim, como fazer de forma automática? O sistema já está rodando em vários clientes...


Uso D5, Paradox, componentes BDE[/quote:fb940292e0]


tentei fazer assim
  ´and   UPPER(Bairro_Im) = :pBairro      ´ +

Mas não deu certo


Responder

Gostei + 0

04/01/2007

Motta

tente :

qryPesquisa.Close; 
          qryPesquisa.SQL.Clear; 
          qryPesquisa.SQL.Add(´Select * from CadImovel         ´ + 
                              ´Where Para_Im   = :pPara        ´ + 
                              ´and   Tipo_Im   = :pTipo        ´ + 
                              ´and   Local_Im  = :pLocal       ´ + 
                              ´and   Estado_Im = :pEstado      ´ + 
                              ´and   Upper(Bairro_Im) = Upper(:pBairro)      ´ + 
                              ´and   Valor_Im Between :pVlrMin ´ + 
                              ´and                    :pVlrMax ´ + 
                              ´Order By End_Im                 ´); 

          qryPesquisa.ParamByName(´pPara´).AsString   := sAfimIm; 
          qryPesquisa.ParamByName(´pTipo´).AsString   := sTipoIm; 
          qryPesquisa.ParamByName(´pLocal´).AsString  := sPosIm; 
          qryPesquisa.ParamByName(´pEstado´).AsString := sSitIm; 
[b]          qryPesquisa.ParamByName(´pBairro´).AsString := UpperCase(sBairro);[/b] 
          qryPesquisa.ParamByName(´pVlrMin´).AsFloat  := sValorMin; 
          qryPesquisa.ParamByName(´pVlrMax´).AsFloat  := sValorMax; 
          qryPesquisa.Open;



Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar