iOS Question Error when trying to publish an application only for iphone

gregorio_adrian_gimenez

Active Member
Licensed User
Longtime User
Hi everyone! I made an app that I just want to work on Iphone, Incorporate #Target: iPhone to the code, but when trying to publish the app in the appstore, it continues generating the following error, can you give me any clue or idea how to solve it?

Your app crashed on iPad running iOS 13.4 on WiFi when we:

- Launched app.
- Tapped button on the menu page.
- Tapped any option under “Seleccione el motivo de su consulta.”
- App crashed.

regards
 

gregorio_adrian_gimenez

Active Member
Licensed User
Longtime User
I did not put any particular control, The application has Firebase and by sending SMS/mail, the latter can cause the application to crash?
Atach log
 

Attachments

  • crash_log1.txt
    76.2 KB · Views: 209
  • crash_log2.txt
    76.1 KB · Views: 210
  • crash_log3.txt
    74.6 KB · Views: 216
  • crash_log4.txt
    75.9 KB · Views: 206
Upvote 0

Computersmith64

Well-Known Member
Licensed User
Longtime User
You need to symbolicate the crash logs they sent you from App Review to make them readable enough to find the cause of the crash - but if I had to guess, I'd say it's something to do with trying to send an SMS on an iPad connected to WiFi only. Try running a test on a phone with only WiFi enabled.

I did an update to an iOS app recently & when I submitted it for review I received an email saying it had crashed when they tried to use a certain feature. I tested it on all my iOS devices & simulators & couldn't get it to crash. It was only when I reinstalled the app from scratch & declined the permission to receive notifications that it crashed. It was a bug in my code, but because they didn't mention that they had declined that permission when they tested it I just assumed they were allowing notifications - so I didn't test it without them being allowed. Completely my fault, but my point is you have to assume that users will do stuff with your apps that you didn't consider - so you need to test every possibility.

Symbolicating Crash Reports

- Colin.
 
Last edited:
Upvote 0

gregorio_adrian_gimenez

Active Member
Licensed User
Longtime User
It is a custom list view select an option and call a code module "Datos_envio"

Fragment of the main module:

B4X:
Sub Listelectrico_ItemClick (Position As Int, Value As Object)
    If Value = "01 Falta de servicio" Then
        resultado = "LUZ"
   
        opcion = Value
        Pg.ResignFocus
        Datos_envio.show
               
    else if Value = "02 Alumbrado público" Then
        resultado = "ALUMBRADO"
       
        opcion = Value
        Pg.ResignFocus
        Datos_envio.show
               
    else if Value = "03 Seguridad vía pública" Then
        resultado = "SEGURIDAD"
       
        opcion = Value
        Pg.ResignFocus
        Datos_envio.show
               
    else if Value = "04 Denunciar fraude" Then
        resultado = "DENUNCIA"
   
        opcion = Value
        Pg.ResignFocus
        Datos_envio.show
           
               
    End If

End Sub

datos_envios code module

B4X:
Sub Process_Globals
    'These global variables will be declared once when the application starts.
    'Public variables can be accessed from all modules.
    Private pg As Page
   
   
    Dim xui As XUI
   
    Dim audio3 As MediaPlayer
   
    Dim evento_electrico As String
    Dim evento_telefonico As String
    Dim evento_internet As String
    Dim evento_informacion As String

   
    Dim archivo As String
    Public capturado As Boolean
       
    evento_electrico = Inicio.resultado

    Private Botfoto As Button
    Private Botenviar As Button

    Private Editobs As TextView
    Private Editsuministro As TextView
   
    'Private Label1 As Label
    Private label6 As Label
    Private CheckBox_suministrook As Label
   
    Private Label_main As Label
    Private Label_reclamo As Label
   
    Private Panel1 As Panel
    Private Label4 As Label
    Private ImageView1 As ImageView
    Private ImageView_imagen As ImageView
    Private Toast As clsToastMsg
    Dim smsc As MessageComposer
    Dim mailc As MailComposer
    Private AnimatedCheckBoxmail As Switch
    Private AnimatedCheckBoxsms As Switch
   
    Dim suministro_validacion As Boolean
   
    Private label_acepta As Label
   
    Private cam As Camera
    Private vv As VideoView
    Private timer1 As Timer
   
    Private TextView_mail As TextView
    Private TextView_sms As TextView
End Sub

Public Sub Show
    If pg.IsInitialized = False Then
        pg.Initialize("pg")
        pg.RootPanel.LoadLayout("Datos_envio")
        pg.HideBackButton = False
    End If
    Main.NavControl.ShowPage(pg)
    Main.NavControl.NavigationBarVisible = False
   
    'Label_main.Text = Main.main_seleccion
    Label_main.TextColor = Colors.Black
   
   
    Label_reclamo.Text = Inicio.opcion
   
    Label_reclamo.TextColor = Colors.Black
   
    CheckBox_suministrook.Visible = False
   
    ImageView_imagen.Color = Colors.Transparent
   
    Botenviar.Enabled =True
   
    If File.Exists(File.DirDocuments, "editsuministro.txt") = True Then
        Editsuministro.Text =File.ReadString(File.DirDocuments, "editsuministro.txt")

    End If
   
    If Editsuministro.Text.Length = 6 Then
        CheckBox_suministrook.Visible = True
        CheckBox_suministrook.Visible = True
        Editsuministro.TextColor = Colors.ARGB(255,88,171,54)
    Else
        CheckBox_suministrook.Visible = False
        CheckBox_suministrook.Visible = False
        Editsuministro.TextColor = Colors.ARGB(255,75,69,20)
    End If

    If (Inicio.resultado = "ALUMBRADO" Or Inicio.resultado = "DENUNCIA" Or Inicio.resultado = "SEGURIDAD") Then
   

        Botfoto.Visible = False
        Editobs.Visible=True
        'label_acepta.Visible = True
       
   
        AnimatedCheckBoxsms.Visible = True
        AnimatedCheckBoxsms.Value = True
        AnimatedCheckBoxsms.Enabled = True
        AnimatedCheckBoxmail.Visible = True
        AnimatedCheckBoxmail.Value = False
        AnimatedCheckBoxmail.Enabled = True
        TextView_mail.Visible = True
           
        Botenviar.RequestFocus
       
    Else
   
        If (Inicio.resultado = "TE_OTROS" Or Inicio.resultado = "IN_OTROS") Then
   

            Botfoto.Visible = False
            Editobs.Visible = True
            label_acepta.Visible = True
            Botenviar.RequestFocus
            '    Label1.Visible= True

            AnimatedCheckBoxsms.Visible = True
            AnimatedCheckBoxsms.Value = True
            AnimatedCheckBoxsms.Enabled = False
            AnimatedCheckBoxmail.Visible = False
            AnimatedCheckBoxmail.Value = False
            AnimatedCheckBoxmail.Enabled = False
             TextView_mail.Visible = False
             
            Editobs.RequestFocus
       
        Else
   
            Botfoto.Visible = False
            Editobs.Visible = False
            '        Label1.Visible= False
   
            AnimatedCheckBoxsms.Visible = True
            AnimatedCheckBoxsms.Value = True
            AnimatedCheckBoxsms.Enabled = False
            AnimatedCheckBoxmail.Visible = False
            AnimatedCheckBoxmail.Value = False
            AnimatedCheckBoxmail.Enabled = False
            TextView_mail.Visible = False
           
        End If

    End If
   
    'Panel1.SetLayout(0%x,0%y,100%X,10%y)
    Panel1.Color = Colors.White
    Editsuministro.TextColor = Colors.Black
   
    Toast.Initialize(pg, 17, True)
   
   
Botfoto.Enabled = cam.IsSupported  
    vv.Initialize("vv")
    vv.View.Visible = False

    timer1.Initialize("timer1", 500)
   
   
End Sub


Sub Botfoto_Click
    cam.Initialize("cam",pg)
    'cam.SelectFromSavedPhotos(Sender, cam.TYPE_ALL)
    cam.TakePicture
End Sub

Public Sub ImageToBytes(Image As Bitmap) As Byte()
    Dim out As OutputStream
    out.InitializeToBytesArray(0)
    Image.WriteToStream(out, 100, "JPEG")
    out.Close
    Return out.ToBytesArray
End Sub

Sub cam_Complete (Success As Boolean, Image As Bitmap, VideoPath As String)
    Dim p As Phone
    If Success Then
        If Image.IsInitialized Then
            vv.View.Visible = False
            ImageView_imagen.Bitmap = Image
            p.AddImageToAlbum(Image)
            ImageView_imagen.Visible = True
            Dim b() As Byte = ImageToBytes(Image)
            File.WriteBytes(File.DirDocuments, "foto_test.jpeg", b)
            capturado = True
        Else
            vv.View.Visible = True
            vv.LoadVideo(VideoPath, "")
            Log(p.AddVideoToAlbum(VideoPath, ""))
           
        End If
        Else
            capturado = False
    End If
End Sub

Sub Timer1_Tick
    Dim no As NativeObject = vv
    no = no.GetField("player").GetField("naturalSize")
End Sub

Sub Botenviar_Click

   
    If AnimatedCheckBoxsms.Value=True Then
        Botenviar.Enabled= smsc.CanSendText
        If smsc.CanSendText = False Then
        Toast.ShowToastMessage("Su dispositivo no esta preparado para enviar SMS",3000)
        Else
        enviar          
        End If
    Else
   
    If AnimatedCheckBoxmail.Value = True Then
        Botenviar.Enabled= mailc.CanSendMail
        If mailc.CanSendMail = False Then
            Toast.ShowToastMessage("Primero debe configurar una cuenta de mail en su dispositivo",3000)
        Else
        enviar      
        End If
    End If  
    End If
   
End Sub


Sub enviar
   
    If  Editsuministro.Text.Length = 6 Then
       
        CheckBox_suministrook.Visible = True
        File.WriteString(File.DirDocuments,"editsuministro.txt",Editsuministro.Text)
    Else
       
        CheckBox_suministrook.Visible = False

        Editsuministro.RequestFocus
       
    End If
   
    suministro_validacion = CheckBox_suministrook.Visible
   
    If (suministro_validacion= True  And AnimatedCheckBoxmail.value = True And ( Inicio.resultado = "ALUMBRADO" Or Inicio.resultado = "DENUNCIA" Or Inicio.resultado = "SEGURIDAD"))Then
               
        enviar_mail
        'audio3.Initialize2("audio3")
        'audio3.Load(File.DirAssets,"AUD3.mp3")
        'audio3.SetVolume(1,1)
        'audio3.Play
        Botenviar.Enabled = False
        Editobs.Text = ""
        Main.NavControl.ShowPage(pg)
       
           
    Else if (suministro_validacion =True  And AnimatedCheckBoxmail.Value = False And (Inicio.resultado = "ALUMBRADO" Or Inicio.resultado = "DENUNCIA" Or Inicio.resultado = "SEGURIDAD"))Then
           
        enviar_sms
        Dim audio3 As MediaPlayer
        audio3.Initialize(File.DirAssets,"cepral confirmar consulta.mp3","aud")
        audio3.Play
        Botenviar.Enabled = False
        Editobs.Text = ""
        Main.NavControl.ShowPage(pg)
       
           
    Else if (suministro_validacion = False  And AnimatedCheckBoxmail.Value = True And (Inicio.resultado = "ALUMBRADO"  Or Inicio.resultado = "DENUNCIA" Or Inicio.resultado = "SEGURIDAD"))Then
        Toast.ShowToastMessage("El código de unidad debe tener 6 dígitos, incluye el dígito verificado,  se encuentra en el margen superior derecho de su factura",3000)
        Editsuministro.RequestFocus
           
    Else if (suministro_validacion = False  And AnimatedCheckBoxmail.Value = False And (Inicio.resultado = "ALUMBRADO" Or Inicio.resultado = "DENUNCIA" Or Inicio.resultado = "SEGURIDAD"))Then
           
        Toast.ShowToastMessage("El código de unidad debe tener 6 dígitos, se encuentra en el margen superior izquierdo de su factura",3000)
        Editsuministro.RequestFocus
           
    Else if (suministro_validacion = True  And AnimatedCheckBoxsms.Value = True And (Inicio.resultado = "ALUMBRADO" Or Inicio.resultado = "DENUNCIA" Or Inicio.resultado = "SEGURIDAD"))Then
       
        enviar_sms
       
   
       
        Dim audio3 As MediaPlayer
        audio3.Initialize(File.DirAssets,"cepral confirmar consulta.mp3","aud")
        audio3.Play
        Botenviar.Enabled = False
        Editobs.Text = ""
        'Activity.Finish
           
    Else if (suministro_validacion = False  And AnimatedCheckBoxsms.Value= True And (Inicio.resultado = "ALUMBRADO" Or Inicio.resultado = "DENUNCIA" Or Inicio.resultado = "SEGURIDAD"))Then
       
        enviar_sms
        Dim audio3 As MediaPlayer
        audio3.Initialize(File.DirAssets,"cepral confirmar consulta.mp3","aud")
        audio3.Play
        Botenviar.Enabled = False
        Editobs.Text = ""
        'Activity.Finish
           
    Else if (suministro_validacion = False  And AnimatedCheckBoxmail.Value = False And Inicio.resultado <> "ALUMBRADO" And Inicio.resultado <> "DENUNCIA" And Inicio.resultado <> "SEGURIDAD") Then
           
        Toast.ShowToastMessage("El código de unidad debe tener 6 dígitos, se encuentra en el margen superior izquierdo de su factura",3000)
        Editsuministro.RequestFocus
    Else if (suministro_validacion = True  And AnimatedCheckBoxmail.Value= False And Inicio.resultado <> "ALUMBRADO" And Inicio.resultado <> "DENUNCIA" And Inicio.resultado <> "SEGURIDAD") Then
           
        enviar_sms
        Dim audio3 As MediaPlayer
        audio3.Initialize(File.DirAssets,"cepral confirmar consulta.mp3","aud")
        audio3.Play
        Botenviar.Enabled = False
        Editobs.Text = ""
        Main.NavControl.ShowPage(pg)
       
    End If
   
   
End Sub



Sub AnimatedCheckBoxsms_check_changed
   
End Sub

Sub animatedcheckboxmail_check_changed
   
End Sub

Sub enviar_sms()
   
    Dim PhoneNumber As String = "123456789"
    Dim Message As String = Inicio.resultado & " " & Editsuministro.Text & " " & Editobs.Text
    Dim recibido As Boolean = True
    Dim enviado As Boolean = True

    smsc.Initialize("smsc")
    smsc.SetRecipients(Array As String(PhoneNumber))
    smsc.Body = Message
    smsc.Show(pg)
   
   
End Sub

Sub smsc_Complete (Result As Int)
   
    If Result = smsc.RESULT_SENT Then
        Toast.ShowToastMessage("Mensaje enviado", 2000)
    Else
        Toast.ShowToastMessage("El mensaje no pudo enviarse, intente nuevamente", 2000)
    End If
    pg.ResignFocus
    Sleep(3000)
    Inicio.back
   
End Sub
   
Sub enviar_mail ()
   
    Dim mailc As MailComposer
    Dim subject As String = Inicio.resultado &  " " & Editsuministro.Text
    Dim body As String = Editobs.Text
       
    mailc.Initialize("mailc")
    mailc.SetToRecipients(Array("[email protected]"))
    mailc.SetSubject(subject)
    mailc.SetBody(body, True)

    If capturado = True Then
    mailc.AddAttachment(File.DirDocuments,"foto_test.jpeg","octet-stream")  
    End If
   
    mailc.Show(pg)
   
End Sub



Sub Mailc_Complete (Result As Int)
    If Result = mailc.RESULT_SENT Then
        Toast.ShowToastMessage("Correo enviado", 3000)
       
    Else
        Toast.ShowToastMessage("El correo no pudo ser enviado, intente nuevamente", 3000)
   
    End If
   
    pg.ResignFocus
    Sleep(3000)
    Inicio.back
   
End Sub

Sub editsuministro_FocusChanged (HasFocus As Boolean)
   
    If Editsuministro.Text.Length = 6 Then
        CheckBox_suministrook.Visible = True
   
       
        File.WriteString(File.DirDocuments,"editsuministro.txt",Editsuministro.Text)
       
        If File.Exists(File.DirDocuments,"editsuministro.txt") Then
        Else
            Toast.ShowToastMessage("Excelente! el código de unidad quedará grabado en su dispositivo y no tendrá que volver a cargarlo",3000)
        End If
           
        If Inicio.resultado ="SEGURIDAD" Or Inicio.resultado = "DENUNCIA" Or Inicio.resultado="ALUMBRADO" Then
               
            CheckBox_suministrook.Visible = False
        Else
           
            CheckBox_suministrook.Visible = False
           
            Editsuministro.RequestFocus
        End If
    End If
       
       
       
End Sub

Sub editobs_FocusChanged (HasFocus As Boolean)
   
    suministro_validacion = CheckBox_suministrook.Visible
    If suministro_validacion = False Then
        If Inicio.resultado ="SEGURIDAD" Or Inicio.resultado = "DENUNCIA" Or Inicio.resultado="ALUMBRADO" Then
        Else
            Editsuministro.RequestFocus
        End If
       
    End If
   
End Sub

Sub editobs_TextChanged(Old As String, New As String)
   
    If New.Length >= 159 Then
        Toast.ShowToastMessage("Ha alcanzado el límite de caracteres que puede enviar", 3000)
        Editobs.Text = Old  
           
    End If

End Sub

Sub editsuministro_TextChanged(Old As String, New As String)
   
   
    If New.Length = 6 Then
        Log(Editsuministro.Text.Length)
       
        CheckBox_suministrook.Visible = True
       
        Editsuministro.TextColor = Colors.ARGB(255,88,171,54)
        File.WriteString(File.DirDocuments,"editsuministro.txt",Editsuministro.Text)
         Toast.ShowToastMessage("el código de unidad quedará grabado en su dispositivo, si desea modificarlo deberá hacerlo aqui",3000)
     
        If (Inicio.resultado = "ALUMBRADO" Or Inicio.resultado = "DENUNCIA" Or Inicio.resultado = "SEGURIDAD") Then
        Editobs.RequestFocus  
        label_acepta.Visible = True
       
        Else
            Editsuministro.ResignFocus
            Botenviar.RequestFocus
        End If
    Else
   
        If New.Length > 6 Then
            CheckBox_suministrook.Visible = False
            Editsuministro.TextColor = Colors.ARGB(255,75,69,20)
            Toast.ShowToastMessage("El código de unidad tiene 6 dígitos, vuelve a intentarlo",3000)
           
            Editsuministro.Text = ""
            Editsuministro.Text = ""
           
       
        Else
               
        CheckBox_suministrook.Visible = False      
        Editsuministro.TextColor = Colors.ARGB(255,75,69,20)
       
    End If
End If

End Sub




Sub Editobs_EndEdit
   
    Editobs.ResignFocus
   
End Sub

Sub Editobs_Click
   
    Editobs.RequestFocus
    label_acepta.Visible = True
   
   
End Sub

Sub Pg_Click
    pg.ResignFocus
End Sub



Sub AnimatedCheckBoxmail_ValueChanged (Value As Boolean)
   
    If AnimatedCheckBoxmail.Value=True Then
       
        If mailc.CanSendMail = False Then
            Botenviar.Enabled = mailc.CanSendMail
         Toast.ShowToastMessage("Para enviar un mail debe configurar una cuenta en su dispositivo primero", 3000)          
        End If
       
        If (Inicio.resultado = "ALUMBRADO" Or Inicio.resultado = "DENUNCIA" Or Inicio.resultado = "SEGURIDAD") Then
   

            Botfoto.Visible = True
            Editobs.Visible = True
           
            AnimatedCheckBoxsms.Visible = True
            AnimatedCheckBoxsms.Value = False
            AnimatedCheckBoxsms.Enabled = True
            AnimatedCheckBoxmail.Visible = True
            AnimatedCheckBoxmail.Value = True
            AnimatedCheckBoxmail.Enabled = True
       
        Else
   
            Botfoto.Visible = False
            Editobs.Visible = False
   
            AnimatedCheckBoxsms.Visible = True
            AnimatedCheckBoxsms.Value = False
            AnimatedCheckBoxsms.Enabled = True
            AnimatedCheckBoxmail.Visible = False
            AnimatedCheckBoxmail.Value = False
            AnimatedCheckBoxmail.Enabled = False
        End If      
    Else
   
        If (Inicio.resultado = "ALUMBRADO" Or Inicio.resultado = "DENUNCIA" Or Inicio.resultado = "SEGURIDAD") Then

            Botfoto.Visible = False
            Editobs.Visible = True
       
            AnimatedCheckBoxsms.Visible = True
            AnimatedCheckBoxsms.Value = True
            AnimatedCheckBoxsms.Enabled = True
            AnimatedCheckBoxmail.Visible = True
            AnimatedCheckBoxmail.Value = False
            AnimatedCheckBoxmail.Enabled = True
        Else
   
            Botfoto.Visible = False
            Editobs.Visible = False
   
            AnimatedCheckBoxsms.Visible = True
            AnimatedCheckBoxsms.Value = True
            AnimatedCheckBoxsms.Enabled = True
            AnimatedCheckBoxmail.Visible = False
            AnimatedCheckBoxmail.Value = False
            AnimatedCheckBoxmail.Enabled = False

        End If
    End If
   
End Sub

Sub AnimatedCheckBoxsms_ValueChanged (Value As Boolean)

    If AnimatedCheckBoxsms.Value=True Then
        Botenviar.Enabled = smsc.CanSendText
       
       
        If (Inicio.resultado = "ALUMBRADO" Or Inicio.resultado = "DENUNCIA" Or Inicio.resultado = "SEGURIDAD") Then
   
            Botfoto.Visible = False
            Editobs.Visible = True
            ImageView_imagen.Visible = False
           
            AnimatedCheckBoxsms.Visible = True
            AnimatedCheckBoxsms.Value = True
            AnimatedCheckBoxsms.Enabled = True
            AnimatedCheckBoxmail.Visible = True
            AnimatedCheckBoxmail.Value = False
            AnimatedCheckBoxmail.Enabled = True
       
        Else
   
            Botfoto.Visible = False
            Editobs.Visible = False
            ImageView_imagen.Visible = False
           
           
            AnimatedCheckBoxsms.Visible = True
            AnimatedCheckBoxsms.Value= True
            AnimatedCheckBoxsms.Enabled = True
            AnimatedCheckBoxmail.Visible = False
            AnimatedCheckBoxmail.Value = False
            AnimatedCheckBoxmail.Enabled = False
   
        End If

    Else
       
        If (Inicio.resultado = "ALUMBRADO" Or Inicio.resultado = "DENUNCIA" Or Inicio.resultado = "SEGURIDAD") Then
   
            Botfoto.Visible = True
            Editobs.Visible = True
            ImageView_imagen.Visible = True
           
            AnimatedCheckBoxsms.Visible = True
            AnimatedCheckBoxsms.Value = False
            AnimatedCheckBoxsms.Enabled = True
            AnimatedCheckBoxmail.Visible = True
            AnimatedCheckBoxmail.Value = True
            AnimatedCheckBoxmail.Enabled = True

        Else
   
            Botfoto.Visible = False
            Editobs.Visible = False
            AnimatedCheckBoxsms.Visible = True
            AnimatedCheckBoxsms.Value = False
            AnimatedCheckBoxsms.Enabled = True
            AnimatedCheckBoxmail.Visible = False
            AnimatedCheckBoxmail.Value = False
            AnimatedCheckBoxmail.Enabled = False
   
        End If
           
    End If
   
End Sub

Sub label_acepta_Click
   
    Editobs.ResignFocus
    label_acepta.Visible = False
   
End Sub
 
Upvote 0

gregorio_adrian_gimenez

Active Member
Licensed User
Longtime User
good day everyone Sorry for the delay but I was trying everything I could to rule out problems. I can't solve it. I try airplane mode, release mode, and it works perfectly on an iphone 5. There seems to be a crash when you tap on any of the options.


This is the error :
Your app crashed on iPad and iPhone running iOS 13.4.1 on WiFi when we tapped in any of the subcategories in every section.
We have attached detailed crash logs to help troubleshoot this issue.

I am using the AsbottomMenu module,
Maybe something is wrong with this module, but I don't know how to figure it out, I have no way to advance, can someone help me? I can pass the code in private

regards
 
Upvote 0

Erel

B4X founder
Staff member
Licensed User
Longtime User
This is the symbolicating result:

-[B4IMoviePlayerWrapper Initialize::] (in cepral) + 124
-[b4i_datos_envio _show] (in cepral) (b4i_datos_envio.m:977)
-[b4i_inicio _listtelefonico_itemclick::] (in cepral) (b4i_inicio.m:939)
0x1ba622d14
0x1ba4ebde8
+[B4I runDynamicMethod:method:throwErrorIfMissing:args:] (in cepral) + 1608
-[B4I raiseEvent:event:params:] (in cepral) + 548
-[B4ICommon CallSub4::::] (in cepral) + 316
-[B4ICommon CallSub3:::::] (in cepral) + 460
-[ResumableSub_customlistview_PanelClickHandler resume::] (in cepral) (b4i_customlistview.m:76)
-[b4i_customlistview _panelclickhandler:] (in cepral) (b4i_customlistview.m:804)
-[b4i_customlistview _panel_click] (in cepral) (b4i_customlistview.m:791)
0x1ba622d14
0x1ba4ebde8
+[B4I runDynamicMethod:method:throwErrorIfMissing:args:] (in cepral) + 1608
-[B4I raiseEvent:event:params:] (in cepral) + 548
__33-[B4I raiseUIEvent:event:params:]_block_invoke (in cepral) + 60
0x1ba2baec4

The error is here: -[B4IMoviePlayerWrapper Initialize::] (in cepral) + 124
 
Upvote 0

gregorio_adrian_gimenez

Active Member
Licensed User
Longtime User
Congratulations! We're pleased to let you know that your app, Cepral, has been approved for the App Store. Once your app has been released, it can take up to 24 hours before your app becomes available on the App Store.

THANK YOU VERY MUCH EREL!

query, could I have noticed this error myself? I understand that if I don't have a mac I can't see the symbolic log

on the other hand the audio playback in test or release mode worked well o_O
 
Last edited:
Upvote 0

gregorio_adrian_gimenez

Active Member
Licensed User
Longtime User
Hello! The main mistake was in using this Imedia code that is no longer compatible with IOS 13.4.


But the biggest mistake I make is trying an iphone 6 with iOS 12, where these errors were not detected.
Thanks everyone for the help and apologies,


B4X:
'vv.Initialize("vv")
    'vv.View.Visible = False
 
Upvote 0
Top