--funcionalidad 109 en punto de venta

2023-11-28 14:32:14 -07:00
parent 5aa6f482f1
commit 967a44f763
1 changed files with 4 additions and 1 deletions
--- a/Ventas/PV.aspx.vb
+++ b/Ventas/PV.aspx.vb
@@ -6088,7 +6088,10 @@ Partial Class PV
                TxtFechaPago.Text = NowADS().AddDays(PlazoCobranza).ToShortDateString
            Case 2 'CONTADO
                If DdlTipoComprobante.SelectedValue.Contiene("Ing", "Ant") Then
-                    DivContado.Visible = True
+                    'SI ES MODALIDAD COBRANZA, NO MOSTRAR
+                    If Not (UsuarioActual.Empresa.Funcionalidad(109) = "1") Then
+                        DivContado.Visible = True
+                    End If
                    TxtImporteContado.Text = TxtTotal.Text
                End If
                TxtFechaPago.Text = NowADS().ToShortDateString