martes, 25 de mayo de 2010

Reportes - ReportViewer

Hola a todos, muchas veces nos hemos preguntado como podemos imprimir o generar archivos en pdf, y si lo que necesitamos hacer es bastante complejo, muchas veces hacerlo todo a pedal resulta bastante tedioso, lo cual nos pone a pensar en una manera más rapida y fácil, en mi caso personal, la primera opción que se vino a la cabeza fue hacer mis reportes con crystal, ya que lo habia trabajado hace bastante tiempo, sin embargo, y más en entorno web, comprar la licencia del crystal a veces es complicado (aunque si peden hacerlo mejor), y algo muy parecido me sucedio con reporting services, además que necesitaba trabajar con versiones de sql express...

Así que tome la decisión de usar un control del toolbox de visual studio, el reportviewer, aunque no tenga la misma potencia de crystal reports, me ha sido de bastante utilidad. Lo que generalmente hago es tener una página exclusiva para mis reportes, asi por código lo que hago es cambiar el reporte y demas datos necesarios acorde a lo que deseo mostrar... sin más carreta comencemos...

Se debe tener en cuenta, que en el servidor en el cual se instale la aplicaciñon se debe correr un runtime para poder generar los reportes (esto sucede igual que con crystal).. es bastente liviano y no molesta para nada, descargalo !!

En ejemplo que voy a mostrar (bastante sencillo), tengo una página inicial la cual me muestra el nombre de algunas personas, con el nombre del país y la ciudad, esto lo hago con el control gridview.. y tengo dos botones, el primero me redirige a la página que muestra mi reporte, y allí puedo elegir si exportarlo o imprimirlo, y el segundo boton, me crea e reporte y automaticamente me permite elegir si abrirlo o guardarlo, sin salir de la página actual (en realidad si voy hasta la otra página, pero el usuario no se dará cuenta)... es decir, mi pantalla inicial es:



Lo único que se ha hecho es llenar el gridview con los datos...ahora lo que nos interesa, el reporte !!.

Creo una nueva página, la cual contiene un control ReportViewer, y ya, ahi acabo el diseño (sencillo verdad); en mi base de datos, he creado un procedimiento almacenado bastante sencillo, el cual me trae la información que vemos en la grilla, dicho procedimiento almacenado, recibe como parametro el codigo de la presona, para el ejemplo voy a enviar un % para que me los traiga todos, así que luego de tener el procedimiento, agrego un nuevo item de tipo dataset, para luego vincularselo al reporte, al agregar el dataset, este se encuentra vacio, asi q con clic derecho > agregar > tableadapter.. y ahi se muestra un asistente, en el cual configuramos la conexion, en este caso, la llamo del webconfig, luego le decimos que use un procedimiento almacenado existente y listo, tenemos nuestro dataset.

Luego agregamos un nuevo item de tipo informe (.rdlc), luego en la barra de menús vamos a Informe > origenes de datos, y alli escogemos el dataset que hemos creado, en mi caso se llamo dataset1_pa_imprimepersonas, y en la parte de la izquierda (generalmente) en el explorador de datos de sitios web, podemos ver que alli se encuentra el dataset, con el procedimiento almacenado, con los campos que nos trae el procedimiento, asi q ahora es solo diseñar el reporte arrastrando los campos, para el ejemplo he usado una tabla...

Ahora, si código.. en la primera página, vamos a programar el evento click de los botones, para ambos botones serña practicamente igual...

Protected Sub ButtonImprimir_Click(ByVal sender As Object, ByVal e As EventArgs) Handles ButtonImprimir.Click
Context.Items.Add("descargar", "no")
Context.Items.Add("persona", "%")
Server.Transfer("Reporte.aspx", True)
End Sub

Protected Sub ButtonDownload_Click(ByVal sender As Object, ByVal e As EventArgs) Handles ButtonDownload.Click
Context.Items.Add("descargar", "si")
Context.Items.Add("persona", "%")
Server.Transfer("Reporte.aspx", True)
End Sub

Podemos ver, que vamos a enviar a enviar dos variables por contexto, la primera es para saber si dse debe descargar el reporte y la segunda es el valor del parametro del procedimiento almacenado, luego se redirecciona a la página que tiene el reporte

En la página del reporte:
1. En el evento load verificamos por cual lado irnos, si mostrar el reporte o si hacer la descarga de una vez:

Dim sDescargar As String = CType(Context.Items("descargar"), String)
If sDescargar = "no" Then
Call Reporte()
Else
Call ReporteDownload()
End If

2. Aqui voy a mostrar solor el código cuando seleccionamos que no se debe descargar, en el ejemplo tienen todo:

Private Sub Reporte()
Dim sQuery As String = "PA_IMPRIMEPERSONAS"
cmd = New SqlCommand(sQuery)
cmd.Parameters.AddWithValue("@_codpersona", CType(Context.Items("persona"), String))
Dim dtpersonas As DataTable = oConexion.GetSP(cmd)
If Not dtpersonas Is Nothing AndAlso Not dtpersonas.Rows.Count = 0 Then
reportesReportViewer.Visible = True
reportesReportViewer.LocalReport.ReportPath = "Reportes\Reporte.rdlc"
Dim oReport As New ReportDataSource("DataSet1_PA_IMPRIMEPERSONAS", dtpersonas)
reportesReportViewer.LocalReport.DataSources.Clear()
reportesReportViewer.LocalReport.DataSources.Add(oReport)
reportesReportViewer.LocalReport.Refresh()
End If
End Sub

Ahora, como funciona este código?
declaro una variable la cual contiene el nombre del procedimiento almacenado, al command le paso el valor del parametro, luego en mi clase de conexion, la función que ejecuta procedimientos me devuelve un datatable, verifico que el datatable tenga datos, hago el reporte visible, se que en diseño ya lo hice, pero algunas veces si no lo ponia no me lo muestra,luego le asigno el reporte (.rdlc) que he diseñado (aqui podemos ver, que podemos enrutar cualquier reporte), lleno un reportdatasource para vincularselo a mi reportviewer, el primer parametro del constructor, debe ser el nombre del dataset que hemos creado anteriormente,luego se lo asigno al reportviewer y por último le hago un refresh...y amigos eso es todo, espero que este ejemplo un poco largo les sea de utilidad, ahi otras menaras de hacerlo, pero yo lo hago así y me ha funcionado muy bien...en el ejemplo encuentras el proyecto y la copia de la base de datos,en la base de datos ahi una tabla con todos lo paises, creo que les sera util...

Descarga el ejemplo aqui!!

Nos vemos en un proximo post donde vamos a hacer un menu contextual para un gridview, asi evitaresmo tener varios botones (eliminar, editar,imprimir,borrar,etc)

13 comentarios:

  1. MARVEL RUIZ

    Hola... estoy usando aspNet 2008 y visual basic. Trato de generar un reporte con el control microsoft reportViewer pero el problema es que cuando agrego un dataset al reporte y despues quiero arrastrar los campos de una determinada tabla, estos no se muestran. Podrian decirme que paso me esta haciendo falta????
    Los pasos que hasta ahora he hecho son:

    1. agregar el nuevo elemento (informe.aspx)
    2. Agregar un nuevo elemento de tipo rdlc(ejemplo rptVales.rdlc)
    3. agregar un control microsoft reportviewer
    4. Agregar un nuevo elemento (DataSet)
    5. Arrastrar la tabla que necesito al elemento rptVales.rdlc.
    6. Agregar un elemento "LISTA" a rptVales.rdlc
    7.arrastar los campos necesarios a la lista (aqui ocurre el problema, cuando arrastro los campos del dataset, no se muestar en el contorl "LIsta").

    de antemano les doy las gracias...

    ResponderEliminar
  2. Hola..mira hago un ejemplo desde cero y lo subo... y q por la tardanza....si te puedo colaborar en algo mi correo es julito_gtu@hotmail.com.....

    ResponderEliminar
  3. Hola..!
    Vieras que necesito hacer lo mismo en .net 2010 pero dice que no soporta ese control..
    ¿Qué experiencia has tenido?

    ResponderEliminar
  4. Hola, si lo he usado en 2010, pero debes tyener en cuenta varias cosas:
    1. si lo tenias en 2008 debes actualizarlos a 2010
    2. si ya tenias el proyecto en 2008 y lo abres con 2010 debes cambiar la version de las librerias en el web config...

    avisame pero porfa, mejor aca:
    http://julitogtu.wordpress.com/2010/05/25/reportes-reportviewer/

    ResponderEliminar
  5. Hola he estado leyendo tu blog, y no encontrado para validar los datos del ReportViewer en VB2010, me explico que al instante que se busque un dato y si este dato no se encuentra, enviar una notificación "lo sentimos lo que buscas no se encuentra", también quería preguntarte como buscar valores de tipo numerico en el ReportViewer en VB2010 a traves de parametros que se reciben en un InputBox ha y también validar el InputBox que solo acepte numero como seria en una caja de texto con el keypress.

    Dim parametros As New List(Of ReportParameter)()
    Dim strBuscarISBN As String
    Dim returnValue As Integer
    Try
    Do
    strBuscarISBN = CStr(InputBox("Buscar Certificado"))
    Loop Until Char.IsLetter(strBuscarISBN)
    MsgBox(strBuscarISBN, vbInformation)
    returnValue = Convert.ToInt64(strBuscarISBN) "para convertir el valor a numerico"
    parametros.Add(New ReportParameter("matricula", returnValue))
    Me.ReportViewer1.LocalReport.SetParameters(parametros)
    Me.ReportViewer1.RefreshReport()
    Me.ReportViewer1.SetDisplayMode(DisplayMode.PrintLayout)
    ReportViewer1.Visible = True
    Catch ex As Exception
    MsgBox(ex.ToString, MsgBoxStyle.Critical, "Lo sentimos no esta lo que buscas") " mi intento fallido de error"
    End Try

    Bueno me despido y de antemano muchas gracias espero me puedas ayudar, salu2.

    ResponderEliminar
  6. Muchas gracias, pero tengo una duda, yo estoy realizando el aplicativo para subirlo a un Host, este host también debe de tener el runtime instalado.........
    Muchas gracias!!!!!

    ResponderEliminar
  7. hola, asi es, en el servidor en donde instales la aplicación debes ejecutar el runtime... para cualquier duda me cambie a wordpress:
    http://julitogtu.wordpress.com/

    ResponderEliminar
  8. Hola Julio Cesar...
    Estoy programando en VB2008 y estoy trabajando en un proyecto del tipo WindowsForm...
    El tema es el siguiente: yo tengo un Reporte (con extensión rdlc) y lo puedo visualizar con el ReportViewer en un Formulario.-
    Y lo que quiero lograr es desde otro Formulario se pueda Imprimir el Reporte pero sin visualizarlo. Simplemente hacer clic en un botón e imprimir directamente el Reporte.-

    ResponderEliminar
  9. Esta interesante el post, pero quisiera saber como puedo vaciar datos en un reportviwer desde una consulta? help

    ResponderEliminar
  10. SE VE INTERESANTE AMIGO PERO NO ES MUY PRACTICO ES MUY POCO AMIGABLE TU CODIGO PERO SE VE INTERESANTE. SALUDOS
    LUIS

    ResponderEliminar
  11. Esta interesante el post, pero quisiera saber como puedo vaciar datos en un reportviwer desde una consulta

    ResponderEliminar
  12. Tengo un programa en vb2008 e incluye varios reportes al querer importarlo en vb2010 los reportes no funcionan (fallan) como se cambiarian para que funcionen

    ResponderEliminar