Index: APPS/VisiDot/impl/DetectionHelper.cls.xml
===================================================================
diff -u -r1808 -r1839
--- APPS/VisiDot/impl/DetectionHelper.cls.xml	(.../DetectionHelper.cls.xml)	(revision 1808)
+++ APPS/VisiDot/impl/DetectionHelper.cls.xml	(.../DetectionHelper.cls.xml)	(revision 1839)
@@ -27,6 +27,7 @@
 </Method>
 
 <Method name="GeefID">
+<ReturnType>%Integer</ReturnType>
 <Implementation><![CDATA[	Quit ..Detection.Id
 ]]></Implementation>
 </Method>
@@ -38,20 +39,18 @@
 </Method>
 
 <Method name="ZetStatus">
-<FormalSpec>Kleur,ToolTip</FormalSpec>
+<FormalSpec>Kleur:APPS.VisiDot.enu.DetectionKleur,ToolTip:%String</FormalSpec>
 <Implementation><![CDATA[
-	;Write:Kleur'="GREEN" "!!!Detection Zetstatus ",..Detection.Id,":",Kleur," ",$G(ToolTip),!
-
 	Set ..Detection.Color=Kleur
 	Set ..Detection.ToolTip=$G(ToolTip)
 ]]></Implementation>
 </Method>
 
 <Method name="ZetData">
-<FormalSpec>Sleutel,Waarde</FormalSpec>
+<FormalSpec>Sleutel:%String,Waarde:%String</FormalSpec>
 <Implementation><![CDATA[
 	Set:'$isObject(..Detection.ReadData) ..Detection.ReadData=##class(%ListOfObject).%New()
-	Do ..CaptureHelper.AddSleutelWaarde(..Detection.ReadData,Sleutel,Waarde)
+	Do ##class(APPS.VisiDot.impl.Tech).AddSleutelWaarde(..Detection.ReadData,Sleutel,Waarde)
 ]]></Implementation>
 </Method>