TECH.RegisteredObject,TECH.PubSub.EventSubscriptionCollector vhLib.Logger 1 SubscriptionCollector:TECH.PubSub.EventSubscriptionCollector 1 1 %Status 1 Event:TECH.PubSub.Event TECH.PubSub.EventSubscriptionList Event:TECH.PubSub.Event 1 %ResultSet %SQLQuery Event:TECH.PubSub.Event SELECT ID FROM TECH_PubSub.EventSubscription WHERE EventType = :Event.Type Event:TECH.PubSub.Event,Status:%String 1