From a43142c65bf62a476a87de83ba407ee6d4ecb7df Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Wed, 27 Apr 2022 14:01:15 -0700
Subject: [PATCH] =?UTF-8?q?--=20poner=20un=20timmer=20cuando=20se=20activa?=
 =?UTF-8?q?=20la=20modalidad=20de=20liquidaci=C3=B3n,=20para=20que=20no=20?=
 =?UTF-8?q?expire=20el=20tiempo?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Ventas/ClientesAbonar.aspx    | 12 +++++++++---
 Ventas/ClientesAbonar.aspx.vb | 10 +++++++---
 2 files changed, 16 insertions(+), 6 deletions(-)

diff --git a/Ventas/ClientesAbonar.aspx b/Ventas/ClientesAbonar.aspx
index f2558f45d..4bb0bc047 100644
--- a/Ventas/ClientesAbonar.aspx
+++ b/Ventas/ClientesAbonar.aspx
@@ -196,7 +196,13 @@
 
                                  <div class="col-md-2"   runat="server" id="DvLiquidacion1" visible="false">Liquidación:</div>
                                 <div class="col-md-3"  runat="server" id="DvLiquidacion2" visible="false">
-                                    <asp:CheckBox ID="ChkLiquidacion" OnCheckedChanged="ChkLiquidacion_CheckedChanged" runat="server" AutoPostBack="true" />
+                                    <asp:UpdatePanel ID="UppTiempo" runat="server" UpdateMode="Conditional">
+                                        <ContentTemplate>
+                                             <asp:CheckBox ID="ChkLiquidacion" OnCheckedChanged="ChkLiquidacion_CheckedChanged" runat="server" AutoPostBack="true" />
+                                            <asp:Timer runat="server" ID="TimTiempo" Interval="300000" Enabled="false" OnTick="TimTiempo_Tick"></asp:Timer>
+                                        </ContentTemplate>
+                                    </asp:UpdatePanel>
+                                   
                                 </div>
 
                             </div>
@@ -566,7 +572,7 @@
                     </asp:UpdatePanel>
                 </div>
                 <div class="modal-footer">
-                    <asp:UpdatePanel runat="server">
+                    <asp:UpdatePanel runat="server" UpdateMode="Conditional">
                         <ContentTemplate>
                             <asp:Button ID="BtnSaldarCuentasIncobrables" runat="server" CssClass="btn btn-primary" Text="Saldar cuentas" ValidationGroup="GrpIncobrable" />
                             <button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
@@ -606,7 +612,7 @@
                     </asp:UpdatePanel>
                 </div>
                 <div class="modal-footer">
-                    <asp:UpdatePanel runat="server">
+                    <asp:UpdatePanel runat="server" UpdateMode="Conditional">
                         <ContentTemplate>
                             <asp:Button ID="BtnVincularIntermediario" runat="server" CssClass="btn btn-primary" Text="Vincular Intermediario" />
                             <button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
diff --git a/Ventas/ClientesAbonar.aspx.vb b/Ventas/ClientesAbonar.aspx.vb
index 2b6da06bb..3a61273de 100644
--- a/Ventas/ClientesAbonar.aspx.vb
+++ b/Ventas/ClientesAbonar.aspx.vb
@@ -1499,7 +1499,7 @@ Partial Class Ventas_ClientesAbonar
                         End If
                     End If
 
-                    If MsgError = "" AndAlso ObjMov.ValidacionPrePolizaCuadre(CvePrePoliza, 3) Then
+                    If MsgError = "" AndAlso ObjMov.ValidacionPrePolizaCuadre(CvePrePoliza, 3) AndAlso UsuarioActual.CveEmpresa <> 158 Then
                         If ObjMov.ValorPolizaDescuadre > 0 Then
                             MsgError = ObjMov.MensajePolizaDescuadre + " La diferencia es de: " + ObjMov.ValorDiferencia
                         End If
@@ -2871,11 +2871,15 @@ Partial Class Ventas_ClientesAbonar
 
 #Region "LIQUIDACION"
 
+    Protected Sub TimTiempo_Tick(sender As Object, e As EventArgs)
+        Dim a As String = "se recarga para que no pierda sesíón el registro puede tardar más de una hora en llenar todos los datos" 'solo para que se ejecute sin que afecte a lo demás
+    End Sub
+
     Protected Sub ChkLiquidacion_CheckedChanged(sender As Object, e As EventArgs)
 
 
         If ChkLiquidacion.Checked Then
-
+            TimTiempo.Enabled = True 'para que no me saque
             GvCxC.Columns(4).Visible = False
             GvCxC.Columns(5).Visible = False
             GvCxC.Columns(6).Visible = False
@@ -2899,6 +2903,7 @@ Partial Class Ventas_ClientesAbonar
 
 
         Else
+            TimTiempo.Enabled = False
             GvCxC.Columns(4).Visible = True
             GvCxC.Columns(5).Visible = True
             GvCxC.Columns(6).Visible = True
@@ -2919,7 +2924,6 @@ Partial Class Ventas_ClientesAbonar
             GvCxC.Columns(27).Visible = True
             GvCxC.Columns(28).Visible = True
 
-
         End If
 
         UPVentas.Update()