Index: WSimpl/Halux/AAP/DnaCodeService/AantalGescandeVhossSequentieItemsBepaler.cls.xml
===================================================================
diff -u -r60940 -r60941
--- WSimpl/Halux/AAP/DnaCodeService/AantalGescandeVhossSequentieItemsBepaler.cls.xml	(.../AantalGescandeVhossSequentieItemsBepaler.cls.xml)	(revision 60940)
+++ WSimpl/Halux/AAP/DnaCodeService/AantalGescandeVhossSequentieItemsBepaler.cls.xml	(.../AantalGescandeVhossSequentieItemsBepaler.cls.xml)	(revision 60941)
@@ -5,6 +5,8 @@
 
 <Method name="BepaalAantalGescandeVhossSequentieItems">
 <ReturnType>%Integer</ReturnType>
+<Implementation><![CDATA[	Quit 0
+]]></Implementation>
 </Method>
 </Class>
 
Index: vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/AantalGescandeVhossSequentieItemsBepaler/BepaalAantalGescandeVhossSequentieItems.cls.xml
===================================================================
diff -u -r60940 -r60941
--- vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/AantalGescandeVhossSequentieItemsBepaler/BepaalAantalGescandeVhossSequentieItems.cls.xml	(.../BepaalAantalGescandeVhossSequentieItems.cls.xml)	(revision 60940)
+++ vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/AantalGescandeVhossSequentieItemsBepaler/BepaalAantalGescandeVhossSequentieItems.cls.xml	(.../BepaalAantalGescandeVhossSequentieItems.cls.xml)	(revision 60941)
@@ -4,6 +4,11 @@
 <Super>vhUnitTest.TestCase</Super>
 
 <Method name="Test die nog niets doet">
+<Implementation><![CDATA[
+	Set Bepaler = ##class(WSimpl.Halux.AAP.DnaCodeService.AantalGescandeVhossSequentieItemsBepaler).%New()
+	#dim Aantal = Bepaler.BepaalAantalGescandeVhossSequentieItems()
+	Do $$$AssertEquals(Aantal,0)
+]]></Implementation>
 </Method>
 </Class>