AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

-- poner un timmer cuando se activa la modalidad de liquidación, para que no expire el tiempo

Browse Source
This commit is contained in:
rrene
2022-04-27 14:01:15 -07:00
parent b8ded4ee93
commit a43142c65b
2 changed files with 16 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
Ventas/ClientesAbonar.aspx
View File

@@ -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>

10
Ventas/ClientesAbonar.aspx.vb
View File

@@ -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()