From 733791746c125de9e6abb8e8c761a3fb719d3d2a Mon Sep 17 00:00:00 2001 From: Jonathan Alexis Perez Morales Date: Wed, 19 Oct 2022 16:46:01 -0700 Subject: [PATCH] Validar saldo de lineas adicionales --- Ventas/Ventas.aspx.vb | 14 +++++++++++--- 1 file changed, 11 insertions(+), 3 deletions(-) diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb index 2bb888f55..f331cc6cc 100644 --- a/Ventas/Ventas.aspx.vb +++ b/Ventas/Ventas.aspx.vb @@ -2242,10 +2242,10 @@ Partial Class Ventas Private Property SaldoLineaAdicional As Decimal Get - Return (IfNull(ViewState("ImporteLineaAdicional"), "0", ViewState("ImporteLineaAdicional"))).ToString().ToDecimal() + Return (IfNull(ViewState("SaldoLineaAdicional"), "0", ViewState("SaldoLineaAdicional"))).ToString().ToDecimal() End Get Set(value As Decimal) - ViewState("ImporteLineaAdicional") = value + ViewState("SaldoLineaAdicional") = value End Set End Property @@ -35286,9 +35286,17 @@ Partial Class Ventas Me.CveCategoriaLineaAdicional = RowLinea("CveCategoria").ToString().ToEntero() Me.CveMonedaLineaAdicional = RowLinea("CveMoneda").ToString().ToEntero() + Me.SaldoLineaAdicional = RowLinea("Saldo").ToString().ToDecimal() End If - + Else + Alert("No se pudieron obtener datos de la linea adicional", TipoMensaje.MsgAdvertencia) + Me.SaldoLineaAdicional = 0 + Me.CveCategoriaLineaAdicional = 0 End If + Else + Alert("No se pudieron obtener datos de la linea adicional", TipoMensaje.MsgAdvertencia) + Me.SaldoLineaAdicional = 0 + Me.CveCategoriaLineaAdicional = 0 End If End Using Else