From Main:
Sub DataAvailable (Service As String, Characteristics As Map)
pbReadData.Visible = False
clv.Add(CreateServiceItem(Service), 30dip, "")
For Each id As String In Characteristics.Keys
clv.Add(CreateCharacteristicItem(id, Characteristics.Get(id)), 40dip, "")
Next
End Sub
From Starter:
Sub Manager_DataAvailable (ServiceId As String, Characteristics As Map)
CallSub3(Main, "DataAvailable", ServiceId, Characteristics)
End Sub