Bug? Error with a inexistent Try

DactilPlus

Member
Licensed User
Longtime User
My app gives me this error but there isnt a try ( see the image )

B4A version: 5.80
Parsing code. (0.06s)
Compiling code. (0.13s)
Compiling layouts code. (0.00s)
Generating R file. (0.20s)
Compiling debugger engine code. Error
B4A line: 3868
End Sub
javac 1.8.0_73
shell\src\teamTrack\app\main_subs_0.java:5451: error: 'try' without 'catch' or 'finally'
try {
^
1 error
 

Attachments

  • 2017-03-28_1134.png
    2017-03-28_1134.png
    51.6 KB · Views: 248

DactilPlus

Member
Licensed User
Longtime User
Sent.
Btw when i try to generate clic event with a button or similar it don works, i must create the sub manualy. It only create the button like
B4X:
Private Button_re_m As Button

but dont create
B4X:
Sub Button_re_m_Click

End sub

it must do manualy
 

DactilPlus

Member
Licensed User
Longtime User
Ok solved, i forgot put this in jobdone
B4X:
Select Case Job.JobName

I put this when jobdone gives an error

B4X:
    Else
                S
                Panel_Err_c.Color=Colors.red
        ToastMessageShow("Espere por favor ...", False )
Case "cargar_amigos_listado"
ExecuteRemoteQuery_cargar_amigos_listado("cargar_amigos_listado")
'Case "cargar_lista_gpx"
'ExecuteRemoteQuery_cargar_lista_gpx("cargar_lista_gpx")
'Case "cargar_amigos_grupo"
'ExecuteRemoteQuery_cargar_amigos_listado_grupo("cargar_amigos_grupo",id_gru)
'Case "cargar_grupos_amigos"
'ExecuteRemoteQuery_cargar_grupos_amigos("cargar_grupos_amigos")
Case "aceptar_rechazar_amigo"
ExecuteRemoteQuery_rechazar_amigo("aceptar_rechazar_amigo")
Case "cargar_amigos_no_listado"
ExecuteRemoteQuery_cargar_amigos_no_listado("cargar_amigos_no_listado")
Case "cargar_mensaje"
ExecuteRemoteQuery_cargar_mensaje("cargar_mensaje")
Case "existe_amigo"
ExecuteRemoteQuery_existe_Amigo("existe_amigo")
Case "comprobar_ya_amigos"
ExecuteRemoteQuery_comprobar_ya_amigo("comprobar_ya_amigos")
Case "modificar_ver_amigo"
ExecuteRemoteQuery_modificar_ver_amigo("modificar_ver_amigo")
Case "insertar_registro"
ExecuteRemoteQuery_insert_registro("insertar_registro")
Case "Identificacion"
ExecuteRemoteQuery( "Identificacion")

    End If
    Job.Release

and the correct code is this

B4X:
    Else
                Select Case Job.JobName
                Panel_Err_c.Color=Colors.red
        ToastMessageShow("Espere por favor ...", False )
Case "cargar_amigos_listado"
ExecuteRemoteQuery_cargar_amigos_listado("cargar_amigos_listado")
'Case "cargar_lista_gpx"
'ExecuteRemoteQuery_cargar_lista_gpx("cargar_lista_gpx")
'Case "cargar_amigos_grupo"
'ExecuteRemoteQuery_cargar_amigos_listado_grupo("cargar_amigos_grupo",id_gru)
'Case "cargar_grupos_amigos"
'ExecuteRemoteQuery_cargar_grupos_amigos("cargar_grupos_amigos")
Case "aceptar_rechazar_amigo"
ExecuteRemoteQuery_rechazar_amigo("aceptar_rechazar_amigo")
Case "cargar_amigos_no_listado"
ExecuteRemoteQuery_cargar_amigos_no_listado("cargar_amigos_no_listado")
Case "cargar_mensaje"
ExecuteRemoteQuery_cargar_mensaje("cargar_mensaje")
Case "existe_amigo"
ExecuteRemoteQuery_existe_Amigo("existe_amigo")
Case "comprobar_ya_amigos"
ExecuteRemoteQuery_comprobar_ya_amigo("comprobar_ya_amigos")
Case "modificar_ver_amigo"
ExecuteRemoteQuery_modificar_ver_amigo("modificar_ver_amigo")
Case "insertar_registro"
ExecuteRemoteQuery_insert_registro("insertar_registro")
Case "Identificacion"
ExecuteRemoteQuery( "Identificacion")
End Select
    End If
    Job.Release
 
Last edited:

DactilPlus

Member
Licensed User
Longtime User
Ok Solved, if you copy and paste buttons be carefull and change the event name, if not both will have the same event name.
 
Top