onde esta o erro nesta busca

Delphi

25/05/2006

with DM.Sqlcomis do
begin
Close;
SQL.Clear;
SQL.add(´select NVENDEDOR, NOTA, DATA, sum(COMISVEND.VLVENDA) as tot, sum(COMISVEND.COMISSAO) as totcomis from COMISVEND where data between :DataInicial and :DataFinal and NVENDEDOR = :VEND ´);
ParamByName(´DataInicial´).AsDate := strtodate(Edit1.Text);
ParamByName(´DataFinal´).asDate := strtodate(Edit2.Text);
ParamByName(´VEND´).AsString := combo.text;
Open;
Printer.Title := ´Gestoc - Relatorio Comissão Vendedor´;
Form_Relcomis := TForm_Relcomis.Create(Self);
Form_Relcomis.QRLabel2.caption := ´Vendedor ´+Combo.Text;
Form_Relcomis.QRLabel5.Caption := ´Período de ´+Edit1.Text + ´ a ´ + Edit2.Text;
Form_Relcomis.QuickRep1.Preview;
end;

Estou tentando fazer esta busca, se tiro a totalização dos campos retornar os regitros, mas se tento totalizar o valor das vendas e das comissões retorna um erro
[color=red:6ce1aeac4a]invdlid column reference[/color:6ce1aeac4a]

Por favor me ajude

Claudio


Dpinho

Dpinho

Curtidas 0

Respostas

Macario

Macario

25/05/2006

Ola DPinho, boa tarde.

Você tem que fazer o agrupamento, desta sua consulta.

Este agrupamento deve constar dos campos cujo nao haja totalização

NVENDEDOR, NOTA, DATA


inclua

group by NVENDEDOR, NOTA, DATA


Espero que ajude.


GOSTEI 0
Weber

Weber

25/05/2006

...
SQL.add(´select NVENDEDOR, NOTA, DATA, sum(COMISVEND.VLVENDA) as tot, sum(COMISVEND.COMISSAO) as totcomis from COMISVEND´);
SQL.add(´where data between :DataInicial and :DataFinal and NVENDEDOR = :VEND ´);
SQL.add(´Group by NVENDEDOR, NOTA, DATA);
...



GOSTEI 0
Dpinho

Dpinho

25/05/2006

Fiz como foi indicado, na tabela tem varios registros, porem so retonar um e os campos vlvenda e comissao não imprimir
se tiro a totalização imprimir os campos vlvenda e comissão, o que pode ser, sera que terei que incializar duas querys??


GOSTEI 0
POSTAR