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

Contratos, tamaños fuente indicadores, foramto numero avance a dos decimales

Browse Source
This commit is contained in:
rakcsle
2021-09-28 20:11:40 -07:00
parent ba4543e105
commit 97987ef257
4 changed files with 24 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Contratos/RepContratosObraAvancesDetalle.aspx.vb
View File

@@ -87,7 +87,7 @@ Partial Class RepContratosObraAvancesDetalle
Dim AvanceImporte As Decimal = DTDatos(0)("AvanceImporte").ToString.ToDecimal
Dim TotalContratos As Decimal = DTDatos(0)("Importe").ToString.ToDecimal
Dim TotalContratos As Decimal = DTDatos(0)("ImporteSubTotal").ToString.ToDecimal
Dim TotalAvancePorcentaje As Decimal = 0
If TotalContratos > 0 Then
@@ -100,6 +100,8 @@ Partial Class RepContratosObraAvancesDetalle
Dim FechaFinal As Date = DTDatos(0)("FechaFinal").ToString.ToDate
Dim Dias As Integer = (FechaFinal - Now).Days
Dias = If(Dias < 0, 0, Dias)
LtlAvanceImporte.Text = $"$ {AvanceImporte.ToString("###,###,###.00")}"
@@ -109,7 +111,7 @@ Partial Class RepContratosObraAvancesDetalle
SPAvance1.Attributes.Add("style", $"width:{TotalAvancePorcentaje.ToString.ToEntero}%")
LtlFechaFin.Text = FechaFinal.ToString("dd/MM/yyyy")
LtlDiasRestantes.Text = Dias.ToString("###,###")
LtlDiasRestantes.Text = If(Dias <= 0, "0", Dias.ToString("###,###"))
UpGrafica.Update()