From c38b78d3168bdef440066f59097c42d7c6e77ca8 Mon Sep 17 00:00:00 2001 From: Jonathan Alexis Perez Morales Date: Wed, 9 Apr 2025 22:50:50 -0700 Subject: [PATCH] --Validacion anticipos --- App_Code/Modelos.vb | 13 ++++++++++--- 1 file changed, 10 insertions(+), 3 deletions(-) diff --git a/App_Code/Modelos.vb b/App_Code/Modelos.vb index 53c73fd47..ed6c388c2 100644 --- a/App_Code/Modelos.vb +++ b/App_Code/Modelos.vb @@ -3604,7 +3604,7 @@ Namespace Modelos Exit Select End If - If ObjFactura.TipoDocto.Contiene("Ing", "Egs", "Ant") AndAlso ValorMultiplicador = -1 Then + If ObjFactura.TipoDocto.Contiene("Ing", "Egs") AndAlso ValorMultiplicador = -1 Then For Each row2 As DataRow In ObjFactura.DtAnticipos.Rows If row2("CveConceptoContable").ToString().ToEntero = 11 Then importeMovimiento = row2("Importe").ToString().ToDecimal * ValorMultiplicador '- ((row2.FCTextBox("TxtAnticipo" & row2.RowIndex).Text.ToDecimal / row2.DataKey("TotalAnticipo").ToDecimal) * row2.DataKey("IVAAnticipo").ToDecimal) @@ -5732,8 +5732,15 @@ Namespace Modelos Return Retorno End If - If ObjFactura.TipoDocto = "Ant" AndAlso ObjFactura.SaldoAmortizado > 0 Then - Retorno.Mensaje = "La factura no se puede cancelar debido a que el anticipo ha sido amortizado." + 'If ObjFactura.TipoDocto = "Ant" AndAlso ObjFactura.SaldoAmortizado > 0 Then + ' Retorno.Mensaje = "La factura no se puede cancelar debido a que el anticipo ha sido amortizado." + ' Retorno.TipoMensaje = TipoMensaje.MsgAdvertencia + + ' Return Retorno + 'End If + + If ObjFactura.TipoDocto = "Ant" AndAlso ObjFactura.SaldoAnticipo.RoundSQL(2) <> ObjFactura.SubTotal.RoundSQL(2) Then + Retorno.Mensaje = "La factura no se puede cancelar debido a que el anticipo ha sido aplicado." Retorno.TipoMensaje = TipoMensaje.MsgAdvertencia Return Retorno