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