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]