Index: vhUnitTest/DOM/BKH/impl/OpenstaandeVerkoopFactuurRepository/Test.cls.xml
===================================================================
diff -u -r34718 -r34720
--- vhUnitTest/DOM/BKH/impl/OpenstaandeVerkoopFactuurRepository/Test.cls.xml	(.../Test.cls.xml)	(revision 34718)
+++ vhUnitTest/DOM/BKH/impl/OpenstaandeVerkoopFactuurRepository/Test.cls.xml	(.../Test.cls.xml)	(revision 34720)
@@ -21,7 +21,7 @@
 <Method name="Test: Openen van bestaande OpenstaandeVerkoopFactuur">
 <Implementation><![CDATA[
 	#dim OpenstaandeVerkoopFactuur As DOM.BKH.impl.DataM.OpenstaandeFactuur
-	Set OpenstaandeVerkoopFactuur = ..OpenstaandeVerkoopFactuurRepository.OpenViaKlantIDEnFactuurID(..Consument.GeefID(),12345)
+	Set OpenstaandeVerkoopFactuur = ..OpenstaandeVerkoopFactuurRepository.OpenViaKlantIDEnFactuurID(..Consument.GeefID(),123455)
 		
 	Do $$$AssertTrue($IsObject(OpenstaandeVerkoopFactuur))
 	Do $$$AssertEquals(OpenstaandeVerkoopFactuur.GeefVervalDatum(),"21.05.16","")
@@ -64,7 +64,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: z Delete alle facturen via klantid">
+<Method name="Test: Delete alle facturen via klantid">
 <Implementation><![CDATA[
 	Do ..OpenstaandeVerkoopFactuurRepository.VerwijderViaKlantID(..Consument.GeefID())
 	
@@ -75,15 +75,17 @@
 ]]></Implementation>
 </Method>
 
-<Method name="OnBeforeAllTests">
+<Method name="OnBeforeOneTest">
 <Implementation><![CDATA[
 	Set ..Consument = ##class(vhTest.Data.DOM.VKP.VanHoeckeKlant).MaakBelgischeConsument()
 	
-	Set ^KKL(..Consument.GeefKlantIndexKKL(),999)="C\21.04.16\21.05.16\151.53\151.53\0\\\EUR\50\\\\\\\F\\"
-	Set ^KKL(..Consument.GeefKlantIndexKKL(),12345)="F\21.04.16\21.05.16\151.53\151.53\0\\\EUR\100\\\\\\\F\\"
-	Set ^KKL(..Consument.GeefKlantIndexKKL(),12345.3)="F\21.04.16\21.05.16\151.53\151.53\0\\\EUR\150\\\\\\\F\\"
+	Set ^KKL(..Consument.GeefKlantIndexKKL(),999)="Deze wil niet te zien krijgen, nummer te kort"
+	Set ^KKL(..Consument.GeefKlantIndexKKL(),123455)="F\21.04.16\21.05.16\151.53\151.53\0\\\EUR\100\\\\\\\F\\"
+	Set ^KKL(..Consument.GeefKlantIndexKKL(),12345.3)="Deze wil niet te zien krijgen, nummer bevat puntje"
 	Set ^KKL(..Consument.GeefKlantIndexKKL(),123456)="F\25.04.16\25.05.16\599.81\599.81\0\\\EUR\200\\\\\\\F\\"
-	Set ^KKL(..Consument.GeefKlantIndexKKL(),1234567)="F\25.04.16\25.05.16\599.81\599.81\0\\\EUR\250\\\\\\\F\\"
+	Set ^KKL(..Consument.GeefKlantIndexKKL(),1234567)="Deze wil niet te zien krijgen, nummer te lang"
+	
+	Set ..OpenstaandeVerkoopFactuurRepository = ##class(DOM.BKH.impl.OpenstaandeVerkoopFactuurRepository).%New()
 ]]></Implementation>
 </Method>
 
@@ -93,12 +95,6 @@
 	 Quit $$$OK
 ]]></Implementation>
 </Method>
-
-<Method name="OnBeforeOneTest">
-<FormalSpec>aTestName:%String</FormalSpec>
-<Implementation><![CDATA[	Set ..OpenstaandeVerkoopFactuurRepository = ##class(DOM.BKH.impl.OpenstaandeVerkoopFactuurRepository).%New()
-]]></Implementation>
-</Method>
 </Class>