Reportes con Crystal Report en Windows Form y parámetros StoreProcedure
Existen varias formas de crear reportes en Crystal Report, una en particular que me parece tiene una alta mantenibilidad es la de crear código dinamico, es decir parámetros, conexiones, que puedan ser cambiados directamente en el código de nuestras clases.
Explicaré a usar el asistente para crear reportes rapidamente y luego a modificar el código para que sea todo dinámico.
Bien a programar:
Necesitará la base de datos Northwind de SQL Server 2005 si es que desea probar el tutorial.
Paso 1.- Primero crearemos un procedimiento almacedado con parámetros de entrada en SQL Server para luego mostrarlo en un reporte. Abra el SQL Server 2005 y en la base de datos Northwind ejecute el siguiente código:
USE NORTHWIND;
GO
CREATE PROC ObtenerTotalMesYear
@Fecha nvarchar(10)
AS
SELECT Mes=DateName( month , DateAdd( month ,CAST(SUBSTRING(CONVERT(NVARCHAR(10),OrderDate,111),6,2) AS INT) , 0 ) – 1 ),
Total=ROUND(SUM(([order details].UnitPrice*[order details].Quantity)-([order details].UnitPrice*[order details].Quantity)*[order details].Discount),2)
FROM [order details] INNER JOIN Orders on [order details].OrderID = Orders.OrderID
WHERE DATENAME(yy,Orders.OrderDate) =@Fecha
GROUP BY SUBSTRING(CONVERT(NVARCHAR(10),Orders.OrderDate,111),6,2)
ORDER BY SUBSTRING(CONVERT(NVARCHAR(10),Orders.OrderDate,111),6,2)
Lo que hace este procedimiento es mostrar las ventas totales de cada uno de los meses, según el año ingresado, pregunten si tienen dudas acerca del código anterior.
Paso 2.- Abrimos el Visual Studio y creamos un nuevo proyecto de Aplicación para Windows, asignamos un nombre al mismo.
Haga clic derecho en el Proyecto>Agregar>Nuevo Elemento y escoja el reporte Crystal.
Asignele un nombre: “ReporteVentas” y haga click en agregar.
Paso 3 .- Se abrirá la siguiente pantalla, usaremos el asistente de informes. Presionamos aceptar.
Paso 4.- En la siguiente pantalla, despliegue crear nueva conexión y luego OLE DB (ADO), se abrirá un formulario para seleccionar un proveedor de SGBD.
Paso 5.- Seleccione la opción SQL NATIVE CLIENT y haga clic en siguiente.
Paso 6.- Seleccione su Servidor de Base de datos, marque el check de seguridad Integrada, y seleccione la base de datos Northwind y luego presione finalizar.
Paso 7.- Expanda el servidor y ubique la base de datos Northwind, despliegue dbo y en procedimientos almacenados, busque el procedimiento que creamos ObtenerTotalMesYear. Seleccionelo y marquelo a la derecha con el botón “>”.
Paso 8.- En la siguiente ventana presione aceptar, luego siguiente.
Paso 9. Despliegue el árbol de campos disponibles, seleccione los campos que desee mostrar y paselos a la derecha. No vamos a personalizar más el reporte, presionamos Finalizar.
Paso 10. Se observará la siguiente pantalla, acomode los campos a su gusto:
Paso 11. Arrastre desde campos de parámetros el valor que se ingresa desde pantalla, para que se muestre en el reporte el año que ingresamos:
Veamos una vista previa del informe, ingrese por ejemplo 1996 cuando le pida ingresar un parámetro.
Paso 12. Bien es hora de programar, lo anterior funciona pero no es dinámico, imagine que el servidor de base de datos cambia de lugar, tendriamos que modificar cada uno de nuestros reportes, crearemos una sola conexión:
Agregaremos una clase llamada conexión:
private string servidor = "JPANTOJA\\SQLEXPRESS";
private string basededatos = "Northwind";
private string usuario = "PREMIER\\rmauricio";
private string password = "";
public string Password
{
get { return password; }
set { password = value; }
}
public string Servidor
{
get { return servidor; }
set { servidor = value; }
}
public string Basededatos
{
get { return basededatos; }
set { basededatos = value; }
}
public string Usuario
{
get { return usuario; }
set { usuario = value; }
}
Dirigirse al formulario y agregar un componente Crystal Report Viewer y los demás componentes. Al comboBox lo llenamos con los años: 1996, 1997, 1998.
En el formulario escribir el siguiente código, no olviden agregar las referencias para Crystal Report.
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Windows.Forms;
//Referencias
using CrystalDecisions.CrystalReports.Engine;
using CrystalDecisions.Shared;
using CrystalDecisions.ReportSource;
namespace ReporteVentas
{
public partial class Form1 : Form
{
ReporteVentas report = new ReporteVentas();
ParameterDiscreteValue FechaDV = new ParameterDiscreteValue(); //parametro de entrada
Conexion con = new Conexion();
public void CargaReporte(string FechaParam)
{
FechaDV.Value = FechaParam;
report.SetParameterValue("@Fecha", FechaDV);//Asignando el parametro
//de entrada con el parametro del storeprocedure
crystalReportViewer1.ReportSource = report; //cargando el reporte
}
public Form1()
{
InitializeComponent();
report.DataSourceConnections[0].SetConnection(con.Servidor, con.Basededatos, con.Usuario, con.Password);//Cargando Conexion
}
private void button1_Click(object sender, EventArgs e)
{ //Ejecutando reporte
if (comboBox1.SelectedItem != null)
{
CargaReporte(comboBox1.SelectedItem.ToString());
}
}
private void Form1_FormClosed(object sender, FormClosedEventArgs e)
{ //Liberando recursos
report.Dispose();
crystalReportViewer1.Dispose();
}
}
}
Por si no lo recuerdan, el método Form1_FormClosed fue agregado de la siguiente forma:
Dando doble clic en Form Closed.
Ahora ejecutamos el programa, seleccionamos un año y presionamos el botón mostrar.
Acá tienen un ejemplo para Web http://www.datanoia.com/reporte-web-con-crystal-report-usando-store-procedure.html
¡Espero les haya sido de ayuda! Buen día.
→ Entradas Relacionadas:
→ Comparte esta entrada:
RT @datanoia: Reportes con Crystal Report en Windows Form y parámetros StoreProcedure: http://bit.ly/13wngQ *rS #CrystalReport
Hola,
Primero que todo gracias por el ejemplo, me ha sido muy útil.
Pero sabes soy algo inexperto en las consultas SQL y quisiera que me despejes una duda que tengo: ¿Por qué utilizas varias funciones para obtener la fecha?:
SELECT Mes=DateName( month , DateAdd( month ,CAST(SUBSTRING(CONVERT(NVARCHAR(10),OrderDate,111),6,2) AS INT) , 0 ) – 1 )
No sería suficiente: Mes = DATENAME(MONTH, OrderDate)
¿Esto es correcto o incorrecto?
Hola Christian para eso estamos, bien lo que pasa es que para hacer un agrupamiento en este caso por fechas, es necesario que lo que se va a agrupar tenga relación con su sentencia Group BY, es decir si en el select muestro las fechas de manera alfabetica el ordenamiento también debe cumplir esto.
Según tu apunte la consulta sería así:
–
create proc MesesPrueba
@Fecha nvarchar(10)AS
SELECT Mes=datename(month, orderdate), //(SEGUN TU APUNTE QUE ES CORRECTO)
Total=ROUND(SUM(([order details].UnitPrice*[order details].Quantity)-([order details].UnitPrice*[order details].Quantity)*[order details].Discount),2)
FROM [order details] INNER JOIN Orders on [order details].OrderID = Orders.OrderID
WHERE DATENAME(yy,Orders.OrderDate) =@Fecha
GROUP BY datename(month, orderdate) //EL GROUP BY TIENE RELACION CON SU CONSULTA
ORDER BY datename(month, orderdate)
Ahora bien, esto agrupa correctamente y por meses, pero lo muestra así:
Agosto 25485.28
Diciembre 45239.63
Julio 27861.89
Noviembre 45600.04
Octubre 37515.72
Septiembre 26381.4
Obviamente no está ordenado, la pregunta fue: cómo ordenarlo según su orden real (ener, feb, marzo…)
Si ponía el select: SELECT Mes=datename(month, orderdate) y el orderby:
GROUP BY SUBSTRING(CONVERT(NVARCHAR(10),Orders.OrderDate,111),6,2) // 01,02,03,04
Me botaría un error por no tener relación como lo explicaba al principio.
La columna ‘Orders.OrderDate’ de la lista de selección no es válida, porque no está contenida en una función de agregado ni en la cláusula GROUP BY.
Pues la solución entonces era mostrando las fechas en números: 01, 02, 03, 04.
y agrupando con GROUP BY SUBSTRING(CONVERT(NVARCHAR(10),Orders.OrderDate,111),6,2)
y ordenándolo por números.
Pero ahora viene el problema que no quiero que se muestren números en la consulta, sino que se muestre alfabéticamente, es por ello que puse
SELECT DateName(month , DateAdd( month ,CAST(SUBSTRING(CONVERT(NVARCHAR(10),OrderDate,111),6,2) AS INT) , 0 ) – 1 ) que en realidad está en números 01,02,03…, sólo que el datename lo disfraza.
y ahora si se puede ordenar agrupar con GROUP BY SUBSTRING(CONVERT(NVARCHAR(10),Orders.OrderDate,111),6,2) y lo ordena 01,02,03… etc.
Espero sigas visitando el blog.
Saludos.
ai q bonito como comentan http://bit.ly/17Cgjy
Mil gracias Risharp por la respuesta, me ha quedado muy claro.
Saludos Cordiales,
Christian
Cómo puedo pasar por código usando DataSourceConnections[0].SetConnection a 2 bases de datos que utilizo en un mismo reporte?
Hola Mario respondiendo tu pregunta, para las 2 bases de datos de deberias poner el “1″ en DataSourceConnections[1].SetConnection
Saludos.
Hola, muy bueno tu ejemplo, me saco de muchas dudas que tenia, pero aún asi no puedo resolver algo: Al crear el procedimiento almacenado, se le envia un dato (la fecha) bueno en mi caso no me aparece @fecha para poder agregarlo al .rpt, aún asi, dandole anticlick a “campos de parametro”, le agrego el campo de @fecha de forma manual, el problema es que al ejecutar no me muestra nada, quiza haya algún paso para relacionar @fecha con el dato del combobox que este obviando y que por esa razón no me sale el resultado, te agradeceria mucho si me ayudas con esa situación.
Un saludo
Hola Frank, dime has probado el ejemplo en el mismo SQL y te bota algún resultado cuando lo ejecutas? También ten en cuenta que el “@Fecha” de tu storeprocedure debe ser igual en tu código report.SetParameterValue(”@Fecha”, FechaDV)
Hola, gracias por responder tan rapido, bueno en realidad, el ejemplo que me diste lo probe mas con un sistema que estoy desarrollando y que tambien trabaja con un procedimiento almacenado al cual se le envia una fecha (igual que tu ejemplo) ahora con respecto al @Fecha, pues si, es el mismo que en el storeprocedure (que el que yo estoy desarrollando) sólo que en el ejemplo que nos muestras en el paso 8 ya aparece el @Fecha en “campos de parametros”, en mi caso no me aparece, es asi que una vez que se genero el reporte como muestras en el paso 10, yo lo agregue de forma manual dandole anticlick en “campos de parametro” y luego en “nuevo” y posteriomente llene los campos que me pedia, ahora mi duda era que quiza al hacer esto no haya una relacion entre el @Fecha que me cree en el crystalreport y el @Fecha de mi base de datos (no se si me dejo entender), por eso te preguntaba si habria alguna forma de relacionarlos y como se haria.
Y con respecto al storeprocedure, pues si lo probe en el SQL y me da los resultados que espero. Entonces entiendo que el procedimiento esta bien. Otra cosa que quiza pueda ser que me este fallando sea el formato de fecha (en el SQL lo tengo como dmy y no se cual sera el formato de fecha del crystalreport y no se si tiene alguna relación o no con SQL).
Te agradezco mucho por tu ayuda y tu tiempo.
Saludos!!
Saludos a todos.
Tengo un proyecto muy semejante al mostrado anteriormente con la salvedad de que no le envio los parametros sino que son entroducidos cuando en CRVIEWR corre el reporte.
Tengo el siguiente problema, cuando instalo la aplicacion en un cliente los reportes que piden parametros generan el siguiente error:
Runt-time ‘50003′:
Application-defined or object-defined error
Esto no sucede si instalo CRYSTAL REPORT XI en cada pc que tenga que correr la aplicacion. QUE DLL OCX es que me falta o no esta registrado.
Gracias maestros! de verdad esto me sirvio muchisimo, les mando un gran abrazo y vivan los hermanos peruanos.
Para eso está el equipo datanoia, saludos.
¿qué formato de fecha debe tener Crystal para que al obtener los datos de informix con un camp parámetro (de fecha) no obtengamoas el error 1206:
$ finderr 1206
-1206 Invalid day in date.
The day number in a DATE value or literal must a one- or two-digit number
from 1 to 28 (or 29 in a leap year), 30, or 31, depending on the month that
accompanies it.
hola una consulta el ejemplo me sale todo bien chevere pero cuando le doy click en actualizar en el crystalreportviewer me sale un form apra que llene el parametro por que no deberia salir cmo hago para desaparecer eso T_T helme!!!
Hola Christian gracias por visitar el blog, el equipo datanoia revisará ese problema. Te responderemos a la brevedad
. Saludos.
hola richard denuevo yo pucha estoy en un lio quiero pintar el cryustal report pero con select * from tabla where campo1=variable
hay alguan opcion podrias darme un ejemplo realmente lo necesito ahora mismo :S helme please
Mi proble es que al definirun campo de parámetro como fecha, aunque configures Crystal con formato DMY y dd/mm/yyyy,aunque en Informixcli tengas DMY4/, al pasar el parámetro fecha al select para su ejecución, este da error por que la configuración de los parámetros tipo fecha es yyyy/dd/mm,y no sé como canviarlo para que funcione bien, es la primera vez que manejo Crystal.
Hola gracias por visitar el blog, prueba con esto:
set dateformat ymd;
o con dmy según sea el caso.
Saludos.
podrias pasarlo a vb.net me pierdo cuando veo este codigo en C# porfavor he tratado de hacerlo y convertilo a mi estilo pero no me sale
yo lo quiero hacer en vez de un combo con una caja he cambiado los valores e puesto toda mi conexion pero nada no muietsra
espero puedas ayudarme gracias
Hola, umm ok no hay problema te pasaré el ejemplo a vb en las proximas horas…
gracias por visitarnos.. saludos.
hola, esta muy interesante tu articulo pero un favorsote, podrias pasarlo a visual basic.net es que no entiendo mucho c# andale he tratado de hacerlo asi pero no le entiendo mucho va, de antemano mil gracias…. esperando tu respuesta bye….
Saludos,
Hice exactamente lo que menciona el ejemplo pero no funciona me muestra el siguiente mensaje:
No se pudo recuperar los datos de la base de datos.
Detalles: [Código de proveedor del la base de datos:2812]
Estoy utilizando VS2008
La primera conexion al reporte lo hice como:
Nombre del servidor: (Local)
Autentificacion de windows: true
Nombre base de datos: Desarrollo
La segundo conexion al reporte lo hice como:
Nombre del servidor: sistemas1
Autentificacion de windows: true
Nombre base de datos: Prueba2
Cabe recalcar que mi maquina se llama sistemas1 y que la base de datos Prueba2 es una copia de la base de datos desarrollo
Estoy utilizando el siguiente codigo:
Dim rpt As New Saldo()
Dim oCnnInfo As New CrystalDecisions.Shared.ConnectionInfo
oCnnInfo.DatabaseName = “Prueba2″
oCnnInfo.UserID = “sa”
oCnnInfo.Password = “SSss123″
oCnnInfo.ServerName = “sistemas1″
For Index As Integer = 0 To rpt.DataSourceConnections.Count – 1
rpt.DataSourceConnections(Index).SetConnection(oCnnInfo.ServerName, oCnnInfo.DatabaseName, True)
Next
Dim identidad As New CrystalDecisions.Shared.ParameterDiscreteValue
identidad.Value = “5E99A88E-62C6-4F96-9CBE-4576846EE9B0″
rpt.SetParameterValue(”@Identidad”, identidad)
rpt.SetParameterValue(”@Codigo”, DBNull.Value)
CRV.ReportSource = rpt
Hola a todos, estuve revisando este post, y queria hacer una consulta pues tengo un problema bastante relacionado.
Estoy trabajando con VS2005 y SQL Server 2008, y he creado varios reporte de maneras similar a como se indica en este post.
1. Cree un reporte con procedimientos almacenados (los campos mostrados en el reporte se jalaron de los campos que contiene los procedimiento almacenados en la base de datos)
2. La conexion es OLE DB, tipo Proveedor de OLE DB para Microsoft SQL Server
3. Utilizando el servidor de BD en el que cree el reporte, se genera el reporte sin problema.
Los parametros de conexion originales son:
Servidor: ballena
Base de Datos: bd_sc2
Usuario: sa
Password: 123456
Cuando utilizo otra BD (copia exacta de la BD original pero con otro nombre) u otro servidor, a la hora de generar el reporte sale la pantalla de conexion a la base de datos de Crystal Reports con los campos servidor y base de datos (desactivados) y los campos usuario y contraseña habilitados. Lo que me impide generar el reporte.
Por ejemplo, cambiando el nombre de la BD a bd_sc3 o cualquier otro nombre.
4. A la hora de generar el reporte, le envío nuevos parámetros de conexión mediante código, pero no da ningún resultado. Pues sigue saliendo la pantalla de conexión, con el nombre del servidor y base de datos con que cree el reporte (es decir, donde originalmente cree los proc. almacenados)
Es decir, he creado un reporte como se explica en el post y configurado la conexion dinamica mediante codigo, pero no me da resultado.
Por favor, les pido una ayuda para resolver este problema, que me tiene ya varios dias.
He buscado bastante en otros foros, pero hasta el momento no he encontrado una solución.
Muchas gracias.
tengo un reporte hecho directamente en crystal report 10 y quiero mandarlo llamar desde mi aplicacion windows en vb 2005, que debo de hacer para poder ejecutar el reporte desde mi aplicacion windows ???
Muchisimas gracias por el ejemplo, realmente me ayudaste con una duda que tenia, adapte el codigo a vb.net y andubo de 10!!
Estoy contentaaaaaaa jaja!!!
Felicitaciones y muchas gracias!!!
Melisa
hola…datanoia
Justo lo que necesitaba…llevaba semanas buskndo un ejemplo como el q pusist….la verdad esta excelente…me salvast de la orca. jeje
pero ahora solo tengo un problema…si me puedieras ayudar te lo agradecera mucha mas….quiero hacer esto pero mediante ODBC, he intentado pero no me quiere mostrar lo campos de los procedimientos almacenados, me marca un error como esta leyenda..¨error en el motor de busqueda conector mysql 5.1.6¨…ayudame por fis
De antemano mil gracias…
man me quede en el paso 7 y 8
paso 7 en el asisitente
en procedimientos almacenados
>northwind
>>dbo>>>solo me sale “ObtenerTotalMesYear;1″
–bueno eso puede ser por que creaste mas stored y no los pusiste en el codigo–
seguimos lo selecciono le doy clic en “>” y me sale
paso 8
la ventana de introducir valores de parametro
@Fecha
–hasta ahi bacan pero le doy aceptar y mensale este mensaje de error –
——————————————————
¦Cristal Reports ActiveX Desing… ¦ ¦ x ¦
¦——————————————————¦
¦ Query Engine Error: ‘ADO Error Code: 0x ¦
¦ Source: Microsoft SQL Native client ¦
¦ Description: Invalid object name ‘order details’.¦
¦ SQL State: 42S02 ¦
¦ Native Error:’ ¦
¦______________________________________________________¦
Deja tu Opinión
Síguenos
Feed RSS:
Recibe nuestros artículos via Feed
RSS via E-Mail:
Recibe nuestros artículos en tu Mail
Twitter:
Síguenos en Twitter @datanoia
Etiquetas
Licencia
Últimos Posts
Comentarios
Acerca de
Datanoia.com es el resultado de varias reuniones con café e internet inalámbrico entre amigos quienes buscan compartir experiencias y hablar sobre lo que más les gusta: la tecnología y el internet.
Ellos basarán cada post en vivencias propias frente al computador, escribirán sobre las novedades en el mundo tecnológico, darán su opinión frente a las distintas posturas en internet y contarán todos sus trucos informáticos. Por lo que tu colaboración como lector es importante comentando los artículos y aportando nuevas ideas.
Most Commented
Archivo