DataSet y ReportViewer
Publicado por Kike (17 intervenciones) el 06/12/2008 17:36:35
Hola,
Tengo el siguiente problema:
Tengo un DataSet con 4 DataTables. He de mostrar el resultado de estos DataTables en 4 informes, uno para cada informe en un ReporViewer. El problema es que sólo me funciona 1 de ellos, el primero que creé. Los demás me sale un error que dice:
"no se ha proporcionado ninguna instancia de origen para el origen de datos DataTable"
En la vista previa del dataset, todos me dan resultados y no entiendo el motivo.
La función que tengo en el ReportViewer es esta:
Public Sub ImprimirInforme(ByVal Informe As String, ByVal Numero As Integer)
Select Case Informe
Case "FacturaVenta"
Me.ReportViewer1.LocalReport.ReportEmbeddedResource = "Peluqueria.FacturaVenta.rdlc"
Me.dtFacturaClienteTableAdapter.Fill(Me.dsDataSet.dtFacturaCliente, Numero)
Me.Text = "Imprimir factura de venta"
Case "FacturaCompra"
Me.ReportViewer1.LocalReport.ReportEmbeddedResource = "Peluqueria.FacturaCompra.rdlc"
Me.dtFacturaCompraTableAdapter.Fill(Me.dsDataSet.dtFacturaCompra, Numero)
Me.Text = "Imprimir factura de compra"
Case "AbonoCompra"
Me.ReportViewer1.LocalReport.ReportEmbeddedResource = "Peluqueria.AbonoCompra.rdlc"
Me.dtAbonoCompraTableAdapter.Fill(Me.dsDataSet.dtAbonoCompra, Numero)
Me.Text = "Imprimir abono de compra"
Case "AbonoVenta"
Me.ReportViewer1.LocalReport.ReportEmbeddedResource = "Peluqueria.AbonoVenta.rdlc"
Me.dtAbonoClienteTableAdapter.Fill(Me.dsDataSet.dtAbonoCliente, Numero)
Me.Text = "Imprimir abono de venta"
End Select
Me.ReportViewer1.RefreshReport()
End Sub
Si alguien me sabe ayudar a resolver este problema...
Gracias
Tengo el siguiente problema:
Tengo un DataSet con 4 DataTables. He de mostrar el resultado de estos DataTables en 4 informes, uno para cada informe en un ReporViewer. El problema es que sólo me funciona 1 de ellos, el primero que creé. Los demás me sale un error que dice:
"no se ha proporcionado ninguna instancia de origen para el origen de datos DataTable"
En la vista previa del dataset, todos me dan resultados y no entiendo el motivo.
La función que tengo en el ReportViewer es esta:
Public Sub ImprimirInforme(ByVal Informe As String, ByVal Numero As Integer)
Select Case Informe
Case "FacturaVenta"
Me.ReportViewer1.LocalReport.ReportEmbeddedResource = "Peluqueria.FacturaVenta.rdlc"
Me.dtFacturaClienteTableAdapter.Fill(Me.dsDataSet.dtFacturaCliente, Numero)
Me.Text = "Imprimir factura de venta"
Case "FacturaCompra"
Me.ReportViewer1.LocalReport.ReportEmbeddedResource = "Peluqueria.FacturaCompra.rdlc"
Me.dtFacturaCompraTableAdapter.Fill(Me.dsDataSet.dtFacturaCompra, Numero)
Me.Text = "Imprimir factura de compra"
Case "AbonoCompra"
Me.ReportViewer1.LocalReport.ReportEmbeddedResource = "Peluqueria.AbonoCompra.rdlc"
Me.dtAbonoCompraTableAdapter.Fill(Me.dsDataSet.dtAbonoCompra, Numero)
Me.Text = "Imprimir abono de compra"
Case "AbonoVenta"
Me.ReportViewer1.LocalReport.ReportEmbeddedResource = "Peluqueria.AbonoVenta.rdlc"
Me.dtAbonoClienteTableAdapter.Fill(Me.dsDataSet.dtAbonoCliente, Numero)
Me.Text = "Imprimir abono de venta"
End Select
Me.ReportViewer1.RefreshReport()
End Sub
Si alguien me sabe ayudar a resolver este problema...
Gracias
Valora esta pregunta


0