diff --git a/Bancos/ProveedoresAbonar.aspx.vb b/Bancos/ProveedoresAbonar.aspx.vb
index d9410224c..d6b5a30e4 100644
--- a/Bancos/ProveedoresAbonar.aspx.vb
+++ b/Bancos/ProveedoresAbonar.aspx.vb
@@ -794,7 +794,7 @@ Partial Class Bancos_ProveedoresAbonar
                                     Pago.TCPago = 1 ' TxtTC.Text.ToDecimal
                                     Pago.ImportePago = (gvr.FCTextBox("TxtAbonar").Text.ToDecimal * TxtTC.Text.ToDecimal).RoundSQL
                                 ElseIf Pago.CveMonedaPago = 2 AndAlso CompraActual.CveMoneda = 2 Then 'Si la venta viene en Dolares y se va a pagar en DOLARES
-                                    Pago.TCPago = TxtTCDolaresDolares.Text.ToDecimal
+                                    Pago.TCPago = TxtTCDolares.Text.ToDecimal
                                 ElseIf Pago.CveMonedaPago = 2 AndAlso CompraActual.CveMoneda = 1 Then 'Si la venta viene en pesos y se va a pagar en DOLARES
                                     Pago.TCPago = TxtTCDolares.Text.ToDecimal
                                     Pago.ImportePago = (gvr.FCTextBox("TxtAbonar").Text.ToDecimal / TxtTCDolares.Text.ToDecimal)
@@ -828,11 +828,11 @@ Partial Class Bancos_ProveedoresAbonar
                         Pago.ImportePago = tImporteMN
 
                         Dim ImporteME As Decimal = 0
-                            If Pago.CveMonedaPago = 2 Then ImporteME = Pago.ImportePago
-                            If Not UsaComplementariaBancos And Pago.CveMonedaPago = 2 Then
-                                ImporteME = tImporteMN
-                                tImporteMN = (tImporteMN * Pago.TCPago).RoundSQL
-                                End If
+                        If Pago.CveMonedaPago = 2 Then ImporteME = Pago.ImportePago
+                        If Not UsaComplementariaBancos And Pago.CveMonedaPago = 2 Then
+                            ImporteME = tImporteMN
+                            tImporteMN = (tImporteMN * Pago.TCPago).RoundSQL
+                        End If