Array
(
)

Erro ao executar o ReportViewer

Maralvo
   - 09 jun 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?

Marcio
   - 10 jun 2011

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.

Maralvo
   - 10 jun 2011

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.

Marcio
   - 10 jun 2011

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)

Maralvo
   - 15 jun 2011

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