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

-- cambios GlobalDTSubPr

Browse Source
This commit is contained in:
rrene
2024-08-01 15:50:25 -07:00
parent 30e0decf3e
commit 934d00e235
14 changed files with 44 additions and 60 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
OC/PopUpBuscarReq.aspx.vb
View File

@@ -129,7 +129,7 @@ Partial Class OC_PopUpBuscarReq
Private Sub CargaSubProyectos(CveProyecto As Integer)
DdlSubProyectos.DataSource = If(UsuarioActual.Empresa.Funcionalidad(102) = "1" AndAlso Not UsuarioActual.TienePermisoProceso(110),
GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, CveProyecto, UsuarioActual.CveEmpresa, -1, 1),
GlobalDTSubProyectos(CveProyecto, -1, UsuarioActual.CveEmpresa, 1))
GlobalDTSubProyectos(UsuarioActual.CveEmpresa, CveProyecto:=CveProyecto))
DdlSubProyectos.DataBind()
DdlSubProyectos.Items.Insert(0, New ListItem("Todos", "-1"))
End Sub