This commit is contained in:
JORGE LUIS CAUDILLO ESPARZA
2021-02-25 20:35:15 -07:00
54 changed files with 7195 additions and 3889 deletions

View File

@@ -683,7 +683,7 @@ Partial Class Sistemas_WizardRegistro
If Array.Length = 2 Then
Dim ObjPermisos As New ClsSisRoles()
ViewState("CveRol") = Array(0).ToEntero
If ObjPermisos.GetRolesModulos(Array(0).ToEntero, -1) Then
If ObjPermisos.GetRolesModulos(Array(0).ToEntero, -1, CvePlataforma:=1, CveEmpresa:=CveEmpresa) Then
GvPermisos.DataSource = ObjPermisos.DtResultados.FiltraParametros("AGRUPACION ='N'")
Else
GvPermisos.DataSource = Nothing