From f9cb9213c4b72a0f2201db987363da204c31a639 Mon Sep 17 00:00:00 2001 From: Jonathan Alexis Perez Morales Date: Mon, 3 May 2021 14:45:24 -0700 Subject: [PATCH] Correcion de error en asignacion de modulos --- Sistemas/PopUpAddUsuario.aspx.vb | 19 ------------------- 1 file changed, 19 deletions(-) diff --git a/Sistemas/PopUpAddUsuario.aspx.vb b/Sistemas/PopUpAddUsuario.aspx.vb index 04d76c490..f619d911e 100644 --- a/Sistemas/PopUpAddUsuario.aspx.vb +++ b/Sistemas/PopUpAddUsuario.aspx.vb @@ -348,25 +348,6 @@ Partial Class Sistemas_PopUpAddUsuario End If End If Next - For Each Row As GridViewRow In GvModulosApp.Rows - If Row.DataKey("CveProcesoAcceso") <> "" Then - 'checo si el permiso que tiene es del rol, de ser así, nada más actualizo los denegados - If Row.DataKey("Permitir") = "" AndAlso Row.FCCheckBox("ChkDenegar").Checked OrElse Row.DataKey("Permitir") = "0" AndAlso Row.FCCheckBox("ChkDenegar").Checked = False Then - If Not ObjUsuarios.UpdateUsuariosProcesos(CveUsuario, Row.DataKey("CveProceso").ToEntero, Not Row.FCCheckBox("ChkDenegar").Checked, CveUsuarioModifico:=UsuarioActual.CveUsuario) Then - HuboError = True - Exit For - End If - End If - Else - 'permisos que el rol, no le está otorgando, y serán únicos para el usuario - If Row.DataKey("Permitir") = "" AndAlso Row.FCCheckBox("ChkPermitir").Checked OrElse Row.DataKey("Permitir") = "1" AndAlso Row.FCCheckBox("ChkPermitir").Checked = False Then - If Not ObjUsuarios.UpdateUsuariosProcesos(CveUsuario, Row.DataKey("CveProceso").ToEntero, Row.FCCheckBox("ChkPermitir").Checked, CveUsuarioModifico:=UsuarioActual.CveUsuario) Then - HuboError = True - Exit For - End If - End If - End If - Next End If ElseIf CveUsuario > 0 Then