PROBLEMAS COM CRYSTAL REPORT

ADEMIRJOAO 02/10/2009 15:36:29
#324266
Olá pessoal,

Estou montando um programinha de controle de estoque e enfrento um grande problema com um relatorio. Criei um rel. em crystal chamado Kardex e tenho em mente selecionar de 3 formas diferentes com segue:

1. por loja (através de um combo)
2. por item (txtcod)
3 por data (de data x até data Y)

minha conexão com o banco é DAO, alguém pode me ajudar ?

segue abaixo um ex. do que estou tentando fazer...

CrystalReport1.ReportFileName = App.path + [Ô]\kardex.RPT[Ô]
CrystalReport1.DataFiles(0) = App.path + [Ô]\dados.mdb[Ô]
CrystalReport1.SelectionFormula = [Ô]{movimentos.cod} = [Ô] & txtcod.Text and {movimentos.site} = [Ô] & cboSite & [Ô][Ô]
CrystalReport1.CopiesToPrinter = 1
CrystalReport1.Destination = 0
CrystalReport1.SortFields(0) = [Ô]+{movimentos.data}[Ô]
CrystalReport1.WindowState = crptMaximized
CrystalReport1.Action = 1
Me.MousePointer = 1

Desde já agradeço a todos a atenção desperdiçada
TECLA 12/10/2009 21:00:50
#325105 Resposta escolhida
Citação:

Estou montando um programinha de controle de estoque e enfrento um grande problema com um relatorio. Criei um rel. em crystal chamado Kardex e tenho em mente selecionar de 3 formas diferentes com segue:

1. por loja (através de um combo)
2. por item (txtcod)
3 por data (de data x até data Y)



Qual é a ESTRUTURA da tabela MOVIMENTOS?
A pergunta, é justamente para saber [Ô]qual o campo[Ô] que identifica a LOJA (item 1).
ADEMIRJOAO 13/10/2009 14:33:12
#325188
Olá,

O campo que corresponde a Loja é o campo Site...

Campo Tipo
COD Numero
SITE Texto
Des_Item Texto
Data Data/Hora
Doc Numero
Mov Texto
Qua Numero
Des_Cli Texto

Obrigado.
ADEMIRJOAO 21/11/2009 08:21:06
#328327
Por favor algúm do VBMania poderia me ajudar ?
ROBIU 21/11/2009 08:55:58
#328328
Coloca o cristal por dentro do vb6 que você poderá usar métodos e eventos do report no seu código. Neste caso, o report é compilado junto com o exe e não há risco de perda do arquivo. Para chamar o relatorio é só usar o mesmo Rs que você usa para carregar campos, grids, etc. Todo filtro será feito pelo select e não precisará de fórmulas. Os relatórios prontos também podem ser incluidos no vb6. Para incluir o report no vb, vai no menu project => Add Crystal Report
segue um exemplo de conexão com o crystal. Aqui o caminho do banco é definido pela conexão ado.

Set Rs = New ADODB.Recordset
Criterio = Txt1.Text

If Criterio = [Ô][Ô] Then
    Sql = [Ô]Select * from RptNf[Ô]
Else
    Sql = [Ô]select * from rptnf where Nf=[ô][Ô] & Criterio & [Ô][ô][Ô]
End If

Rs.Open Sql, Bd, adOpenKeyset, adLockPessimistic

Report.Database.SetDataSource Rs
FUTURA 21/11/2009 12:50:31
#328332
robiu, mas ai tem que usar o crviewer ? ou da pra fazer pela ocx, uso a versão 8.5
ROBIU 21/11/2009 13:00:05
#328334
com o crviewer. você adciona da mesma forma que adiciona o data report. O resto o assistente do crystal faz.
Tópico encerrado , respostas não são mais permitidas
Voltar