public void soloLetras(KeyPressEventArgs e)
{
try
{
if (Char.IsLetter(e.KeyChar))
{
e.Handled = false;
}
else if (Char.IsControl(e.KeyChar))
{
e.Handled = false;
}
else if (Char.IsSeparator(e.KeyChar))
{
e.Handled = false;
}
else
{
e.Handled = true;
}
}
catch (Exception ex)
{
Glo.Mensajes(10, ex.Message);
}
}
private void BTN_Agregar_Click(object sender, EventArgs e)
{
try
{
WIN_CAT_Receta_Repo ventana = new WIN_CAT_Receta_Repo(0, IdPaciente);
ventana.ShowDialog();
Refrescar();
}
catch (Exception ex)
{
Glo.Mensajes(10, ex.Message);
}
}
// Evento botón Agregar
private void BTN_Agregar_Click(object sender, EventArgs e)
{
try
{
// Se instancia un objeto de tipo ventana para abrirla y refrescar la tabla
WIN_CAT_Pacientes_F Window = new WIN_CAT_Pacientes_F();
Window.ShowDialog();
Refrescar();
}
catch (Exception ex)
{
Glo.Mensajes(10, ex.Message);
}
}
// Evento al cargar la ventana
private void WIN_CAT_Servicios_T_Load(object sender, EventArgs e)
{
try
{
// Verifica si se puede conectar con la base de datos
if (BD.Conexion(true))
{
Refrescar();
}
}
catch (Exception ex)
{
Glo.Mensajes(10, ex.Message);
}
}
private void WIN_CAT_Odontograma_T_Load(object sender, EventArgs e)
{
try
{
// Verifica qe la conexión sea exitosa
if (BD.Conexion(true))
{
Refrescar();
}
}
catch (Exception ex)
{
Glo.Mensajes(10, ex.Message);
}
}
private void Hora_Tick(object sender, EventArgs e)
{
try
{
STC_Dia.Text = "Fecha: " + DateTime.Now.ToShortDateString();
STC_Hora.Text = DateTime.Now.ToLongTimeString();
}
catch (Exception ex)
{
Glo.Mensajes(10, ex.Message);
}
}
private void BTN_Aceptar_Click(object sender, EventArgs e)
{
try
{
// Verifica que los campos tengan información
if (ValidarCampos())
{
// Verifica si el registro se creará o se modificará
if (gnIdReceta == 0)
{
// Se abre la conexión y se estructura el query para agregar el registro
SqlCommand cmd = BD.conexion.CreateCommand();
cmd.CommandText = "Insert Into RECETA(Id_Empleado, Id_Paciente, Diagnostico, Medicamento, Tratamiento, Fecha_Inicio, Fecha_Final, Fecha_Diag) Values(" +
gnIdEmpleado + ", " + gnIdPaciente + ", '" + EDT_Diagnostico.Text + "', '" + EDT_Medicamento.Text + "', '" + EDT_Tratamiento.Text + "', '" + EDT_FechaInicio.Value.ToString("yyyy-MM-dd") +
"', '" + EDT_FechaFinal.Value.ToString("yyyy-MM-dd") + "', '" + EDT_FechaDiag.Value.ToString("yyyy-MM-dd") + "')";
cmd.ExecuteNonQuery();
MessageBox.Show("Registro agregado con éxito.", "DenTech", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
else
{
// Se abre la conexión y se estructura el query para modificar el registro
SqlCommand cmd = BD.conexion.CreateCommand();
cmd.CommandText = "Update RECETA Set " +
"Diagnostico = '" + EDT_Diagnostico.Text + "', " +
"Medicamento = '" + EDT_Medicamento.Text + "', " +
"Tratamiento = '" + EDT_Tratamiento.Text + "', " +
"Fecha_Inicio = '" + EDT_FechaInicio.Value.ToString("yyyy-MM-dd") + "' " +
"Fecha_Final = '" + EDT_FechaFinal.Value.ToString("yyyy-MM-dd") + "' " +
"Where Id_Receta = " + gnIdReceta;
cmd.ExecuteNonQuery();
MessageBox.Show("Registro modificado con éxito.", "DenTech", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
// Se cierra la ventana
this.Close();
}
}
catch (Exception ex)
{
Glo.Mensajes(10, ex.Message);
}
}
// Evento cuando se carga la ventana
private void WIN_USU_Usuarios_F_Load(object sender, EventArgs e)
{
try
{
// Verifica si se puede conectar con la base de datos
if (BD.Conexion(true))
{
// Verifica que tenga información de un usuario existente
if (gnIdUsuario != 0)
{
// Se estructura el query
SqlCommand cmd = BD.conexion.CreateCommand();
cmd.CommandText = "Select " +
"Usuario, " +
"Nombre, " +
"ApellidoP, " +
"ApellidoM, " +
"Password, " +
"Tipo_Usuario " +
"From EMPLEADOS " +
"Where Id_Empleado = " + gnIdUsuario;
// Ejecuta el query y almacena los datos consultados
SqlDataReader Reader = cmd.ExecuteReader();
Reader.Read();
// Revisa si cuenta con información
if (Reader.HasRows)
{
// Inserta la información a los controles
EDT_Usuario.Text = Reader[0].ToString();
EDT_Nombre.Text = Reader[1].ToString();
EDT_ApellidoP.Text = Reader[2].ToString();
EDT_ApellidoM.Text = Reader[3].ToString();
EDT_Password.Text = Reader[4].ToString();
COMBO_TipoUsuario.SelectedIndex = Int32.Parse(Reader[5].ToString());
}
Reader.Close(); // Se libera
}
}
}
catch (Exception ex)
{
Glo.Mensajes(10, ex.Message);
}
}
private void BTN_Acceder_Click(object sender, EventArgs e)
{
try
{
//Verifica que los campos tengan información
if (ValidarCampos())
{
bool ExisteUsuario = false;
// Se busca en la base de datos
BD.conexion.CreateCommand();
SqlCommand comando = BD.conexion.CreateCommand();
comando.CommandText = "IF EXISTS(SELECT * FROM EMPLEADOS WHERE Usuario = '" + EDT_Usuario.Text + "' AND Password = '******') SELECT 'true' ELSE SELECT 'false'";
ExisteUsuario = Convert.ToBoolean(comando.ExecuteScalar());
if (ExisteUsuario)
{
comando.CommandText = "SELECT Tipo_Usuario FROM EMPLEADOS WHERE Usuario = '" + EDT_Usuario.Text + "'";
Settings.Default.TipoUsuario = Convert.ToInt16(comando.ExecuteScalar());
comando.CommandText = "SELECT Id_Empleado FROM EMPLEADOS WHERE Usuario = '" + EDT_Usuario.Text + "'";
Settings.Default.IDUsuario = Convert.ToInt16(comando.ExecuteScalar());
Settings.Default.NombreUsuario = EDT_Usuario.Text;
WIN_GLO_Principal Principal = new WIN_GLO_Principal();
Principal.Show();
this.Close();
}
else
{
Glo.Mensajes(8);
}
}
}
catch (Exception ex)
{
Glo.Mensajes(10, ex.Message);
}
}
// Método que verifica si los campos tienen información
private bool ValidarCampos()
{
bool Regresar = true;
try
{
// Verifica que el campo Nombre tenga información
if (EDT_Descripcion.TextLength == 0 || EDT_Descripcion.Text == "")
{
// Marca error y te regresa al campo
Glo.Mensajes(3, "Descripción");
EDT_Descripcion.Focus();
Regresar = false;
}
}
catch (Exception ex)
{
Glo.Mensajes(10, ex.Message);
Regresar = false;
}
return(Regresar);
}
private void WIN_CAT_Extraccion_F_Load(object sender, EventArgs e)
{
try
{
// Verifica si se puede conectar con la base de datos
if (BD.Conexion(true))
{
// Verifica que tenga información de un usuario existente
if (gnIdExtraccion != 0)
{
// Se estructura el query
SqlCommand cmd = BD.conexion.CreateCommand();
cmd.CommandText = "Select " +
"Descripcion, " +
"Precio " +
"From EXTRACCION " +
"Where Id_Extraccion = " + gnIdExtraccion;
// Ejecuta el query y almacena los datos consultados
SqlDataReader Reader = cmd.ExecuteReader();
Reader.Read();
// Revisa si cuenta con información
if (Reader.HasRows)
{
// Inserta la información a los controles
EDT_Descripcion.Text = Reader[0].ToString();
EDT_Precio.Text = Reader[1].ToString();
}
Reader.Close(); // Se libera
}
}
}
catch (Exception ex)
{
Glo.Mensajes(10, ex.Message);
}
}
private bool ValidarCampos()
{
bool Regresar = true;
try
{
if (EDT_Usuario.TextLength == 0 || EDT_Usuario.Text == "")
{
Glo.Mensajes(3, "Usuario");
EDT_Usuario.Focus();
Regresar = false;
}
if (EDT_Contrasena.TextLength == 0 || EDT_Contrasena.Text == "")
{
Glo.Mensajes(3, "Contraseña");
EDT_Contrasena.Focus();
Regresar = false;
}
if (EDT_Servidor.TextLength == 0 || EDT_Servidor.Text == "")
{
Glo.Mensajes(3, "Servidor");
EDT_Servidor.Focus();
Regresar = false;
}
if (EDT_BaseDatos.TextLength == 0 || EDT_BaseDatos.Text == "")
{
Glo.Mensajes(3, "Base de Datos");
EDT_Usuario.Focus();
Regresar = false;
}
}
catch (Exception ex)
{
Glo.Mensajes(10, ex.Message);
Regresar = false;
}
return(Regresar);
}
private void WIN_CAT_Recetas_F_Load(object sender, EventArgs e)
{
try
{
Receta_Reporte _crt = new Receta_Reporte();
_crt.SetDataSource(_recetareporte);
crystalReportViewer1.ReportSource = null;
crystalReportViewer1.ReportSource = _crt;
}
catch (Exception ex)
{
Glo.Mensajes(10, ex.Message);
}
}
private void BTN_Agregar_Click(object sender, EventArgs e)
{
try
{
WIN_CAT_Inventario_F window = new WIN_CAT_Inventario_F();
window.ShowDialog();
Refrescar();
}
catch (Exception ex)
{
Glo.Mensajes(10, ex.Message);
}
}
public bool Conexion(bool Iniciar)
{
conexion = new SqlConnection(File.ReadAllText(Environment.CurrentDirectory + @"\ConexionDentech.ini"));
Exito = false;
switch (Iniciar)
{
case true:
try
{
conexion.Open();
Exito = true;
Settings.Default.ConexionValida = true;
}
catch (Exception)
{
Glo.Mensajes(2);
Exito = false;
Settings.Default.ConexionValida = false;
}
break;
case false:
try
{
conexion.Close();
Exito = true;
}
catch (Exception)
{
Glo.Mensajes(7);
Exito = false;
}
break;
}
return(Exito);
}
// Evento del botón Agregar
private void BTN_Agregar_Click(object sender, EventArgs e)
{
// Valida el código mientras se ejecuta
try
{
// Se insatncia un objeto de tipo ventana para abrirla y refrescar la tabla
WIN_CAT_Expediente_F Window = new WIN_CAT_Expediente_F();
Window.ShowDialog();
Refrescar();
}
catch (Exception ex)
{
// Se manda mensaje de error con la exception
MG.Mensajes(10, ex.Message);
}
}
// Método Refrescar
private void Refrescar()
{
try
{
// Se realiza la conexión a la BD y se instancia un objeto de la misma, además se declaran variables
BD.conexion.CreateCommand();
SqlCommand cmd = BD.conexion.CreateCommand();
SqlDataAdapter Adaptador = new SqlDataAdapter();
var Data = new DataTable();
// Se estructura el query
cmd.CommandText = "Select\n" +
"Id_Implante,\n" +
"Descripcion,\n" +
"Precio \n" +
"From IMPLANTE";
cmd.ExecuteNonQuery(); // Se ejecuta
// Se crea un adaptador de sql, guardará el data source que contiene la información de la consulta
Adaptador.SelectCommand = cmd;
Adaptador.Fill(Data);
// Se inserta la información en el DataGridView
DGV_TablaImplante.DataSource = Data;
// Verifica que la tabla tenga información
if (DGV_TablaImplante.RowCount == 0)
{
BTN_Seleccionar.Enabled = false;
}
else
{
BTN_Seleccionar.Enabled = true;
}
RADIO_Realizado.Checked = true;
}
catch (Exception ex)
{
Glo.Mensajes(10, ex.Message);
}
}
private void WIN_CAT_ArchivosAdjuntos_T_Load(object sender, EventArgs e)
{
// Valida el código mientras se ejecuta
try
{
// Crea una carpeta que es donde se guardarán todos los archivos
if (!Directory.Exists(this.Path))
{
Directory.CreateDirectory(this.Path);
}
// Verifica si se puede conectar a la base de datos
if (BD.Conexion(true))
{
Refrescar();
}
}
catch (Exception ex)
{
// Se manda mensaje de error con la exception
MG.Mensajes(10, ex.Message);
}
}
// Evento cuando se carga la ventana
private void WIN_CAT_Pacientes_F_Load(object sender, EventArgs e)
{
try
{
// Verifica si se puede conectar con la base de datos
if (BD.Conexion(true))
{
#region Se llena el combo Tipo Sangre
//// Se instancia un objeto que adaptará la información del query, además se declaran variables
//SqlDataAdapter adaptador = new SqlDataAdapter();
//var ds = new DataTable();
//// Se estructura query para llenar el combo de Tipo Sangre
//BD.conexion.CreateCommand();
//SqlCommand comando = BD.conexion.CreateCommand();
//comando.CommandText = "SELECT Id_Sangre, Descripcion FROM SANGRE";
//comando.ExecuteNonQuery(); // Se ejecuta
//// Se crea un adaptador de sql, guardará el data source que contiene la información de la consulta
//adaptador.SelectCommand = comando;
//adaptador.Fill(ds);
//// Se asignan los valores en el COMBO
//COMBO_TipoSangre.DataSource = ds;
//COMBO_TipoSangre.ValueMember = "Id_Sangre";
//COMBO_TipoSangre.DisplayMember = "Descripcion";
#endregion
// Verifica que tenga información de un usuario existente
if (gnIdPaciente != 0)
{
// Se estructura el query
SqlCommand cmd = BD.conexion.CreateCommand();
cmd.CommandText = "Select \n" +
"Nombre, \n" +
"ApellidoP, \n" +
"ApellidoM, \n" +
"Edad, \n" +
"Sexo, \n" +
// "Id_Sangre, \n" +
"Telefono, \n" +
"Tel_Emergencia, \n" +
"Direccion \n" +
"From PACIENTES " +
"Where PACIENTES.Id_Paciente = " + gnIdPaciente;
// Ejecuta el query y almacena los datos consultados
SqlDataReader Reader = cmd.ExecuteReader();
Reader.Read();
// Revisa si cuenta con información
if (Reader.HasRows)
{
// Inserta la información a los controles
EDT_Nombre.Text = Reader[0].ToString();
EDT_ApellidoP.Text = Reader[1].ToString();
EDT_ApellidoM.Text = Reader[2].ToString();
EDT_Edad.Text = Reader[3].ToString();
EDT_Telefono.Text = Reader[5].ToString();
EDT_TelefonoEm.Text = Reader[6].ToString();
EDT_Direccion.Text = Reader[7].ToString();
COMBO_Sexo.SelectedIndex = Int32.Parse(Reader[4].ToString());
// COMBO_TipoSangre.SelectedValue = Int32.Parse(Reader[5].ToString());
}
Reader.Close(); // Se libera
}
}
}
catch (Exception ex)
{
Glo.Mensajes(10, ex.Message);
}
}
private void WIN_CAT_Diente_F_Load(object sender, EventArgs e)
{
try
{
// Verifica si se puede conectar con la base de datos
if (BD.Conexion(true))
{
// Se estructura el query
SqlCommand cmd = BD.conexion.CreateCommand();
cmd.CommandText = "SELECT \n" +
"NumDiente, \n" +
"Descripcion \n" +
"FROM DIENTE " +
"WHERE DIENTE.Id_Diente = " + gnIdDiente;
// Ejecuta el query y almacena los datos consultados
SqlDataReader Reader = cmd.ExecuteReader();
Reader.Read();
// Revisa si cuenta con información
if (Reader.HasRows)
{
TituloBanner += Convert.ToInt16(Reader[0]);
EDT_Descripcion.Text = Reader[1].ToString();
}
Reader.Close();
for (int i = 1; i < 8; i++)
{
cmd.CommandText = "SELECT \n" +
"Estatus, \n" +
"Id_Detalle \n" +
"FROM DETALLEDIENTE " +
"WHERE Id_Diente = " + gnIdDiente +
"AND AreaDiente = " + i;
Reader = cmd.ExecuteReader();
// Ejecuta el query y almacena los datos consultados
Reader.Read();
// Revisa si cuenta con información
if (Reader.HasRows)
{
gnIdDetalle[i - 1] = Convert.ToInt16(Reader[1]);
estatus = Convert.ToInt16(Reader[0]);
switch (i)
{
case 1:
switch (estatus)
{
case 1:
BTN_SuperiorArriba.BackColor = Color.Blue;
break;
case 2:
BTN_SuperiorArriba.BackColor = Color.Red;
break;
default:
break;
}
break;
case 2:
switch (estatus)
{
case 1:
BTN_SuperiorIzq.BackColor = Color.Blue;
break;
case 2:
BTN_SuperiorIzq.BackColor = Color.Red;
break;
default:
break;
}
break;
case 3:
switch (estatus)
{
case 1:
BTN_SuperiorCentro.BackColor = Color.Blue;
break;
case 2:
BTN_SuperiorCentro.BackColor = Color.Red;
break;
default:
break;
}
break;
case 4:
switch (estatus)
{
case 1:
BTN_SuperiorDer.BackColor = Color.Blue;
break;
case 2:
BTN_SuperiorDer.BackColor = Color.Red;
break;
default:
break;
}
break;
case 5:
switch (estatus)
{
case 1:
BTN_SuperiorAbajo.BackColor = Color.Blue;
break;
case 2:
BTN_SuperiorAbajo.BackColor = Color.Red;
break;
default:
break;
}
break;
case 6:
switch (estatus)
{
case 1:
BTN_LateralArriba.BackColor = Color.Blue;
break;
case 2:
BTN_LateralArriba.BackColor = Color.Red;
break;
default:
break;
}
break;
case 7:
switch (estatus)
{
//Diente Extraccion Pendiente
case 1:
resName = $"Diente_extrac_Pendiente"; // Check the correct name in the .resx file. By using the wizards the extension is omitted, for example.
break;
//Diente Extraccion Realizado
case 2:
resName = $"Diente_extrac_Realizado"; // Check the correct name in the .resx file. By using the wizards the extension is omitted, for example.
break;
//Diente Implementacion Pendiente
case 3:
resName = $"Diente_imple_Pendiente"; // Check the correct name in the .resx file. By using the wizards the extension is omitted, for example.
break;
//Diente Implementacion Realizado
case 4:
resName = $"Diente_imple_Realizado"; // Check the correct name in the .resx file. By using the wizards the extension is omitted, for example.
break;
default:
break;
}
estatusLateral = estatus;
IMG_LateralAbajo.Image = (Image)Properties.Resources.ResourceManager.GetObject(resName);
break;
}
}
Reader.Close();
}
RefrescarTratamientos();
}
}
catch (Exception ex)
{
Glo.Mensajes(10, ex.Message);
}
}
private void WIN_CAT_Odontograma_F_Load(object sender, EventArgs e)
{
try
{
// Verifica si se puede conectar con la base de datos
if (BD.Conexion(true))
{
// Verifica que tenga información de un usuario existente
if (gnIdOdontograma != 0)
{
// Se estructura el query
SqlCommand cmd = BD.conexion.CreateCommand();
cmd.CommandText = "Select \n" +
"Descripcion, \n" +
"Fecha_Registro \n" +
"From ODONTOGRAMA " +
"Where ODONTOGRAMA.Id_Odontograma = " + gnIdOdontograma;
// Ejecuta el query y almacena los datos consultados
SqlDataReader Reader = cmd.ExecuteReader();
Reader.Read();
// Revisa si cuenta con información
if (Reader.HasRows)
{
// Inserta la información a los controles
EDT_Descripcion.Text = Reader[0].ToString();
DateTime dia = Convert.ToDateTime(Reader[1]);
STC_FechaRegistro.Text += dia.ToShortDateString();
}
Reader.Close(); // Se libera
for (int i = 0; i < 32; i++)
{
// Se estructura el query para obtener los dientes
cmd = BD.conexion.CreateCommand();
cmd.CommandText = "SELECT \n" +
"Id_Diente \n" +
"FROM DIENTE " +
"WHERE DIENTE.Id_Odontograma = " + gnIdOdontograma +
" AND DIENTE.NumDiente = " + NumDiente;
// Ejecuta el query y almacena los datos consultados
Reader = cmd.ExecuteReader();
Reader.Read();
// Revisa si cuenta con información
if (Reader.HasRows)
{
// Inserta la información a los controles
gnIdDiente[i] = Convert.ToInt16(Reader[0]);
}
Reader.Close(); // Se libera
if (NumDiente == 18 || NumDiente == 28 || NumDiente == 38)
{
NumDiente += 3;
}
else
{
NumDiente += 1;
}
}
}
}
}
catch (Exception ex)
{
Glo.Mensajes(10, ex.Message);
}
}
// Evento al cargar la ventana
private void WIN_CAT_Citas_T_Load(object sender, EventArgs e)
{
try
{
// Verifica si se puede conectar con la base de datos
if (BD.Conexion(true))
{
// Genera los cuadros del mes y agrega la información
GenerarPaneles(42);
AgregarNumeroDia(ObtenerPrimerDiaMes(), ObtenerDiasMes());
CargarCitas(ObtenerPrimerDiaMes());
// Muestra la información del mes y año actual
STC_MesAño.Text = this.FechaActual.ToString("MMMM, yyyy");
}
}
catch (Exception ex)
{
Glo.Mensajes(10, ex.Message);
}
}
// Evento al cargar la ventana
private void WIN_CAT_Citas_F_Load(object sender, EventArgs e)
{
try
{
// Verifica si se puede conectar con la base de datos
if (BD.Conexion(true))
{
// Verifica que tenga información de una cita existente
if (gnIdCita != 0)
{
// Se estructura el query
SqlCommand cmd = BD.conexion.CreateCommand();
cmd.CommandText = "Select " +
"Id_Empleado, " +
"Id_Paciente, " +
"Id_Servicios, " +
"Fecha_Cita " +
"From CITAS " +
"Where Id_Cita = " + gnIdCita +
"Order By Fecha_Cita Desc";
// Ejecuta el query y almacena los datos consultados
SqlDataReader Reader = cmd.ExecuteReader();
Reader.Read();
// Revisa si cuenta con información
if (Reader.HasRows)
{
// Inserta la información a los controles
gnIdOdontologo = Convert.ToInt32(Reader[0].ToString());
gnIdPaciente = Convert.ToInt32(Reader[1].ToString());
gnIdServicio = Convert.ToInt32(Reader[2].ToString());
EDT_Fecha.Value = Convert.ToDateTime(Reader[3]);
Reader.Close(); // Se libera
// Busca al odontólogo, se estructura el query
SqlCommand cmd2 = BD.conexion.CreateCommand();
cmd2.CommandText = "Select " +
"NombreCompleto = (Nombre + ' ' + ApellidoP + ' ' + ApellidoM) " +
"From EMPLEADOS " +
"Where Id_Empleado = " + gnIdOdontologo;
// Ejecuta el query y almacena los datos consultados
SqlDataReader Reader2 = cmd2.ExecuteReader();
Reader2.Read();
// Revisa si cuenta con información para insertarla en el texto
if (Reader2.HasRows)
{
STC_NombreOdontologo.Text = Reader2[0].ToString();
}
else
{
STC_NombreOdontologo.Text = "";
}
Reader2.Close(); // Se libera
// Busca al paciente, se estrutura el query
SqlCommand cmd3 = BD.conexion.CreateCommand();
cmd3.CommandText = "Select " +
"NombreCompleto = (Nombre + ' ' + ApellidoP + ' ' + ApellidoM) " +
"From PACIENTES " +
"Where Id_Paciente = " + gnIdPaciente;
// Ejecuta el query y almacena los datos consultados
SqlDataReader Reader3 = cmd3.ExecuteReader();
Reader3.Read();
// Revisamos si cuenta con información para insertarla en el control
if (Reader3.HasRows)
{
STC_NombrePaciente.Text = Reader3[0].ToString();
}
else
{
STC_NombrePaciente.Text = "";
}
Reader3.Close(); // Se libera
// Busca el servicio, se estructura el query
SqlCommand cmd4 = BD.conexion.CreateCommand();
cmd4.CommandText = "Select " +
"Descripcion " +
"From SERVICIOS " +
"Where Id_Servicios = " + gnIdServicio;
// ejecuta el query y almacena los datos consultados
SqlDataReader Reader4 = cmd4.ExecuteReader();
Reader4.Read();
// Revisamos si cuenta con información para insertarla en el control
if (Reader4.HasRows)
{
STC_NombreServicio.Text = Reader4[0].ToString();
}
else
{
STC_NombreServicio.Text = "";
}
Reader4.Close(); // Se libera
}
}
else
{
// Muestra los campos vacios
EDT_Fecha.Value = new DateTime(Fecha.Year, Fecha.Month, Fecha.Day);
STC_NombreOdontologo.Text = "";
STC_NombrePaciente.Text = "";
STC_NombreServicio.Text = "";
}
}
}
catch (Exception ex)
{
Glo.Mensajes(10, ex.Message);
}
}
// Evento cuando se carga la ventana
private void WIN_CAT_Expediente_F_Load(object sender, EventArgs e)
{
try
{
// Verifica si se puede conectar con la base de datos
if (BD.Conexion(true))
{
#region Se llena el combo Tipo Sangre
// Se instancia un objeto que adaptará la información del query, además se declaran variables
SqlDataAdapter adaptador = new SqlDataAdapter();
var ds = new DataTable();
// Se estructura query para llenar el combo de Tipo Sangre
BD.conexion.CreateCommand();
SqlCommand comando = BD.conexion.CreateCommand();
comando.CommandText = "SELECT Id_Sangre, Descripcion FROM SANGRE";
comando.ExecuteNonQuery(); // Se ejecuta
// Se crea un adaptador de sql, guardará el data source que contiene la información de la consulta
adaptador.SelectCommand = comando;
adaptador.Fill(ds);
// Se asignan los valores en el COMBO
COMBO_TipoSangre.DataSource = ds;
COMBO_TipoSangre.ValueMember = "Id_Sangre";
COMBO_TipoSangre.DisplayMember = "Descripcion";
#endregion
// Verifica que tenga información de un usuario existente
if (gnIdExpediente != 0)
{
// Se estructura el query
SqlCommand cmd = BD.conexion.CreateCommand();
cmd.CommandText = "Select \n" +
"Id_Empleado, \n" +
"Id_Paciente, \n" +
"Enfermedad, \n" +
"Alergia, \n" +
"Fecha, \n" +
"Id_Sangre \n" +
"From EXPEDIENTE\n" +
"Where EXPEDIENTE.Id_Expediente = " + gnIdExpediente;
// Ejecuta el query y almacena los datos consultados
SqlDataReader Reader = cmd.ExecuteReader();
Reader.Read();
// Revisa si cuenta con información
if (Reader.HasRows)
{
gnIdOdontologo = Convert.ToInt16(Reader[0]);
gnIdPaciente = Convert.ToInt16(Reader[1]);
EDT_Enfermedad.Text = Reader[2].ToString();
EDT_Alergias.Text = Reader[3].ToString();
DT_Fecha.Value = Convert.ToDateTime(Reader[4]);
COMBO_TipoSangre.SelectedValue = Int32.Parse(Reader[5].ToString());
Reader.Close(); // Se libera
// Se estructura el query
cmd.CommandText = "Select " +
"Usuario, " +
"NombreCompleto = (Nombre + ' ' + ApellidoP + ' ' + ApellidoM) " +
"From EMPLEADOS " +
"Where Id_Empleado = " + gnIdOdontologo;
// Ejecuta el query y almacena los datos consultados
SqlDataReader Reader2 = cmd.ExecuteReader();
Reader2.Read();
// Revisa si cuenta con información
if (Reader2.HasRows)
{
// Inserta la información a los controles
EDT_Odontologo.Text = Reader2[0].ToString();
STC_NombreOdontologo.Text = Reader2[1].ToString();
}
Reader2.Close(); // Se libera
//Paciente
cmd.CommandText = "Select " +
"Nombre, " +
"NombreCompleto = (Nombre + ' ' + ApellidoP + ' ' + ApellidoM), " +
"Edad " +
"From PACIENTES " +
"Where Id_Paciente = " + gnIdPaciente;
// Ejecuta el query y almacena los datos consultados
SqlDataReader Reader3 = cmd.ExecuteReader();
Reader3.Read();
// Revisa si cuenta con información
if (Reader3.HasRows)
{
// Inserta la información a los controles
EDT_Paciente.Text = Reader3[0].ToString();
STC_NombrePaciente.Text = Reader3[1].ToString();
STC_EdadPaciente.Text = Reader3[2].ToString();
}
Reader3.Close(); // Se libera
}
}
else
{
// Se limpian los campos
STC_NombreOdontologo.Text = "";
STC_NombrePaciente.Text = "";
STC_EdadPaciente.Text = "";
}
}
}
catch (Exception ex)
{
Glo.Mensajes(10, ex.Message);
}
}
