Valeu Luciano, mas olha so, a rotina q vc me mandou ajudou, mas nao resolveu 
ainda, pois ele criou outra coluna de valor so que os dados todos 0,00 e nao eh 
assim, pois existem dados nessa coluna de valor tb
mas valeu, se puder da outra verificada eu agradeco

abraco


From: Luciano Calenzani Simões 
Sent: Monday, June 02, 2008 8:06 AM
To: delphi-br@yahoogrupos.com.br 
Subject: Res: [delphi-br] RdPrint


O seu problema não é o RDPrint e sim sintaxe SQL.

Vamos lá:

SELECT data, conta, documento, 
(CASE WHEN valor > 0 THEN 0 ELSE valor END) valor_debito, 
(CASE WHEN valor <= 0 THEN 0 ELSE valor END) valor_credito,
FROM lancamento
WHERE codcliente = 1

Assim você terá duas colunas de valor, uma para débito e outra para crédito.

Luciano Calenzani Simões

----- Mensagem original ----
De: Ioney Hotmail <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Domingo, 1 de Junho de 2008 14:16:08
Assunto: [delphi-br] RdPrint

Boa Tarde Pessoal,

Eh o seguinte, eu estou desenvolvendo um programa de Contabilidade e estou com 
duvida no quisito relatorio, especificamente o de LOTE.
No relatorio o menu dele eh esse

DATA CODRED DOC HISTORICO VALOR DEB VALOR CRED
-------- ------------ -- ------- ------------ ----- ------------ ------ 
------------ ---------

Pois bem, fiz essa consulta

select DATA, CODRED, DOCUMENTO, VALOR AS VALORDEB, VALOR AS VALORCRED, 
HISTORICO,HISTORICO C from Lancamentos L join DetLancamentos D
on D.ContraPartida = L.ContraPartida
WHERE D.cliente = 1

so que ela nao separa VALOR DEB de VALOR CRED

COMO FACO PRA SEPAR OS VALORES

OBS: EXISTE UM CAMPO NA TABELA LANCAMENTO CHAMDO 'CD' ONDE EU DIGO QUEM EH 
CREDITO E QUEM EH DEBITO

Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento!
http://br.mail.yahoo.com/

[As partes desta mensagem que não continham texto foram removidas]



 

[As partes desta mensagem que não continham texto foram removidas]

Responder a