Tipo Comprobante:
diff --git a/Sistemas/RolesDetalle.aspx b/Sistemas/RolesDetalle.aspx
index 15681db7c..97f60dcdf 100644
--- a/Sistemas/RolesDetalle.aspx
+++ b/Sistemas/RolesDetalle.aspx
@@ -234,6 +234,44 @@
+
+
+
+
+
+
+
+
+
+
+
diff --git a/Sistemas/RolesDetalle.aspx.vb b/Sistemas/RolesDetalle.aspx.vb
index a02db40ef..4e676aea3 100644
--- a/Sistemas/RolesDetalle.aspx.vb
+++ b/Sistemas/RolesDetalle.aspx.vb
@@ -30,6 +30,8 @@ Partial Class Sistemas_RolesDetalle
CargaGridIndicadores()
CargaGridPermisos()
CargaGridProcesos()
+ CargaUsuarios()
+
DdlModulo.DataSource = GlobalDTModulos()
DdlModulo.DataBind()
@@ -60,6 +62,19 @@ Partial Class Sistemas_RolesDetalle
End Sub
+ Private Sub CargaUsuarios()
+
+ Dim ObjUsuarios As New ClsSisUsuarios()
+ If ObjUsuarios.GetUsuarios(-1, CveRol) Then
+ GvUsurios.DataSource = ObjUsuarios.DtResultados.FiltraParametros("", "", {"CveUsuario", "Usuario", "Nombre"})
+ Else
+ GvUsurios.DataSource = Nothing
+ End If
+ ObjUsuarios.Dispose()
+ GvUsurios.DataBind()
+
+ End Sub
+
#Region "I N D I C A D O R E S"
Private Sub CargaGridIndicadores()