public virtual CrystalDecisions.CrystalReports.Engine.ReportDocument CreateReport() { RepProblemaMedicoPaciente rpt = new RepProblemaMedicoPaciente(); rpt.Site = this.Site; return(rpt); }
private void ImprimirCaso() { MySqlConnection oCnn = new MySqlConnection(cCadenaclsConexion); MySqlCommand oComando = new MySqlCommand(); MySqlDataAdapter oAdaptador = new MySqlDataAdapter(); DataTable dtCasomedico = new DataTable(); StringBuilder sbQuery = new StringBuilder(); string cWhere = ""; string cUsuario = frmLogin.cUsuarioActual; string cTitulo = ""; //1ero. Creo mi comando // El metodo CreateCommand Crea y devuelve un SqlCommand objeto asociado al SqlConnection . oComando = oCnn.CreateCommand(); //2do. paso la cadena de coneccion al Commando //la propiedad Connecti Obtiene o establece el SqlConnection utiliza esta instancia del SqlCommand. oComando.Connection = oCnn; //abro la coneccion oCnn.Open(); if (rdoImprimeCaso.Checked) { cWhere = " where casomedico.idcasomedico = " + txtNoCaso.Text + ""; } //if (rdoPaciente.Checked) //{ // cWhere = " where paciente.id_paciente = " + cboPaciente.SelectedValue + ""; //} if (rdoCedula.Checked) { cWhere = " where paciente.cedula = '" + txtCed.Text + "'"; } sbQuery.Clear(); sbQuery.Append("select casomedico.idcasomedico,casomedico.cedula_doctor,casomedico.cedula_paciente,"); sbQuery.Append("casomedico.problema_descripcion,casomedico.problema_objetivo,casomedico.problema_accion,"); sbQuery.Append("casomedico.problema_prescripcion,casomedico.fecha,"); sbQuery.Append("doctores.doctores_cedula,doctores.doctores_nombre,"); sbQuery.Append("doctores.doctores_apellido,doctores.doctores_rango,doctores.doctores_especialidad,"); sbQuery.Append("paciente.cedula,paciente.rango,paciente.nombre,paciente.apellido,paciente.edad,"); sbQuery.Append("rangos.rango_descripcion,rangos.rangoabrev,"); sbQuery.Append("especialidades.especialidades_descripcion"); sbQuery.Append(" from casomedico"); sbQuery.Append(" left join doctores on doctores.doctores_cedula = casomedico.cedula_doctor"); sbQuery.Append(" left join especialidades on especialidades.especialidades_id = doctores.doctores_especialidad"); sbQuery.Append(" left join paciente on paciente.cedula = casomedico.cedula_paciente"); sbQuery.Append(" left join rangos on rangos.rango_id = paciente.rango"); sbQuery.Append(cWhere); sbQuery.Append(""); sbQuery.Append(""); sbQuery.Append(""); sbQuery.Append(""); sbQuery.Append(""); oComando.CommandText = sbQuery.ToString(); oAdaptador = new MySqlDataAdapter(oComando); oAdaptador.Fill(dtCasomedico); int nRegistro = dtCasomedico.Rows.Count; if (nRegistro == 0) { MessageBox.Show("No Hay Datos Para Mostrar, Favor Verificar", "Sistema 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 PROBLEMAS MEDICO"; //6to Instanciamos nuestro REPORTE Reportes.ListadoDoctores oListado = new Reportes.ListadoDoctores(); //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; Reportes.RepProblemaMedicoPaciente oReporte = new Reportes.RepProblemaMedicoPaciente(); oReporte.SummaryInfo.ReportTitle = cTitulo; frmPrinter ofrmPrimter = new frmPrinter(dtCasomedico, oReporte, cTitulo); ofrmPrimter.CrystalReportViewer1.ParameterFieldInfo = oParametrosCR; ofrmPrimter.ShowDialog(); } }