diff --git a/Sistemas/UsuarioDetalle.aspx.vb b/Sistemas/UsuarioDetalle.aspx.vb
index d51bd2d66..8105b1328 100644
--- a/Sistemas/UsuarioDetalle.aspx.vb
+++ b/Sistemas/UsuarioDetalle.aspx.vb
@@ -982,6 +982,7 @@ Partial Class Sistemas_UsuarioDetalle
                             Exit For
                         End If
                     End If
+                    GlobalDTUsuarios(-1, dr("CveEmpresa").ToString.ToEntero) = Nothing
                 Next
             End If