Jump to content

Reports Viewer


informaster
 Share

Recommended Posts

Bom Dia

Fiz um Report Viewer com Parâmetros.

Até aqui correu bem.

Agora adicionei um tabela ao report e arrastei campos que estavam na dataset.

Só que quando vejo o reportviewer no debug diz a seguinte mensagem de erro no proprio report.

"...a data source has not been supplied for the data source..."

Será que tenho escrever algum código para o dataset funcionar.

è que não faço a minima como funciona.

Se apagar a tabela o report já funciona.

Abraço

Nuno Revez

@informaster

Link to comment
Share on other sites

Pois já vi. Mas o meu problema é que já tenho muitos reports com isto:

    Private Sub btImprimirIntervencoes_Click(sender As System.Object, e As System.EventArgs) Handles btImprimirIntervencoes.Click
	    Using frm As New FrmRptViewer
		    Dim paramList As New List(Of ReportParameter)
		    paramList.Add(New ReportParameter("idsat", txtIdSat.Text))
		    paramList.Add(New ReportParameter("idcontrato", txtIdContrato.Text))
		    paramList.Add(New ReportParameter("empresa", txtEmpresa.Text))
		    paramList.Add(New ReportParameter("datacriacao", txtDataCriacao.Text))
		    paramList.Add(New ReportParameter("morada", txtMorada1.Text))
		    paramList.Add(New ReportParameter("morada2", txtMorada2.Text))
		    paramList.Add(New ReportParameter("localidade", txtLocalidade.Text))
		    paramList.Add(New ReportParameter("codpostal", txtCodPostal.Text))
		    paramList.Add(New ReportParameter("tipocontrato", cbTipoContrato.Text))
		    paramList.Add(New ReportParameter("estado", txtEstadoActual.Text))
		    paramList.Add(New ReportParameter("tipoassistencia", cbAssistencia.Text))
		    paramList.Add(New ReportParameter("problema", txtProblema.Text))
		    paramList.Add(New ReportParameter("dataabertura", PickDataAbertura.Value))
		    paramList.Add(New ReportParameter("tecnicoabertura", txtTecAbertura.Text))
		    paramList.Add(New ReportParameter("resolucao", txtResolucao.Text))
		    paramList.Add(New ReportParameter("totalminutos", txtTotalMinutos.Text))
		    paramList.Add(New ReportParameter("totalvisitas", txtTotalVisitas.Text))
		    paramList.Add(New ReportParameter("telefone", txtTelefone.Text))
		    paramList.Add(New ReportParameter("telemovel", txtTelemovel.Text))
		    paramList.Add(New ReportParameter("email", txtEmail.Text))
		    paramList.Add(New ReportParameter("tecnicofecho", txtTecFecho.Text))
		    paramList.Add(New ReportParameter("datafecho", PickDataFecho.Value))
		    paramList.Add(New ReportParameter("nvisitas", txtVisitas.Text))
		    paramList.Add(New ReportParameter("clientemin", txtClienteMin.Text))
		    paramList.Add(New ReportParameter("natecnica", txtTecnica.Text))
		    paramList.Add(New ReportParameter("remotamin", txtRemota.Text))
		    paramList.Add(New ReportParameter("maodeobra", txtMaoObra.Text))
		    paramList.Add(New ReportParameter("deslocacao", txtDeslo.Text))
		    paramList.Add(New ReportParameter("outrosvalores", txtOutros.Text))
		    paramList.Add(New ReportParameter("equipamentos", txtEquipamentos.Text))
		    paramList.Add(New ReportParameter("totaleuros", txtTotalEuros.Text))
		    With frm.ReportViewer1.LocalReport
			    .ReportEmbeddedResource = "CyberSat.ReportSatPrincipal.rdlc"
			    .SetParameters(paramList)
		    End With
		    frm.ShowDialog()
	    End Using
    End Sub
   End Class
End Namespace

Este é o botão de imprimir

Pois apenas queria adicionar uma table com o conteudo de uns campos da base dados.

visualmente adiciono mas dá sempre esse erro.

Se for mudar tudo para esse tipo de formato facil que me diz tenho que mudar tudo e não são poucos reports que estão feitos.

só não entendi é a mensagem que me dá de erro e como contornar a mesma utilizado o metodo que tenho usado.

Nuno Revez

@informaster

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.