Index: vhUnitTest/APPS/EDIExport/FactuurVerzender/Impl/Kvik/StartVerwerking/Test.cls.xml
===================================================================
diff -u -r32242 -r32249
--- vhUnitTest/APPS/EDIExport/FactuurVerzender/Impl/Kvik/StartVerwerking/Test.cls.xml	(.../Test.cls.xml)	(revision 32242)
+++ vhUnitTest/APPS/EDIExport/FactuurVerzender/Impl/Kvik/StartVerwerking/Test.cls.xml	(.../Test.cls.xml)	(revision 32249)
@@ -6,42 +6,36 @@
 <Method name="Test: Test een onbestaande factuur wordt niet verwerkt">
 <Implementation><![CDATA[
 	#dim FactuurID As %Integer = 0000000
-	set EventData = ##class(DOM.VKP.event.VerkoopfactuurEventData).%New(FactuurID)
-	set Event = ##class(DOM.VKP.event.VerkoopfactuurGemaaktEvent).%New(EventData)
-
-	set VerzenderSpy = ##class(vhUnitTest.APPS.EDIExport.FactuurVerzender.impl.Kvik.StartVerwerking.VerzenderSpy).%New() 
-	do $$$AssertTrue(##class(TECH.ClassUtils).ClassDerivesFrom($classname(VerzenderSpy),"APPS.EDIExport.FactuurVerzender.Impl.Kvik.Verzender"))
-	do VerzenderSpy.StartVerwerking(Event)
-	
-	do $$$AssertFalse(VerzenderSpy.IsVerwerkingGestart(FactuurID))
+	do $$$AssertFalse(..StartVerwerking(FactuurID))
 ]]></Implementation>
 </Method>
 
 <Method name="Test: Test een niet kvik factuur wordt niet verwerkt">
 <Implementation><![CDATA[
 	#dim FactuurID As %Integer = 564429
-	set EventData = ##class(DOM.VKP.event.VerkoopfactuurEventData).%New(FactuurID)
-	set Event = ##class(DOM.VKP.event.VerkoopfactuurGemaaktEvent).%New(EventData)
-
-	set VerzenderSpy = ##class(vhUnitTest.APPS.EDIExport.FactuurVerzender.impl.Kvik.StartVerwerking.VerzenderSpy).%New() 
-	do $$$AssertTrue(##class(TECH.ClassUtils).ClassDerivesFrom($classname(VerzenderSpy),"APPS.EDIExport.FactuurVerzender.Impl.Kvik.Verzender"))
-	do VerzenderSpy.StartVerwerking(Event)
-	
-	do $$$AssertFalse(VerzenderSpy.IsVerwerkingGestart(FactuurID))
+	do $$$AssertFalse(..StartVerwerking(FactuurID))
 ]]></Implementation>
 </Method>
 
 <Method name="Test: Test een kvik factuur wordt verwerkt">
 <Implementation><![CDATA[
 	#dim FactuurID As %Integer = 565833
+	do $$$AssertTrue(..StartVerwerking(FactuurID))
+]]></Implementation>
+</Method>
+
+<Method name="StartVerwerking">
+<FormalSpec>FactuurID:%Integer</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
 	set EventData = ##class(DOM.VKP.event.VerkoopfactuurEventData).%New(FactuurID)
 	set Event = ##class(DOM.VKP.event.VerkoopfactuurGemaaktEvent).%New(EventData)
 
 	set VerzenderSpy = ##class(vhUnitTest.APPS.EDIExport.FactuurVerzender.impl.Kvik.StartVerwerking.VerzenderSpy).%New() 
 	do $$$AssertTrue(##class(TECH.ClassUtils).ClassDerivesFrom($classname(VerzenderSpy),"APPS.EDIExport.FactuurVerzender.Impl.Kvik.Verzender"))
 	do VerzenderSpy.StartVerwerking(Event)
-	
-	do $$$AssertTrue(VerzenderSpy.IsVerwerkingGestart(FactuurID))
+	quit VerzenderSpy.IsVerwerkingGestart(FactuurID)
 ]]></Implementation>
 </Method>
 </Class>