From f702f407d8da2d16d37f5c06ea8c55e4abaa9798 Mon Sep 17 00:00:00 2001
From: Jonathan Alexis Perez Morales <jonathan.perez@adssistemas.mx>
Date: Sat, 8 Jul 2023 10:51:02 -0700
Subject: [PATCH] quitar ajuste de valor unitario

---
 Ventas/Ventas.aspx.vb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 8a6b95a19..38dfb0130 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -12703,7 +12703,7 @@ Partial Class Ventas
             'verifica suma subtotales
             If i = Obj.DtDetalle.Rows.Count AndAlso totSubTotal.RoundSQL(2) <> concepto.Importe.RoundSQL(2) AndAlso Math.Abs(totSubTotal.RoundSQL(2) - concepto.Importe.RoundSQL(2)) <= 0.01 Then 'proceso de ajusta de decimales
                 concepto.Importe = totSubTotal
-                concepto.ValorUnitario = totSubTotal / concepto.Cantidad
+                'concepto.ValorUnitario = totSubTotal / concepto.Cantidad
             End If
             totSubTotal = totSubTotal - concepto.Importe