AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

rdlc 4.0 emp 38,137 , Compras redondedo concepto 68, RegPrepolizas tipo de gasto

Browse Source
This commit is contained in:
Oscar Irigoyen
2023-03-17 08:28:16 -07:00
parent a1dbcc0c8a
commit 1630cfad2a
20 changed files with 37106 additions and 27978 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
Bancos/Creditos.aspx.vb
View File

@@ -1401,8 +1401,11 @@ Partial Class Bancos_Creditos
Next
TotalAnticipoVinculado += RowIE("Importe").ToString.ToDouble
If TotalAnticipoVinculado > TotalAnticipo Then
Alert("El anticipo vinculado no puede exceder el anticipo especificado.", TipoMensaje.MsgAdvertencia)
Dim TotalAnticipoMasTolerancia As Decimal = TotalAnticipo.ToDecimal + (TotalAnticipo * 0.16).ToDecimal
If TotalAnticipoVinculado > TotalAnticipoMasTolerancia Then
Alert($"El anticipo vinculado ({TotalAnticipoVinculado.ToString("###,###,###.00")}) no puede exceder el anticipo especificado ({TotalAnticipoMasTolerancia.ToString("###,###,###.00")} tolerancia de 16% incluida).", TipoMensaje.MsgAdvertencia)
Exit Sub
End If