From 9d806bd6d40bfc0c98358f96734b01d5d8de3514 Mon Sep 17 00:00:00 2001 From: rrene Date: Wed, 13 May 2020 20:27:39 -0700 Subject: [PATCH] -- redondeo de pago, cuando es parcialidad en dolares, el redondeo afecta al chk TC de impuestos --- Ventas/ClientesAbonar.aspx.vb | 24 ++++++++++++------------ 1 file changed, 12 insertions(+), 12 deletions(-) diff --git a/Ventas/ClientesAbonar.aspx.vb b/Ventas/ClientesAbonar.aspx.vb index 8c1a2c8d0..074adb20a 100644 --- a/Ventas/ClientesAbonar.aspx.vb +++ b/Ventas/ClientesAbonar.aspx.vb @@ -1047,11 +1047,11 @@ Partial Class Ventas_ClientesAbonar importeMX = ImporteMovimiento * tipoCambioVenta ElseIf CveMoneda = 2 AndAlso gvr.DataKey("CveMoneda").ToEntero = 2 Then tipoCambioVenta = gvr.DataKey("TipoCambio").ToDecimal - ImporteMovimiento = gvr.DataKey("IVA").ToDecimal * PorcentajePago + ImporteMovimiento = (gvr.DataKey("IVA").ToDecimal * PorcentajePago).RoundSQL() ' se ajusta por la parcialidad de pago, afecta en el redondeo importeMX = ImporteMovimiento * tipoCambioVenta End If - ImporteMovimiento = Math.Round(ImporteMovimiento, 2, MidpointRounding.AwayFromZero) - importeMX = Math.Round(importeMX, 2, MidpointRounding.AwayFromZero) + ImporteMovimiento = ImporteMovimiento.RoundSQL + importeMX = importeMX.RoundSQL() TipoCambioGeneral = tipoCambioVenta CveSubProyectoContabilizar = CveSubProyecto @@ -1212,11 +1212,11 @@ Partial Class Ventas_ClientesAbonar importeMX = ImporteMovimiento ElseIf CveMoneda = 2 AndAlso gvr.DataKey("CveMoneda").ToEntero = 2 Then tipoCambioVenta = gvr.DataKey("TipoCambio").ToDecimal - ImporteMovimiento = gvr.DataKey("IVA").ToDecimal * PorcentajePago + ImporteMovimiento = (gvr.DataKey("IVA").ToDecimal * PorcentajePago).RoundSQL importeMX = ImporteMovimiento * If(FuncionalidadFluctuacionImpuestos, tipoCambioPago, tipoCambioVenta) End If - ImporteMovimiento = Math.Round(ImporteMovimiento, 2, MidpointRounding.AwayFromZero) - importeMX = Math.Round(importeMX, 2, MidpointRounding.AwayFromZero) + ImporteMovimiento = ImporteMovimiento.RoundSQL + importeMX = importeMX.RoundSQL TipoCambioGeneral = If(FuncionalidadFluctuacionImpuestos, tipoCambioPago, tipoCambioVenta) CveSubProyectoContabilizar = CveSubProyecto @@ -1246,11 +1246,11 @@ Partial Class Ventas_ClientesAbonar importeMX = ImporteMovimiento * tipoCambioVenta ElseIf CveMoneda = 2 AndAlso gvr.DataKey("CveMoneda").ToEntero = 2 Then tipoCambioVenta = gvr.DataKey("TipoCambio").ToDecimal - ImporteMovimiento = (gvr.DataKey("IEPS").ToDecimal * PorcentajePago) + ImporteMovimiento = (gvr.DataKey("IEPS").ToDecimal * PorcentajePago).RoundSQL importeMX = ImporteMovimiento * tipoCambioVenta End If - ImporteMovimiento = Math.Round(ImporteMovimiento, 2, MidpointRounding.AwayFromZero) - importeMX = Math.Round(importeMX, 2, MidpointRounding.AwayFromZero) + ImporteMovimiento = ImporteMovimiento.RoundSQL + importeMX = importeMX.RoundSQL TipoCambioGeneral = tipoCambioVenta CveSubProyectoContabilizar = CveSubProyecto @@ -1270,11 +1270,11 @@ Partial Class Ventas_ClientesAbonar importeMX = ImporteMovimiento ElseIf CveMoneda = 2 AndAlso gvr.DataKey("CveMoneda").ToEntero = 2 Then tipoCambioVenta = gvr.DataKey("TipoCambio").ToDecimal - ImporteMovimiento = (gvr.DataKey("IEPS").ToDecimal * PorcentajePago) + ImporteMovimiento = (gvr.DataKey("IEPS").ToDecimal * PorcentajePago).RoundSQL importeMX = ImporteMovimiento * If(FuncionalidadFluctuacionImpuestos, tipoCambioPago, tipoCambioVenta) End If - ImporteMovimiento = Math.Round(ImporteMovimiento, 2, MidpointRounding.AwayFromZero) - importeMX = Math.Round(importeMX, 2, MidpointRounding.AwayFromZero) + ImporteMovimiento = ImporteMovimiento.RoundSQL + importeMX = importeMX.RoundSQL TipoCambioGeneral = If(FuncionalidadFluctuacionImpuestos, tipoCambioPago, tipoCambioVenta) CveSubProyectoContabilizar = CveSubProyecto