Inicio PS por caducar y RSCO Por Vencer, Avance descarga Ingresos

CxC/RepCxCDetalle.aspx.vb

@@ -236,7 +236,7 @@ Partial Class RepCxCDetalle
             CargaAsignarCobranza()
             TxtFechaCobranza.Text = Now.ToShortDateString
 
-            If UsuarioActual.Empresa.Funcionalidad(531) = "1" AndAlso UsuarioActual.CveRol = 1 Then
+            If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then
                 DVCartera.Visible = True
             End If
 
@@ -1068,9 +1068,17 @@ Partial Class RepCxCDetalle
             DdlClientesWS.DataBind()
             DdlClientesWS.ddl.Items.Insert(0, New ListItem("Todos", "-1"))
         End If
-    End Sub
-
-
+    End Sub
+
+    Private Sub GvCartera_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvCartera.RowDataBound
+        If e.Row.RowType = DataControlRowType.DataRow Then
+            If e.Row.DataKey("Rango") = "Total" Then
+                e.Row.Font.Bold = True
+            End If
+        End If
+    End Sub
+
+
 #End Region
-
+
 End Class