public virtual CrystalDecisions.CrystalReports.Engine.ReportDocument CreateReport()
{
rptListadoLicenciasMedicas rpt = new rptListadoLicenciasMedicas();
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 fecha >= " + "'" + fechadesde + "'" + " AND fecha <= " + "'" + fechahasta + "'" + "";
sbQuery.Clear();
sbQuery.Append("SELECT CONCAT(rtrim(paciente.nombre),' ', ltrim(paciente.apellido)) as nombrepaciente,");
sbQuery.Append(" rangos.rangoabrev as rangopaciente,licenciasmedicas.fecha,");
sbQuery.Append(" licenciasmedicas.idlicencia, licenciasmedicas.cedulapaciente");
sbQuery.Append(" FROM licenciasmedicas ");
sbQuery.Append(" INNER JOIN paciente ON paciente.cedula = licenciasmedicas.cedulapaciente");
sbQuery.Append(" INNER JOIN doctores ON doctores.doctores_cedula = licenciasmedicas.ceduladoctor");
sbQuery.Append(" INNER JOIN rangos ON rangos.rango_id = licenciasmedicas.rango");
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 fecha >= " + "'" + fechadesde + "'" + " AND fecha <= " + "'" + fechahasta + "'" + "";
cWhere = cWhere + " AND ceduladoctor = " + "'" + txtCedula.Text + "'" + "";
sbQuery.Clear();
sbQuery.Append("SELECT CONCAT(rtrim(paciente.nombre),' ', ltrim(paciente.apellido)) as nombrepaciente,");
sbQuery.Append(" rangos.rangoabrev as rangopaciente,licenciasmedicas.fecha,");
sbQuery.Append(" licenciasmedicas.idlicencia, licenciasmedicas.cedulapaciente");
sbQuery.Append(" FROM licenciasmedicas ");
sbQuery.Append(" INNER JOIN paciente ON paciente.cedula = licenciasmedicas.cedulapaciente");
//sbQuery.Append(" INNER JOIN doctores ON doctores.doctores_cedula = licenciasmedicas.ceduladoctor");
sbQuery.Append(" INNER JOIN rangos ON rangos.rango_id = licenciasmedicas.rango");
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 fecha >= " + "'" + fechadesde + "'" + " AND fecha <= " + "'" + fechahasta + "'" + "";
cWhere = cWhere + " AND licenciasmedicas.departamento = " + varEspecialidad + "";
sbQuery.Clear();
sbQuery.Append("SELECT CONCAT(rtrim(paciente.nombre),' ', ltrim(paciente.apellido)) as nombrepaciente,");
sbQuery.Append(" rangos.rangoabrev as rangopaciente,licenciasmedicas.fecha,");
sbQuery.Append(" licenciasmedicas.idlicencia, licenciasmedicas.cedulapaciente");
sbQuery.Append(" FROM licenciasmedicas ");
sbQuery.Append(" INNER JOIN paciente ON paciente.cedula = licenciasmedicas.cedulapaciente");
//sbQuery.Append(" INNER JOIN doctores ON doctores.doctores_cedula = licenciasmedicas.ceduladoctor");
sbQuery.Append(" INNER JOIN rangos ON rangos.rango_id = licenciasmedicas.rango");
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 dtLicenciasMedicas = new DataTable();
// Lleno el data adapter
myAdapter.Fill(dtLicenciasMedicas);
// Cierro el objeto clsConexion
myclsConexion.Close();
// Verifico cantidad de datos encontrados
int nRegistro = dtLicenciasMedicas.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 = "LISTADO DE LICENCIAS MEDICAS";
//6to Instanciamos nuestro REPORTE
//Reportes.ListadoDoctores oListado = new Reportes.ListadoDoctores();
//Reportes.rptListadoLicenciasMedicas oListado = new Reportes.rptListadoLicenciasMedicas()
//Reportes.ListadoDoctores oListado = new Reportes.ListadoDoctores();
Reportes.rptListadoLicenciasMedicas oListado = new Reportes.rptListadoLicenciasMedicas();
//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;
//7mo. instanciamos nuestro el FORMULARIO donde esta nuestro ReportViewer
frmPrinter ofrmPrinter = new frmPrinter(dtLicenciasMedicas, oListado, 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;
}
}
