diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index c7b10cc0c..1283449f3 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -23180,7 +23180,7 @@ Partial Class Ventas
                     TxtImporteContado.Text = TxtTotal.Text
                     'SI ES MODALIDAD COBRANZA, NO MOSTRAR
                     If (UsuarioActual.Empresa.Funcionalidad(109) = "1") Then
-                        DivContado.Visible = False
+                        DivContado.Visible = UsuarioActual.TienePermisoProceso(375)
                     End If
                 End If
                 TxtFechaPago.Text = NowADS().ToShortDateString