- mejora en manejo de TXTTC

Bancos/ProveedoresAbonar.aspx.vb

@@ -1143,7 +1143,6 @@ Partial Class Bancos_ProveedoresAbonar
                 RegistraScript("CambiaPesosDolares();")
             Else
                 CveMoneda = dr("CveMoneda").ToString.ToEntero
-
                 If CveMoneda = 1 Then
                     RegistraScript("CambiaDolaresPesos();")
                 End If
@@ -1357,6 +1356,7 @@ Partial Class Bancos_ProveedoresAbonar
     Protected Sub ChkPagarPesos_CheckedChanged(sender As Object, e As EventArgs)
         If ChkPagarPesos.Checked Then
             DivTC.Visible = True
+            DivTCDolares.Visible = False
             CargaCuentas(DdlTipoTransaccion.SelectedValue.ToEntero)
             TxtFechaDocumento.Attributes.Add("onchange", "CambiaTC(this);")
             TxtTC.Text = GlobalTipoCambio(TxtFechaDocumento.Text.ToDate).FormatoNumero(4)