From e184baa9361321fb52e4c2ee047a6ae49bbf0971 Mon Sep 17 00:00:00 2001
From: Jonathan Alexis Perez Morales <jonathan.perez@adssistemas.mx>
Date: Fri, 21 Jan 2022 00:27:34 -0700
Subject: [PATCH] No calcular descuentos en productos con clasificacion "cambio
 de vigencia"

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

diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 9ac36316a..b2f7fe442 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -17233,7 +17233,11 @@ Partial Class Ventas
             If CveClasifPS = 20636 Then
                 ValidaCondicionesComerciales = False
             End If
-
+            'CAMBIO DE VIGENCIA NO SE APLICAN DESCUENTOS
+            If CveClasifPS = 20637 Then
+                ObjDescuento.ImporteDescuento = 0
+                Return ObjDescuento
+            End If
         End If
 
         Dim dr As DataRow = Nothing