none
Obtener Parámetros de Reporte de Crystal desde VB Net RRS feed

  • Pregunta

  • Estimado(s), como siempre agradecido de antemano por cualquier aporte.

    En éste caso, necesito leer desde el código de Visual Basic .Net la colección de parámetros que tiene un reporte diseñado con Crystal Reports. La idea, es crear en tiempo de ejecución los controles que servirán para pasar esos parámetros al listado para poder sacarlo. Naturalmente, los parámetros tendrán un prefijo para poder identificar el tipo de dato que se le va a pasar, sea una fecha, un código de artículo, etc... Pero bueno, el tema inicial es cómo obtener los parámetros que posee un listado de Crystal.

    Muchas Gracias.


    Renzo Pique

    sábado, 16 de julio de 2016 0:26

Respuestas

  • Gracias por tu respuesta. De todas maneras, lo que necesitaba lograr lo deduje mediante prueba y error y surgió éste código: 

    Private Sub PrepararParametrosListado()
            Dim Reporte As New ReportDocument
            Dim ColeccionParametros As CrystalDecisions.Shared.ParameterFields
            Dim Param As CrystalDecisions.Shared.ParameterField
            Dim Prefijo, NombreParametro, TextoParametro As String
            Try
                Reporte.Load(ARCHIVOREPORTE)
                ColeccionParametros = Reporte.ParameterFields
                For Each Param In ColeccionParametros
                    NombreParametro = Trim(Param.ParameterFieldName.ToString)
                    Prefijo = Mid(Trim(Param.ParameterFieldName.ToString), 2, 2)
                    TextoParametro = Mid(Trim(Param.ParameterFieldName.ToString), 5, Len(Trim(Param.ParameterFieldName.ToString)) - 4)

    Select Case Prefijo
                        Case "AR" 'Articulo
                            ' Llamar al Procedimiento que Crea los controles necesarios
                    End Select
                Next

            Catch ex As Exception
                MessageBox.Show(ex.Message)
            End Try
        End Sub

    En éste Ejemplo NombreParametro: (AR)Desde Articulo, por consiguiente el Prefijo: AR, el TextoParametro: Desde Articulo.

          




    Renzo Pique

    sábado, 16 de julio de 2016 19:17

Todas las respuestas

  • Hola:
    > La idea, es crear en tiempo de ejecución los controles <
    Para esto debera tener la informacion grabada en algun soporte. Al leer ese soporte ya sabes el numero, etc de los parametros implicados.

    Un saludo desde Bilbo
    Carlos
    sábado, 16 de julio de 2016 10:30
  • Gracias por tu respuesta. De todas maneras, lo que necesitaba lograr lo deduje mediante prueba y error y surgió éste código: 

    Private Sub PrepararParametrosListado()
            Dim Reporte As New ReportDocument
            Dim ColeccionParametros As CrystalDecisions.Shared.ParameterFields
            Dim Param As CrystalDecisions.Shared.ParameterField
            Dim Prefijo, NombreParametro, TextoParametro As String
            Try
                Reporte.Load(ARCHIVOREPORTE)
                ColeccionParametros = Reporte.ParameterFields
                For Each Param In ColeccionParametros
                    NombreParametro = Trim(Param.ParameterFieldName.ToString)
                    Prefijo = Mid(Trim(Param.ParameterFieldName.ToString), 2, 2)
                    TextoParametro = Mid(Trim(Param.ParameterFieldName.ToString), 5, Len(Trim(Param.ParameterFieldName.ToString)) - 4)

    Select Case Prefijo
                        Case "AR" 'Articulo
                            ' Llamar al Procedimiento que Crea los controles necesarios
                    End Select
                Next

            Catch ex As Exception
                MessageBox.Show(ex.Message)
            End Try
        End Sub

    En éste Ejemplo NombreParametro: (AR)Desde Articulo, por consiguiente el Prefijo: AR, el TextoParametro: Desde Articulo.

          




    Renzo Pique

    sábado, 16 de julio de 2016 19:17