From 2bb53c1b264dc839b2e8886ebb0cabd8b3619d95 Mon Sep 17 00:00:00 2001
From: Antonio Gonzalez <jose_antony11@hotmail.com>
Date: Thu, 2 Jan 2020 15:39:35 -0700
Subject: [PATCH] cambios en formatos visual

---
 Acumuladores/RepEntradasUsadosClientes.aspx    | 2 +-
 Acumuladores/RepEntradasUsadosClientes.aspx.vb | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/Acumuladores/RepEntradasUsadosClientes.aspx b/Acumuladores/RepEntradasUsadosClientes.aspx
index b11a035ad..572aa285d 100644
--- a/Acumuladores/RepEntradasUsadosClientes.aspx
+++ b/Acumuladores/RepEntradasUsadosClientes.aspx
@@ -75,7 +75,7 @@
                 <Columns>
                     <asp:BoundField HeaderText="Tipo" DataField="Codigo"/>
                     <asp:BoundField HeaderText="Clientes/Grupos" DataField="Codigo_Clientes"/>
-                    <asp:BoundField HeaderText="Cantidad" DataField="Total"/>
+                    <asp:BoundField HeaderText="Cantidad" DataField="Total" DataFormatString="{0:N0}"/>
                 </Columns>
             </asp:GridView>
         </ContentTemplate>
diff --git a/Acumuladores/RepEntradasUsadosClientes.aspx.vb b/Acumuladores/RepEntradasUsadosClientes.aspx.vb
index 72659691c..c6555a88e 100644
--- a/Acumuladores/RepEntradasUsadosClientes.aspx.vb
+++ b/Acumuladores/RepEntradasUsadosClientes.aspx.vb
@@ -49,7 +49,7 @@ Partial Class Acumuladores_RepEntradasUsadosClientes
         Dim Acum As New ClsAcumuladores
 
         If Acum.EntradasUsadosClientesRep(CveAlmacen, FechaI, FechaF, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
-            GvDatos.DataSource = Acum.DtResultados
+            GvDatos.DataSource = Acum.DtResultados.FiltraParametros("Codigo_Clientes <> 'Total:'")
             DatosEntradasUsadosClientes = Acum.DtResultados.FiltraParametros("Codigo_Clientes <> 'Total:'")
         End If
 
@@ -61,7 +61,7 @@ Partial Class Acumuladores_RepEntradasUsadosClientes
     Protected Sub GvDatos_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvDatos.RowDataBound
         If e.Row.RowType = DataControlRowType.DataRow Then
 
-            If e.Row.DBCampo("EsHeader").ToString = "-1" Then
+            If e.Row.DBCampo("EsHeader").ToString = "-1" Or e.Row.DBCampo("Codigo").ToString = "" Then
                 e.Row.CssClass = "SubTotales2"
             End If