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

Ajustes comparacion

Browse Source
This commit is contained in:
rakcsle
2023-08-23 17:09:44 -07:00
parent ffcd10080b
commit de83379635
8 changed files with 54 additions and 33 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
RH/Personal.aspx.vb
View File

@@ -1704,7 +1704,7 @@ Partial Class RH_Personal
'TxtContactoAlterno.Text = ObjPersonal.ContactoAlterno
If ObjPersonal.CveUniforme > 0 Then
If ObjPersonal.CveUniforme > 0 Or UsuarioActual.CveEmpresa.Contiene(7, 11, 12, 122, 145) Then
LnkSurtir.Visible = True
ViewState("CveUniforme") = ObjPersonal.CveUniforme
DdlUniforme.SelectedValueExist(CveUniforme)
@@ -5636,7 +5636,7 @@ Partial Class RH_Personal
Private Sub CargaUniformesPersonal()
If Not UsuarioActual.CveEmpresa.Contiene(1, 72, 80, 153, 154, 140) Then
If Not UsuarioActual.CveEmpresa.Contiene(1, 72, 80, 153, 154, 140, 7, 11, 12, 122, 145) Then
GvUniforme.Visible = True
GvUniformesResguardo.Visible = False