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
	
	
	
	
	
	
	
		
			
			
			
			
			
		
	
	
	
		
	
	
		
	
funcion Notification_WithCustomSound
	
	
	
	
	
	
	
		
			
			
			
			
			
		
	
	
	
		
	
	
		
	
smuchas gracias
			
			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 Subfuncion 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 Subsmuchas gracias
 
				 
 
		 
 
		 
						
					 
 
		 
 
		 
 
		