From 497265608f79e1cfc7af540fed4bc5ab8ccbd092 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Wed, 11 Sep 2024 05:43:09 -0700
Subject: [PATCH] -

---
 Compras/Compras.aspx    | 2 +-
 Compras/Compras.aspx.vb | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/Compras/Compras.aspx b/Compras/Compras.aspx
index 0c1f35d1e..8fe0b7be9 100644
--- a/Compras/Compras.aspx
+++ b/Compras/Compras.aspx
@@ -4624,7 +4624,7 @@
                                         <div class="col-md-12">
 
                                             <asp:Button CssClass="btn btn-primary" ID="LbAgregar" runat="server" Enabled="false" Text="Agregar" ValidationGroup="GprAgregaPS" />
-                                            <button type="button" class="btn default" data-dismiss="modal">Cancelar</button>
+                                            <button type="button" class="btn btn-default" data-dismiss="modal">Cancelar</button>
                                         </div>
                                     </div>
 
diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index 15a385678..ef22b8974 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -6796,7 +6796,7 @@ Partial Class Compras_Compras
                                                                             Dim AplicadoenFactura As Boolean = False
                                                                             If UsuarioActual.CveEmpresa = 119 Then
                                                                                 For Each Gvr As GridViewRow In GvFacturaNC.Rows
-                                                                                    If Gvr.FCCheckBox("ChkFacturaNC").Checked Then ' recorro la seleccion y tomo el TC de cada aplicación 
+                                                                                    If Gvr.FCCheckBox("ChkFacturaNC").Checked AndAlso ChkNCInvNC.Checked Then ' recorro la seleccion y tomo el TC de cada aplicación 
                                                                                         AplicadoenFactura = True
                                                                                         Dim timporteMovimientoNC As Decimal = (Gvr.FCTextBox("TxtImporte").Text.ToDecimal) '* Gvr.DataKey("SubTotal").ToDecimal / Gvr.DataKey("Saldo").ToDecimal).RoundSQL
                                                                                         Dim TCNC As Decimal = Gvr.DataKey("TipoCambio").ToDecimal