diff --git a/Sistemas/CatRoles.aspx.vb b/Sistemas/CatRoles.aspx.vb
index 06391880a..679ff144d 100644
--- a/Sistemas/CatRoles.aspx.vb
+++ b/Sistemas/CatRoles.aspx.vb
@@ -148,6 +148,8 @@ Partial Class CatRoles
         Next
         Roles.Dispose()
         RegistraScript("$('#DivPermisos').modal('hide');")
+
+        RecargaGlobal()
     End Sub
 
     Protected Sub BtnGuardaProcesos_Click(sender As Object, e As EventArgs) Handles BtnGuardaProcesos.Click
@@ -157,6 +159,8 @@ Partial Class CatRoles
         Next
         Roles.Dispose()
         RegistraScript("$('#DivProcesos').modal('hide');")
+
+        RecargaGlobal()
     End Sub
 
 #Region "G V  D A T O S"
@@ -176,6 +180,12 @@ Partial Class CatRoles
         End If
         Rol.Dispose()
         CargaDatos()
+
+        RecargaGlobal()
+    End Sub
+
+    Private Sub RecargaGlobal()
+        GlobalDTRoles(UsuarioActual.CveEmpresa) = Nothing
     End Sub
 
 
diff --git a/Sistemas/RolesDetalle.aspx.vb b/Sistemas/RolesDetalle.aspx.vb
index 805e69fc1..a02db40ef 100644
--- a/Sistemas/RolesDetalle.aspx.vb
+++ b/Sistemas/RolesDetalle.aspx.vb
@@ -229,10 +229,14 @@ Partial Class Sistemas_RolesDetalle
         End If
 
         ObjEmpresa.Dispose()
+
+        RecargaGlobal()
     End Sub
 
 
-
+    Private Sub RecargaGlobal()
+        GlobalDTRoles(UsuarioActual.CveEmpresa) = Nothing
+    End Sub
 
 
 End Class