Tente assim

ParamByName('p_sexo').Value = null

Espero ter ajudado.

Alisson Ricardo Viol Gazda
Colégio Platão de Apucarana
[EMAIL PROTECTED]


  ----- Original Message ----- 
  From: Eduardo Silva ® 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, October 26, 2005 8:38 AM
  Subject: RES: [delphi-br] Erro maluco de SQL


  Já fiz isso e mesmo assim não deu cert.

  Eu credito que o problema seja na forma de comparar os parametros

  ParamByName('p_sexo').AsString  := '';

  Acho que a string vazia é onde esta o problema, mas nõ estou conseguindo
  resolver...


    -----Mensagem original-----
    De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
  nome de Valdir Marcos
    Enviada em: terça-feira, 25 de outubro de 2005 13:41
    Para: delphi-br@yahoogrupos.com.br
    Assunto: Re: [delphi-br] Erro maluco de SQL


    Crie :p_pessoa1 e :p_pessoa2 para diferenciar os parâmetros...

    Um abraço,

    Valdir marcos

      ----- Original Message -----
      From: Eduardo Silva ®
      To: delphi-br@yahoogrupos.com.br
      Sent: Tuesday, October 25, 2005 1:14 PM
      Subject: RES: [delphi-br] Erro maluco de SQL


      Amigo, não é isso.

      Não sei o que acontece, mas as outras instruções sql, que são quase
      identicas a essa, executam normalmente e somente esta não esta
  executando.

      Já tirei uma clausula pra ver se era isso e mesmo assim continua o erro,
  ela
      me retorna zero, sendo que quando eu testo dentro do programa (tempo de
      projeto) com o botão direito do mouse em cima da query -> expolore, a
  rotina
      funciona.

      O que pode ser ainda?

      To ficando louco.....só isso não ta rodando......
        -----Mensagem original-----
        De: delphi-br@yahoogrupos.com.br
  [mailto:[EMAIL PROTECTED]
      nome de Romario (Listas)
        Enviada em: terça-feira, 25 de outubro de 2005 11:24
        Para: delphi-br@yahoogrupos.com.br
        Assunto: Re: [delphi-br] Erro maluco de SQL


        Acredito que o erro está na falta dos parênteses que não estão
        distingüindo as operações dos filtros.

        Tente da seguinte forma e veja se funciona:

        Close;

        Sql.Clear;

        Sql.Add('SELECT TP_PESSOA, NM_SEXO FROM SIAE0101');
        Sql.Add(' WHERE ((TP_PESSOA = :p_pessoa )');
        Sql.Add('   AND  (NM_SEXO   = :p_sexo  ))');
        Sql.Add('    OR (TP_PESSOA  = :p_pessoa )');

        ParamByName('p_pessoa').AsString  := 'F';
        ParamByName('p_sexo'  ).AsString  := '';
        ParamByName('p_pessoa').AsString  := '';

        Open;

        lblNaoInformado.Caption := IntToStr(qryAux.RecordCount);

        Sds,

        Romario




        Eduardo Silva ® escreveu:
        > Galera, quando eu uso o código abaixo para testar a instrução SQL em
      tempo
        > de projeto ela funciona beleza
        >
        > SELECT TP_PESSOA, NM_SEXO
        >   FROM SIAE0101
        >  WHERE (TP_PESSOA = 'F'
        >    AND NM_SEXO   = '')
        >     OR TP_PESSOA = ''
        >
        > Agora, se eu usar a instrução abaixo em tempo de execução, ela não
  me
        > retorna nada, nem da erro, o que pode estar acontecendo?
        >
        >       Close;
        >       Sql.Clear;
        >       Sql.Add('SELECT TP_PESSOA, NM_SEXO FROM SIAE0101');
        >       Sql.Add(' WHERE TP_PESSOA = :p_pessoa');
        >       Sql.Add('   AND NM_SEXO   = :p_sexo');
        >       Sql.Add('    OR  TP_PESSOA = :p_pessoa');
        >       ParamByName('p_pessoa').AsString  := 'F';
        >       ParamByName('p_sexo').AsString    := '';
        >       ParamByName('p_pessoa').AsString  := '';
        >       Open;
        >       lblNaoInformado.Caption := IntToStr(qryAux.RecordCount
        >
        > Eduardo de Almeida Silva





        _______________________________________________________
        Promoção Yahoo! Acesso Grátis: a cada hora navegada você acumula
  cupons e
      concorre a mais de 500 prêmios! Participe! http://yahoo.fbiz.com.br/


        --
        <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>





              Yahoo! Grupos, um serviço oferecido por:



      ------------------------------------------------------------------------
  ----
      --
        Links do Yahoo! Grupos

          a.. Para visitar o site do seu grupo na web, acesse:
          http://br.groups.yahoo.com/group/delphi-br/

          b.. Para sair deste grupo, envie um e-mail para:
          [EMAIL PROTECTED]

          c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
      Serviço do Yahoo!.



        __________ NOD32 1.1264 (20051024) Information __________

        This message was checked by NOD32 antivirus system.
        http://www.nod32.com


      [As partes desta mensagem que não continham texto foram removidas]



      --
      <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>





            Yahoo! Grupos, um serviço oferecido por:



    --------------------------------------------------------------------------
  ----
      Links do Yahoo! Grupos

        a.. Para visitar o site do seu grupo na web, acesse:
        http://br.groups.yahoo.com/group/delphi-br/

        b.. Para sair deste grupo, envie um e-mail para:
        [EMAIL PROTECTED]

        c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
  Serviço do Yahoo!.



    [As partes desta mensagem que não continham texto foram removidas]



    --
    <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>





          Yahoo! Grupos, um serviço oferecido por:



  ----------------------------------------------------------------------------
  --
    Links do Yahoo! Grupos

      a.. Para visitar o site do seu grupo na web, acesse:
      http://br.groups.yahoo.com/group/delphi-br/

      b.. Para sair deste grupo, envie um e-mail para:
      [EMAIL PROTECTED]

      c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
  Serviço do Yahoo!.



    __________ NOD32 1.1265 (20051025) Information __________

    This message was checked by NOD32 antivirus system.
    http://www.nod32.com


  [As partes desta mensagem que não continham texto foram removidas]



  -- 
  <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>





        Yahoo! Grupos, um serviço oferecido por: 
          


------------------------------------------------------------------------------
  Links do Yahoo! Grupos

    a.. Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/
      
    b.. Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]
      
    c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

<*> Para ver as mensagens antigas, acesse:
    http://br.groups.yahoo.com/group/delphi-br/messages

<*> Para falar com o moderador, envie um e-mail para:
    [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 


Responder a