Spanish Problemas Notificaciones push

Carlos marin

Active Member
Licensed User
Longtime User
hola a todos,
actualmente trabajo en una app para enviar notificaciones al usuario cuando reciba un paquete mi problema es que cuando el movil esta en reposo la push no suena, solo hasta que el usaurio abre su movil se da cuenta que tiene una notificacion, no se que estoy haciendo mal me guio de este tutorial https://www.b4x.com/android/forum/t...s-firebase-cloud-messaging-fcm.67716/#content

este es mi codigo donde recibo la push

B4X:
Sub fm_MessageArrived (Message As RemoteMessage)
    Dim status As Int = Message.GetData.Get("status")
'    Dim picture As Bitmap = LoadBitmapResize(File.DirAssets, "autorizacion.png", 24dip, 24dip, False)
    Log(Message.GetData)
    If B4XPages.IsInitialized And B4XPages.GetManager.IsForeground Then
        Log("B4XPages.IsInitialized")
        Select status
            Case 1, 3
'                Dim PageMain As B4XMain = B4XPages.GetPage("Main")
'                PageMain.load_apearPage(Message.GetData.Get("title"), Message.GetData.Get("body"), Message.GetData.Get("action"))
        End Select
    Else
        Log("manda push")
        Select status
            Case 1, 3
                Notification_WithCustomSound(Message.GetData.Get("title"), Message.GetData.Get("body"), Message.GetData.Get("action"))
        End Select
    End If
End Sub

funcion Notification_WithCustomSound
B4X:
Sub Notification_WithCustomSound(title As String, body As String, moduleName As String)
    Dim FileName As String = "ringtone1.mp3"
    File.Copy(File.DirAssets, FileName, Provider.SharedFolder, FileName)
    Dim in As Intent
    in.Initialize(in.ACTION_VIEW, "")
    Provider.SetFileUriAsIntentData(in, FileName)
    Dim n As NB6
    n.Initialize("custom sound", Application.LabelName, "HIGH")
    n.SmallIcon(LoadBitmapResize(File.DirAssets, "logo.png", 32dip, 32dip, True))
    
    n.SetDefaults(False, True, True)
    n.CustomSound(Provider.GetFileUri(FileName))
    
    Dim Notification As Notification = n.Build(title, body, moduleName , Main)
    Notification.Notify(3)
End Sub

smuchas gracias
 

josejad

Expert
Licensed User
Longtime User
Hola:

Y has visto que justo al inicio del post que indicas dice que hay un metodo más actualizado y que deberias cambiar el servicio por un receiver?

Este es el enlace que indica al inicio, más actualizado:

 

IdasI4A

Active Member
Licensed User
Longtime User
¿Como es la notificación que envías?. Para que aparezca una notificación cuando la app no esta en primer plano, me parece que la notificación tiene que tener un apartado 'notification' con los campos 'tittle' y 'body'
B4X:
        Dim iosalert As Map =  CreateMap("title": "Titulo", "body": "Texto")
        message.Put("notification", iosalert)
 
Top