From 8ba46dd233d8eefe90d723844ec040b9c191dce7 Mon Sep 17 00:00:00 2001 From: rrene Date: Wed, 9 Nov 2022 13:31:43 -0700 Subject: [PATCH] -- globalDTmarcas --- Acumuladores/CatGarantiasMeses.aspx.vb | 32 +++++++++++++++----------- 1 file changed, 19 insertions(+), 13 deletions(-) diff --git a/Acumuladores/CatGarantiasMeses.aspx.vb b/Acumuladores/CatGarantiasMeses.aspx.vb index 3e71a5f47..0f204a538 100644 --- a/Acumuladores/CatGarantiasMeses.aspx.vb +++ b/Acumuladores/CatGarantiasMeses.aspx.vb @@ -72,15 +72,20 @@ Partial Class Acumuladores_CatFoliosGarantia Private Sub CargaCombos() - Dim ObjPS As New ClsProductosServicios + 'Dim ObjPS As New ClsProductosServicios - If ObjPS.GetMarcas(UsuarioActual.CveEmpresa) Then - DdlMarca.DataSource = ObjPS.DtResultados - DdlMarca.DataBind() - DdlMarca.Items.Insert(0, New ListItem("Todos", "-1")) - DdlMarca.SelectedValue = "-1" - End If - ObjPS.Dispose() + 'If ObjPS.GetMarcas(UsuarioActual.CveEmpresa) Then + ' DdlMarca.DataSource = ObjPS.DtResultados + ' DdlMarca.DataBind() + ' DdlMarca.Items.Insert(0, New ListItem("Todos", "-1")) + ' DdlMarca.SelectedValue = "-1" + 'End If + 'ObjPS.Dispose() + + DdlMarca.DataSource = GlobalDTGralMarcas(UsuarioActual.CveEmpresa) + DdlMarca.DataBind() + DdlMarca.Items.Insert(0, New ListItem("Todos", "-1")) + DdlMarca.SelectedValue = "-1" DdlTipoUso.DataSource = GlobalDTAcumTiposUso() DdlTipoUso.DataBind() @@ -109,13 +114,14 @@ Partial Class Acumuladores_CatFoliosGarantia Private Sub CargaCombosModal() - Dim ObjPS As New ClsProductosServicios + 'Dim ObjPS As New ClsProductosServicios - If ObjPS.GetMarcas(UsuarioActual.CveEmpresa) Then - DdlMarcaM.DataSource = ObjPS.DtResultados + 'If ObjPS.GetMarcas(UsuarioActual.CveEmpresa) Then + ' DdlMarcaM.DataSource = ObjPS.DtResultados - End If - ObjPS.Dispose() + 'End If + 'ObjPS.Dispose() + DdlMarca.DataSource = GlobalDTGralMarcas(UsuarioActual.CveEmpresa) DdlMarcaM.DataBind() DdlTipoUsoM.DataSource = GlobalDTAcumTiposUso()