Modificar consulta en Crystal Reports

[Ruben Nadal]

Hola Grupo.

¿¿¿¿Alguien sabe como es posible pasarle a crystal reports una consulta SQL,
en tiempo de ejecución desde una aplicación en Visual Basic 6.0????

En mi aplicacion intento personalizar el informe pidiendo al usuario el
código del producto.
A este producto se le realizan varias pruebas.

Conforme lo tengo hecho, solamente saco todos los datos, es decir un listado
completo ordenado por el código del producto y agrupado por este mismo
código.

Y el problema aparece cuando intento pasarle a Crystal Reports el código
para que me extraiga las pruebas realizadas al producto.

¿Es esto posible?

Gracias de antemano......

[Israel Galan]

> ¿¿¿¿Alguien sabe como es posible pasarle a crystal reports una consulta
SQL,
> en tiempo de ejecución desde una aplicación en Visual Basic 6.0????

Con el CR del VB 5 creo que no se puede. Yo lo que hago es antes de llamar
al CR, creo la consulta SQL que siempre tiene el mismo nombre y ya se puede
hacer el informe sobre la consulta. Si averiguas la forma te agradecería que
me lo dijeras...

--

| Israel Galán

[Ruben Nadal]

Al final lo he resuelto de la siguiente manera:

Private Sub cmdInforme_Click()
' Archivo .rpt donde se encuentra el diseño del informe
Informes.ReportFileName = App.Path & "\Informes\ifmepbs.rpt"
' Hace lo mismo que la opcion de menu ---- Informe-->Editar formula de
seleccion-->Registros...
' Le paso la referencia, que como es una cadena de caracteres le añado "
" "
Informes.SelectionFormula = "{qryPruebas.COD_MOLDE} =" & """" &
Referencia.Text & """"
' Action es la propiedad que desencadena la impresión del informe.
Informes.Action = 1
End Sub

Ruben Nadal escribió en mensaje <37c17...@194.73.30.5>...
>Hola Grupo.

>
>¿¿¿¿Alguien sabe como es posible pasarle a crystal reports una consulta
SQL,
>en tiempo de ejecución desde una aplicación en Visual Basic 6.0????
>

[Javier Luque Diaz]

Ruben Nadal <infor...@plastiken.com> escribió en el mensaje de noticias
37c17...@194.73.30.5...

> Hola Grupo.
>
> ¿¿¿¿Alguien sabe como es posible pasarle a crystal reports una consulta
SQL,
> en tiempo de ejecución desde una aplicación en Visual Basic 6.0????
>

Prueba con la propiedad SelectionFormula del informe. Desde dentro
del informe puedes
practicar con la sintaxis de la fórmula en Informe -> Editar fórmula de
selección -> Registro.

Un saludo.

[El Cid]

hace muchos años que no toco nada de Crystal, pero para pasarle un valor
desde visual tienes que utilizar la colección Formulas.
Es decir si quieres poner un título en un report, añades una formula llamada
"Titulo" en blanco y luego desde visual haces algo parecido a esto, ten en
cuenta que hace mucho que no lo toco y no se si es correcto, pero en
cualquier caso mira en el help que te dará mas información

CrystalReport1.Formulas(0)="{Titulo}=Hola"

si lo que quieres es modificar la select para que muestre mas o menos
campos, es decir hacer un filtro lo que tienes que modificar son las
propiedades :
GroupSelectionFormula
SelectionFormula

[Adolfo Domingo]

Esto funciona con VB5 pero ojo la base de datos debe estar bien definida
si en el informe tienes definida una seleccion de registros previa es mejor
quitarla
pues da errores

' cr1 es el nombre del control de crystal report
' m_sdirectoriodatos es un path

' esto resetea el informe
cr1.Reset

' aqui indico de donde cojo los datos
cr1.DataFiles(0) = m_sdirectoriodatos & "rubdata.mdb"

' por defecto el informe va a pantalla
cr1.Destination = crptToWindow

' nombre del informe y path
cr1.ReportFileName = m_sdirectorioinformes & "gs_rtp2.rpt"

' consulta sql
formula = "({personal.cod_paciente}=" & clavecod & " and
{sesiones.IDTratamiento}=" & clav_trat & "and {pruebassesion.IDTratamiento}=" &
clav_trat & ")"

' aplicacion de la formula
cr1.SelectionFormula = formula

' ejecucion del informe
cr1.Action = True

Israel Galan escribió:

> > ¿¿¿¿Alguien sabe como es posible pasarle a crystal reports una consulta
> SQL,
> > en tiempo de ejecución desde una aplicación en Visual Basic 6.0????
>