From b374e0407d274c1c8af939e818e25f153c20a8e6 Mon Sep 17 00:00:00 2001 From: Jonathan Alexis Perez Morales Date: Tue, 26 Nov 2019 09:28:22 -0700 Subject: [PATCH] Validar porcentaje IVA en OC --- OC/OC.aspx.vb | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/OC/OC.aspx.vb b/OC/OC.aspx.vb index d8d27c13c..7c9f76462 100644 --- a/OC/OC.aspx.vb +++ b/OC/OC.aspx.vb @@ -2253,6 +2253,14 @@ Partial Class OC End If End If + 'VALIDAR PORCENTAJES DE IVA + Dim PorcentajeIVA As Decimal = DdlIVA.SelectedValue.ToDecimal() - 1 + Dim PorcentajeIVADetalle As Decimal = Me.DtDetalle.MAX("IVAPorcentaje", "IVAPorcentaje > 0").ToDecimal() + + If PorcentajeIVA > 0 AndAlso (PorcentajeIVA <> PorcentajeIVADetalle) Then + Alert("El IVA de los conceptos no coincide con el IVA a facturar.", TipoMensaje.MsgAdvertencia) + TieneError = True + End If Return TieneError End Function