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

-- corrección

Browse Source
This commit is contained in:
rrene
2021-12-13 12:33:14 -07:00
parent ebb55ec73b
commit b064169330
1 changed files with 4 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
OI/Normatividad.aspx.vb
View File

@@ -38,7 +38,10 @@ Partial Class OI_Normatividad
If ObjOIEventos.AddEventoNormatividad("PADRE", "PADRE DE TODOS", "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, "".ToEntero) Then If ObjOIEventos.AddEventoNormatividad("PADRE", "PADRE DE TODOS", "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, "".ToEntero) Then
If ObjOIEventos.GetEventoNormatividad(UsuarioActual.CveEmpresa) Then If ObjOIEventos.GetEventoNormatividad(UsuarioActual.CveEmpresa) Then
IDSelected = ObjOIEventos.DtResultados(0)("CveEvento").ToString.ToEntero IDSelected = 0
If ObjOIEventos.DtResultados.Rows.Count > 0 Then
IDSelected = ObjOIEventos.DtResultados(0)("CveEvento").ToString.ToEntero
End If
ObjOIEventos.AddEventoNormatividad("Título 1", "", "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, IDSelected) ObjOIEventos.AddEventoNormatividad("Título 1", "", "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, IDSelected)
End If End If