From 533d3204ccba171dabe6e4538c5511af75bb57fd Mon Sep 17 00:00:00 2001
From: rrene <rrene@DESKTOP-04EII7E>
Date: Wed, 1 Jul 2020 16:06:07 -0700
Subject: [PATCH] -- filtro den globaldtvendedores de empresa

---
 App_Code/ClsPaginas.vb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb
index af923181d..92bcf5399 100644
--- a/App_Code/ClsPaginas.vb
+++ b/App_Code/ClsPaginas.vb
@@ -1627,7 +1627,7 @@ Public Class ClsPaginas
             'sino existe, recarga los datos
             If Application(AppNombre) Is Nothing Then
                 Dim ObjVendedores As New ClsVtaVendedores
-                If ObjVendedores.GetVendedores(-1) Then Application(AppNombre) = ObjVendedores.DtResultados
+                If ObjVendedores.GetVendedores(CveEmpresa) Then Application(AppNombre) = ObjVendedores.DtResultados
                 ObjVendedores.Dispose()
             End If
             If CveEmpresa <> -1 Then