internal DataTable SeleccionarTipoPaciente(int Sub_Control)
{
DataSet dataset = new DataSet();
DataTable datatable = new DataTable();
clConexion ObjConexion = clConexion.Instance;
SqlConnection coneccion = new SqlConnection(ObjConexion.Conectar());
try
{
SqlCommand cmd = new SqlCommand("SIUD_TipoPaciente", coneccion);
cmd.CommandType = CommandType.StoredProcedure;
cmd.Parameters.AddWithValue("@Control", "S");
cmd.Parameters.AddWithValue("@Sub_Control", Sub_Control);
SqlDataAdapter SqlDa = new SqlDataAdapter(cmd);
SqlDa.Fill(dataset);
datatable = dataset.Tables[0];
}
catch (Exception error)
{
error.Message.ToString();
}
finally
{
coneccion.Close();
ObjConexion = null;
}
return(datatable);
}
internal void EliminarPaciente(int PacienteID, int SubControl, ref bool ResultadoOK, ref string MensajeError)
{
DataSet dataset = new DataSet();
clConexion ObjConexion = new clConexion();
SqlConnection coneccion = new SqlConnection(ObjConexion.Conectar());
try
{
SqlCommand cmd = new SqlCommand("SIUD_Paciente", coneccion);
cmd.CommandType = CommandType.StoredProcedure;
cmd.Parameters.AddWithValue("@Control", "D");
cmd.Parameters.AddWithValue("@Sub_Control", SubControl);
cmd.Parameters.AddWithValue("@Pa_ID", PacienteID);
SqlDataAdapter SqlDa = new SqlDataAdapter(cmd);
SqlDa.Fill(dataset);
ResultadoOK = true;
MensajeError = "";
}
catch (Exception error)
{
ResultadoOK = false;
MensajeError = "No se pudo eliminar el paciente " + error.Message.ToString();
}
finally
{
coneccion.Close();
ObjConexion = null;
}
}
internal DataTable BuscarConsultas(string Busqueda, int SubControl, ref bool ResultadoOK, ref string MensajeError)
{
DataSet dataset = new DataSet();
DataTable datatable = new DataTable();
DataTable dtAux = new DataTable();
clConexion ObjConexion = new clConexion();
SqlConnection coneccion = new SqlConnection(ObjConexion.Conectar());
try
{
SqlCommand cmd = new SqlCommand("Busqueda_ConsultaCompleta", coneccion);
cmd.CommandType = CommandType.StoredProcedure;
//cmd.Parameters.AddWithValue("@Control", "S");
cmd.Parameters.AddWithValue("@Sub_Control", SubControl);
if (SubControl == 1)
{
int busqueda2 = Convert.ToInt32(Busqueda);
cmd.Parameters.AddWithValue("@Pa_ID", busqueda2);
Busqueda = "0";
cmd.Parameters.AddWithValue("@Busqueda", Busqueda);
}
else
{
cmd.Parameters.AddWithValue("@Busqueda", Busqueda);
}
SqlDataAdapter SqlDa = new SqlDataAdapter(cmd);
SqlDa.Fill(dataset);
datatable = dataset.Tables[0];
ResultadoOK = true;
MensajeError = "";
}
catch (Exception error)
{
ResultadoOK = false;
MensajeError = "El Paciente no tiene Consultas " + error.Message.ToString();
}
finally
{
coneccion.Close();
ObjConexion = null;
}
if (ResultadoOK == true)
{
return(datatable);
}
else
{
return(dtAux);
}
}
internal void RegistrarDomicilio(clDomicilio clDomicilio, ref bool ResultadoOk, ref string MensajeError)
{
DataSet dataset = new DataSet();
DataTable datatable = new DataTable();
clConexion ObjConexion = new clConexion();
SqlConnection con = new SqlConnection(ObjConexion.Conectar());
try
{
SqlCommand cmd = new SqlCommand("SIUD_Domicilio", con);
cmd.CommandType = CommandType.StoredProcedure;
if (clDomicilio.ID == 0)
{
cmd.Parameters.AddWithValue("@Control", "I");
}
else
{
cmd.Parameters.AddWithValue("@Control", "U");
}
cmd.Parameters.AddWithValue("@Domi_ID", clDomicilio.ID);
cmd.Parameters.AddWithValue("@Domi_Sector", clDomicilio.Sector);
cmd.Parameters.AddWithValue("@Domi_Calle", clDomicilio.Calle);
cmd.Parameters.AddWithValue("@Domi_Numero", clDomicilio.Numero);
cmd.Parameters.AddWithValue("@Mu_ID", clDomicilio.MunicipioID);
SqlDataAdapter SqlDa = new SqlDataAdapter(cmd);
SqlDa.Fill(dataset);
if (clDomicilio.ID == 0)
{
datatable = dataset.Tables[0];
clDomicilio.ID = Convert.ToInt32(datatable.Rows[0]["Domi_ID"]);
}
ResultadoOk = true;
MensajeError = "";
}
catch (Exception error)
{
ResultadoOk = false;
MensajeError = "Ha ocurrido un Error surante el registro" + error.Message.ToString();
}
finally
{
con.Close();
ObjConexion = null;
datatable = null;
datatable = null;
con = null;
}
}
internal void RActualizar(clPaciente ObjPaciente, ref bool ResultadoOk, ref string MensajeError)
{
//clDomicilio Domicilio = new clDomicilio();
//clBusquedaAvanzada Busqueda = new clBusquedaAvanzada();
DataSet dataset = new DataSet();
DataTable datatable = new DataTable();
clConexion ObjConexion = new clConexion();
SqlConnection con = new SqlConnection(ObjConexion.Conectar());
try
{
SqlCommand cmd = new SqlCommand("SIUD_Paciente", con);
cmd.CommandType = CommandType.StoredProcedure;
cmd.Parameters.AddWithValue("@Control", "U");
cmd.Parameters.AddWithValue("@Pa_ID", ObjPaciente.ID);
cmd.Parameters.AddWithValue("@Pa_Nombre", ObjPaciente.Nombre);
cmd.Parameters.AddWithValue("@Pa_Apellido", ObjPaciente.Apellidos);
cmd.Parameters.AddWithValue("@Pa_Telefono", ObjPaciente.Telefono);
cmd.Parameters.AddWithValue("@Pa_Celular", ObjPaciente.Celular);
cmd.Parameters.AddWithValue("@Pa_Email", ObjPaciente.Email);
cmd.Parameters.AddWithValue("@Pa_Cedula", ObjPaciente.Cedula);
cmd.Parameters.AddWithValue("@Gen_ID", ObjPaciente.Genero);
cmd.Parameters.AddWithValue("@Pa_FechaNac", ObjPaciente.Fecha_Nacimiento);
cmd.Parameters.AddWithValue("@Est_ID", ObjPaciente.EstadoCivil);
cmd.Parameters.AddWithValue("@Domi_ID", ObjPaciente.DomicilioID);
cmd.Parameters.AddWithValue("@Pa_EstaActivo", ObjPaciente.EstaActivo);
cmd.Parameters.AddWithValue("@Zo_ID", ObjPaciente.Zona);
cmd.Parameters.AddWithValue("@TP_ID", ObjPaciente.TipoPaciente);
SqlDataAdapter SqlDa = new SqlDataAdapter(cmd);
SqlDa.Fill(dataset);
//datatable = dataset.Tables[0];
//ObjPaciente.ID = Convert.ToInt32(datatable.Rows[0]["Pa_ID"]);
ResultadoOk = true;
MensajeError = "";
}
catch (Exception error)
{
ResultadoOk = false;
MensajeError = "Ha ocurrido un Error al Actualizar el Paciente" + error.Message.ToString();
}
finally
{
con.Close();
ObjConexion = null;
datatable = null;
datatable = null;
con = null;
}
}
internal void RegistrarCondicionFisica(clCondicionFisica objCondicionFisica, ref bool ResultadoOk, ref string MensajeError)
{
DataSet dataset = new DataSet();
DataTable datatable = new DataTable();
clConexion ObjConexion = new clConexion();
SqlConnection con = new SqlConnection(ObjConexion.Conectar());
try
{
SqlCommand cmd = new SqlCommand("SIUD_CondicionFisica", con);
cmd.CommandType = CommandType.StoredProcedure;
cmd.Parameters.AddWithValue("@Control", "I");
cmd.Parameters.AddWithValue("@CondF_Peso", objCondicionFisica.Peso);
cmd.Parameters.AddWithValue("@Cond_Talla", objCondicionFisica.Talla);
cmd.Parameters.AddWithValue("@CondF_IndiceMC", objCondicionFisica.IndiceMC);
cmd.Parameters.AddWithValue("@CondF_Temp", objCondicionFisica.Temperatura);
cmd.Parameters.AddWithValue("@CondF_Sistolica", objCondicionFisica.PresaionAlta);
cmd.Parameters.AddWithValue("@CondF_Diastolica", objCondicionFisica.PresionBaja);
cmd.Parameters.AddWithValue("@Exa_ID", objCondicionFisica.ExamenFisicoID);
SqlDataAdapter SqlDa = new SqlDataAdapter(cmd);
SqlDa.Fill(dataset);
//datatable = dataset.Tables[0];
ResultadoOk = true;
MensajeError = "";
}
catch (Exception error)
{
ResultadoOk = false;
MensajeError = "Ha ocurrido un Error Durante el de la Consulta" + error.Message.ToString();
}
finally
{
con.Close();
ObjConexion = null;
datatable = null;
datatable = null;
con = null;
}
}
internal void RegistrarDetalleConsulta(clExamenFisico objExamenFisico, clCondicionFisica objCondicionFisica, clDiagnostico objDiagnostico, clTratamiento objTratamiento, ref bool ResultadoOk, ref string MensajeError)
{
DataSet dataset = new DataSet();
DataTable datatable = new DataTable();
clConexion ObjConexion = new clConexion();
SqlConnection con = new SqlConnection(ObjConexion.Conectar());
try
{
SqlCommand cmd = new SqlCommand("SIUD_DetalleConsulta", con);
cmd.CommandType = CommandType.StoredProcedure;
cmd.Parameters.AddWithValue("@Control", "I");
cmd.Parameters.AddWithValue("@Dia_Descripcion", objDiagnostico.Descripcion);
cmd.Parameters.AddWithValue("@Exa_Descripcion", objExamenFisico.ExaDescripcion);
cmd.Parameters.AddWithValue("@Trat_Descripcion", objTratamiento.Descripcion);
cmd.Parameters.AddWithValue("@Con_ID", objExamenFisico.ConsultaID);
SqlDataAdapter SqlDa = new SqlDataAdapter(cmd);
SqlDa.Fill(dataset);
datatable = dataset.Tables[0];
objExamenFisico.ID = Convert.ToInt32(datatable.Rows[0]["Exa_ID"]);
objCondicionFisica.ExamenFisicoID = objExamenFisico.ID;
ResultadoOk = true;
MensajeError = "";
RegistrarCondicionFisica(objCondicionFisica, ref ResultadoOk, ref MensajeError);
}
catch (Exception error)
{
ResultadoOk = false;
MensajeError = "Ha ocurrido un Error Durante el de la Consulta" + error.Message.ToString();
}
finally
{
con.Close();
ObjConexion = null;
datatable = null;
datatable = null;
con = null;
}
}
internal DataTable BuscarPaciente(string Busqueda, int SubControl, ref bool ResultadoOK, ref string MensajeError)
{
DataSet dataset = new DataSet();
DataTable datatable = new DataTable();
DataTable dtAux = new DataTable();
clConexion ObjConexion = new clConexion();
SqlConnection coneccion = new SqlConnection(ObjConexion.Conectar());
try
{
SqlCommand cmd = new SqlCommand("Busqueda_Paciente", coneccion);
cmd.CommandType = CommandType.StoredProcedure;
cmd.Parameters.AddWithValue("@Sub_Control", SubControl);
cmd.Parameters.AddWithValue("@Busqueda", Busqueda);
SqlDataAdapter SqlDa = new SqlDataAdapter(cmd);
SqlDa.Fill(dataset);
datatable = dataset.Tables[0];
ResultadoOK = true;
MensajeError = "";
}
catch (Exception error)
{
ResultadoOK = false;
MensajeError = "Paciente no encontrado " + error.Message.ToString();
}
finally
{
coneccion.Close();
ObjConexion = null;
}
if (ResultadoOK == true)
{
return(datatable);
}
else
{
return(dtAux);
}
}
internal void RegistrarConsulta(clConsulta objConsulta, ref bool ResultadoOk, ref string MensajeError)
{
DataSet dataset = new DataSet();
DataTable datatable = new DataTable();
clConexion ObjConexion = new clConexion();
SqlConnection con = new SqlConnection(ObjConexion.Conectar());
try
{
SqlCommand cmd = new SqlCommand("SIUD_Consulta", con);
cmd.CommandType = CommandType.StoredProcedure;
cmd.Parameters.AddWithValue("@Control", "I");
cmd.Parameters.AddWithValue("@Con_Fecha", objConsulta.Fecha);
cmd.Parameters.AddWithValue("@Con_Hora", objConsulta.Hora);
cmd.Parameters.AddWithValue("@Con_Motivo", objConsulta.Motivo);
cmd.Parameters.AddWithValue("@Con_Historial", objConsulta.Historia);
cmd.Parameters.AddWithValue("@Con_Seguimiento", objConsulta.Seguimineto);
cmd.Parameters.AddWithValue("@Doc_ID", objConsulta.DoctorID);
cmd.Parameters.AddWithValue("@Pa_ID", objConsulta.PacienteID);
SqlDataAdapter SqlDa = new SqlDataAdapter(cmd);
SqlDa.Fill(dataset);
datatable = dataset.Tables[0];
objConsulta.ConsultaID = Convert.ToInt32(datatable.Rows[0]["Con_ID"]);
ResultadoOk = true;
MensajeError = "";
}
catch (Exception error)
{
ResultadoOk = false;
MensajeError = "Ha ocurrido un Error Durante el de la Consulta" + error.Message.ToString();
}
finally
{
con.Close();
ObjConexion = null;
datatable = null;
datatable = null;
con = null;
}
}
internal DataTable UserAuthentication(string Usuario, string Contrasena, int Sub_Control, ref bool ResultadoOK, ref string MensajeError)
{
DataSet dataset = new DataSet();
DataTable datatable = new DataTable();
clConexion ObjConexion = clConexion.Instance;
SqlConnection coneccion = new SqlConnection(ObjConexion.Conectar());
try
{
SqlCommand cmd = new SqlCommand("Busqueda_Usuario", coneccion);
cmd.CommandType = CommandType.StoredProcedure;
cmd.Parameters.AddWithValue("@Control", "S");
cmd.Parameters.AddWithValue("@Sub_Control", Sub_Control);
cmd.Parameters.AddWithValue("@Usuario", Usuario);
cmd.Parameters.AddWithValue("@Contrasena", Contrasena);
SqlDataAdapter SqlDa = new SqlDataAdapter(cmd);
SqlDa.Fill(dataset);
datatable = dataset.Tables[0];
ResultadoOK = true;
MensajeError = "";
}
catch (Exception error)
{
ResultadoOK = false;
MensajeError = "No Encontrado" + error.Message.ToString();
}
finally
{
coneccion.Close();
ObjConexion = null;
}
return(datatable);
}
internal DataTable SeleccionarUsuario(string usuario, string contrasena, int sub_Control, ref bool resultadoOK, ref string mensajeError)
{
DataSet dataset = new DataSet();
DataTable datatable = new DataTable();
clConexion ObjConexion = clConexion.Instance;
SqlConnection coneccion = new SqlConnection(ObjConexion.Conectar());
try
{
SqlCommand cmd = new SqlCommand("SIUD_USUARIO", coneccion);
cmd.CommandType = CommandType.StoredProcedure;
cmd.Parameters.AddWithValue("@Control", "S");
cmd.Parameters.AddWithValue("@Sub_Control", sub_Control);
cmd.Parameters.AddWithValue("@Us_Usuario", usuario);
cmd.Parameters.AddWithValue("@Us_Password", contrasena);
SqlDataAdapter SqlDa = new SqlDataAdapter(cmd);
SqlDa.Fill(dataset);
datatable = dataset.Tables[0];
resultadoOK = true;
mensajeError = "";
}
catch (Exception error)
{
resultadoOK = false;
mensajeError = "No Encontrado" + error.Message.ToString();
}
finally
{
coneccion.Close();
ObjConexion = null;
}
return(datatable);
}