Sub Manager_DataAvailable (ServiceId As String, Characteristics As Map)
Dim b() As Byte
If Characteristics.ContainsKey(flowuuid)Then 'seek value if flow
b=Characteristics.Get(flowuuid) 'get value from map
rxdata=(bc.HexFromBytes(b)) 'convert to a string and put in rxdata variable
Log ("rxdata "&rxdata)
End If
Log("DATA arrived")
End Sub