--FIX sub proyectos OC

2025-03-24 20:23:36 -07:00
parent 91d2e72d91
commit ba349c18fb
1 changed files with 1 additions and 1 deletions
--- a/OC/OC.aspx.vb
+++ b/OC/OC.aspx.vb
@@ -2951,7 +2951,7 @@ Partial Class OC_OC
                    TieneError = True
                End If

-                Dim tCveSubProyecto As Integer = UsuarioActual.CveSubProyecto
+                Dim tCveSubProyecto As Integer = -1
                If ModalidadSubProyectoGeneral Then tCveSubProyecto = DdlSubProyectoGral.SelectedValue.ToEntero

                If tCveSubProyecto <= 0 Then