diff --git a/Ventas/Clientes.aspx.vb b/Ventas/Clientes.aspx.vb
index 04ef776aa..7c143cb75 100644
--- a/Ventas/Clientes.aspx.vb
+++ b/Ventas/Clientes.aspx.vb
@@ -788,7 +788,7 @@ Partial Class Clientes
                         UpAccionesCRM.Update()
                     End If
 
-                    If UsuarioActual.Empresa.Funcionalidad(531) = "1" AndAlso UsuarioActual.CveRol = 1280 Then
+                    If UsuarioActual.Empresa.Funcionalidad(531) = "1" AndAlso UsuarioActual.CveRol.Contiene(1280, 1511) Then
                         DeshabilitarDatosClienteCajas()
                     End If