From b302686563cd37ff890c707f917f8490429ffe46 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Fri, 21 Jan 2022 08:56:54 -0700
Subject: [PATCH] -- candado, para no descuento, cambios de vigencia

---
 Ventas/PV.aspx.vb | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/Ventas/PV.aspx.vb b/Ventas/PV.aspx.vb
index 77317f482..2b7e6d8c5 100644
--- a/Ventas/PV.aspx.vb
+++ b/Ventas/PV.aspx.vb
@@ -4327,6 +4327,11 @@ Partial Class PV
             End If
         End If
 
+        ''condicion final, si es cambio de Vigencia, no aplica descuento
+        If DrPS("CveClasificacion").ToString.ToEntero.Contiene(20637) Then
+            Descuento = 0
+        End If
+
         ObjDescuento.ImporteDescuento = Descuento
         ObjDescuento.CvePromocionDetalle = CvePromocionDetalle
         If SeAjustoPU Then