Autor Tema: Re: Parámetros para Data report (Leído 2534 veces)

lalia33 · « **en:** Jueves 18 de Septiembre de 2003, 17:40 »

Hola Como estan:

Ojala puedán ayudarme con la siguiente duda.

Estoy generando reportes con data report.

Y he estado trabajamdo muy bien, pero ahora tengo el siguiente error, quiere generar reporte donde lacondición de impresión sea un valor que capturo en una forma, lo he intentado y en ocaciones si resulta,pero en otros me dise que no encuentra el valor.

ojala alguien pudiea ayudarme gracias

Saludos a todos

Brroz

Si unas veces funciona y encuentra el valor y otras veces no...¡será que el valor tal y cómo lo buscas no existe! Ten cuidado por ejemplo con los campos de texto y las mayúsculas/minúsculas, con espacios en blanco al principio o final, si estás usando LIKE en un SQL fíjate en el carácter comodín que sea el que corresponda (normalmente '%'), si son campos fecha que el formato de la fecha sea correcto, etc...

Ánimo y suerte.

lalia33

Hola:

Mira el detalle no son los datos, lo que pasa es que no encuentro una forma correcta de pasar los valores, por ejemplo quiero que en la forma se capture el código del cliente y que el reporte me muestre la información soló de ese cliente.
asigno el codigo del cliente a una variable, pero no la acepta.

si escribo el código del cliente de manera directa en la consulta si realiza el forme de manera correcta.

Ojala pudieras darme alguna referencia de donde poder consultar o alguna pista gracias

angelescj

Te recomiendo cambiar la consulta del Datareport, para ser más meciso del comando asociado al Datareport. Por ejemplo:
NOTA:
dte==> Nombre del Dataenvironment
dtr==> Nombre del Datareport
comadoasociado==> Nombre del command asociado al datareport

'Esto es para limpiar los datos mostrados anteriormente, o los datos asignados por defecto en diseño
If dte.rsccomandoasociado.State = adStateOpen Then
dte.rscomandoasociado.Close
End If
'Si el campo es numérico
dte.Commands("comandoasociado").CommandText = "select * from nombreTabla where nombreCampo=" & valor
'Si el campo es texto
dte.Commands("comandoasociado").CommandText = "select * from nombreTabla where nombreCampo='" & valor & "'"

dtr.Show

Espero que te sirva

lalia33

Hola Gracias:

Ya había realizado pruebas y ya logre resolver mi problema de antemano muchas gracias

bye