From bb9b7bebc64b066af24a70bc2a0edc948fed9a4a Mon Sep 17 00:00:00 2001 From: rrene Date: Wed, 1 Jun 2022 16:28:35 -0700 Subject: [PATCH] mejora en manejo de otros ingresos con pago de tarjetas --- Bancos/ProveedoresAbonar.aspx.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Bancos/ProveedoresAbonar.aspx.vb b/Bancos/ProveedoresAbonar.aspx.vb index 9c6fc4e0e..c730a91a5 100644 --- a/Bancos/ProveedoresAbonar.aspx.vb +++ b/Bancos/ProveedoresAbonar.aspx.vb @@ -1370,7 +1370,7 @@ Partial Class Bancos_ProveedoresAbonar IdCtaContable = IdCuenta End If - Dim Importe42 As Decimal = gvr.FCTextBox("TxtAbonar").Text.ToDecimal + Dim Importe42 As Decimal = gvr.FCTextBox("TxtAbonar").Text.ToDecimal + gvr.FCTextBox("TxtComision").Text.ToDecimal ImporteMovimiento = Importe42 importeMX = If(CveMoneda = 2, If(DivTC.Visible, Importe42 / TxtTC.Text.ToDecimal * TipoCambioPago, Importe42 * TipoCambioPago), Importe42) TipoCambioGeneral = TipoCambioPago