From d0a55573bbe44130562a76a6edd8af4d02ee0366 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Mon, 30 May 2022 21:37:06 -0700
Subject: [PATCH] =?UTF-8?q?-=20correcci=C3=B3n=20de=20error,=20en=20manejo?=
 =?UTF-8?q?=20de=20TC?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Contabilidad/RegPrePolizaS.aspx    | 2 +-
 Contabilidad/RegPrePolizaS.aspx.vb | 8 ++++----
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/Contabilidad/RegPrePolizaS.aspx b/Contabilidad/RegPrePolizaS.aspx
index cfc98f3ab..cd373e8df 100644
--- a/Contabilidad/RegPrePolizaS.aspx
+++ b/Contabilidad/RegPrePolizaS.aspx
@@ -410,7 +410,7 @@
                                     <ItemTemplate>
                                         <asp:TextBox ID="TxtCargo" CssClass="txtcargo" runat="server" Style="text-align: right" Width="65px" Visible="False" Text='<%# If(String.IsNullOrEmpty(Eval("Cargo").ToString), "", Eval("Cargo", "{0:0.00}")) %>'></asp:TextBox>
                                         <div id="divCargoME" runat="server" Visible="False">ME:<asp:TextBox ID="TxtCargoME" CssClass="" runat="server" Style="text-align: right" Width="55px"></asp:TextBox>
-                                            TC:<asp:TextBox ID="TxtTC" CssClass="" runat="server" Style="text-align: right" Width="45px"></asp:TextBox>
+                                            TC:<asp:TextBox ID="TxtTC" CssClass="" runat="server" Style="text-align: right" Width="55px"></asp:TextBox>
                                         </div>
                                     </ItemTemplate>
                                     <ItemStyle HorizontalAlign="Right" />
diff --git a/Contabilidad/RegPrePolizaS.aspx.vb b/Contabilidad/RegPrePolizaS.aspx.vb
index 55c7ad886..b3bc6296c 100644
--- a/Contabilidad/RegPrePolizaS.aspx.vb
+++ b/Contabilidad/RegPrePolizaS.aspx.vb
@@ -1018,7 +1018,7 @@ Partial Class ContabilidadC_RegPrePolizaS
                                 TipoMovto = True
 
                                 If gvr.DataKey("EsComplementaria") = "True" Then ImporteME = gvr.FCTextBox("TxtAbonoME").Text.ToDecimal
-                                If gvr.DataKey("EsMonedaExtranjera") = "True" Then TipoCambio = gvr.FCTextBox("TC").Text.ToDecimal
+                                If gvr.DataKey("EsMonedaExtranjera") = "True" Then TipoCambio = gvr.FCTextBox("TxtTC").Text.ToDecimal
 
                             Else
                                 Importe = gvr.DataKey("Abono").ToDecimal
@@ -1035,8 +1035,8 @@ Partial Class ContabilidadC_RegPrePolizaS
                                 TmpCargo = TmpCargo + Importe
                                 TipoMovto = False
 
-                                If gvr.DataKey("EsComplementaria") = "True" Then ImporteME = gvr.FCTextBox("TxtAbonoME").Text.ToDecimal
-                                If gvr.DataKey("EsMonedaExtranjera") = "True" Then TipoCambio = gvr.FCTextBox("TC").Text.ToDecimal
+                                If gvr.DataKey("EsComplementaria") = "True" Then ImporteME = gvr.FCTextBox("TxtCargoME").Text.ToDecimal
+                                If gvr.DataKey("EsMonedaExtranjera") = "True" Then TipoCambio = gvr.FCTextBox("TxtTC").Text.ToDecimal
                             Else
                                 Importe = gvr.DataKey("Cargo").ToDecimal
                                 TmpCargo = TmpCargo + Importe
@@ -1047,7 +1047,7 @@ Partial Class ContabilidadC_RegPrePolizaS
                             End If
                         End If
 
-                        If Not gvr.DataKey("CveConceptoContable").Contiene("30", "10") Then ' 30-bancos, 10-anticipos proveedores
+                        If Not gvr.DataKey("CveConceptoContable").Contiene("30", "10", "204") Then ' 30-bancos, 10-anticipos proveedores, 204- blancos complementaria
 
                             If gvr.DataKey("CveConceptoContable").ToEntero = 41 Then
                                 CveIE = gvr.FCDropDownList("DdlSaldos").SelectedValue.ToEntero