Spanish [Solucionado] Como puedo evitar esto : Sleep not resumed (context is paused): b4a.example3.customlistview$ResumableSub_PanelClickHandler

Johnny Wing Pérez

Member
Licensed User
Me podrias ayudar con esto, lo veo en mi línea de registro, cuando ejecuto un llamado a uno de mis procesos.
Llamado al Sub de Usuarios:
Sub InfoUsuarios As ResumableSub
    Wait For (ConexionSQL) Complete (Result As Boolean)
    If Result Then
        Dim SenderFilter As Object = SQL.ExecQueryAsync("SQL", "Select * from Personal", Null)
        Wait For (SenderFilter) SQL_QueryComplete (Success As Boolean, Crsr As JdbcResultSet)'
        If Success Then
            Dim Info As List
            Info.Initialize
            Do While Crsr.NextRow
                Dim Datos As Clases
                Datos.Initialize
                Datos.IdUsuario=Crsr.GetInt("Id_Persona")
                Datos.UserName=Crsr.GetString("Nombre_persona")
                Datos.UserPass=Crsr.GetString("Clave")
                Info.Add(Datos)
                Sleep(100)
            Loop
        End If
    End If
    CloseConexionSQL
    Return Info
End Sub

Todos los sub los tengo dentro del mismo modulo y los llamos segun mi necesidad, ese es el primero que llamo, pero al llamar a cualquier otro como este:

Sub de Salones:
Sub InfoSalones As ResumableSub
    Wait For (ConexionSQL) Complete (Result As Boolean)
    If Result Then
        Dim Sendero As Object = SQL.ExecQueryAsync("SQL1", "Select * from Salones", Null)
        Wait For (Sendero) SQL1_QueryComplete (Success As Boolean, Crsr As JdbcResultSet)'
        If Success Then
            Dim Info As List
            Info.Initialize
            Do While Crsr.NextRow
                Dim Datos As Clases
                Datos.Initialize
                Datos.IdSalon=Crsr.GetInt("Id_Salon")
                Datos.NameSalon=Crsr.GetString("Nombre_salon")
                Info.Add(Datos)
            Loop
        End If
    End If
    CloseConexionSQL
    Return Info
End Sub

Me muestra el mensaje del Sleep not resumed que indico en el titulo...

Como lo puedo resolver... Gracias
 
Top