From 5d6f2544f9e912727802a73416d9d165bf17ec9e Mon Sep 17 00:00:00 2001 From: rrene Date: Wed, 21 Jun 2023 09:14:09 -0700 Subject: [PATCH 1/2] -- columnas de notas - cambio de inactivo a cerrado en los estatus --- Acumuladores/CatFoliosGarantia.aspx | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/Acumuladores/CatFoliosGarantia.aspx b/Acumuladores/CatFoliosGarantia.aspx index 81b12f3db..3c9039c06 100644 --- a/Acumuladores/CatFoliosGarantia.aspx +++ b/Acumuladores/CatFoliosGarantia.aspx @@ -90,9 +90,9 @@
- - + +
@@ -172,6 +172,11 @@ + + + + + Date: Wed, 21 Jun 2023 12:57:43 -0700 Subject: [PATCH 2/2] =?UTF-8?q?-=20activar=20prorrateo=208.5=20en=20compra?= =?UTF-8?q?=20registrada=20--=20mover=20botnes=20de=20prorraeo=20al=20div?= =?UTF-8?q?=20m=C3=A1s=20arriba?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Compras/Compras.aspx | 23 +++++++++-------------- Compras/Compras.aspx.vb | 13 ++++--------- 2 files changed, 13 insertions(+), 23 deletions(-) diff --git a/Compras/Compras.aspx b/Compras/Compras.aspx index 2df209c95..7644e534e 100644 --- a/Compras/Compras.aspx +++ b/Compras/Compras.aspx @@ -854,7 +854,7 @@
-
+
@@ -915,6 +915,12 @@ +
+ + + +
+
@@ -976,13 +982,7 @@     - - - - - - - + @@ -1117,12 +1117,7 @@
- -
- - - -
+
diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb index 72bb963e5..0478b39c0 100644 --- a/Compras/Compras.aspx.vb +++ b/Compras/Compras.aspx.vb @@ -1418,11 +1418,6 @@ Partial Class Compras_Compras End If - - If UsuarioActual.TienePermisoProceso(360) Then - BtnProrateoDeducible.Visible = True - End If - ElseIf Request("CveCompra") IsNot Nothing AndAlso IsNumeric(Request("CveCompra")) AndAlso Request("CveCompra").ToEntero > 0 Then ViewState("CveCompra") = Request("CveCompra") @@ -1462,9 +1457,9 @@ Partial Class Compras_Compras UpLnkPaqueteriaGuias.Update() End If - If Not CveCompra > 0 Then - LIContratos.Visible = True - End If + If UsuarioActual.TienePermisoProceso(360) Then BtnProrateoDeducible.Visible = True + + If Not CveCompra > 0 Then LIContratos.Visible = True 'SI ES UNA COMPRA NUEVA SE PONE EL TOTAL, SI NO EL SALDO LblSaldoFactura.Text = If(CveCompra > 0, CompraSaldo.FormatoNumero, TxtTotal.Text.FormatoNumero) @@ -10171,7 +10166,7 @@ Partial Class Compras_Compras CargaGvInv() CargaGVsAF() CargaGvPersonal() - Alert("El Concepto ha sido eliminado correctamente", TipoMensaje.MsgInformacion) + Alert("El Concepto ha sido eliminado correctamente", TipoMensaje.ToastInformacion) End Sub Private Sub GvDeudores_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvDeudores.RowDataBound If e.Row.RowType = DataControlRowType.DataRow Then