diff --git a/Finanzas/RepRazonesFinancieras2.aspx.vb b/Finanzas/RepRazonesFinancieras2.aspx.vb
index cad64b484..2b1995842 100644
--- a/Finanzas/RepRazonesFinancieras2.aspx.vb
+++ b/Finanzas/RepRazonesFinancieras2.aspx.vb
@@ -390,6 +390,18 @@ Partial Class Finanzas_RepRazonesFinancieras2
If e.Row.RowType = DataControlRowType.DataRow Then
+ For x = 1 To DTRatios.Columns.Count
+
+ If e.Row.DataKey("Ratio") = "INCREMENTO DE VENTAS" Then
+ Dim asddas = ""
+ End If
+
+ If e.Row.Cells(x).Text.ToDecimal < 0 Then
+ e.Row.Cells(x).ForeColor = Drawing.Color.Red
+ End If
+
+ Next
+
If e.Row.DataKey("Tipo").ToEntero = 1 Then
e.Row.Font.Bold = True
End If
@@ -425,6 +437,12 @@ Partial Class Finanzas_RepRazonesFinancieras2
End If
+
+
+
+
+
+
End If
End Sub