-- mejora visual

This commit is contained in:
2024-11-07 19:34:23 -07:00
parent d2470da7a8
commit 15dac82bb9
2 changed files with 4 additions and 4 deletions

View File

@@ -4030,7 +4030,7 @@ Partial Class OC_OC
End If
If e.Row.DBCampo("Descuento").ToDecimal > 0 Then
Dim Desc As Decimal = e.Row.DBCampo("Descuento").ToDecimal
e.Row.FCLiteral("LtlDescuento").Text = String.Format("{0}<br/>{1}%", Desc.FormatoNumero, (Desc / (e.Row.DBCampo("Cantidad").ToDecimal * e.Row.DBCampo("PU").ToDecimal) * 100.0).FormatoNumero)
e.Row.FCLiteral("LtlDescuento").Text = String.Format("{0}<br/><p style ='font-style: italic; font-size: 10px;'>{1}%</p>", Desc.FormatoNumero, (Desc / (e.Row.DBCampo("Cantidad").ToDecimal * e.Row.DBCampo("PU").ToDecimal) * 100.0).FormatoNumero)
End If
e.Row.Cells(0).ToolTip = e.Row.DBCampo("CvePresupuestoEgreso")