From d7fb2b0c0d9b08b48463ba25b71c7e11d0d3ac73 Mon Sep 17 00:00:00 2001 From: rrene Date: Thu, 8 Feb 2024 22:06:46 -0700 Subject: [PATCH] =?UTF-8?q?--=20solo=20t=C3=A9cnicos=20activos?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- OS/OrdenesServicios.aspx.vb | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/OS/OrdenesServicios.aspx.vb b/OS/OrdenesServicios.aspx.vb index 31d94fb18..cfb0e1c7d 100644 --- a/OS/OrdenesServicios.aspx.vb +++ b/OS/OrdenesServicios.aspx.vb @@ -2933,7 +2933,7 @@ Partial Class OS_OrdenesServicios If DtOSSubProyectos IsNot Nothing Then If ObjOS.GetSubProyectosEstatusInicial(-1, 3, UsuarioActual.CveEmpresa) Then - TecnicosSubProyectos = ObjOS.DtResultados + TecnicosSubProyectos = ObjOS.DtResultados.FiltraParametros("Estatus = True") 'solo usuario activos End If For Each SubProyecto As DataRow In DtOSSubProyectos.Rows @@ -2946,8 +2946,6 @@ Partial Class OS_OrdenesServicios End If Next End If - - ObjOS.Dispose() DdlUsuarioAtendio.DataSource = TecnicosResultado.FiltraParametros("", "Nombre")