Contratos

2021-03-23 09:50:00 -07:00
parent 960c32ee4a
commit 9cccffb427
5 changed files with 144 additions and 144 deletions
--- a/Contratos/ContratoObra.aspx.vb
+++ b/Contratos/ContratoObra.aspx.vb
@@ -953,6 +953,13 @@ Partial Class Contratos_ContratoObra
            Exit Sub
        End If

+        If TxtPorAmortizacionAnticipo.Text.ToDecimal < TxtPorAnticipo.Text.ToDecimal Then
+            Alert("El porcentaje de amortización no debe de ser menor al porcentaje de anticipo.", TipoMensaje.MsgAdvertencia)
+            Exit Sub
+        End If
+
+
+
        Dim TieneError = False
        Dim Modificado = False
        '  Dim Extension = Session("FileExtension").ToString