Fórum Somar dados de dois campo #419140
29/06/2012
0
Estou precisando de ajuda ,estou criando um controle de estoque e queria fazer a soma dos valores do mes inteiro de um determinado produto. Ex durante o mes quanto em um determinado setor gastou.
Estou usando banco MYSQL ,clientdataset,e SQLQUERY.
Atraves dos forum descobri algo sobre loop , mas nem imagino como funciona .
Peço paciencia ,pois sou novo na area e nunca fiz algo desse tipo.
Obrigado
Watson Rocha
Curtir tópico
+ 0Posts
29/06/2012
Wasley Portes
SELECT SUM(CAMPO) FROM TABELA
Abraços
Gostei + 0
30/06/2012
Watson Rocha
Desculpe me mas não sei como faz isso . eu coloquei essa query no botão ,mas não deu certo ..
Você poderia me explicar como fazer isso !
Obrigado novamente ...
procedure TForm4.Button2Click(Sender: TObject);
begin
select sum (quantidade) from almox
end;
end.
Gostei + 0
30/06/2012
Watson Rocha
quero somar todos os valores do Campo Valor e me retorne esse dados em um edit ou dbedit segue abaixo como estou fazendo
procedure TForm4.Button2Click(Sender: TObject);
begin
SQLQUERY1.Close;
SQLQUERY1.SQL.Clear;
SQLQUERY1.SQL.Add(select SUM(Valor) from almox );
SQLQUERY1.Open;
DBEDIT1.Text:= IntToStr(SQLQUERY1.RecordCount);
END;
END.
O erro que me apresenta é um seguinte ,ele está somando a quantidade de linha do meu dbgrid .pois que na verdade
eu quero que some os valores da linha do dbgrid
ex-NF-1 Valor 10 some com a NF-2 valor-20 e o resultado me mostrasse no edit = 30
Obrigado
Gostei + 0
30/06/2012
Wasley Portes
procedure TForm4.Button2Click(Sender: TObject);
begin
SQLQUERY1.Close;
SQLQUERY1.SQL.Clear;
SQLQUERY1.SQL.Add(select SUM(Valor) as total from almox);
SQLQUERY1.Open;
DBEDIT1.Text:= SQLQUERY1.fieldbyname(total).asString;
END;
Acredito que vá funcionar.
Abraços
Gostei + 0
02/07/2012
Romulo Contro
vi que vc colocou RecordCount ali em cima... no caso, esse comando só serve para somar a quantidade de linhas e não de um determinado campo...
mas faz igual o Wasley falou que eu acredito que vai atender o que vc precisa
Gostei + 0
03/07/2012
Watson Rocha
Obrigado
Gostei + 0
03/07/2012
Wasley Portes
Para a quantidade de registros você utiliza assim:
procedure TForm4.Button2Click(Sender: TObject);
begin
SQLQUERY1.Close;
SQLQUERY1.SQL.Clear;
SQLQUERY1.SQL.Add(select count(*) as total from almox);
SQLQUERY1.Open;
DBEDIT1.Text:= SQLQUERY1.fieldbyname(total).asString;
END;
Para somar o valor de algum campo utiliza assim:
procedure TForm4.Button2Click(Sender: TObject);
begin
SQLQUERY1.Close;
SQLQUERY1.SQL.Clear;
SQLQUERY1.SQL.Add(select count(vl_nota) as total from almox);
SQLQUERY1.Open;
DBEDIT1.Text:= SQLQUERY1.fieldbyname(total).asString;
END;
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)