--FIX SubProyectos en AF.aspx

2024-09-04 18:42:09 -07:00
parent 6970b940d4
commit e98ce61d70
1 changed files with 1 additions and 1 deletions
--- a/AF/AF.aspx.vb
+++ b/AF/AF.aspx.vb
@@ -726,7 +726,7 @@ Partial Class AF_AF
    End Sub
    Private Sub CargaSubProyecto()
        DdlSubProyecto.Items.Clear()
-        DdlSubProyecto.DataSource = GlobalDTSubProyectos(DdlProyecto.SelectedValue.ToEntero, -1, CveEmpresaActual, 1)
+        DdlSubProyecto.DataSource = GlobalDTSubProyectos(CveEmpresaActual, CveProyecto:=DdlProyecto.SelectedValue.ToEntero, Estatus:=1)
        DdlSubProyecto.DataBind()
        DdlSubProyecto.Items.Insert(0, New ListItem("Sin SubProyecto asignado", "-1"))
    End Sub