From 5a740dacb95da8ebbb563354dc05cf362829f9d7 Mon Sep 17 00:00:00 2001 From: rrene Date: Wed, 3 Jan 2024 07:31:29 -0700 Subject: [PATCH] =?UTF-8?q?-=20mejoras=20en=20visualizaci=C3=B3n=20y=20fil?= =?UTF-8?q?tro=20de=20Lineas=20Adicionales?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Ventas/Clientes.aspx | 34 ++++++++++++++++++++++------------ Ventas/Clientes.aspx.vb | 5 +++-- 2 files changed, 25 insertions(+), 14 deletions(-) diff --git a/Ventas/Clientes.aspx b/Ventas/Clientes.aspx index 81d3bc6b1..4d8c5d0db 100644 --- a/Ventas/Clientes.aspx +++ b/Ventas/Clientes.aspx @@ -4620,8 +4620,8 @@
- - + +
@@ -4647,7 +4647,7 @@ @@ -6928,16 +6928,26 @@ + +
+
+
- - - -
- - - - -
+ + + +
+
+
+
+ + + + + +
+
diff --git a/Ventas/Clientes.aspx.vb b/Ventas/Clientes.aspx.vb index b0f9f5881..6b94e4c9a 100644 --- a/Ventas/Clientes.aspx.vb +++ b/Ventas/Clientes.aspx.vb @@ -10276,7 +10276,7 @@ Partial Class Clientes If Not ObjVentas.UpdateLineasAdicionales(CveLineaAdicional, TxtLineaAdicionalModal.Text, CveCliente, DdlProveedorLineaAdicionalModal.SelectedValue.ToEntero, DdlTipoLineaAdicionalModal.SelectedValue.ToEntero, TxtImporteLineaAdicionalModal.Text.ToDecimal, DdlMonedaLineAdicionalModal.SelectedValue.ToEntero, TxtFechaVencimientoLineaAdicionalModal.Text.ToDate, UsuarioActual.CveUsuario, DdlCategoriaLineaAdicionalModal.SelectedValue.ToEntero, UsuarioActual.CveEmpresa, - DiasVencimiento:=TxtDiasVencimientoLineaAdicionalModal.Text.ToEntero) Then + DiasVencimiento:=TxtDiasVencimientoLineaAdicionalModal.Text.ToEntero, CveLineaAdicionalEstatus:=DdlLAEstatus.SelectedValue.ToEntero) Then ErrorAgregar = True Else Alert("Linea Adicional Actualizada Correctamente") @@ -10322,6 +10322,7 @@ Partial Class Clientes TxtImporteLineaAdicionalModal.Text = GvRow.DataKey("Importe").ToDecimal.ToString("###,###,###.00") DdlMonedaLineAdicionalModal.SelectedValueExist(GvRow.DataKey("CveMoneda").ToEntero) TxtDiasVencimientoLineaAdicionalModal.Text = GvRow.DataKey("DiasVencimiento").ToEntero.ToString + DdlLAEstatus.SelectedValueExist(GvRow.DataKey("CveEstatus")) DdlTipoLineaAdicionalModal_SelectedIndexChanged(Nothing, Nothing) RegistraScript("$('#DVLineasAdicionales').modal('show')") @@ -10353,7 +10354,7 @@ Partial Class Clientes Protected Sub DdlTipoLineaAdicionalModal_SelectedIndexChanged(sender As Object, e As EventArgs) DvLineaAdicionalDiasVenciemientoModal.Visible = If(DdlTipoLineaAdicionalModal.SelectedValue.ToEntero = 2, True, False) - DvFechaVencimiento.Visible = If(DdlTipoLineaAdicionalModal.SelectedValue.ToEntero = 2, False, True) + 'DvFechaVencimiento.Visible = If(DdlTipoLineaAdicionalModal.SelectedValue.ToEntero = 2, False, True) UpLineaAdicionalmodal.Update() End Sub