From 49178fb0267da1938917c61a4824ee4bdba28d43 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Thu, 17 Dec 2020 10:17:34 -0700
Subject: [PATCH] -- renglon 4 de acumulados

---
 Ventas/Clientes.aspx.vb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Ventas/Clientes.aspx.vb b/Ventas/Clientes.aspx.vb
index 55ce1f097..a01b7bf92 100644
--- a/Ventas/Clientes.aspx.vb
+++ b/Ventas/Clientes.aspx.vb
@@ -9141,7 +9141,7 @@ Partial Class Clientes
             End If
 
             Dim ImporteBonificacion As Decimal = 0
-            If ObjAcum.GetMovimientosDistribuidorResumen(CveCliente, UsuarioActual.CveEmpresa) AndAlso ObjAcum.DtResultados.Rows.Count > 0 Then
+            If ObjAcum.GetMovimientosDistribuidorResumen(CveCliente, UsuarioActual.CveEmpresa) AndAlso ObjAcum.DtResultados.Rows.Count >= 4 Then
                 GvUsadosResumen.DataSource = ObjAcum.DtResultados
                 ImporteBonificacion = ObjAcum.DtResultados.Rows(4)("Valor").ToString().ToDecimal()
             End If