Marcas en Reportes de utilidad

- globaldtmarcas
2021-08-20 20:34:04 -07:00
parent 39ebc429f6
commit 661c0126c7
7 changed files with 67 additions and 14 deletions
--- a/Ventas/ProductosServicios.aspx.vb
+++ b/Ventas/ProductosServicios.aspx.vb
@@ -1801,11 +1801,8 @@ Partial Class ProductosyServicios
                DivMarca.Visible = True
            End If

-            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