From d236ce0b34d5c7c8bdd11af61804f20ba576ac21 Mon Sep 17 00:00:00 2001 From: rrene Date: Sat, 15 Jul 2023 10:47:55 -0700 Subject: [PATCH] -- aumento de tolerancia --- Bancos/RepComplementoPago.aspx.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Bancos/RepComplementoPago.aspx.vb b/Bancos/RepComplementoPago.aspx.vb index 77615c98a..603e2c53b 100644 --- a/Bancos/RepComplementoPago.aspx.vb +++ b/Bancos/RepComplementoPago.aspx.vb @@ -241,7 +241,7 @@ Partial Class Bancos_RepComplementoPago e.Row.FCLabel("LblImp").ForeColor = Drawing.Color.Red e.Row.FCLabel("LblImp").ToolTip = String.Format("Importe Pagado:{0} Importe Pagado PUE: {1}, Ot. Ingresos {2}", e.Row.DBCampo("Importe").FormatoNumero, e.Row.DBCampo("PagadoPUE").FormatoNumero, e.Row.DBCampo("PagadoOtIngresos").FormatoNumero) ' VentasTotalPagado 'si hay una diferencia generado por el tipo de cambio o alguna situación especial, detendrá el timbrado - If Math.Abs(e.Row.DBCampo("Importe").ToDecimal - e.Row.DBCampo("VentasTotalPagado").ToDecimal) > 11 Then + If Math.Abs(e.Row.DBCampo("Importe").ToDecimal - e.Row.DBCampo("VentasTotalPagado").ToDecimal) > 20 Then ' si tiene pagado PUE, habilitamos la condición porque esa puede ser la diferencia If e.Row.DBCampo("PagadoPUE").ToDecimal > 0 OrElse e.Row.DBCampo("PagadoOtIngresos").ToDecimal > 0 Then e.Row.FCCheckBox("Chk").Visible = True