B4X:
Sub Process_Globals
Dim PE As PhoneEvents, tPhoneId As PhoneId
End Sub
Sub Service_Create
PE.InitializeWithPhoneState("PE",tPhoneId)
End Sub
Sub PE_PhoneStateChanged(State As String, IncomingNumber As String, Intent As Intent)
Log("PhoneStateChanged, State = " & State & ", IncomingNumber = " & IncomingNumber)
Log(Intent.ExtrasToString)
End Sub
PE_PhoneStateChanged never gets called.
Also, how would we get the caller ID data?