Calcular campos de uma tabela
Estou com o seguinte problema:
Tenho um relatório de fluxo de caixa (tabelas entrada e saida) e no fim do relatorio exibiria a soma de tds os regitros d entrada e saida exbibidos e o lucro (entrada-saida). Tentei usar esta estrutura para o calculo, mas ela da erro:
TBEntrada.first;
TBSaida.first;
entrada:=0;//variavel
saida:=0;//variavel
repeat
if TBEntrada[´Data´]=data then //no caso a data cadastrada na tabela com a data escolhida pelo usuario
entrada:=entrada+TBEntrada[´Valor´]
else
TBEntrada.next;
until TBEntrada.Eof;
repeat
if TBSaida[´Data´]=data then
saida:=saida+TBSaida[´Valor´]
else
TBSaida.next;
until TBSaida.Eof;
lucro:=entrada-saida;
logo após isso ele acusa um erro.
pensei em usar o OnCalcFields, porém não sei usá-lo direito. Será que alguém poderia me ajudar?
VLW
Tenho um relatório de fluxo de caixa (tabelas entrada e saida) e no fim do relatorio exibiria a soma de tds os regitros d entrada e saida exbibidos e o lucro (entrada-saida). Tentei usar esta estrutura para o calculo, mas ela da erro:
TBEntrada.first;
TBSaida.first;
entrada:=0;//variavel
saida:=0;//variavel
repeat
if TBEntrada[´Data´]=data then //no caso a data cadastrada na tabela com a data escolhida pelo usuario
entrada:=entrada+TBEntrada[´Valor´]
else
TBEntrada.next;
until TBEntrada.Eof;
repeat
if TBSaida[´Data´]=data then
saida:=saida+TBSaida[´Valor´]
else
TBSaida.next;
until TBSaida.Eof;
lucro:=entrada-saida;
logo após isso ele acusa um erro.
pensei em usar o OnCalcFields, porém não sei usá-lo direito. Será que alguém poderia me ajudar?
VLW
Sérgio Gobbo
Curtidas 0
Respostas
Debug
01/06/2005
select sum(e.valor)as entrada, sum(s.valor)as saida,
sum(e.valor-s.saida)as lucro
from entrada e, saida s
where e.data between ´data inicio´ and ´data fim´
and s.data between ´data inicio´ and ´data fim´
espero ter ajudado!
sum(e.valor-s.saida)as lucro
from entrada e, saida s
where e.data between ´data inicio´ and ´data fim´
and s.data between ´data inicio´ and ´data fim´
espero ter ajudado!
GOSTEI 0
Sérgio Gobbo
01/06/2005
Olá, isso é SQL né? Será que vc poderia me explicar direito isso aí... é que não entendo mto sql, to começando a aprende-lo agora. A é... onde ele vai tb?
VLW
VLW
GOSTEI 0