Visual Basic.NET - parametros con Crystal

 
Vista:

parametros con Crystal

Publicado por HAF (178 intervenciones) el 03/01/2006 15:18:21
Hola Amigos del foro,

Lo que necesito es enviar un paramtero de tipo texto al informe (el parametro es sencillamente un titulo que va en el encabezado del informe )

He hecho lo siguiente :

1)
Dim rpt As New crviewer
rpt.ficha.ReportSource = "c:\gestion\reportes\rpt_ingresos.rpt"
Dim reporte As New rpt_INGRESOS ' ingresos
reporte.SetParameterValue("titulodelinforme", "Informe de estadisticas")
rpt.ShowDialog(Me)

2)
En el informe he creado un campo de parametro conel nombre: titulodelinforme
y tipo de valor: CADENA y con el option: " valores discretos"

Pero cuando ejecuto el informe SIEMPRE me pide que introduzca los valores Discretos,
y lo que necesito es que me coloque directamente en el informe el titulo "Informe de estadisticas", sin pedir nada.

Gracias Amigos
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:parametros con Crystal

Publicado por Y.Cruz (36 intervenciones) el 03/01/2006 16:08:59
En .NET cambio un poco la dinamica de los parametros, te voy a dar un codigo de parametros que utilice para una aplicacion que hice hace algunos meses. La diferencia es que mi reporte esta embedded en la aplicacion, pero lo demas es basicamente lo mismo:

Private Sub Reporte_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim frmParam As New frmMain
Dim cbMain As New Orden
Dim tbCurrent As CrystalDecisions.CrystalReports.Engine.Table
For Each tbCurrent In cbMain.Database.Tables
Dim oLIInfo As CrystalDecisions.Shared.TableLogOnInfo
oLIInfo = tbCurrent.LogOnInfo
With oLIInfo.ConnectionInfo
.ServerName = "SQLServidor"
.UserID = "loquesea"
.Password = "loquesea"
.DatabaseName = "DATA_03"
End With
tbCurrent.ApplyLogOnInfo(oLIInfo)
Next tbCurrent
Dim paramValues As New CrystalDecisions.Shared.ParameterValues
Dim paramID As New CrystalDecisions.Shared.ParameterDiscreteValue
paramID.Value = frmParam.strLlaveLocal
paramValues.Add(paramID)
cbMain.DataDefinition.ParameterFields(0).ApplyCurrentValues(paramValues)
crvOrden.ReportSource = cbMain
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:parametros con Crystal

Publicado por HAF (178 intervenciones) el 04/01/2006 09:37:56
Hola Yuliana, gracias por ayudarme... pero no entiendo bien tu código
¿me podrias seguir ayudando?

Gracias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar