diff --git a/Ventas/PV.aspx.vb b/Ventas/PV.aspx.vb
index bc04fa7e1..d48891c74 100644
--- a/Ventas/PV.aspx.vb
+++ b/Ventas/PV.aspx.vb
@@ -1375,16 +1375,17 @@ Partial Class PV
     Private Sub CargaMarcasFiltro()
 
         Using ObjMarcas As New ClsProductosServicios
-            If ObjMarcas.GetMarcas(UsuarioActual.CveEmpresa) Then
-                DdlMarcaPS.DataSource = ObjMarcas.DtResultados.Copy()
-                DdlMarcaPSAjuste.DataSource = ObjMarcas.DtResultados.Copy()
-            End If
+            'If ObjMarcas.GetMarcas(UsuarioActual.CveEmpresa) Then
+            '    DdlMarcaPS.DataSource = ObjMarcas.DtResultados.Copy()
+            '    DdlMarcaPSAjuste.DataSource = ObjMarcas.DtResultados.Copy()
+            'End If
 
             If ObjMarcas.GetMarcasUsados(UsuarioActual.CveEmpresa) Then
                 DdlMarcaUsado.DataSource = ObjMarcas.DtResultados.Copy()
             End If
         End Using
 
+        DdlMarcaPS.DataSource = GlobalDTGralMarcas(UsuarioActual.CveEmpresa)
         DdlMarcaPS.DataBind()
         DdlMarcaPSAjuste.DataBind()
         DdlMarcaUsado.DataBind()
@@ -6639,11 +6640,13 @@ Partial Class PV
             End If
             DdlMarca.Items.Clear()
             DdlMarcaPSDes.Items.Clear()
-            Dim ObjMarcas As New ClsProductosServicios
-            ObjMarcas.GetMarcas(UsuarioActual.CveEmpresa)
-            DdlMarca.DataSource = ObjMarcas.DtResultados
-            DdlMarcaPSDes.DataSource = ObjMarcas.DtResultados
-            ObjMarcas.Dispose()
+            'Dim ObjMarcas As New ClsProductosServicios
+            'ObjMarcas.GetMarcas(UsuarioActual.CveEmpresa)
+            'DdlMarca.DataSource = ObjMarcas.DtResultados
+            'DdlMarcaPSDes.DataSource = ObjMarcas.DtResultados
+            'ObjMarcas.Dispose()
+            DdlMarca.DataSource = GlobalDTGralMarcas(UsuarioActual.CveEmpresa)
+            DdlMarcaPSDes.DataSource = GlobalDTGralMarcas(UsuarioActual.CveEmpresa)
             DdlMarca.DataBind()
             DdlMarcaPSDes.DataBind()
         End If