-- corrección
This commit is contained in:
@@ -38,7 +38,10 @@ Partial Class OI_Normatividad
|
||||
|
||||
If ObjOIEventos.AddEventoNormatividad("PADRE", "PADRE DE TODOS", "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, "".ToEntero) Then
|
||||
If ObjOIEventos.GetEventoNormatividad(UsuarioActual.CveEmpresa) Then
|
||||
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)
|
||||
|
||||
End If
|
||||
|
||||
Reference in New Issue
Block a user