From 44ce52276001a3614d79f02b34305d80e9db8b78 Mon Sep 17 00:00:00 2001 From: rrene Date: Tue, 22 Apr 2025 14:29:03 -0700 Subject: [PATCH] -- ocultar sob/faltantes --- Bancos/DepositosCaja.aspx | 2 +- Bancos/DepositosCaja.aspx.vb | 23 ++++++++++++----------- 2 files changed, 13 insertions(+), 12 deletions(-) diff --git a/Bancos/DepositosCaja.aspx b/Bancos/DepositosCaja.aspx index 085d86b98..3d88e2554 100644 --- a/Bancos/DepositosCaja.aspx +++ b/Bancos/DepositosCaja.aspx @@ -224,7 +224,7 @@ -
+
diff --git a/Bancos/DepositosCaja.aspx.vb b/Bancos/DepositosCaja.aspx.vb index 0ae16b335..cf7832423 100644 --- a/Bancos/DepositosCaja.aspx.vb +++ b/Bancos/DepositosCaja.aspx.vb @@ -44,6 +44,17 @@ Partial Class Bancos_DepositosCaja DdlTipoDeposito.Items.Remove("-1") End If + If UsuarioActual.CveEmpresa = 189 Then + If DdlTipoPago.Items.FindByValue("-1") IsNot Nothing Then + DdlTipoPago.Items.Remove(DdlTipoPago.Items.FindByValue("-1")) + End If + + divdescuento2.Visible = False + divdescuento3.Visible = False + DivIntercheck.Visible = False + DivSobrantescheck.Visible = False + End If + CargaCuentas() ChkFaltante.Attributes.Add("onclick", "CheckFaltante(this);") @@ -63,16 +74,6 @@ Partial Class Bancos_DepositosCaja DivIVA.Visible = False End If - If UsuarioActual.CveEmpresa = 189 Then - If DdlTipoPago.Items.FindByValue("-1") IsNot Nothing Then - DdlTipoPago.Items.Remove(DdlTipoPago.Items.FindByValue("-1")) - End If - - divdescuento2.Visible = False - divdescuento3.Visible = False - DivIntercheck.Visible = False - End If - End If End Sub @@ -99,6 +100,7 @@ Partial Class Bancos_DepositosCaja If UsuarioActual.TienePermisoProceso(383) Then DivRowCuenta.Visible = True DivDescuentocheck.Visible = True + DivSobrantescheck.Visible = True Else DivRowCuenta.Visible = False DivDescuentocheck.Visible = False @@ -155,7 +157,6 @@ Partial Class Bancos_DepositosCaja DdlUsuario.DataSource = GlobalDTUsuarios(-1, CveEmpresa:=UsuarioActual.CveEmpresa) DdlUsuario.DataBind() - End Sub Private Sub BtnConsultar_Click(sender As Object, e As EventArgs) Handles BtnConsultar.Click