Index: AXBizTalk/Customer.cls.xml
===================================================================
diff -u -r37842 -r37845
--- AXBizTalk/Customer.cls.xml	(.../Customer.cls.xml)	(revision 37842)
+++ AXBizTalk/Customer.cls.xml	(.../Customer.cls.xml)	(revision 37845)
@@ -95,18 +95,6 @@
 <Type>%String</Type>
 </Property>
 
-<Property name="AantalFacturen">
-<Type>%String</Type>
-</Property>
-
-<Property name="AantalFacturenVervallen">
-<Type>%String</Type>
-</Property>
-
-<Property name="PercentageVervallenFacturen">
-<Type>%String</Type>
-</Property>
-
 <Storage name="Default">
 <Type>%Library.CacheSerialState</Type>
 <State>CustomerState</State>
@@ -175,18 +163,6 @@
 <Value name="21">
 <Value>FacturatieFrequentie</Value>
 </Value>
-<Value name="22">
-<Value>AantalFacturen</Value>
-</Value>
-<Value name="23">
-<Value>AantalVervallenFacturen</Value>
-</Value>
-<Value name="24">
-<Value>PercentageVervallenFacturen</Value>
-</Value>
-<Value name="25">
-<Value>AantalFacturenVervallen</Value>
-</Value>
 </Data>
 </Storage>
 </Class>
Index: APPS/VKP/Betalingsgedrag/impl/OpbouwData.cls.xml
===================================================================
diff -u -r37841 -r37845
--- APPS/VKP/Betalingsgedrag/impl/OpbouwData.cls.xml	(.../OpbouwData.cls.xml)	(revision 37841)
+++ APPS/VKP/Betalingsgedrag/impl/OpbouwData.cls.xml	(.../OpbouwData.cls.xml)	(revision 37845)
@@ -8,7 +8,7 @@
 Code snippet :
    s blOpbouw=##class(APPS.VKP.Betalingsgedrag.impl.OpbouwData).%New(KLNr,FacturenVanafDatum)
 Na opbouw kan je de opbouwde structuur via SQL benaderen of via de voorgedefinieerde queries</Description>
-<Super>TECH.Mockable</Super>
+<Super>TECH.RegisteredObject</Super>
 
 <Property name="KLNr">
 <Type>%String</Type>
@@ -27,7 +27,7 @@
 <Method name="%OnNew">
 <Description>
 s x=##class(APPS.VKP.Betalingsgedrag.impl.OpbouwData).%New(1239,$H-1000,+$H)</Description>
-<FormalSpec>KLNr:%String,VanDatum:%Date,TotDatum:%Date,DelayedInit:%Boolean=0</FormalSpec>
+<FormalSpec>KLNr:%String,VanDatum:%Date,TotDatum:%Date</FormalSpec>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 		Set ..KLNr=KLNr
@@ -39,16 +39,11 @@
 			
 		}
 		Set ..TotDatum=$G(TotDatum)
-		Do:$$$Not(DelayedInit) ..Init()
+		Do ..OpbouwCache()
 		Quit $$$OK
 ]]></Implementation>
 </Method>
 
-<Method name="Init">
-<Implementation><![CDATA[	Do ..OpbouwCache()
-]]></Implementation>
-</Method>
-
 <Query name="qFacturen">
 <Type>%SQLQuery</Type>
 <FormalSpec>KLNr:%String</FormalSpec>
Index: AXimpl/BizTalkMessage/Converter/CustomerConverter.cls.xml
===================================================================
diff -u -r37842 -r37845
--- AXimpl/BizTalkMessage/Converter/CustomerConverter.cls.xml	(.../CustomerConverter.cls.xml)	(revision 37842)
+++ AXimpl/BizTalkMessage/Converter/CustomerConverter.cls.xml	(.../CustomerConverter.cls.xml)	(revision 37845)
@@ -33,25 +33,13 @@
 <Private>1</Private>
 </Property>
 
-<Property name="BetalingsgedragOpbouw">
-<Type>APPS.VKP.Betalingsgedrag.impl.OpbouwData</Type>
-<Private>1</Private>
-</Property>
-
-<Property name="BetalingsgedragBerekenaar">
-<Type>APPS.VKP.Betalingsgedrag.impl.Berekenaar</Type>
-<Private>1</Private>
-</Property>
-
 <Method name="%OnNew">
-<FormalSpec>PartijAPI:DOM.PARTIJ.PartijAPI,VerkoopAPI:DOM.VKP.VerkoopAPI,BetalingsgedragOpbouw:APPS.VKP.Betalingsgedrag.impl.OpbouwData,BetalingsgedragBerekenaar:APPS.VKP.Betalingsgedrag.impl.Berekenaar</FormalSpec>
+<FormalSpec>PartijAPI:DOM.PARTIJ.PartijAPI,VerkoopAPI:DOM.VKP.VerkoopAPI</FormalSpec>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 	Set ..PartijAPI = $$$Inject(PartijAPI,##class(DOM.DomeinContext).Instance().GeefPartijAPI())
 	Set ..VerkoopAPI = $$$Inject(VerkoopAPI,##class(DOM.DomeinContext).Instance().GeefVerkoopAPI())
 	Set ..Formatter = ##class(AX.common.impl.Formatter).%New()
-	Set ..BetalingsgedragOpbouw = BetalingsgedragOpbouw
-	Set ..BetalingsgedragBerekenaar = BetalingsgedragBerekenaar
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -70,7 +58,6 @@
 	Do ..ConvertAdminSegmentering()
 	Do ..ConvertPrijsInformatie()
 	Do ..ConvertFinancieleInformatie()
-	Do ..ConvertBetalingsgedragInformatie()
 	
 	Quit ..Customer
 ]]></Implementation>
@@ -180,21 +167,6 @@
 	Set ..Customer.FacturatieFrequentie = ..Klant.GeefFacturatieFrequentie()
 ]]></Implementation>
 </Method>
-
-<Method name="ConvertBetalingsgedragInformatie">
-<Private>1</Private>
-<Implementation><![CDATA[
-	Set ..BetalingsgedragOpbouw = $$$LazyLoad(..BetalingsgedragOpbouw,##class(APPS.VKP.Betalingsgedrag.impl.OpbouwData).%New(##class(AX.common.impl.ConvertAdminToAX).ConvertCustomerID(..Klant.GeefID()),$H-365,$H))
-	Set ..BetalingsgedragBerekenaar = $$$LazyLoad(..BetalingsgedragBerekenaar,##class(APPS.VKP.Betalingsgedrag.impl.Berekenaar).%New(##class(AX.common.impl.ConvertAdminToAX).ConvertCustomerID(..Klant.GeefID())))
-	Set ..Customer.AantalFacturen = ..BetalingsgedragBerekenaar.GeefAantalFacturen()
-	Set ..Customer.AantalFacturenVervallen = ..BetalingsgedragBerekenaar.GeefAantalVervallenFacturen()
-	If ..Customer.AantalFacturen = 0 {
-		Set ..Customer.PercentageVervallenFacturen = 0
-	} Else {
-		Set ..Customer.PercentageVervallenFacturen = ##class(TECH.Math).Round((..Customer.AantalFacturenVervallen / ..Customer.AantalFacturen)*100,2)
-	}
-]]></Implementation>
-</Method>
 </Class>
 
 
Index: vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml
===================================================================
diff -u -r37843 -r37845
--- vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml	(.../Test.cls.xml)	(revision 37843)
+++ vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml	(.../Test.cls.xml)	(revision 37845)
@@ -23,21 +23,6 @@
 <Private>1</Private>
 </Property>
 
-<Property name="BetalingsgedragBerekenaar">
-<Type>vhTest.Mock.APPS.VKP.Betalingsgedrag.impl.Berekenaar</Type>
-<Private>1</Private>
-</Property>
-
-<Property name="BetalingsgedragOpbouw">
-<Type>vhTest.Mock.APPS.VKP.Betalingsgedrag.impl.OpbouwData</Type>
-<Private>1</Private>
-</Property>
-
-<Property name="Converter">
-<Type>AXimpl.BizTalkMessage.Converter.CustomerConverter</Type>
-<Private>1</Private>
-</Property>
-
 <Method name="OnBeforeOneTest">
 <FormalSpec>aTestName:%String</FormalSpec>
 <Implementation><![CDATA[
@@ -64,28 +49,20 @@
 	Do ..Klant.IndienMethodCall("GeefFacturatieFrequentie").DanReturn("D2")
 	
 	Do ..Partij.IndienMethodCall("GeefActiefStatus").DanReturn("")
-	
-	Set ..BetalingsgedragOpbouw = ##class(vhTest.Mock.APPS.VKP.Betalingsgedrag.impl.OpbouwData).%New(##class(AX.common.impl.ConvertAdminToAX).ConvertCustomerID(..Klant.GeefID()),$H-1000,$H,1)
-	Do ..BetalingsgedragOpbouw.IndienMethodCall("OpbouwCache",).DanDoeNiks()
-	
-	Set ..BetalingsgedragBerekenaar = ##class(vhTest.Mock.APPS.VKP.Betalingsgedrag.impl.Berekenaar).%New(##class(AX.common.impl.ConvertAdminToAX).ConvertCustomerID(..Klant.GeefID()), 1)
-	Do ..BetalingsgedragBerekenaar.IndienMethodCall("BerekenMaximumOpenstaandeBedrag",$$$ElkeWaarde).DanDoeNiks()
-	Do ..BetalingsgedragBerekenaar.IndienMethodCall("GeefAantalFacturen").DanReturn(60)
-	Do ..BetalingsgedragBerekenaar.IndienMethodCall("GeefAantalVervallenFacturen").DanReturn(18)
-	
-	Set ..Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI, ..BetalingsgedragOpbouw, ..BetalingsgedragBerekenaar)
 ]]></Implementation>
 </Method>
 
 <Method name="Test: properties die 1 op 1 worden overgenomen (wel met een maxlen)">
 <Implementation><![CDATA[
 	Do ..Partij.IndienMethodCall("GeefToenaam").DanReturn("Een toenaam die zeker meer dan 50 karakters lang zou moeten zijn")
 	
+	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)	
+	
 	Do ..Partij.IndienMethodCall("GeefTelefax").DanReturn("eenFaxNummer")
 	Do ..Partij.IndienMethodCall("GeefVerkortNummer").DanReturn("7001")
 	Do ..Partij.IndienMethodCall("GeefEmail").DanReturn("info@example.com")
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = ..Converter.Convert(..Klant.GeefID())
+	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
 	
 	Do $$$AssertEquals(GeconverteerdeKlant.Klantnummer,"K||1234")
 	Do $$$AssertEquals(GeconverteerdeKlant.Naam,"DE NAAM")
@@ -106,10 +83,6 @@
 	Do $$$AssertEquals(GeconverteerdeKlant.Leveringsvoorwaarde,"30")
 	Do $$$AssertEquals(GeconverteerdeKlant.Kredietlimiet,"1000")
 	Do $$$AssertEquals(GeconverteerdeKlant.FacturatieFrequentie,"D2")
-	
-	Do $$$AssertEquals(GeconverteerdeKlant.AantalFacturen,"60")
-	Do $$$AssertEquals(GeconverteerdeKlant.AantalFacturenVervallen,"18")
-	Do $$$AssertEquals(GeconverteerdeKlant.PercentageVervallenFacturen,"30")
 ]]></Implementation>
 </Method>
 
@@ -118,8 +91,10 @@
 	Do ..Partij.IndienMethodCall("GeefTelefoon1").DanReturn("03/123489dnf9")
 	Do ..Partij.IndienMethodCall("GeefTelefoon2").DanReturn("123456")
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = ..Converter.Convert(..Klant.GeefID())
+	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
+	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	
 	Do $$$AssertEquals(GeconverteerdeKlant.Telefoon,"03/123489dnf9")
 ]]></Implementation>
 </Method>
@@ -129,16 +104,20 @@
 	Do ..Partij.IndienMethodCall("GeefTelefoon1").DanReturn("")
 	Do ..Partij.IndienMethodCall("GeefTelefoon2").DanReturn("03/987654")
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = ..Converter.Convert(..Klant.GeefID())
+	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
+	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	
 	Do $$$AssertEquals(GeconverteerdeKlant.Telefoon,"03/987654")
 ]]></Implementation>
 </Method>
 
 <Method name="Test: iedereen altijd als klant">
 <Implementation><![CDATA[
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = ..Converter.Convert(..Klant.GeefID())
+	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
+	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	
 	Do $$$AssertEquals(GeconverteerdeKlant.RelatieType,"3")
 ]]></Implementation>
 </Method>
@@ -147,8 +126,10 @@
 <Implementation><![CDATA[
 	Do ..Partij.IndienMethodCall("GeefActiefStatus").DanReturn("")
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = ..Converter.Convert(..Klant.GeefID())
+	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
+	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	
 	Do $$$AssertEquals(GeconverteerdeKlant.Status,"1")
 ]]></Implementation>
 </Method>
@@ -157,8 +138,10 @@
 <Implementation><![CDATA[
 	Do ..Partij.IndienMethodCall("GeefActiefStatus").DanReturn("1")
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = ..Converter.Convert(..Klant.GeefID())
+	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
+	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	
 	Do $$$AssertEquals(GeconverteerdeKlant.Status,"0")
 ]]></Implementation>
 </Method>
@@ -167,8 +150,10 @@
 <Implementation><![CDATA[
 	Do ..Partij.IndienMethodCall("GeefActiefStatus").DanReturn("1")
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = ..Converter.Convert(..Klant.GeefID())
+	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
+	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	
 	Do $$$AssertEquals(GeconverteerdeKlant.Status,"0")
 ]]></Implementation>
 </Method>
@@ -177,8 +162,10 @@
 <Implementation><![CDATA[
 	Do ..Klant.IndienMethodCall("GeefActiviteit").DanReturn("Architect")
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = ..Converter.Convert(..Klant.GeefID())
+	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
+	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	
 	Do $$$AssertEquals(GeconverteerdeKlant.Activiteit,"969950000")
 ]]></Implementation>
 </Method>
@@ -187,8 +174,10 @@
 <Implementation><![CDATA[
 	Do ..Klant.IndienMethodCall("GeefActiviteit").DanReturn($$$DummyString)
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = ..Converter.Convert(..Klant.GeefID())
+	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
+	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	
 	Do $$$AssertEquals(GeconverteerdeKlant.Activiteit,"969950021")
 ]]></Implementation>
 </Method>
@@ -197,8 +186,10 @@
 <Implementation><![CDATA[
 	Do ..Klant.IndienMethodCall("GeefActiviteit").DanReturn("")
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = ..Converter.Convert(..Klant.GeefID())
+	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
+	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	
 	Do $$$AssertEquals(GeconverteerdeKlant.Activiteit,"969950021")
 ]]></Implementation>
 </Method>
@@ -207,8 +198,10 @@
 <Implementation><![CDATA[
 	Do ..Klant.IndienMethodCall("GeefKwantitatief").DanReturn("")
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = ..Converter.Convert(..Klant.GeefID())
+	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
+	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	
 	Do $$$AssertEquals(GeconverteerdeKlant.Kwantitatief,"969950014")
 ]]></Implementation>
 </Method>
@@ -217,8 +210,10 @@
 <Implementation><![CDATA[
 	Do ..Klant.IndienMethodCall("GeefKwantitatief").DanReturn($$$DummyString)
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = ..Converter.Convert(..Klant.GeefID())
+	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
+	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	
 	Do $$$AssertEquals(GeconverteerdeKlant.Kwantitatief,"969950014")
 ]]></Implementation>
 </Method>
@@ -227,8 +222,10 @@
 <Implementation><![CDATA[
 	Do ..Klant.IndienMethodCall("GeefKwantitatief").DanReturn("AR/BP A")
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = ..Converter.Convert(..Klant.GeefID())
+	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
+	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	
 	Do $$$AssertEquals(GeconverteerdeKlant.Kwantitatief,"969950008")
 ]]></Implementation>
 </Method>
@@ -237,8 +234,10 @@
 <Implementation><![CDATA[
 	Do ..Klant.IndienMethodCall("GeefKwaliteit").DanReturn("2")
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = ..Converter.Convert(..Klant.GeefID())
+	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
+	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	
 	Do $$$AssertEquals(GeconverteerdeKlant.Kwaliteit,"969950001")
 ]]></Implementation>
 </Method>
@@ -247,24 +246,13 @@
 <Implementation><![CDATA[
 	Do ..Klant.IndienMethodCall("GeefKwaliteit").DanReturn("")
 	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = ..Converter.Convert(..Klant.GeefID())
+	Set Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI)
 	
+	#dim GeconverteerdeKlant As AXBizTalk.Customer = Converter.Convert(..Klant.GeefID())
+	
 	Do $$$AssertEquals(GeconverteerdeKlant.Kwaliteit,"")
 ]]></Implementation>
 </Method>
-
-<Method name="Test: 0 facturen">
-<Implementation><![CDATA[
-	Do ..BetalingsgedragBerekenaar.IndienMethodCall("GeefAantalFacturen").DanReturn(0)
-	
-	Set ..Converter = ##class(AXimpl.BizTalkMessage.Converter.CustomerConverter).%New(..PartijAPI, ..VerkoopAPI, ..BetalingsgedragOpbouw, ..BetalingsgedragBerekenaar)
-	
-	#dim GeconverteerdeKlant As AXBizTalk.Customer = ..Converter.Convert(..Klant.GeefID())
-	
-	Do $$$AssertEquals(GeconverteerdeKlant.AantalFacturen,0)
-	Do $$$AssertEquals(GeconverteerdeKlant.PercentageVervallenFacturen,0)
-]]></Implementation>
-</Method>
 </Class>
 
 
Index: APPS/VKP/Betalingsgedrag/impl/Berekenaar.cls.xml
===================================================================
diff -u -r37841 -r37845
--- APPS/VKP/Betalingsgedrag/impl/Berekenaar.cls.xml	(.../Berekenaar.cls.xml)	(revision 37841)
+++ APPS/VKP/Betalingsgedrag/impl/Berekenaar.cls.xml	(.../Berekenaar.cls.xml)	(revision 37845)
@@ -10,7 +10,7 @@
   s blBerekenaar=##class(APPS.VKP.Betalingsgedrag.impl.Berekenaar).%New(KLNr)
   w ..blBerekenaar.MaxOpenstaandBedrag
   w ..blBerekenaar.GemiddeldeBetaalTermijn</Description>
-<Super>TECH.Mockable</Super>
+<Super>TECH.RegisteredObject</Super>
 
 <Property name="KLNr">
 <Type>%String</Type>
@@ -94,21 +94,15 @@
 <Method name="%OnNew">
 <Description>
 s x=##class(APPS.VKP.Betalingsgedrag.impl.Berekenaar).%New(1239) s rs=x.GeefResultSet()</Description>
-<FormalSpec>KLNr:%String,DelayedInit:%Boolean=0</FormalSpec>
+<FormalSpec>KLNr:%String</FormalSpec>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 		Set ..KLNr=KLNr
-		Do:$$$Not(DelayedInit) ..Init()
-		Quit $$$OK
-]]></Implementation>
-</Method>
-
-<Method name="Init">
-<Implementation><![CDATA[
 		Set ..VervalVglDatum=+$H
 		Do ..BerekenMaximumOpenstaandeBedrag()
 		Do ..BerekenBetalingsTermijn()
 		do ..Dump()
+		Quit $$$OK
 ]]></Implementation>
 </Method>
 
@@ -267,18 +261,6 @@
 	}
 ]]></Implementation>
 </Method>
-
-<Method name="GeefAantalFacturen">
-<ReturnType>%Integer</ReturnType>
-<Implementation><![CDATA[	Quit ..AantalFacturen
-]]></Implementation>
-</Method>
-
-<Method name="GeefAantalVervallenFacturen">
-<ReturnType>%Integer</ReturnType>
-<Implementation><![CDATA[	Quit ..AantalVervallenFacturen
-]]></Implementation>
-</Method>
 </Class>
 
 
FishEye: Tag 37845 refers to a dead (removed) revision in file `vhTest/Mock/APPS/VKP/Betalingsgedrag/impl/OpbouwData.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
FishEye: Tag 37845 refers to a dead (removed) revision in file `vhTest/Mock/APPS/VKP/Betalingsgedrag/impl/Berekenaar.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
FishEye: Tag 37845 refers to a dead (removed) revision in file `vhTest/Fake/APPS/VKP/Betalingsgedrag/impl/Berekenaar.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?