Fazer calculo de campo valor em Query por per�odo.

Question

Tenho uma Query e uso tabela paradox, gostaria de calcular nela o valor de um campo de uma tabela, a� fiz da seguinte forma:Select sum(Valor) as Total from Baixas Mas eu preciso q calcule entre um per...

Janete · Answer

[quote:11828ab661=�Janete�]Tenho uma Query e uso tabela paradox, gostaria de calcular nela o valor de um campo de uma tabela, a� fiz da seguinte forma:Select sum(Valor) as Total from Baixas Mas eu preciso q calcule entre um periodo de data, pois essa tabela Baixas tem um campo Data, mas n�o sei como acrescentar esse c�digo para q fazer esse calculo.[/quote:11828ab661]Tentei fazer assim mas n�o d� certo:Select sum(Valor) as Total from Baixas Where DataPagamento between :VarDataI and :VarDataF...

Glecio · Answer

para a consulta entre data vc vai precisar da cl�usula WHERE na instrun��o SQL.

fa�a assim:
Query1.Close;
Query1.Sql.Clear;
Query1.Sql.Add(�Select Sum(Valor) as Total From Baixas�);
Query1.Sql.Add(�Where DataBaixa Between :DatIni And :DatFin�); Query1.ParamByName(�DatIni�).AsDate := StrToDate(DatIni.Text);
Query1.ParamByName(�DatFin�).AsDate := StrToDate(DatFin.Text);
Query1.Open;

Espero ter ajudado!

Janete · Answer

[quote:196ea7edc8=�Glecio�]para a consulta entre data vc vai precisar da cl�usula WHERE na instrun��o SQL.fa�a assim:Query1.Close;Query1.Sql.Clear;Query1.Sql.Add(�Select Sum(Valor) as Total From Baixas�); Query1.Sql.Add(�Where DataBaixa Between :DatIni And :DatFin�); Query1.ParamByName(�DatIni�).AsDate := StrToDate(DatIni.Text);Query1.ParamByName(�DatFin�).AsDate := StrToDate(DatFin.Text);Query1.Open;Espero ter ajudado![/quote:196ea7edc8]Fiz dessa forma, mas n�o trouxe valor nenhum....

Marco Salles · Answer

olhando r�pido acho que o c�digo esta certo Janete....Slavo ao nome do campo que antes era DataPagamento e voce o esta chamando assim DataBaixa

Mas voce pode fazer tamb� assim:

Query1.Close; Query1.Sql.Clear; Query1.Sql.Add(�Select Sum(Valor) as Total From Baixas�); Query1.Sql.Add(�Where ( DataPagamento >= :DatIni )And ( DataPagamento <= Dta:DatFin�); Query1.ParamByName(�DatIni�).AsDate := StrToDate(DatIni.Text); Query1.ParamByName(�DatFin�).AsDate := StrToDate(DatFin.Text); Query1.prepare; Query1.Open;

F�rum Fazer calculo de campo valor em Query por per�odo. #333015