[Resolvido] em Valor Total de um pedido.....

[flavioavilela 0]

Galera, eu aqui novamente precisando da ajuda de vcs...

 

agora é o seguinte:

tenho uma aqui uma coluna de Valor Unitário e uma coluna de Quantidade. Eu consegui fazer a somatória de cada item com seus respectivos valores e quantidades e ficou algo mais ou menos assim:

 

Valor Quantidade Sub-Total

2 * 4 = 8

3 * 4 = 12

4 * 5 = 20

6 * 7 = 42...

 

Agora, é o seguinte: eu preciso pegar esse subtotal de todos os itens e somar para dar o valor total da nota q estou dando entrada.... como faço???

 

 

Obs.: Estou usando query como meio de comunicação e banco sqlserver...

 

Desde já, agradeço a colaboração de todos.... :wacko:

 

Leia aqui a 9ª Regra do Fórum

[cgonzalez 0]

Faz assim:

 

SELECT (sum(UNI) *sum(QTD)) AS TOTAL

FROM NOME_DA_TABELA

[flavioavilela 0]

Faz assim:

 

SELECT (sum(UNI) *sum(QTD)) AS TOTAL

FROM NOME_DA_TABELA

 

 

tipo.. entendi oq você quis fazer ai... soma todas as quantidades * todos os valores unitários....

só que assim... eu precisava ir item por item, entendeu??? tipo assim... o kra digitou lá:

 

Qtde Valor Un. Valor Total

3 * 2 = 6

 

e assim que ele dar outra entrada, por exemplo:

Qtde Valor Un. Valor Total Total Geral

5 * 3 = 15 21

 

e vamos supor que deu entrada em outro produto, por exemplo:

Qtde Valor Un. Valor Total Total Geral

6 * 6 = 36 57

 

entendeu???? ir atualizando o EDITVALOR_GERAL, a medida que for dando entrada em cada pedido...

espero que me ajude...

[Rodrigo Miss 1]

Ola, beleza?

Você pode fazer a soma no AfterPost da sua query ...

 

var
  Soma: Double;
begin
  Soma:= 0;

  ADOQuery1.First;
  ADOQuery1.DisableControls;

  while not ADOQuery1.Eof do
  begin
	Soma:= Soma + ADOQuery1VALOR.Value;
	ADOQuery1.Next;
  end;

  ADOQuery1.EnableControls;
  Edit2.Text:= FloatToStrF(Soma, ffCurrency, 18, 2);

[flavioavilela 0]

Ola, beleza?

Você pode fazer a soma no AfterPost da sua query ...

 

var
   Soma: Double;
 begin
   Soma:= 0;
 
   ADOQuery1.First;
   ADOQuery1.DisableControls;
 
   while not ADOQuery1.Eof do
   begin
	 Soma:= Soma + ADOQuery1VALOR.Value;
	 ADOQuery1.Next;
   end;
 
   ADOQuery1.EnableControls;
   Edit2.Text:= FloatToStrF(Soma, ffCurrency, 18, 2);

 

vlw...

me ajudou pra caramba... consegui...

abraço