[Resolvido] Relatório consulta entre datas com soma

[Diego Gonçalves 0]

Fala galera Expert...

Eu denovo...

 

Estou com uma dificuldade aqui, estou realizando uma consulta que gera um relatório no quickreport, com soma de dois campos.O erro aparentemente é na sintaxe da soma, pois, quando eu realizo a pesquisa sem a soma não ocorre nenhum erro, mas quando tento somar me aparece o seguinte erro: QRY_VENDAS: Parameter 'data inicial' not found.

 

Eu postei o meu código, se alguém puder me ajudar eu agradeço desde ja.

 

 

var
Consulta: String;
begin

with DM.QRY_VENDAS do
begin

 Consulta:= Combobox1.Text;
 Close;
 SQL.Clear;
 SQL.Add('SELECT VENDEDOR,CLIENTE,DATA,DESC_PRODUTO,SUM(VL_PRODUTO) AS TOTAL,SUM (QUANTIDADE)AS TOTAL FROM VENDAS where data BETWEEN datainicial AND datafinal AND Vendedor Like ' + Chr(39) + '%' + Consulta + '%' + Chr(39));

 Parameters.ParamByName('datainicial').Value := FormatDateTime('dd/m/yyyy', Datainicial.date);
 Parameters.ParamByName('datafinal').Value := FormatDateTime('dd/m/yyyy', Datafinal.Date);
 OPEN;
 QR_RELVENDAS.Preview;
 END;
 END;

 

Obrigado.

[flavioavilela 0]

boa noite amigo...

tente colocar os parametros datainicial e datafinal com :

:datainicial e :datafinal...

[Diego Gonçalves 0]

Amigo, o erro mudou agora depois que coloquei o que você me pediu.

Erro: " Alias TOTAL de saída duplicado."

 

o Código como ficou:

 

SQL.Add('SELECT VENDEDOR,CLIENTE,DATA,DESC_PRODUTO,SUM(VL_PRODUTO) AS TOTAL,SUM (QUANTIDADE)AS TOTAL FROM VENDAS where data BETWEEN :datainicial AND :datafinal AND Vendedor Like ' + Chr(39) + '%' + Consulta + '%' + Chr(39));

;

[Chrnos 30]

Você tem duas colunas distintas usando um mesmo nome de aliás (Total). Mude um dos AS Total para AS Total1 por exemplo que vai sair correto.

[Diego Gonçalves 0]

Troquei os nomes dos campos da tabela:

 

Totalvendas

TotalQtda

 

O codigo como ficou:

 

SQL.Add('SELECT VENDEDOR,CLIENTE,DATA,DESC_PRODUTO,SUM(VL_PRODUTO) AS TOTALVENDAS,SUM (QUANTIDADE)AS TOTALQTDA FROM VENDAS where data BETWEEN :datainicial AND :datafinal AND Vendedor Like ' + Chr(39) + '%' + Consulta + '%' + Chr(39));
Parameters.ParamByName('datainicial').Value := FormatDateTime('dd/m/yyyy', Datainicial.date);
Parameters.ParamByName('datafinal').Value := FormatDateTime('dd/m/yyyy', Datafinal.Date);
OPEN;
QR_RELVENDAS.Preview;
END;
END;

O erro agora é este:

Você tentou execultar uma consulta que não inclui a expressão "Vendedor" especificada como parte de uma função agregada.

 

 

Amigos, não tenho nem idéia do que seja...

 

;

[Mário Monteiro 179]

como esta a estrutura da tabela vendas?

[Diego Gonçalves 0]

como esta a estrutura da tabela vendas?

Está assim:

COD

VENDEDOR

CLIENTE

DATA

DESC_PRODUTO

VL_PRODUTO

TOTALVENDAS

QUANTIDADE

TOTALQTDA

 

 

;

[Chrnos 30]

Quando se usa sqls com SUM, você deve usar obrigatoriamente um GROUP BY contendo todos os outros campos da sql que não envolvam SUM.

 

SQL.Add('SELECT VENDEDOR,CLIENTE,DATA,DESC_PRODUTO,SUM(VL_PRODUTO) AS TOTALVENDAS,SUM (QUANTIDADE)AS TOTALQTDA FROM VENDAS where data BETWEEN :datainicial AND :datafinal AND Vendedor Like ' + Chr(39) + '%' + Consulta + '%' + Chr(39) + ' GROUP BY VENDEDOR, CLIENTE, DATA, DESC_PRODUTO');

[Diego Gonçalves 0]

Obrigado a todos....

 

Consegui resolver graças a Deus. Utilizei o componente QrExpr e somando o campo da tabela através da propriedade Expression: SUM(Campo da tabela).

 

 

Muito simples mesmo...