From e08e12334d9bfb921e16e6f5234c78f875a3f8ff Mon Sep 17 00:00:00 2001
From: Jonathan Alexis Perez Morales <jonathan.perez@adssistemas.mx>
Date: Tue, 28 May 2024 13:52:38 -0700
Subject: [PATCH] =?UTF-8?q?--FIX.=20pago=20con=20devoluci=C3=B3n,=20grupo?=
 =?UTF-8?q?=20d=C3=ADaz?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Ventas/Ventas.aspx.vb | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 6995a4d14..8fd465a2c 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -31362,7 +31362,7 @@ Partial Class Ventas
 
         divAnticipoMsg.Visible = False
 
-        If UsuarioActual.Empresa.Funcionalidad(109) = "1" Then
+        If UsuarioActual.Empresa.Funcionalidad(109) = "1" OrElse UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
             If DdlTipoComprobante.SelectedValue.Contiene("Ing", "Rem") AndAlso DdlTipoAmortizacionAnticipo.SelectedValue = "4" Then
                 Dim DtMovtos As DataTable = Me.TmpDTAnticiposNCIxCCliente.FiltraParametros($"Saldo > 0 And SaldoSubtotal > 0  {If(CveVenta < 0, $"AND Tipo IN('NC','RNC','IxC') ", "")}")
                 divAmortizacionTipoRelacion.Visible = False
@@ -38190,7 +38190,7 @@ Partial Class Ventas
         ' $get('HdnTipoDescuento').value = '3'; MuestraAnticipos();
         HdnTipoDescuento.Value = "3"
 
-        If UsuarioActual.Empresa.Funcionalidad(109) = "1" Then
+        If UsuarioActual.Empresa.Funcionalidad(109) = "1" OrElse UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
             If DdlTipoAmortizacionAnticipo.Items.FindByValue("4") Is Nothing Then
                 DdlTipoAmortizacionAnticipo.Items.Insert(1, New ListItem("Pago con devolución", "4"))
             End If