AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

- limitar a los ténicos solo su visión

Browse Source
This commit is contained in:
rrene
2024-04-06 06:32:11 -07:00
parent 1f442fbe7f
commit 6d1e64a9a9
1 changed files with 6 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
OS/RepOSMedicas.aspx.vb
View File

@@ -42,6 +42,12 @@ Partial Class OS_RepOSMedicas
DdlTecnico.Items.Insert(0, New ListItem("Todos", "-1")) DdlTecnico.Items.Insert(0, New ListItem("Todos", "-1"))
DdlTecnico.Items.Insert(1, New ListItem("Sin Asignar", "-2")) 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 If IfNull(Request("CveUsuarioTecnico"), 0).ToString.ToEntero > 0 Then
DdlTecnico.SelectedValueExist(Request("CveUsuarioTecnico").ToString) DdlTecnico.SelectedValueExist(Request("CveUsuarioTecnico").ToString)