Fórum Somar coluna de uma tabela com parâmetro! #333175
16/11/2006
0
SELECT SUM (TOTAL) FROM TABVENDA2
ai no botão para somar eu tentei fazer isso:
procedure TFormVenda2.BitTerminarClick(Sender: TObject);
var
totalvenda:real;
begin
QuerySomaColuna.Open;
totalvenda := QuerySomaColuna.FieldValues(´total´).asfloat;
tabvenda.Edit;
TabVendaCodvenda.AsInteger := strtoint(edit1.Text);
TabVendaCodcli.AsInteger := 1;
TabVendaDatavenda.AsDateTime := date;
TabVendaTotalvenda.asfloat := totalvenda;
TabVenda.Post;
end;
só que não está dando certo, se alguém puder ajudar agradeço.
Detalhe: Delphi 7, Paradox
Grato
Japasc
Curtir tópico
+ 0Posts
16/11/2006
Japasc
SELECT SUM (TOTAL) FROM TABVENDA2 WHERE CODVENDA = :COD
Gostei + 0
17/11/2006
Joaoshi
Esta é a sua instrução:
SELECT SUM (TOTAL) FROM TABVENDA2
Desta forma você não tem uma field TOTAL, deve ter algo do tipo SUM OF TOTAL.
Você deve dar um ´apelido´ para o ´SUM´.
SELECT SUM (TOTAL) [b:202a9a629d]AS TOTAL[/b:202a9a629d] FROM TABVENDA2
Espero ter ajudado.
Gostei + 0
17/11/2006
Japasc
QuerySomaColuna.Active := FALSE; QuerySomaColuna.ParamByName(´COD´).ASINTEGER := StrToInt(Edit1.Text); QuerySomaColuna.Active := TRUE; tabvenda.Edit; TabVendaCodcli.AsInteger := 1; TabVendaDatavenda.AsDateTime := date; TabVendaTotalvenda.asfloat := DBEdit1.Field.AsFloat; TabVenda.Post;
Mais essa forma que vc falou como eu uso depois?
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)