Me desculpe por não ter mandando antes, só hoje, aproveitando a abertura 
do PAN ( rsrs ) consegui fazer o exemplo.

Lembro que este modelo serve para o Oracle. Não conheço o BD que você 
usa, por tanto não sei se será do mesmo jeito, acredito que não deva ser 
muito diferente disso.

DROP TABLE TESTE;
CREATE TABLE TESTE ( DESCRICAO VARCHAR2(20), VALOR NUMBER(12,2), TIPO 
CHAR(1));
REM INSERTING into TESTE
INSERT INTO "TESTE" (DESCRICAO, VALOR, TIPO) VALUES ('DEPOSITO', '100', 
'C');
INSERT INTO "TESTE" (DESCRICAO, VALOR, TIPO) VALUES ('REC NF',   '100', 
'C');
INSERT INTO "TESTE" (DESCRICAO, VALOR, TIPO) VALUES ('CHEQUE',   '100', 
'C');
INSERT INTO "TESTE" (DESCRICAO, VALOR, TIPO) VALUES ('CHEQUE',   '030', 
'D');
INSERT INTO "TESTE" (DESCRICAO, VALOR, TIPO) VALUES ('DEPOSITO', '035', 
'D');
INSERT INTO "TESTE" (DESCRICAO, VALOR, TIPO) VALUES ('REC NF',   '040', 
'D');
COMMIT;

SELECT DESCRICAO, SUM(CREDITO), SUM(DEBITO), (SUM(CREDITO) - 
SUM(DEBITO)) AS SALDO FROM(
 SELECT DESCRICAO, VALOR AS CREDITO, 0 AS DEBITO, TIPO
   FROM TESTE
  WHERE TIPO = 'C'
 UNION ALL
 SELECT DESCRICAO, 0 AS CREDITO, VALOR AS DEBITO, TIPO
   FROM TESTE
  WHERE TIPO = 'D')
GROUP BY DESCRICAO


Se precisar de mais alguma coisa ou tirar alguma duvida poste aqui.


Eduardo

Ricardo Mendes escreveu:
>
> uso firebird + delphi 7
>
> Ricardo Mendes
> Departamento de Informática
> E-mail: [EMAIL PROTECTED] <mailto:r.mendes%40totalsat.com.br>
> Site: www.totalsat.com.br
> Tel. (41) 2109-7717
> ----- Original Message -----
> From: Eduardo Castro Alves
> To: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br>
> Sent: Wednesday, July 11, 2007 2:13 PM
> Subject: Re: [delphi-br] Extrato Bancário em formulario e não em relatório
>
> Qual BD você esta usando ???
>
> Eduardo
>
> Ricardo Mendes escreveu:
> >
> > Galera, bom...gostaria de verificar com vcs se alguem já preciosou
> > geral um "extrato bancario" em aplicação...
> >
> > Deixa eu explicar o q eu to fazendo. Estou realizando na minha
> > aplicação o fechamento de caixa e gostaria que o cliente digitasse as
> > datas de inicio e fim do fechamento e o resultado dos lançamentos
> > ocorridos nesse periodo fosse mostrado como um extrado bancário.
> >
> > Ex:
> >
> > Data Conta | Descrição da Conta | Codigo | Valor | Tipo
> >
> > 15/07/2007 | CONTA DE AGUA |1568 | R$ 98,00 | D
> > 15/07/2007 | DEPOSITO DA CC |0010 | R$ 100,00 | C
> >
> > é +/- isso q eu quero...
> >
> > Ricardo Mendes
> > Departamento de Informática
> > E-mail: [EMAIL PROTECTED] <mailto:r.mendes%40totalsat.com.br> 
> <mailto:r.mendes%40totalsat.com.br>
> > Site: www.totalsat.com.br
> > Tel. (41) 2109-7717
> >
> >
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  

Responder a