Fórum Pegar valor da soma da variável no quot;SUMquot;!!!! #172064

29/07/2003

0

Delphi

Em minha tabela existe os campos CODPROD, DATA, REF, SALDOLOJA, SALDODEP e QDE, e eu quero somar as quantidades de cada código com a data em que eu desejar, mas como faço para pegar essa soma em que eu jogo na variável VTOTAL? como mostra a seguir...

with Query4 do
begin
if Active then
Close;
SQL.Clear;
SQL.Add(´SELECT CODPROD, SUM(QDE) AS VTOTAL´);
SQL.Add(´FROM MOVV ´);
SQL.Add(´WHERE DATA= Date´);
SQL.Add(´GROUP BY CODPROD´);
Open;
end;

Vtot:=Query4.fieldbyname(´Sum of VTOTAL´).asfloat;
eu fiz isso para pegar a variável VTOTAL mas dá inválido fildbyname VTOTAL....


Rodrigo51

Rodrigo51

Responder

Posts

29/07/2003

Luciano Pimenta®

Tente assim:
Vtot:=Query4.fieldbyname(´VTOTAL´).asfloat;

:)


Responder

Gostei + 0

29/07/2003

Rodrigo51

Vtot:=Query4.fieldbyname(´VTOTAL´).asfloat;

[color=darkblue:f9cc8653e8][b:f9cc8653e8]Eu tentei desse jeito mas deu Field ´VTOTAL´ not found....
Será que deve ser jogado o valor da variável VTOTAL pra uma outra variável global dentro da SQL????[/b:f9cc8653e8][/color:f9cc8653e8]


Responder

Gostei + 0

29/07/2003

Kotho

qual o banco que voce esta usando? Se for interbase, substitua date por current_date... Se for oracle, substitua date por sysdate...

Apesar de que se esse for o problema, sua query nao seria aberta, pois acusaria erro. Por acaso voce esta abrindo sua query?


Responder

Gostei + 0

29/07/2003

Bugbear

Dentro da query vc coloca isso

Select Sum(Campo) as Teste From TAbela
Where
Codigo=:Codigo

..depois vai com o botão direito do mouse em cima da query e adcionar fields , vc vai perceber que apareceu uma variavel chamada (Teste),

fazendo isso .. vai aonde vc está fazendo a pesquisa ou sei lá oque

e faz isso

query.close;
query.parambyname(´Codigo´).asstring:=edit1.text;
query.prepare;
query.open;
variavel:=queryteste.asstring;

eh mais ou menos isso ..não esqueça de configurar a query com o Banco de dados certinho e verificar se os campos que vc está usando exista mesmo na tabela do bd ... falow qualquer duvida é só tc


Responder

Gostei + 0

29/07/2003

Mysys

mude o select

de

Select Sum(Campo) as Teste From TAbela
Where
Codigo=:Codigo

para

Select Sum(Campo)Teste From TAbela
Where
Codigo=:Codigo

retire o as e coloque o nome temporario junto so sum
dependendo do Banco de dados que vc Utiliza esse comando ele
e diferente

Edit1.text := Query.FieldByName(teste).asString;


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar