Acho que assim resolve sua duvida.
SELECT MOV.CGC, MOV.PRODUTO, MOV.LOTE, MOV.SERIE, MOV.NOTA,
SUM(COALESCE(CRD.QTD_MOV, 0) - COALESCE(DEB.QTD_MOV, 0 )) AS QTD_SALDO,
SUM(COALESCE(CRD.VLR_MOV, 0) - COALESCE(DEB.VLR_MOV, 0)) AS VLR_SALDO
FROM TABELA MOV
LEFT JOIN TABELA CRD ON (( MOV.CGC = CRD.CGC ) AND ( MOV.PRODUTO =
CRD.PRODUTO ) AND ( MOV.LOTE = CRD.LOTE ) AND ( MOV.SERIE = CRD.SERIE ) AND
( MOV.NOTA = CRD.NOTA ) AND ( MOV.SEQUENCIA = CRD.SEQUENCIA ) AND ( CRD.DCA
= 'C')))
LEFT JOIN TABELA DEB ON (( MOV.CGC = DEB.CGC ) AND ( MOV.PRODUTO =
DEB.PRODUTO ) AND ( MOV.LOTE = DEB.LOTE ) AND ( MOV.SERIE = DEB.SERIE ) AND
( MOV.NOTA = DEB.NOTA ) AND ( MOV.SEQUENCIA = DEB.SEQUENCIA ) AND ( DEB.DCA
= 'D'))
WHERE ( MOV.DT_MOV <= :DT_SALDO )
A select acima pega a TABELA e "divide-a" em 3. Em cada join separando o que
e credito e debito. No final do sql e so usar o campo QTD_SALDO.
Cláudio Anderson de Araújo Prudente
Analista/Desenvolvedor de Sistemas
[EMAIL PROTECTED]
----- Original Message -----
From: "Jenifer" <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Wednesday, March 29, 2006 2:23 PM
Subject: RES: [delphi-br] Duvida numa Query
Oi gente...
Na verdade acho que não fui clara.
Minha tabela tem um campo valor e outro campo que determina se é entrada ou
saída.
Na Dbgrid eu mostro os campos conforme pesquisa seja por data ou qualquer
outro campo.
Mas preciso retorna numa label ou Edit a soma deste campo numérico que
depende diretamente de outro campo para somar ou diminuir... Por isso estou
sem saber o que fazer.
Neste caso o select deveria ter um IF campo1="E" soma else diminui.
Não sei se dessa vez deu pra entender
Agradeço a ajuda.
Jenifer
_____
De: [email protected] [mailto:[EMAIL PROTECTED] Em
nome de Eduardo ARCHIVE
Enviada em: quarta-feira, 29 de março de 2006 12:07
Para: [email protected]
Assunto: RES: [delphi-br] Duvida numa Query
A idéia seria usar a dica do companheiro, fazendo a soma numa Query.
Mas tb daria para fazer um Campo Calculado.
Abraços,
Eduardo RC Neto
Desenvolvimento de Sistemas
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Links do Yahoo! Grupos
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
