Index: vhTest/Fake/TECH/XMLReader/FakeKortingReader.cls.xml
===================================================================
diff -u -r3723 -r3725
--- vhTest/Fake/TECH/XMLReader/FakeKortingReader.cls.xml	(.../FakeKortingReader.cls.xml)	(revision 3723)
+++ vhTest/Fake/TECH/XMLReader/FakeKortingReader.cls.xml	(.../FakeKortingReader.cls.xml)	(revision 3725)
@@ -34,6 +34,7 @@
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
+	Set ..CurrentNumberOfCustomers = 0
 	Set ..MaxNumberOfCustomers = 3
 	Quit $$$OK
 ]]></Implementation>
@@ -52,14 +53,15 @@
 <ReturnType>%Integer</ReturnType>
 <Implementation><![CDATA[
 
-  If ( ..CurrentNumberOfCustomers < ..MaxNumberOfCustomers ) {
+
+ If ( ..CurrentNumberOfCustomers < ..MaxNumberOfCustomers ) {
 	Set ..CurrentNumberOfCustomers = ..CurrentNumberOfCustomers +1 
 	#dim Customer As APPS.VKP.Korting.xml.Customer = ##class(vhTest.Utils.APPS.VKP.Korting.Customer).GeefCustomerDE()
  	Set sc=$$$OK
 	Set oref=Customer
- 	Quit 0
+ 	Quit 1
  } Else {
-	Quit 1 
+	Quit 0
 	}
 ]]></Implementation>
 </Method>