[firebase-br] RES: relatorio c/ periodo entre datas com crystale firebird/vb6

odir em clippnet.com.br odir em clippnet.com.br
Qua Maio 2 17:57:40 -03 2012


Experimente dessa forma:
SQLDT =

SQL = "{TAB_VENDA_DIRETA.DATA}>=cdate(" & format(DataInicio,"yyyy,mm,dd")  & 
") and  {TAB_VENDA_DIRETA.DATA}<=cdate(" & format(DataFinal,"yyyy,mm,dd") & 
")"


Odir Rodrigues de Oliveira
Clipp-net Informática
São Carlos - SP
Fone/Fax: 16 3307-7369
Cel: 16 8137-2103
Msn: clippnet em hotmail.com
Skype: odir_r
Site: www.clippnet.com.br
-----Original Message----- 
From: Juliasse
Sent: Wednesday, May 02, 2012 2:40 PM
To: 'FireBase'
Subject: [firebase-br] RES: relatorio c/ periodo entre datas com crystale 
firebird/vb6


Boa tade
Então eu tentei e mesmo assim não dá certo não


-----Mensagem original-----
De: lista-bounces em firebase.com.br [mailto:lista-bounces em firebase.com.br] Em
nome de Wilson Rosa
Enviada em: terça-feira, 1 de maio de 2012 23:10
Para: FireBase
Assunto: Re: [firebase-br] relatorio c/ periodo entre datas com crystal e
firebird/vb6

Você pode usar o formato brasileiro (com ponto) "dd.mm.yyyy" ou o americano
(com barra) "mm/dd/yyyy".



*Wilson Rosa*
Desenvolvedor Desk
wsrosa em gmail.com
*
*



Em 1 de maio de 2012 15:47, Juliasse <geral em outlett.com.br> escreveu:

>
>
> Boa tarde galera,
>
> E estou fazendo alguns relatórios no vb6, eu uso o firebird 2.0 e o
crystal
> 9.
>
> Fiz o relatório, criei uma aplicação no vb para abrir usando o crviewer
> tudo
> funciona blz com os outros filtros por nomes, mas quando fui
>
> Fazer a pesquisa por datas dá um erro/;
>
>
>
> Failed to open rowset.
>
> Details: ADO error code: 0x80040e21
>
> Source: ibole.TIBOLECommand
>
> Description: Dynamic SQL Error
>
> SQL error code -804
>
> Function unknown
>
> CONVERT
>
>
>
> Eu estou postando as linhas de comando blz, Pessoal me dá uma força.
>
>
>
> Set crxReport = Nothing
>
> Set crxReport =
> crxApp.OpenReport("C:\DATABASES\RELATORIOS\Relat_det_venda.rpt")
>
> crxReport.DiscardSavedData
>
>
>
> If txtDtIn <> Empty And txtDtFim <> Empty Then
>
>     DataInicio = Format(txtDtIn.Text, "yyyy,mm,dd")      ----------------
> Obs: Eu já tentei usando com  / ,  .  –  mm,dd,yyyy   e não deu certo
>
>     DataFinal = Format(txtDtFim.Text, "yyyy,mm,dd")
>
>     SQLDT = "{TAB_VENDA_DIRETA.DATA}"
>
>     SQL = SQLDT & " IN DATE(" & DataInicio & ") TO DATE(" & DataFinal &
")"
> ------------- Obs: eu já tentei colocando apostofo e não deu certo
>
> End if
>
>
>
>    crxReport.RecordSelectionFormula = SQL
>
>    CRViewer.ReportSource = crxReport
>
>    CRViewer.ViewReport
>
>
>
> Eu uso dessa mesma forma em outro projeto usando o banco em access
>
> Mas no firebird não deu certo.
>
>
>
>
>
>
>
>
>
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> Para saber como gerenciar/excluir seu cadastro na lista, use:
> http://www.firebase.com.br/fb/artigo.php?id=1107
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
>
______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
Para saber como gerenciar/excluir seu cadastro na lista, use:
http://www.firebase.com.br/fb/artigo.php?id=1107
Para consultar mensagens antigas: http://firebase.com.br/pesquisa


______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
Para saber como gerenciar/excluir seu cadastro na lista, use: 
http://www.firebase.com.br/fb/artigo.php?id=1107
Para consultar mensagens antigas: http://firebase.com.br/pesquisa 





Mais detalhes sobre a lista de discussão lista