Ol� colegas,por favor vejam esse c�digo diz o que est� errado.est� acusando um erro na linha da data .[code:1:98f3b8f2c7]with Query1 do begin Close; SQL.Add(�Select Data, NotaFiscal, NomeFantasi...

Erro na minha Query. N�o sei onde..

07/07/2004

Ol� colegas,
por favor vejam esse c�digo diz o que est� errado.

est� acusando um erro na linha da data .

with Query1 do
   begin
   Close;

   SQL.Add(�Select Data, NotaFiscal, NomeFantasia, SubRecurso,
                  SubDespesa, Destino, NumeroCheque, ValorLiquido�);
   SQL.add(�From Pagamento�);
   SQL.add(�Where SubRecurso=:SubRecurso AND�);
    SQL.add(�SubDespesa=:SubDespesa�);
    SQL.Add(�Data BETWEEN :DataInicial AND :DataFinal�);
    SQL.add(�Order by Data, NomeFantasia�);


    paramByName(�DataInicial�).asdatetime:=strtoDate(MaskEdit1.text);
    paramByName(�DataFinal�).asdatetime:=strtoDate(MaskEdit2.text);
    ParamByName (�SubRecurso�).Asstring:= ComboBox1.Text;
    ParamByName (�SubDespesa�).Asstring:= ComboBox2.Text;
    Open;
    quickrep1.Preview;
    end;
end;

:arrow: [color=red:98f3b8f2c7]T�tulo alterado pelo Moderador oTTo. Removido: �Erro na Query�.[/color:98f3b8f2c7]
:idea: [color=blue:98f3b8f2c7]Seja mais claro no t�tulo.
:idea: Leia sempre regras de conduta.[/color:98f3b8f2c7]
Usado BBCode pra facilitar a leitura.

Clenio

Curtir t�pico + 0

Responder

Posts

07/07/2004

Lucas Silva

   SQL.add(�Where SubRecurso=:SubRecurso AND�);
    SQL.add(�SubDespesa=:SubDespesa�);
    SQL.Add(�AND Data BETWEEN :DataInicial AND :DataFinal�); // coloque um AND nesta linha.
    SQL.add(�Order by Data, NomeFantasia�);

Responder

Gostei + 0