From 0b4f13bd27af87a060d974acfb3cbe5cbf0b9955 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Fri, 2 May 2025 15:11:25 -0700
Subject: [PATCH] =?UTF-8?q?--=20activaci=C3=B3n=20de=20TC,=20en=20IxC?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Ventas/Ventas.aspx.vb | 13 +++++--------
 1 file changed, 5 insertions(+), 8 deletions(-)

diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index e8e0dc05c..c2b48d1dc 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -17519,15 +17519,12 @@ Partial Class Ventas
             End If
 
             If e.Row.DBCampo("Tipo").ToString() = "NC" And e.Row.DataKey("CveVenta").ToEntero() > 0 OrElse (e.Row.DBCampo("Tipo").Contiene("Ant", "IxC") And e.Row.DataKey("CveMoneda").ToEntero() = 1 AndAlso DdlMoneda.SelectedValue.ToEntero() = 2) Then
-                'If e.Row.DBCampo("CveMoneda").ToString().ToEntero() = 2 Then
-                '    tipoCambio = e.Row.DBCampo("TipoCambioHoy").ToString().ToDecimal
-                'Else
-                '    tipoCambio = GlobalTipoCambio(e.Row.DataKey("Fecha").ToString().ToDate).ToDecimal
-                'End If
+
                 If TxtFechaAnticipoCliente.Text = "" Then TxtFechaAnticipoCliente.Text = Now.ToShortDateString
                 tipoCambio = GlobalTipoCambio(TxtFechaAnticipoCliente.Text.ToDate).ToDecimal 'e.Row.DBCampo("TipoCambioHoy").ToString().ToDecimal
 
                 e.Row.FCTextBox("TxtTC" & e.Row.RowIndex).Text = tipoCambio.FormatoNumero(4)
+                If e.Row.DBCampo("Tipo").Contiene("IxC") Then e.Row.FCTextBox("TxtTC" & e.Row.RowIndex).Enabled = True
 
                 If DdlMoneda.SelectedValue.ToEntero() = 1 And e.Row.DBCampo("CveMoneda").ToEntero() = 1 Then
                     saldo = e.Row.DataKey("Saldo").ToDecimal
@@ -17537,9 +17534,9 @@ Partial Class Ventas
                     saldo = (e.Row.DataKey("Saldo").ToString().ToDecimal * tipoCambio).TruncateDecimal
                 Else
                     saldo = e.Row.DataKey("Saldo").ToDecimal
-                End If
-            Else
-                saldo = e.Row.DataKey("Saldo").ToString().ToDecimal
+                    End If
+                Else
+                    saldo = e.Row.DataKey("Saldo").ToString().ToDecimal
 
                 If CveVenta <= 0 Then
                     If DdlTipoAmortizacionAnticipo.SelectedValue.Contiene("2") Then 'cuando es por NC, debe de tomar el total de su saldo respectivo