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

-- parametro de agrupador por Proveedor

Browse Source
This commit is contained in:
rrene
2024-07-16 07:02:46 -07:00
parent 716227afb4
commit 235af27a02
1 changed files with 5 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
Ventas/RepProductosServicios.aspx.vb
View File

@@ -60,7 +60,9 @@ Partial Class Ventas_RepProductosServicios
#Region " CARGA DATOS INICIALES " #Region " CARGA DATOS INICIALES "
Private Sub CargaGrupo() Private Sub CargaGrupo()
If DdlProyecto.Visible Then DdlGrupo.Items.Insert(0, New ListItem("Proyecto", "1")) Dim TextoProyecto = "Proyecto"
If UsuarioActual.Empresa.Funcionalidad(307) <> "" Then TextoProyecto = UsuarioActual.Empresa.Funcionalidad(307)
If DdlProyecto.Visible Then DdlGrupo.Items.Insert(0, New ListItem(TextoProyecto, "1"))
DdlGrupo.Items.Add(New ListItem(LblSubProyecto.Text, "2")) DdlGrupo.Items.Add(New ListItem(LblSubProyecto.Text, "2"))
DdlGrupo.Items.Add(New ListItem("Categoria", "3")) DdlGrupo.Items.Add(New ListItem("Categoria", "3"))
DdlGrupo.Items.Add(New ListItem("Clasificación", "4")) DdlGrupo.Items.Add(New ListItem("Clasificación", "4"))
@@ -83,7 +85,8 @@ Partial Class Ventas_RepProductosServicios
DdlGrupo.Items.Add(New ListItem("Tipo Cliente", "23")) DdlGrupo.Items.Add(New ListItem("Tipo Cliente", "23"))
DdlGrupo.Items.Add(New ListItem("Marca", "24")) DdlGrupo.Items.Add(New ListItem("Marca", "24"))
DdlGrupo.Items.Add(New ListItem("Cliente Sucursal", "26")) DdlGrupo.Items.Add(New ListItem("Cliente Sucursal", "26"))
DdlGrupo.Items.Add(New ListItem("Giro", "27")) DdlGrupo.Items.Add(New ListItem("Giro", "27"))
If UsuarioActual.CveEmpresa = 119 Then DdlGrupo.Items.Add(New ListItem("Proveedor", "29"))
DdlGrupo.DataBind() DdlGrupo.DataBind()
DdlGrupo.SelectedValueExist("8") DdlGrupo.SelectedValueExist("8")