diff --git a/Ventas/ClientesAbonar.aspx.vb b/Ventas/ClientesAbonar.aspx.vb
index b70308ad1..6fcbad77b 100644
--- a/Ventas/ClientesAbonar.aspx.vb
+++ b/Ventas/ClientesAbonar.aspx.vb
@@ -1294,7 +1294,7 @@ Partial Class Ventas_ClientesAbonar
 
                                                 If CveMonedaVenta = 1 And CveMoneda <> 1 Then
                                                     'factura pesos, pago en dolares
-                                                    tImporteVenta = ((gvr.FCTextBox("TxtAbonar").Text.ToDecimal) * tipoCambioVentaValuacion).RoundSQL
+                                                    tImporteVenta = gvr.FCTextBox("TxtAbonar").Text.ToDecimal.RoundSQL
                                                     tImportePago = (((gvr.FCTextBox("TxtAbonar").Text.ToDecimal) * tipoCambioVenta / tipoCambioPago).RoundSQL * tipoCambioPago).RoundSQL
                                                 ElseIf CveMonedaVenta <> 1 And CveMoneda <> 1 Then
                                                     'factura dolares, pago en dolares