Index: APPS/VisiDot/impl/DetectionHelper.cls.xml
===================================================================
diff -u -r1839 -r1861
--- APPS/VisiDot/impl/DetectionHelper.cls.xml	(.../DetectionHelper.cls.xml)	(revision 1839)
+++ APPS/VisiDot/impl/DetectionHelper.cls.xml	(.../DetectionHelper.cls.xml)	(revision 1861)
@@ -39,21 +39,30 @@
 </Method>
 
 <Method name="ZetStatus">
-<FormalSpec>Kleur:APPS.VisiDot.enu.DetectionKleur,ToolTip:%String</FormalSpec>
+<FormalSpec>Kleur:APPS.VisiDot.enu.DetectionKleur,ToolTip:%String=""</FormalSpec>
 <Implementation><![CDATA[
 	Set ..Detection.Color=Kleur
-	Set ..Detection.ToolTip=$G(ToolTip)
+	If ToolTip '= "" {
+		Do ..ZetToolTip(ToolTip)
+	}
 ]]></Implementation>
 </Method>
 
 <Method name="ZetData">
 <FormalSpec>Sleutel:%String,Waarde:%String</FormalSpec>
 <Implementation><![CDATA[
-	Set:'$isObject(..Detection.ReadData) ..Detection.ReadData=##class(%ListOfObject).%New()
-	Do ##class(APPS.VisiDot.impl.Tech).AddSleutelWaarde(..Detection.ReadData,Sleutel,Waarde)
+	Set:'$isObject(..Detection.AssetData) ..Detection.AssetData=##class(%ListOfObject).%New()
+	Do ##class(APPS.VisiDot.impl.Tech).AddSleutelWaarde(..Detection.AssetData,Sleutel,Waarde)
 ]]></Implementation>
 </Method>
 
+<Method name="ZetToolTip">
+<FormalSpec>ToolTip:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[	Set ..Detection.ToolTip=ToolTip
+]]></Implementation>
+</Method>
+
 <Method name="Object2String">
 <Implementation><![CDATA[	Quit ..Detection.Id
 ]]></Implementation>