iOS Question ios Push Notification use token

'Code module
Sub Process_Globals
    Private fm As FirebaseMessaging
    Private FirstTime As Boolean = True
    Private xui As XUI
End Sub

Public Sub SubscribeToTopics (topic As String)
    If FirstTime Then
        FirstTime = False
        fm.Initialize("fm")
        fm.FCMConnect
        Wait For fm_FCMConnected
        Log("FCMConnected")
    End If
    fm.SubscribeToTopic(topic)
    'get token and save
    Main.Mytoken = GetToken
    Log("GetToken: " & Main.Mytoken)
    Main.SQL1.ExecNonQuery("Update user set token='" & Main.Mytoken & "' WHERE seq=1")
End Sub

Public Sub GetToken As String
    Dim FIRMessaging As NativeObject
    FIRMessaging = FIRMessaging.Initialize("FIRMessaging").GetField("messaging")
    Dim token As NativeObject = FIRMessaging.GetField("FCMToken")
    If token.IsInitialized = False Then Return "" Else Return token.AsString
End Sub

Public Sub MessageReceivedWhileInTheForeground (Message As Map)
    Log($"Message arrived while app is in the foreground: ${Message}"$)
    Dim aps As Map = Message.Get("aps")
    Dim alert As Map = aps.Get("alert")
    Log(alert.Get("body"))
    Log(alert.Get("title"))
   xui.MsgboxAsync(alert.Get("body"),alert.Get("title"))
End Sub

Private Sub B4XPage_Created (Root1 As B4XView)
    Root = Root1
    Root.LoadLayout("MainPage")
    B4XPages.SetTitle(Me, "Main1")
   
    analytics.Initialize
    CallSubDelayed2(FirebaseMessaging, "SubscribeToTopics", "Mytopic")
    Main.App.RegisterUserNotifications(True, True, True)
    Main.App.RegisterForRemoteNotifications
   
End Sub