From 6d1e64a9a9d90be68afc23b85a81be1d0755c57d Mon Sep 17 00:00:00 2001 From: rrene Date: Sat, 6 Apr 2024 06:32:11 -0700 Subject: [PATCH] =?UTF-8?q?-=20limitar=20a=20los=20t=C3=A9nicos=20solo=20s?= =?UTF-8?q?u=20visi=C3=B3n?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- OS/RepOSMedicas.aspx.vb | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/OS/RepOSMedicas.aspx.vb b/OS/RepOSMedicas.aspx.vb index e26d6ac2a..49a8885bc 100644 --- a/OS/RepOSMedicas.aspx.vb +++ b/OS/RepOSMedicas.aspx.vb @@ -42,6 +42,12 @@ Partial Class OS_RepOSMedicas DdlTecnico.Items.Insert(0, New ListItem("Todos", "-1")) DdlTecnico.Items.Insert(1, New ListItem("Sin Asignar", "-2")) + '376 + If UsuarioActual.TienePermisoProceso(376) Then + DdlTecnico.Enabled = False + DdlTecnico.SelectedValueExist(UsuarioActual.CveUsuario) + End If + If IfNull(Request("CveUsuarioTecnico"), 0).ToString.ToEntero > 0 Then DdlTecnico.SelectedValueExist(Request("CveUsuarioTecnico").ToString)