Erro ao executar o ReportViewer

09/06/2011

Ao executar um relatório que fiz em ReportViewer aparece o seguinte erro:


Report Viewer Configuration Error The Report Viewer Web Control HTTP Handler has not been registered in the application's web.config file. Add <add verb="*" path="Reserved.ReportViewerWebControl.axd" type = "Microsoft.Reporting.WebForms.HttpHandler, Microsoft.ReportViewer.WebForms, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" /> to the system.web/httpHandlers section of the web.config file, or add <add name="ReportViewerWebControlHandler" preCondition="integratedMode" verb="*" path="Reserved.ReportViewerWebControl.axd" type="Microsoft.Reporting.WebForms.HttpHandler, Microsoft.ReportViewer.WebForms, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" /> to the system.webServer/handlers section for Internet Information Services 7 or later.  Alguém já se deparou com iso?

Maralvo

Respostas

10/06/2011

Marcio

Marcos,
Este erro está acontecendo na sua máquina de desenvolvimento ou no servidor?Pelo erro está faltando instalar o ReportView (ou então ficou faltando registrar alguma dll).Sugiro uma nova instalação, se for no servidor basta instalar o Report Viewer Redistributable.
Responder Citar

10/06/2011

Maralvo

Consegui resolver este problema, estava faltando fazer o link do reportviewer ao webform.aspx. Porém não estou conseguindo fazer aparecer o relatório em si. 
Problema nesta linha de comando:

ReportViewer.LocalReport.DataSources.Add(New ReportDataSource("Orgao", Relatorio.OrgaoDataTable.Tables(0)))

Não sei se os campos dentro dos parênteses estão corretos.
Responder Citar

10/06/2011

Marcio

Com certeza está errado:
Aonde está "Orgao" deve ser preenchido com o nome do DataSet mais um sinal de underline nome da Tabela. Se o DataSet for Orgao mesmo deve ficar assim: "Orgao_Tabela", Relatorio.OrgaoDataTable.Tables(0)
Responder Citar

15/06/2011

Maralvo

Foi feito o seguinte:

 Private Sub ConfiguraRelatorio()
        'Dim ex As New TJRegraDeNegocioException
        Dim list As IList(Of Model.AFD)
        Dim sCodUsu As String = String.Empty
        Dim sGrupo As String = String.Empty
        Dim Param(4) As ReportParameter
        Dim cls As New Model.MacoService
        Dim maco As Maco = cls.consultarMaco(Me.numMaco, Me.codOrg)
        If (maco Is Nothing) Then
            Throw New TJRegraDeNegocioException("Maço não encontrado")
        End If
         
            list = cls.consultarProcessosDoMacoPorNumeroMacoECodOrg(maco.numMaco, Me.codOrg)

        Param(0) = New ReportParameter("serventia", maco.orgao.nome)
        Param(1) = New ReportParameter("numMaco", maco.numMaco)
        Param(2) = New ReportParameter("codOrgao", maco.orgao.codOrgao)
        Param(3) = New ReportParameter("observacao", maco.observacao)
        Param(4) = New ReportParameter("codUsu", maco.usuario.codUsu)

        ReportViewer1.LocalReport.DataSources.Clear()
        ReportViewer1.LocalReport.ReportPath = "rptMaco.rdlc"
        ReportViewer1.LocalReport.ReportEmbeddedResource = "rptMaco.rdlc"
        ReportViewer1.LocalReport.DataSources.Add(New ReportDataSource("clsItemRelatorio", From l In       parseListAFDToItemRelatorioMaco(list).AsQueryable))
        ReportViewer1.LocalReport.SetParameters(Param)
        ReportViewer1.DataBind()
    

    End Sub
    Private Function parseListAFDToItemRelatorioMaco(ByVal lista1 As IList(Of AFD)) As IList(Of ItemRelatorioMaco)
        Dim lista2 As New List(Of ItemRelatorioMaco)
        For Each el As AFD In lista1
            lista2.Add(New ItemRelatorioMaco(el))
        Next

        Return lista2
    End Function
Responder Citar