AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

-- globalDTmarcas

Browse Source
This commit is contained in:
rrene
2022-11-09 13:34:59 -07:00
parent 33ca3da04a
commit 9da96fe473
1 changed files with 12 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
Ventas/PV.aspx.vb
View File

@@ -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