|
@@ -93,20 +94,14 @@
|
diff --git a/WebLab/Protocolos/DerivacionRecibirLote.aspx.cs b/WebLab/Protocolos/DerivacionRecibirLote.aspx.cs
index 31b87abd..41cd5772 100644
--- a/WebLab/Protocolos/DerivacionRecibirLote.aspx.cs
+++ b/WebLab/Protocolos/DerivacionRecibirLote.aspx.cs
@@ -70,15 +70,12 @@ private void CargarEncabezado()
private void CargarFechaHoraActual()
{
DateTime miFecha = DateTime.UtcNow.AddHours(-3); //Hora estándar de Argentina (UTC-03:00)
- //txt_Fecha.Value = miFecha.Date.ToString("yyyy-MM-dd");
txtHora.Value = miFecha.ToString("HH:mm");
txtFecha.Text = miFecha.Date.ToString("yyyy-MM-dd");
-
//LAB-74 Control de fecha: La fecha de ingreso del lote no puede ser anterior a la fecha de envio del lote
- rvFecha.MinimumValue = hidFechaEnvio.Value;
- rvFecha.MaximumValue = txtFecha.Text; //Fecha Date today
- rvFecha.Text = "La fecha de recepcion no puede ser menor a la fecha de envio " + hidFechaEnvio.Value;
-
+ //rvFecha.MinimumValue = hidFechaEnvio.Value;
+ //rvFecha.MaximumValue = txtFecha.Text; //Fecha Date today
+ //rvFecha.Text = "La fecha de recepcion no puede ser menor a la fecha de envio " + hidFechaEnvio.Value;
}
private void VerificaPermisos(string sObjeto)
@@ -112,16 +109,20 @@ private void VerificaPermisos(string sObjeto)
protected void btn_recibirLote_Click(object sender, EventArgs e)
{
- //Cambiar estado al lote
- LoteDerivacion lote = new LoteDerivacion();
- lote = (LoteDerivacion)lote.Get(typeof(LoteDerivacion), Convert.ToInt32(Request["idLote"]));
- lote.Estado = 4;
- lote.IdUsuarioRecepcion = oUser.IdUsuario;
- lote.Save();
-
- //Generar Auditorias
- GenerarAuditorias(lote);
- btn_volver_Click(null, null);
+ if (Page.IsValid)
+ {
+ //Cambiar estado al lote
+ LoteDerivacion lote = new LoteDerivacion();
+ lote = (LoteDerivacion)lote.Get(typeof(LoteDerivacion), Convert.ToInt32(Request["idLote"]));
+ lote.Estado = 4;
+ lote.IdUsuarioRecepcion = oUser.IdUsuario;
+ lote.Save();
+
+ //Generar Auditorias
+ GenerarAuditorias(lote);
+ btn_volver_Click(null, null);
+ }
+
}
private void GenerarAuditorias(LoteDerivacion lote)
@@ -157,5 +158,34 @@ protected void btn_volver_Click(object sender, EventArgs e)
{
Response.Redirect("DerivacionMultiEfectorLote.aspx?idServicio=" + Request["idServicio"] + "&idLote=" + Request["idLote"], false);
}
+
+ protected void cvValidacionInput_ServerValidate(object source, ServerValidateEventArgs args)
+ {
+
+ string error = "";
+
+ if (string.IsNullOrEmpty(txtFecha.Text ))
+ {
+ args.IsValid = false;
+ error = "*Error en Fecha";
+ }
+
+ if (string.IsNullOrEmpty(txtHora.Value))
+ {
+ args.IsValid = false;
+ error = "*Error en Hora";
+ }
+
+ /* Por ahora no restringimos la fecha porque ellos si se equivocan no pueden editar la derivacion enviada*/
+ //if (DateTime.Parse(txtFecha.Text) < DateTime.Parse(hidFechaEnvio.Value))
+ //{
+ // error = "La fecha de recepcion no puede ser menor a la fecha de envio " + DateTime.Parse(hidFechaEnvio.Value).ToString("dd/MM/yyyy");
+ // args.IsValid = false;
+ //}
+
+
+
+ this.cvValidacionInput.ErrorMessage = error ;
+ }
}
}
\ No newline at end of file
diff --git a/WebLab/Protocolos/DerivacionRecibirLote.aspx.designer.cs b/WebLab/Protocolos/DerivacionRecibirLote.aspx.designer.cs
index 0705dca8..15e2ad4f 100644
--- a/WebLab/Protocolos/DerivacionRecibirLote.aspx.designer.cs
+++ b/WebLab/Protocolos/DerivacionRecibirLote.aspx.designer.cs
@@ -105,40 +105,22 @@ public partial class DerivacionRecibirLote
protected global::System.Web.UI.HtmlControls.HtmlInputGenericControl txtHora;
///
- /// rfvFecha control.
- ///
- ///
- /// Auto-generated field.
- /// To modify move field declaration from designer file to code-behind file.
- ///
- protected global::System.Web.UI.WebControls.RequiredFieldValidator rfvFecha;
-
- ///
- /// rfvHora control.
- ///
- ///
- /// Auto-generated field.
- /// To modify move field declaration from designer file to code-behind file.
- ///
- protected global::System.Web.UI.WebControls.RequiredFieldValidator rfvHora;
-
- ///
- /// rvFecha control.
+ /// txtObs control.
///
///
/// Auto-generated field.
/// To modify move field declaration from designer file to code-behind file.
///
- protected global::System.Web.UI.WebControls.RangeValidator rvFecha;
+ protected global::System.Web.UI.HtmlControls.HtmlTextArea txtObs;
///
- /// txtObs control.
+ /// cvValidacionInput control.
///
///
/// Auto-generated field.
/// To modify move field declaration from designer file to code-behind file.
///
- protected global::System.Web.UI.HtmlControls.HtmlTextArea txtObs;
+ protected global::System.Web.UI.WebControls.CustomValidator cvValidacionInput;
///
/// btnRecibirLote control.
diff --git a/WebLab/Protocolos/ProtocoloEdit2.aspx.cs b/WebLab/Protocolos/ProtocoloEdit2.aspx.cs
index 9b1513ac..087267f5 100644
--- a/WebLab/Protocolos/ProtocoloEdit2.aspx.cs
+++ b/WebLab/Protocolos/ProtocoloEdit2.aspx.cs
@@ -1885,8 +1885,14 @@ protected void btnGuardar_Click(object sender, EventArgs e)
private void ActualizarEstadoDerivacion(Protocolo oRegistro, Protocolo oRegistroAnterior)
{
- Business.Data.Laboratorio.Derivacion oDerivacion = new Business.Data.Laboratorio.Derivacion();
- oDerivacion.MarcarComoRecibidas(oRegistroAnterior,oRegistro, oUser, Convert.ToInt32(Request["idLote"]));
+
+ DetalleProtocolo dp = new DetalleProtocolo();
+ dp.ActualizarItemsDerivados(oRegistro, oRegistroAnterior, Convert.ToInt32(Request["idLote"]), oUser);
+
+ //Business.Data.Laboratorio.Derivacion oDerivacion = new Business.Data.Laboratorio.Derivacion();
+ //oDerivacion.MarcarComoRecibidas(oRegistroAnterior,oRegistro, oUser, Convert.ToInt32(Request["idLote"]));
+ //Business.Data.Laboratorio.DetalleProtocolo oDetalle = new Business.Data.Laboratorio.DetalleProtocolo();
+ //oDetalle.ActualizoResultado(oRegistro, oRegistroAnterior,Convert.ToInt32(Request["idLote"]));
}
private string getListaAreasCodigoBarras()
@@ -5283,6 +5289,7 @@ private void GenerarResultadoSISA(DetalleProtocolo oDetalle, string idPruebaSISA
request.Headers.Add("app_id", "0e4fcbbf");
+
Stream postStream = request.GetRequestStream();
postStream.Write(data, 0, data.Length);
diff --git a/WebLab/Protocolos/ProtocoloProductoEdit.aspx.cs b/WebLab/Protocolos/ProtocoloProductoEdit.aspx.cs
index 193a2389..aeae90d2 100644
--- a/WebLab/Protocolos/ProtocoloProductoEdit.aspx.cs
+++ b/WebLab/Protocolos/ProtocoloProductoEdit.aspx.cs
@@ -1231,7 +1231,8 @@ private void GuardarDetalle(Business.Data.Laboratorio.Protocolo oRegistro)
GuardarDetallePractica(oDetalle);
- GuardarDerivacion(oDetalle);
+ //GuardarDerivacion(oDetalle);
+ oDetalle.GuardarDerivacion(oUser);
}
else //si ya esta actualizo si trajo muestra o no
{
@@ -2136,8 +2137,10 @@ private void CargarProtocoloDerivadoLote()
private void ActualizarEstadoDerivacion(Protocolo oRegistro, Protocolo oAnterior)
{
- Business.Data.Laboratorio.Derivacion oDerivacion = new Business.Data.Laboratorio.Derivacion();
- oDerivacion.MarcarComoRecibidas(oAnterior, oRegistro, oUser, Convert.ToInt32(Request["idLote"]));
+ //Business.Data.Laboratorio.Derivacion oDerivacion = new Business.Data.Laboratorio.Derivacion();
+ //oDerivacion.MarcarComoRecibidas(oAnterior, oRegistro, oUser, Convert.ToInt32(Request["idLote"]));
+ DetalleProtocolo dp = new DetalleProtocolo();
+ dp.ActualizarItemsDerivados(oRegistro, oAnterior, Convert.ToInt32(Request["idLote"]), oUser);
}
private void VerificacionEstadoLote(Protocolo oRegistro, Protocolo oAnterior)
From 2713bec0c6f3675431278efc778a0c3f29634467 Mon Sep 17 00:00:00 2001
From: caroPintos <77695282+caroPintos@users.noreply.github.com>
Date: Tue, 3 Feb 2026 15:55:04 -0300
Subject: [PATCH 03/42] Mantenimiento Enero 2026 (#69)
---
.../ControlResultados/ControlPlanilla.aspx.cs | 46 +-
.../ControlResultados/ProtocoloList.aspx.cs | 51 +-
WebLab/ImpresionResult/ResultadoList.aspx.cs | 19 +-
WebLab/Protocolos/ProtocoloEdit2.aspx | 16 +-
.../ProtocoloEdit2.aspx.designer.cs | 36 +-
WebLab/Site1.Master | 2 +-
WebLab/SiteTurnos.Master | 2 +-
WebLab/Turnos/Default.aspx | 22 +-
WebLab/Turnos/TurnoList.aspx | 10 +-
WebLab/Turnos/TurnosEdit2.aspx | 101 +-
WebLab/Turnos/TurnosEdit2.aspx.cs | 52 +-
WebLab/controldecambios.html | 872 +++++++++---------
12 files changed, 667 insertions(+), 562 deletions(-)
diff --git a/WebLab/ControlResultados/ControlPlanilla.aspx.cs b/WebLab/ControlResultados/ControlPlanilla.aspx.cs
index 6e86645f..ba6e3f64 100644
--- a/WebLab/ControlResultados/ControlPlanilla.aspx.cs
+++ b/WebLab/ControlResultados/ControlPlanilla.aspx.cs
@@ -190,31 +190,31 @@ protected void btnBuscar_Click(object sender, EventArgs e)
//if (ddlArea.SelectedValue != "0") m_parametro += " AND i.idArea=" + ddlArea.SelectedValue;
- Configuracion oCon = new Configuracion(); oCon = (Configuracion)oCon.Get(typeof(Configuracion), 1);
- switch (oCon.TipoNumeracionProtocolo)// busqueda con autonumerico
- {
- case 0:
- {
+ //Configuracion oCon = new Configuracion(); oCon = (Configuracion)oCon.Get(typeof(Configuracion), 1);
+ //switch (oCon.TipoNumeracionProtocolo)// busqueda con autonumerico
+ //{
+ // case 0:
+ // {
if (txtProtocoloDesde.Value != "") m_parametro += " And P.numero>=" + int.Parse(txtProtocoloDesde.Value);
if (txtProtocoloHasta.Value != "") m_parametro += " AND P.numero<=" + int.Parse(txtProtocoloHasta.Value);
- } break;
- case 1:
- {
- if (txtProtocoloDesde.Value != "") m_parametro += " And P.numeroDiario>=" + int.Parse(txtProtocoloDesde.Value);
- if (txtProtocoloHasta.Value != "") m_parametro += " AND P.numeroDiario<=" + int.Parse(txtProtocoloHasta.Value);
- } break;
- case 2:
- {
- if (txtProtocoloDesde.Value != "") m_parametro += " And P.numeroSector>=" + int.Parse(txtProtocoloDesde.Value);
- if (txtProtocoloHasta.Value != "") m_parametro += " AND P.numeroSector<=" + int.Parse(txtProtocoloHasta.Value);
- } break;
-
- case 3:
- {
- if (txtProtocoloDesde.Value != "") m_parametro += " And P.numeroTipoServicio>=" + int.Parse(txtProtocoloDesde.Value);
- if (txtProtocoloHasta.Value != "") m_parametro += " AND P.numeroTipoServicio<=" + int.Parse(txtProtocoloHasta.Value);
- } break;
- }
+ // } break;
+ // case 1:
+ // {
+ // if (txtProtocoloDesde.Value != "") m_parametro += " And P.numeroDiario>=" + int.Parse(txtProtocoloDesde.Value);
+ // if (txtProtocoloHasta.Value != "") m_parametro += " AND P.numeroDiario<=" + int.Parse(txtProtocoloHasta.Value);
+ // } break;
+ // case 2:
+ // {
+ // if (txtProtocoloDesde.Value != "") m_parametro += " And P.numeroSector>=" + int.Parse(txtProtocoloDesde.Value);
+ // if (txtProtocoloHasta.Value != "") m_parametro += " AND P.numeroSector<=" + int.Parse(txtProtocoloHasta.Value);
+ // } break;
+
+ // case 3:
+ // {
+ // if (txtProtocoloDesde.Value != "") m_parametro += " And P.numeroTipoServicio>=" + int.Parse(txtProtocoloDesde.Value);
+ // if (txtProtocoloHasta.Value != "") m_parametro += " AND P.numeroTipoServicio<=" + int.Parse(txtProtocoloHasta.Value);
+ // } break;
+ //}
if (ddlEfector.SelectedValue != "0") m_parametro += " AND P.idEfectorSolicitante=" + ddlEfector.SelectedValue;
diff --git a/WebLab/ControlResultados/ProtocoloList.aspx.cs b/WebLab/ControlResultados/ProtocoloList.aspx.cs
index 8f067068..b839ef24 100644
--- a/WebLab/ControlResultados/ProtocoloList.aspx.cs
+++ b/WebLab/ControlResultados/ProtocoloList.aspx.cs
@@ -72,20 +72,47 @@ private object LeerDatos()
/* Filtra los protocolos con analisis con formulas a calcular sin resultados*/
+ //string m_strSQL = @" SELECT P.idProtocolo, P.numero as numero, cONVERT(varchar(10),P.fecha,103) as fecha,
+ // CASE
+ // WHEN Pa.idestado = 2 THEN CAST(Pa.numeroAdic AS varchar(20))
+ // ELSE CAST(Pa.numeroDocumento AS varchar(20))
+ // END AS dni,
+ // Pa.apellido+ ' ' + Pa.nombre as paciente,
+ // O.nombre as origen, Pri.nombre as prioridad, SS.nombre as sector,P.estado, P.impreso
+ // FROM Lab_Protocolo P with (nolock)
+ // INNER JOIN Lab_Origen O with (nolock) on O.idOrigen= P.idOrigen
+ // INNER JOIN Lab_Prioridad Pri with (nolock) on Pri.idPrioridad= P.idPrioridad
+ // INNER JOIN Sys_Paciente Pa with (nolock) on Pa.idPaciente= P.idPaciente
+ // INNER JOIN LAB_SectorServicio SS with (nolock) ON P.idSector= SS.idSectorServicio
+ // INNER JOIN LAB_DetalleProtocolo AS DP with (nolock) ON P.idProtocolo = DP.idProtocolo
+ // INNER JOIN LAB_Item AS I with (nolock) ON DP.idSubItem = I.idItem
+ // INNER JOIN LAB_Formula AS F with (nolock) ON I.idItem = F.idItem
+ // WHERE (F.idTipoFormula = 1) AND (P.estado =1) AND (DP.conResultado = 0) AND " + Request["Parametros"].ToString(); // +str_orden;
+
+ /*Se reformula sql con mejor preformance para no mostrar protocolos duplicados */
string m_strSQL = @" SELECT P.idProtocolo, P.numero as numero, cONVERT(varchar(10),P.fecha,103) as fecha,
- case when Pa.idestado=2 then Pa.numeroAdic else Pa.numeroDocumento end as dni,Pa.apellido+ ' ' + Pa.nombre as paciente,
+ CASE
+ WHEN Pa.idestado = 2 THEN CAST(Pa.numeroAdic AS varchar(20))
+ ELSE CAST(Pa.numeroDocumento AS varchar(20))
+ END AS dni,
+ LTRIM(RTRIM(ISNULL(Pa.apellido,'') + ' ' + ISNULL(Pa.nombre,''))) AS paciente,
O.nombre as origen, Pri.nombre as prioridad, SS.nombre as sector,P.estado, P.impreso
- FROM Lab_Protocolo P with (nolock)
- INNER JOIN Lab_Origen O with (nolock) on O.idOrigen= P.idOrigen
- INNER JOIN Lab_Prioridad Pri with (nolock) on Pri.idPrioridad= P.idPrioridad
- INNER JOIN Sys_Paciente Pa with (nolock) on Pa.idPaciente= P.idPaciente
- INNER JOIN LAB_SectorServicio SS with (nolock) ON P.idSector= SS.idSectorServicio
- INNER JOIN LAB_DetalleProtocolo AS DP with (nolock) ON P.idProtocolo = DP.idProtocolo
- INNER JOIN LAB_Item AS I with (nolock) ON DP.idSubItem = I.idItem
- INNER JOIN LAB_Formula AS F with (nolock) ON I.idItem = F.idItem
- WHERE (F.idTipoFormula = 1) AND (P.estado =1) AND (DP.conResultado = 0) AND " + Request["Parametros"].ToString(); // +str_orden;
-
- //" INNER JOIN Lab_Configuracion Con ON Con.idEfector= P.idEfector " +
+ FROM Lab_Protocolo P WITH (NOLOCK)
+ INNER JOIN Lab_Origen O WITH (NOLOCK) ON O.idOrigen = P.idOrigen
+ INNER JOIN Lab_Prioridad Pri WITH (NOLOCK) ON Pri.idPrioridad = P.idPrioridad
+ INNER JOIN Sys_Paciente Pa WITH (NOLOCK) ON Pa.idPaciente = P.idPaciente
+ INNER JOIN LAB_SectorServicio SS WITH (NOLOCK) ON P.idSector = SS.idSectorServicio
+ WHERE (P.estado =1) AND " + Request["Parametros"].ToString()+
+ @" AND EXISTS ( SELECT 1
+ FROM LAB_DetalleProtocolo DP WITH (NOLOCK)
+
+ INNER JOIN LAB_Formula F WITH (NOLOCK) ON DP.idSubItem = F.idItem
+ WHERE DP.idProtocolo = P.idProtocolo and P.idEfector = DP.idEfector
+ AND DP.conResultado = 0
+ AND F.idTipoFormula = 1 )
+ order by P.numero " ;
+
+
DataSet Ds = new DataSet();
// SqlConnection conn = (SqlConnection)NHibernateHttpModule.CurrentSession.Connection;
SqlConnection conn = new SqlConnection(ConfigurationManager.ConnectionStrings["SIL_ReadOnly"].ConnectionString); ///Performance: conexion de solo lectura
diff --git a/WebLab/ImpresionResult/ResultadoList.aspx.cs b/WebLab/ImpresionResult/ResultadoList.aspx.cs
index 77b83c5d..eb50a559 100644
--- a/WebLab/ImpresionResult/ResultadoList.aspx.cs
+++ b/WebLab/ImpresionResult/ResultadoList.aspx.cs
@@ -202,17 +202,24 @@ private object LeerDatos()
string m_strSQL = "";
if (Request["idTipoServicio"].ToString() != "5")
- m_strSQL = @" SELECT DISTINCT P.idProtocolo,
- P.numero as numero, CONVERT(varchar(10),P.fecha,103) as fecha, case when Pa.idestado= 2 then Pa.numeroAdic else convert(varchar,Pa.numeroDocumento) end as dni ,Pa.apellido+ ' ' + Pa.nombre as paciente,
+ m_strSQL = @" SELECT P.idProtocolo,
+ P.numero as numero, CONVERT(varchar(10),P.fecha,103) as fecha,
+ CASE
+ WHEN Pa.idestado = 2 THEN CAST(Pa.numeroAdic AS varchar(20))
+ ELSE CAST(Pa.numeroDocumento AS varchar(20))
+ END as dni ,Pa.apellido+ ' ' + Pa.nombre as paciente,
O.nombre as origen, Pri.nombre as prioridad, SS.nombre as sector,P.estado, P.impreso
FROM Lab_Protocolo P (nolock)
INNER JOIN Lab_Origen O (nolock) on O.idOrigen= P.idOrigen
INNER JOIN Lab_Prioridad Pri (nolock) on Pri.idPrioridad= P.idPrioridad
INNER JOIN Sys_Paciente Pa (nolock) on Pa.idPaciente= P.idPaciente
- INNER JOIN LAB_SectorServicio SS (nolock) ON P.idSector= SS.idSectorServicio
- INNER JOIN LAB_DetalleProtocolo AS DP (nolock) ON P.idProtocolo = DP.idProtocolo
- INNER JOIN LAB_Item AS I (nolock) ON DP.idItem = I.idItem
- WHERE " + str_condicion +str_orden;
+ INNER JOIN LAB_SectorServicio SS (nolock) ON P.idSector= SS.idSectorServicio
+ WHERE " + str_condicion +
+ @" AND EXISTS (
+ SELECT 1
+ FROM LAB_DetalleProtocolo DP WITH (NOLOCK)
+ WHERE DP.idProtocolo = P.idProtocolo
+ )"+ str_orden;
else
m_strSQL = @" SELECT DISTINCT P.idProtocolo, P.numero as numero,
CONVERT(varchar(10),P.fecha,103) as fecha, M.nombre as muestra, C.descripcion as conservacion,
diff --git a/WebLab/Protocolos/ProtocoloEdit2.aspx b/WebLab/Protocolos/ProtocoloEdit2.aspx
index 12b331e0..9df5f915 100644
--- a/WebLab/Protocolos/ProtocoloEdit2.aspx
+++ b/WebLab/Protocolos/ProtocoloEdit2.aspx
@@ -493,7 +493,7 @@
-
+
-
-
- Impresora de Etiquetas:
-
-
+
@@ -794,7 +790,13 @@
-
+
+
+
+
+
+ | |