PROBLEMA COM CRYSTAL REPORTS

RPMARQUES 04/04/2013 10:04:20
#421500
Bom dia pessoal, estou com um problema que não sei o nem onde começar para arrumar, seguinte, to desenvolvendo um sisteminha para controles dos chamados, até ai tudo bem, eu to montando os relatorios usando o Crystal Reports, fui testar um e funcionou sem problemas, depois eu montei outro rpt e dai fui testar, e parece que fica tudo travado, ele abre o form pra exibir os relatorios, e fica naquela telinha de processando o relatório, e dai não vai pra frente nem prra traz, não sei o que o pode ser, alguém ai pode me dar uma luz???
ALTAIR148 04/04/2013 12:27:32
#421511
Bom dia,

Amigo, posta o código que está usando para alimentar o relatório, o erro deve estar nele.
RPMARQUES 04/04/2013 14:08:07
#421517
Citação:

[ô] AQUI EU CHAMO O RELATÓRIO
wCodigo = dgvClientes.SelectedCells(0).Value.ToString()
If wCodigo = [Ô][Ô] Then
MsgBox([Ô]Selecione um cliente.[Ô], MsgBoxStyle.Critical, PUnomeSistema)
End If

wTabela = [Ô]clientes[Ô]
wCampos = [Ô]Codcli,nome,endereco,nro,bairro,cidade,foneres,fonecom,fonecel,email[Ô]
wCondicao = [Ô]codcli=[ô][Ô] & wCodigo.Trim & [Ô][ô][Ô]

ComandoSQL = [Ô]SELECT [Ô] & wCampos & [Ô] FROM [Ô] & wTabela & [Ô] WHERE [Ô] & wCondicao

EmiteRel(ComandoSQL, wTabela, [Ô]fichacli[Ô], [Ô]FichaCli[Ô])

Citação:



PROC EMITEREL

Citação:

Public Sub EmiteRel(ByVal rComandoSQL As String, ByVal rTabela As String, ByVal rNomeXML As String, ByVal rArquivoRPT As String)

[ô]VE SE O rNomeXML JA ESTA COM A EXTENSÃO .XML
If Not rNomeXML.EndsWith([Ô].xml[Ô]) Then
rNomeXML = rNomeXML & [Ô].xml[Ô]
End If

[ô]VE SE O rArquivoRPT JA ESTA COM A EXTENSAO .RPT
If Not rArquivoRPT.EndsWith([Ô].rpt[Ô]) Then
rArquivoRPT = rArquivoRPT & [Ô].rpt[Ô]
End If

AbreBanco()
DS = New DataSet
DA = New NpgsqlDataAdapter(rComandoSQL, conn)

[ô]SALVA UM XML TEMPORÁRIO PARA MONTAR O REL
DA.Fill(DS, rTabela)
DS.WriteXml(Path.ToString & [Ô]    mps\[Ô] & rNomeXML.ToString, XmlWriteMode.WriteSchema)
PUNomeRel = rArquivoRPT.ToString

FechaBanco()
frmRel.Show()
End Sub
Faça seu login para responder
Voltar