IMPRESSAO NO CR
Meus amigos, peço mais um Help nesse detalhe. O meu relatório esta vindo incompleto. Já fiz de tudo ao meu alcance mas não consigo resolver.
Imprime com alguns dados faltando. Uso o seguinte codigo:
Dim dt As New DataTable
With dt
.Columns.Add([Ô]Cliente[Ô])
End With
Dim dr As DataGridViewRow = Me.ModalidadeDataGridView.CurrentRow
dt.Rows.Add(dr.Cells([Ô]DataGridViewTextBoxColumn1[Ô]).Value)
Dim rptDoc As CrystalDecisions.CrystalReports.Engine.ReportDocument
rptDoc = New Emprestimos
rptDoc.SetDataSource(dt)
Form5.CrystalReportViewer1.ReportSource = rptDoc
Form5.ShowDialog()
Form5.Dispose()
O que esta faltando?
Grato
Imprime com alguns dados faltando. Uso o seguinte codigo:
Dim dt As New DataTable
With dt
.Columns.Add([Ô]Cliente[Ô])
End With
Dim dr As DataGridViewRow = Me.ModalidadeDataGridView.CurrentRow
dt.Rows.Add(dr.Cells([Ô]DataGridViewTextBoxColumn1[Ô]).Value)
Dim rptDoc As CrystalDecisions.CrystalReports.Engine.ReportDocument
rptDoc = New Emprestimos
rptDoc.SetDataSource(dt)
Form5.CrystalReportViewer1.ReportSource = rptDoc
Form5.ShowDialog()
Form5.Dispose()
O que esta faltando?
Grato
Boa tarde,
Pelo que vi amigo, você apenas está pegando o valor de uma coluna e de uma linha. Você tem que percorrer todas as linhas do datagrid e alimentar o datatable.
Pelo que vi amigo, você apenas está pegando o valor de uma coluna e de uma linha. Você tem que percorrer todas as linhas do datagrid e alimentar o datatable.
Altair, Postei só o código que estou usando não vejo necessidade de postar todos rows e columns. O codigo que serve para um row ou colum serve para 100 ne?
Obrigado mesmo assim.
Obrigado mesmo assim.
Então, o correto é avisar que o código está abreviado, aqui surge dúvidas de vários tipos e eu não iria adivinhar que o código não está completo.
Quando você tenta gerar por exemplo tem 10 linhas e gera apenas com 5 linhas?
Quando você tenta gerar por exemplo tem 10 linhas e gera apenas com 5 linhas?
Altair, desculpa qualquer coisa,
minha linha tem 4 colunas por exemplo:
Cliente, contrato, corretor, valor
no relatorio aparecem:
cliente, corretor ,valor e o campo contrato fica vazio mesmo com o datagridview completo.
E tem mais, as vezes muda de campo pra ficar vazio eheheh Oh my God. eheheh
Obrigado pela atenção.
se puder me ajudar...
minha linha tem 4 colunas por exemplo:
Cliente, contrato, corretor, valor
no relatorio aparecem:
cliente, corretor ,valor e o campo contrato fica vazio mesmo com o datagridview completo.
E tem mais, as vezes muda de campo pra ficar vazio eheheh Oh my God. eheheh
Obrigado pela atenção.
se puder me ajudar...
Ok, sem problemas amigo, não se preocupe....
Para facilitar seria bom postar todo o código do que está usando, assim eu vejo onde tem o erro.
Para facilitar seria bom postar todo o código do que está usando, assim eu vejo onde tem o erro.
AÃ vai:
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
O que tudo indica o problema deve estar na alimentação do dataset. Abaixo um exemplo que bolei aqui de como alimentar o dataset com os registros do datagrid, basta adaptar, qualquer coisa posta ae.
for x = 0 to datagridview1.rowcount - 1
Dim ds As New DataSet1 [ô] Aqui é o nome do dataset que o relatório utuliza
Dim dr As DataRow = ds.Tables(0).NewRow()
dr([Ô]Corretor[Ô]) = DataGridView1.Rows(x).Cells([Ô]Corretor[Ô]).Value
dr([Ô]Banco[Ô]) = DataGridView1.Rows(x).Cells([Ô]Banco[Ô]).Value
dr([Ô]Prazo[Ô]) = DataGridView1.Rows(x).Cells([Ô]Prazo[Ô]).Value
ds.Tables(0).Rows.Add(dr)
Next
E aà Altair tudo blz?
Cara, tive de viajar e só agora sentei aqui. A impressão já resolvi também. Tudo jóia, mas só imprime o CurrentRow do datagridview. Eu não estou sabendo como estruturar por nome entende?
Tipo assim: na minha busca por nome aparecem o cliente e seus emprestimos no datagridview. Ate ai tudo bem. Mas se eu peço a impressão, se tiver 3 emprestimos só imprime o setado no datagridview.
Sei que é porque o comando que estou usando é:
[Ô]Dim dr as Datagrid = Me.DataGridView.CurrentRow[Ô]
Mas, qual seria o comando para imprimir todos os emprestimos listados do mesmo cliente?
Desde já sou-lhe muito grato.
Cara, tive de viajar e só agora sentei aqui. A impressão já resolvi também. Tudo jóia, mas só imprime o CurrentRow do datagridview. Eu não estou sabendo como estruturar por nome entende?
Tipo assim: na minha busca por nome aparecem o cliente e seus emprestimos no datagridview. Ate ai tudo bem. Mas se eu peço a impressão, se tiver 3 emprestimos só imprime o setado no datagridview.
Sei que é porque o comando que estou usando é:
[Ô]Dim dr as Datagrid = Me.DataGridView.CurrentRow[Ô]
Mas, qual seria o comando para imprimir todos os emprestimos listados do mesmo cliente?
Desde já sou-lhe muito grato.
Se alguém mais puder me ajudar eu agradeço!
Use o For... Next para percorrer as linhas do datagrid.
Como ficou seu código?
Como ficou seu código?
Tópico encerrado , respostas não são mais permitidas