Index: APPS/VisiDot/impl/VHossCaptureHelper.cls.xml
===================================================================
diff -u -r1749 -r1754
--- APPS/VisiDot/impl/VHossCaptureHelper.cls.xml	(.../VHossCaptureHelper.cls.xml)	(revision 1749)
+++ APPS/VisiDot/impl/VHossCaptureHelper.cls.xml	(.../VHossCaptureHelper.cls.xml)	(revision 1754)
@@ -27,22 +27,45 @@
 <Implementation><![CDATA[
 	If ..IsFrameDetection(Detection) Quit ##class(VHossFrameDetectionHelper).%New(Detection,##this)
 	If ..IsLadeDetection(Detection) Quit ##class(VHossLadeDetectionHelper).%New(Detection,##this)
+	If ..IsSlotDetection(Detection) Quit ##class(VHossSlotDetectionHelper).%New(Detection,##this)
 	Quit ""
 ]]></Implementation>
 </Method>
 
 <Method name="IsLadeDetection">
 <FormalSpec>Detection:APPS.VisiDot.dto.Detection</FormalSpec>
-<Implementation><![CDATA[	Quit ..IsLadeID(Detection.Id)
+<Implementation><![CDATA[
+	Quit:Detection.Selected=##class(APPS.VisiDot.enu.DetectionTypes).Lade() 0
+	Quit ..IsLadeID(Detection.Id)
 ]]></Implementation>
 </Method>
 
 <Method name="IsFrameDetection">
 <FormalSpec>Detection:APPS.VisiDot.dto.Detection</FormalSpec>
-<Implementation><![CDATA[		Quit ..IsFrameID(Detection.Id)
+<Implementation><![CDATA[
+	Quit:Detection.Selected=##class(APPS.VisiDot.enu.DetectionTypes).Frame() 0
+	Quit ..IsFrameID(Detection.Id)
 ]]></Implementation>
 </Method>
 
+<Method name="IsDubbeleDetection">
+<FormalSpec>Detection:APPS.VisiDot.dto.Detection</FormalSpec>
+<Implementation><![CDATA[	Quit Detection.Selected=##class(APPS.VisiDot.enu.DetectionTypes).Dubbel()
+]]></Implementation>
+</Method>
+
+<Method name="IsLegeDetection">
+<FormalSpec>Detection:APPS.VisiDot.dto.Detection</FormalSpec>
+<Implementation><![CDATA[	Quit Detection.Selected=##class(APPS.VisiDot.enu.DetectionTypes).Leeg()
+]]></Implementation>
+</Method>
+
+<Method name="IsSlotDetection">
+<FormalSpec>Detection:APPS.VisiDot.dto.Detection</FormalSpec>
+<Implementation><![CDATA[	Quit ..IsLegeDetection(Detection)||..IsLadeDetection(Detection)
+]]></Implementation>
+</Method>
+
 <Method name="IsLadeID">
 <FormalSpec>ID</FormalSpec>
 <Implementation><![CDATA[	Quit ..ProductionHelper.IsLadeID(ID)
@@ -55,10 +78,44 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefSlotDetectionIterator">
+<ReturnType>APPS.VisiDot.impl.DetectionIterator</ReturnType>
+<Implementation><![CDATA[	Quit ##class(VHossSlotIterator).%New(..CaptureInfo, ##this)
+]]></Implementation>
+</Method>
+
 <Method name="GeefLadeDetectionIterator">
 <ReturnType>APPS.VisiDot.impl.DetectionIterator</ReturnType>
 <Implementation><![CDATA[	Quit ##class(VHossLadeIterator).%New(..CaptureInfo, ##this)
 ]]></Implementation>
 </Method>
+
+<Method name="GeefBatchID">
+<Implementation><![CDATA[
+	
+	Quit ..GeefDirectorSleutelWaarde("OrderID")
+]]></Implementation>
+</Method>
+
+<Method name="ZetBatchID">
+<FormalSpec>BatchID</FormalSpec>
+<Implementation><![CDATA[
+	
+	Do ..ZetDirectorSleutelWaarde("OrderID",BatchID)
+	Do ..ZetERPSleutelWaarde("BatchID",BatchID)
+]]></Implementation>
+</Method>
+
+<Method name="ZetVHossSequentie">
+<FormalSpec>VHossVolgNr,VHossZijkant</FormalSpec>
+<Implementation><![CDATA[	Do ..ZetERPSleutelWaarde("VHossSequentie",VHossVolgNr_"."_VHossZijkant)
+]]></Implementation>
+</Method>
+
+<Method name="ZetFrameID">
+<FormalSpec>FrameID</FormalSpec>
+<Implementation><![CDATA[	Do ..ZetERPSleutelWaarde("FrameID",FrameID)
+]]></Implementation>
+</Method>
 </Class>
 </Export>