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

Sub Proyectos en CxP

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2022-10-31 12:42:56 -07:00
parent 2f28a20f2c
commit 7d550da50b
4 changed files with 793 additions and 746 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
Compras/RepCxP.aspx.vb
View File

@@ -129,9 +129,9 @@ Partial Class Compras_RepCxP
DdlUsuarioResponsable.DataSource = GlobalDTUsuarioResponsable.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa).FiltraParametros("ProveedoresResponsables > 0")
DdlUsuarioResponsable.DataBind()
DdlSubProyecto.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1)
DdlSubProyecto.DataBind()
CargarCentrosDeCosto(Nothing, Nothing, Nothing, LblSubProyectofiltro)
'DdlSubProyecto.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1)
'DdlSubProyecto.DataBind()
CargarCentrosDeCosto(DdlProyecto, DdlSubProyecto, LblProyecto, LblSubProyectofiltro)
DdlProveedoresClasificaciones.DataSource = GlobalDTProveedorClasificacion(UsuarioActual.CveEmpresa)
DdlProveedoresClasificaciones.DataBind()
@@ -168,6 +168,14 @@ Partial Class Compras_RepCxP
End Sub
Protected Sub DdlProyecto_SelectedIndexChanged(sender As Object, e As System.EventArgs) Handles DdlProyecto.SelectedIndexChanged
DdlSubProyecto.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, DdlProyecto.SelectedValue.ToEntero(), UsuarioActual.CveEmpresa, CveEstatus:=1)
DdlSubProyecto.DataBind()
DdlSubProyecto.Items.Insert(0, New ListItem("Todos", "-1"))
UPFiltros.Update()
End Sub
Private Sub CargaDatos()
If RblTipoCambio.SelectedValue = 3 And TxtEspecifico.Text <> "" Then
TCEspecifico = TxtEspecifico.Text