Contratos
-
+
@@ -115,7 +115,7 @@
@@ -140,7 +140,7 @@
Avance
-
+
@@ -150,7 +150,7 @@
Porcentaje
-
+
@@ -192,7 +192,7 @@
Faltante
-
+
@@ -202,7 +202,7 @@
Porcentaje
-
+
diff --git a/Contratos/RepContratosObraAvancesDetalle.aspx b/Contratos/RepContratosObraAvancesDetalle.aspx
index 88c16a484..dcbf5b694 100644
--- a/Contratos/RepContratosObraAvancesDetalle.aspx
+++ b/Contratos/RepContratosObraAvancesDetalle.aspx
@@ -29,7 +29,7 @@
Numero Estimaciones
-
+
@@ -38,7 +38,7 @@
@@ -63,7 +63,7 @@
Avance
-
+
@@ -73,7 +73,7 @@
Porcentaje
-
+
@@ -115,7 +115,7 @@
Fecha Fin
-
+
@@ -125,7 +125,7 @@
Dias Restantes
-
+
diff --git a/Contratos/RepContratosObraAvancesDetalle.aspx.vb b/Contratos/RepContratosObraAvancesDetalle.aspx.vb
index 384ff2da2..1c1ede262 100644
--- a/Contratos/RepContratosObraAvancesDetalle.aspx.vb
+++ b/Contratos/RepContratosObraAvancesDetalle.aspx.vb
@@ -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()
| | | | | | | |