public virtual CrystalDecisions.CrystalReports.Engine.ReportDocument CreateReport() { rptCitas rpt = new rptCitas(); rpt.Site = this.Site; return(rpt); }
private void btnImprimir_Click(object sender, EventArgs e) { //clsConexion a la base de datos MySqlConnection myclsConexion = new MySqlConnection(clsConexion.ConectionString); // Creando el command que ejecutare MySqlCommand myCommand = new MySqlCommand(); // Creando el Data Adapter MySqlDataAdapter myAdapter = new MySqlDataAdapter(); // Creando el String Builder StringBuilder sbQuery = new StringBuilder(); // Otras variables del entorno string cWhere = " WHERE 1 = 1"; string cUsuario = frmLogin.cUsuarioActual; string cTitulo = ""; try { // Abro clsConexion myclsConexion.Open(); // Creo comando myCommand = myclsConexion.CreateCommand(); // Adhiero el comando a la clsConexion myCommand.Connection = myclsConexion; // Filtros de la busqueda if (rbTodos.Checked) { string fechadesde = fechaDesde.Value.ToString("yyyy-MM-dd"); string fechahasta = fechaHasta.Value.ToString("yyyy-MM-dd"); cWhere = cWhere + " AND fechacita >= " + "'" + fechadesde + "'" + " AND fechacita <= " + "'" + fechahasta + "'" + ""; sbQuery.Clear(); sbQuery.Append("SELECT cita.idcita,cita.fechacita,cita.cedulapaciente,upper(CONCAT(rTRIM(paciente.nombre),' ',LTRIM(paciente.apellido))) as paciente,"); sbQuery.Append(" doctores.doctores_cedula,upper(CONCAT(rTRIM(doctores.doctores_nombre),' ',LTRIM(doctores.doctores_apellido))) as doctor,departamentos.departamento_descripcion"); sbQuery.Append(" FROM cita "); sbQuery.Append(" INNER JOIN paciente ON paciente.cedula = cita.cedulapaciente"); sbQuery.Append(" INNER JOIN doctores ON doctores.doctores_cedula = cita.ceduladoctor"); sbQuery.Append(" INNER JOIN departamentos ON departamentos.departamento_id = cita.referimiento"); sbQuery.Append(cWhere); } else if (rbDoctor.Checked) { string fechadesde = fechaDesde.Value.ToString("yyyy-MM-dd"); string fechahasta = fechaHasta.Value.ToString("yyyy-MM-dd"); cWhere = cWhere + " AND fechacita >= " + "'" + fechadesde + "'" + " AND fechacita <= " + "'" + fechahasta + "'" + ""; cWhere = cWhere + " AND ceduladoctor = " + "'" + txtCedula.Text + "'" + ""; sbQuery.Clear(); sbQuery.Append("SELECT cita.idcita,cita.fechacita,cita.cedulapaciente,upper(CONCAT(rtrim(paciente.nombre),' ',ltrim(paciente.apellido))) as paciente,"); sbQuery.Append(" doctores.doctores_cedula,upper(CONCAT(rTRIM(doctores.doctores_nombre),' ',ltrim(doctores.doctores_apellido))) as doctor,departamentos.departamento_descripcion"); sbQuery.Append(" FROM cita "); sbQuery.Append(" INNER JOIN paciente ON paciente.cedula = cita.cedulapaciente"); sbQuery.Append(" INNER JOIN doctores ON doctores.doctores_cedula = cita.ceduladoctor"); sbQuery.Append(" INNER JOIN departamentos ON departamentos.departamento_id = cita.referimiento"); sbQuery.Append(cWhere); } else if (rbEspecialidad.Checked) { string fechadesde = fechaDesde.Value.ToString("yyyy-MM-dd"); string fechahasta = fechaHasta.Value.ToString("yyyy-MM-dd"); string varEspecialidad = (cmbEspecialidad.SelectedValue).ToString(); cWhere = cWhere + " AND fechacita >= " + "'" + fechadesde + "'" + " AND fechacita <= " + "'" + fechahasta + "'" + ""; cWhere = cWhere + " AND referimiento = " + varEspecialidad + ""; sbQuery.Clear(); sbQuery.Append("SELECT cita.idcita,cita.fechacita,cita.cedulapaciente,upper(CONCAT(rtrim(paciente.nombre),' ',ltrim(paciente.apellido))) as paciente,"); sbQuery.Append(" doctores.doctores_cedula,upper(CONCAT(rtrim(doctores.doctores_nombre),' ',ltrim(doctores.doctores_apellido))) as doctor,departamentos.departamento_descripcion"); sbQuery.Append(" FROM cita "); sbQuery.Append(" INNER JOIN paciente ON paciente.cedula = cita.cedulapaciente"); sbQuery.Append(" INNER JOIN doctores ON doctores.doctores_cedula = cita.ceduladoctor"); sbQuery.Append(" INNER JOIN departamentos ON departamentos.departamento_id = cita.referimiento"); sbQuery.Append(cWhere); } // Paso los valores de sbQuery al CommandText myCommand.CommandText = sbQuery.ToString(); // Creo el objeto Data Adapter y ejecuto el command en el myAdapter = new MySqlDataAdapter(myCommand); // Creo el objeto Data Table DataTable dtCita = new DataTable(); // Lleno el data adapter myAdapter.Fill(dtCita); // Cierro el objeto clsConexion myclsConexion.Close(); // Verifico cantidad de datos encontrados int nRegistro = dtCita.Rows.Count; if (nRegistro == 0) { MessageBox.Show("No Hay Datos Para Mostrar, Favor Verificar", "Sistema Dispensario Medico", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } else { //1ero.HACEMOS LA COLECCION DE PARAMETROS //los campos de parametros contiene un objeto para cada campo de parametro en el informe ParameterFields oParametrosCR = new ParameterFields(); //Proporciona propiedades para la recuperacion y configuracion del tipo de los parametros ParameterValues oParametrosValuesCR = new ParameterValues(); //2do.CREAMOS LOS PARAMETROS ParameterField oUsuario = new ParameterField(); //parametervaluetype especifica el TIPO de valor de parametro //ParameterValueKind especifica el tipo de valor de parametro en la PARAMETERVALUETYPE de la Clase PARAMETERFIELD oUsuario.ParameterValueType = ParameterValueKind.StringParameter; //3ero.VALORES PARA LOS PARAMETROS //ParameterDiscreteValue proporciona propiedades para la recuperacion y configuracion de //parametros de valores discretos ParameterDiscreteValue oUsuarioDValue = new ParameterDiscreteValue(); oUsuarioDValue.Value = cUsuario; //4to. AGREGAMOS LOS VALORES A LOS PARAMETROS oUsuario.CurrentValues.Add(oUsuarioDValue); //5to. AGREGAMOS LOS PARAMETROS A LA COLECCION oParametrosCR.Add(oUsuario); //nombre del parametro en CR (Crystal Reports) oParametrosCR[0].Name = "cUsuario"; //nombre del TITULO DEL INFORME cTitulo = "REPORTE DE CITAS MEDICAS"; //6to Instanciamos nuestro REPORTE //Reportes.ListadoDoctores oListado = new Reportes.ListadoDoctores(); Reportes.rptCitas orptCitas = new Reportes.rptCitas(); //pasamos el nombre del TITULO del Listado //SumaryInfo es un objeto que se utiliza para leer,crear y actualizar las propiedades del reporte // oListado.SummaryInfo.ReportTitle = cTitulo; orptCitas.SummaryInfo.ReportTitle = cTitulo; //7mo. instanciamos nuestro el FORMULARIO donde esta nuestro ReportViewer frmPrinter ofrmPrinter = new frmPrinter(dtCita, orptCitas, cTitulo); //ParameterFieldInfo Obtiene o establece la colección de campos de parámetros. ofrmPrinter.CrystalReportViewer1.ParameterFieldInfo = oParametrosCR; ofrmPrinter.ShowDialog(); } } catch (Exception myEx) { MessageBox.Show("Error : " + myEx.Message, "Mostrando Reporte", MessageBoxButtons.OK, MessageBoxIcon.Information); clsExceptionLog.LogError(myEx, false); return; } }