diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index e39c4fe68..fd44294b9 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -3641,7 +3641,7 @@ Partial Class Ventas
             End If
 
             If UsuarioActual.Empresa.CveEmpresa = 189 Then
-                ImgAntiPend.Visible = False
+                ImgAntiPend.Visible = UsuarioActual.TienePermisoProceso(406)
             End If
 
             InicializaDevolucionAlmacen()
@@ -5489,7 +5489,7 @@ Partial Class Ventas
                         End If
                         If ViewState("CveCotizacion") IsNot Nothing AndAlso ViewState("CveCotizacion").ToString().ToEntero() > 0 AndAlso DdlTipoComprobante.SelectedValue = "Ing" Then
                             If UsuarioActual.CveEmpresa = 189 Then
-                                ImgAntiPend.Visible = False
+                                ImgAntiPend.Visible = UsuarioActual.TienePermisoProceso(406)
                             Else
                                 ImgAntiPend.Visible = True
                             End If
@@ -5602,7 +5602,7 @@ Partial Class Ventas
                     If DbRowVenta("Saldo").ToString().ToDouble < 0.01 Then
                         If ViewState("CveCotizacion") IsNot Nothing AndAlso ViewState("CveCotizacion").ToString().ToEntero() > 0 AndAlso DdlTipoComprobante.SelectedValue = "Ing" Then
                             If UsuarioActual.CveEmpresa = 189 Then
-                                ImgAntiPend.Visible = False
+                                ImgAntiPend.Visible = UsuarioActual.TienePermisoProceso(406)
                             Else
                                 ImgAntiPend.Visible = True
                             End If
@@ -17287,7 +17287,7 @@ Partial Class Ventas
                 End If
 
                 If UsuarioActual.CveEmpresa = 189 Then
-                    ImgAntiPend.Visible = False
+                    ImgAntiPend.Visible = UsuarioActual.TienePermisoProceso(406)
                 End If
             Else
                 GVAnticipos.DataSource = Nothing
@@ -19037,7 +19037,7 @@ Partial Class Ventas
         End If
 
         If UsuarioActual.CveEmpresa = 189 Then
-            ImgAntiPend.Visible = False
+            ImgAntiPend.Visible = UsuarioActual.TienePermisoProceso(406)
         End If
 
         If ImgAntiPend.Visible Then
@@ -19085,7 +19085,7 @@ Partial Class Ventas
         End If
 
         If UsuarioActual.CveEmpresa = 189 Then
-            ImgAntiPend.Visible = False
+            ImgAntiPend.Visible = UsuarioActual.TienePermisoProceso(406)
         End If
 
         If ImgAntiPend.Visible Then
@@ -33098,7 +33098,7 @@ Partial Class Ventas
                 If DtMovtos.Rows.Count > 0 Then ImgAntiPend.Visible = True
 
                 If UsuarioActual.CveEmpresa = 189 Then
-                    ImgAntiPend.Visible = False
+                    ImgAntiPend.Visible = UsuarioActual.TienePermisoProceso(406)
                 End If
             Else
                 Dim DtMovtos As DataTable = Me.TmpDTAnticiposNCIxCCliente.FiltraParametros($"Saldo > 0 AND SaldoSubtotal > 0  {If(CveVenta < 0, $"AND Tipo = 'Ant' ", "")}  {If(DdlTipoComprobante.SelectedValue = "Ant", "AND Tipo = 'NC'", "")}")