diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index ff9740c04..6412f6354 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -8329,7 +8329,7 @@ Partial Class Ventas
         End If
 
         'SOLO HABILITAR PARA GENERAR NOTAS DE CREDITO
-        If UsuarioActual.Empresa.Funcionalidad(531) = "1" AndAlso Not PermiteCredito AndAlso Not LnkSolicitarCredito.Visible Then
+        If UsuarioActual.Empresa.Funcionalidad(595) = "2" AndAlso Not LnkSolicitarCredito.Visible Then
             LnkSolicitarCredito.Visible = True
 
             If DdlSolCreditoTipoDocto.Items.FindByValue("Ing") IsNot Nothing Then