From 1e3399306b82146b6bdcf8a88dc067d370dd3343 Mon Sep 17 00:00:00 2001
From: Jonathan Alexis Perez Morales <jonathan.perez@adssistemas.mx>
Date: Wed, 8 Jan 2025 18:28:46 -0700
Subject: [PATCH] --FIX calculo de usados

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

diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 3b1012251..fc2984faf 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -35431,6 +35431,8 @@ Partial Class Ventas
                 dRowEliminar.Delete()
             Next
 
+            TmpDT.AcceptChanges()
+
             'SI ES VENTA NUEVA O SI VA SER DEVOLUCION CONSIDERAR TODOS
             If Me.CveVenta <= 0 OrElse DtUsadosDevolucion IsNot Nothing Then
                 TmpDTCalculo = TmpDT.Rows.Cast(Of DataRow).ToArray()
@@ -35440,10 +35442,6 @@ Partial Class Ventas
             End If
 
 
-
-            TmpDT.AcceptChanges()
-
-
             Dim CveUnidadMedidaPSA As Integer = -1
             Dim UnidadMedidaPSA As String = "Unidad"
             Dim CveClasificacionPSA As Integer = -1