Index: vhUnitTest/DOM/BKH/impl/OpenstaandeVerkoopFactuurRepository/Test.cls.xml
===================================================================
diff -u -r34802 -r34809
--- vhUnitTest/DOM/BKH/impl/OpenstaandeVerkoopFactuurRepository/Test.cls.xml	(.../Test.cls.xml)	(revision 34802)
+++ vhUnitTest/DOM/BKH/impl/OpenstaandeVerkoopFactuurRepository/Test.cls.xml	(.../Test.cls.xml)	(revision 34809)
@@ -13,6 +13,27 @@
 <Private>1</Private>
 </Property>
 
+<Method name="OnBeforeOneTest">
+<Implementation><![CDATA[
+	Set ..Consument = ##class(vhTest.Data.DOM.VKP.VanHoeckeKlant).MaakBelgischeConsument()
+	
+	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)="Deze wil niet te zien krijgen, nummer te lang"
+	
+	Set ..OpenstaandeVerkoopFactuurRepository = ##class(DOM.BKH.impl.OpenstaandeVerkoopFactuurRepository).%New()
+]]></Implementation>
+</Method>
+
+<Method name="OnAfterAllTests">
+<Implementation><![CDATA[
+	 Do ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().VerwijderKlant(..Consument.GeefID())
+	 Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="Test: Openen van bestaande OpenstaandeVerkoopFactuur">
 <Implementation><![CDATA[
 	#dim OpenstaandeVerkoopFactuur As DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur
@@ -83,27 +104,6 @@
 	Do $$$AssertEquals(Code,"C","")
 ]]></Implementation>
 </Method>
-
-<Method name="OnBeforeOneTest">
-<Implementation><![CDATA[
-	Set ..Consument = ##class(vhTest.Data.DOM.VKP.VanHoeckeKlant).MaakBelgischeConsument()
-	
-	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)="Deze wil niet te zien krijgen, nummer te lang"
-	
-	Set ..OpenstaandeVerkoopFactuurRepository = ##class(DOM.BKH.impl.OpenstaandeVerkoopFactuurRepository).%New()
-]]></Implementation>
-</Method>
-
-<Method name="OnAfterAllTests">
-<Implementation><![CDATA[
-	 Do ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().VerwijderKlant(..Consument.GeefID())
-	 Quit $$$OK
-]]></Implementation>
-</Method>
 </Class>
 
 
Index: vhTest/Fake/DOM/BKH/impl/DataM/OpenstaandeVerkoopFactuur.cls.xml
===================================================================
diff -u -r34803 -r34809
--- vhTest/Fake/DOM/BKH/impl/DataM/OpenstaandeVerkoopFactuur.cls.xml	(.../OpenstaandeVerkoopFactuur.cls.xml)	(revision 34803)
+++ vhTest/Fake/DOM/BKH/impl/DataM/OpenstaandeVerkoopFactuur.cls.xml	(.../OpenstaandeVerkoopFactuur.cls.xml)	(revision 34809)
@@ -19,6 +19,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="InitNode">
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
 <Method name="GeefFactuurDatum">
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	Quit "01/06/2016"
Index: DOM/BKH/impl/DataM/OpenstaandeVerkoopFactuur.cls.xml
===================================================================
diff -u -r34802 -r34809
--- DOM/BKH/impl/DataM/OpenstaandeVerkoopFactuur.cls.xml	(.../OpenstaandeVerkoopFactuur.cls.xml)	(revision 34802)
+++ DOM/BKH/impl/DataM/OpenstaandeVerkoopFactuur.cls.xml	(.../OpenstaandeVerkoopFactuur.cls.xml)	(revision 34809)
@@ -1,204 +1,31 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur">
-<Super>TECH.RegisteredObject,TECH.Mockable</Super>
+<Super>TECH.Mockable,DOM.BKH.impl.DataM.OpenstaandeFactuur</Super>
 
-<Property name="KlantId">
+<Parameter name="Global">
 <Type>%String</Type>
-<Private>1</Private>
-</Property>
+<Default>^KKL</Default>
+</Parameter>
 
-<Property name="FactuurID">
-<Type>%String</Type>
-<Private>1</Private>
-</Property>
-
-<Property name="Node">
-<Type>TECH.Persistentie.GlobalNode</Type>
-<Private>1</Private>
-</Property>
-
-<Method name="%OnNew">
-<FormalSpec>KlantID:%String,FactuurID:%String</FormalSpec>
+<Method name="InitNode">
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 	#dim Status As %Status = $$$OK
+
+	#dim Klant As DOM.VKP.impl.DataM.DataMKlantNative = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(..PartijID)
 	
-	Set ..KlantId = KlantID
-	Set ..FactuurID = FactuurID
-	
-	#dim Klant As DOM.VKP.impl.DataM.DataMKlantNative = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(KlantID)
 	#dim GlobalPersistenceMgr = ##class(TECH.Persistentie.GlobalPersistenceMgr).Instance()
-		
-	If $Length(..KlantId) && $Length(..FactuurID) && $Data(@("^KKL("""_Klant.GeefKlantIndexKKL()_""","_..FactuurID_")")) {
-		Set ..Node = GlobalPersistenceMgr.GeefNode("^KKL",Klant.GeefKlantIndexKKL(),..FactuurID)
+	
+	If $Length(..PartijID) && $Length(..FactuurID) && $Data(@(..#Global_"("""_Klant.GeefKlantIndexKKL()_""","_..FactuurID_")")) {
+		Set ..Node = GlobalPersistenceMgr.GeefNode(..#Global,Klant.GeefKlantIndexKKL(),..FactuurID)
 	} Else {
 		set Status = $$$ERROR($$$GeneralError,..GeefFoutMelding())
 	}
 	
 	Quit Status
 ]]></Implementation>
 </Method>
-
-<Method name="GeefFoutMelding">
-<Private>1</Private>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit "Deze openstaande factuur bestaat niet"
-]]></Implementation>
-</Method>
-
-<Method name="GeefFactuurID">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ..FactuurID
-]]></Implementation>
-</Method>
-
-<Method name="GeefCode">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ..Node.GeefPiece(1)
-]]></Implementation>
-</Method>
-
-<Method name="ZetCode">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Do ..Node.ZetPiece(1,Value)
-]]></Implementation>
-</Method>
-
-<Method name="GeefFactuurDatum">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ..Node.GeefPiece(2)
-]]></Implementation>
-</Method>
-
-<Method name="ZetFactuurDatum">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Do ..Node.ZetPiece(2,Value)
-]]></Implementation>
-</Method>
-
-<Method name="GeefVervalDatum">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ..Node.GeefPiece(3)
-]]></Implementation>
-</Method>
-
-<Method name="ZetVervalDatum">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Do ..Node.ZetPiece(3,Value)
-]]></Implementation>
-</Method>
-
-<Method name="GeefTotaalBedragInMuntKlant">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ..Node.GeefPiece(4)
-]]></Implementation>
-</Method>
-
-<Method name="ZetTotaalBedragInMuntKlant">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Do ..Node.ZetPiece(4,Value)
-]]></Implementation>
-</Method>
-
-<Method name="GeefNogTeBetalenInMuntKlant">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ..Node.GeefPiece(5)
-]]></Implementation>
-</Method>
-
-<Method name="ZetNogTeBetalenInMuntKlant">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Do ..Node.ZetPiece(5,Value)
-]]></Implementation>
-</Method>
-
-<Method name="GeefKortingKontantInMuntKlant">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ..Node.GeefPiece(6)
-]]></Implementation>
-</Method>
-
-<Method name="ZetKortingKontantInMuntKlant">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Do ..Node.ZetPiece(6,Value)
-]]></Implementation>
-</Method>
-
-<Method name="GeefOmschrijving">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ..Node.GeefPiece(7)
-]]></Implementation>
-</Method>
-
-<Method name="ZetOmschrijving">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Do ..Node.ZetPiece(7,Value)
-]]></Implementation>
-</Method>
-
-<Method name="GeefAantalHerinneringen">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ..Node.GeefPiece(8)
-]]></Implementation>
-</Method>
-
-<Method name="ZetAantalHerinneringen">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Do ..Node.ZetPiece(8,Value)
-]]></Implementation>
-</Method>
-
-<Method name="GeefMunt">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ..Node.GeefPiece(9)
-]]></Implementation>
-</Method>
-
-<Method name="ZetMunt">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Do ..Node.ZetPiece(9,Value)
-]]></Implementation>
-</Method>
-
-<Method name="GeefNogTeBetalenInEUR">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ..Node.GeefPiece(10)
-]]></Implementation>
-</Method>
-
-<Method name="ZetNogTeBetalenInEUR">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Do ..Node.ZetPiece(10,Value)
-]]></Implementation>
-</Method>
-
-<Method name="Save">
-<Implementation><![CDATA[ 	Do ..Node.Save()
-]]></Implementation>
-</Method>
-
-<Method name="GeefVersieNummer">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ..Node.GeefPiece(25)
-]]></Implementation>
-</Method>
-
-<Method name="ZetVersieNummer">
-<FormalSpec>Value:%String</FormalSpec>
-<Implementation><![CDATA[	Do ..Node.ZetPiece(25,Value)
-]]></Implementation>
-</Method>
 </Class>
 
 
Index: vhTest/Mock/DOM/BKH/impl/DataM/OpenstaandeVerkoopFactuur.cls.xml
===================================================================
diff -u -r34803 -r34809
--- vhTest/Mock/DOM/BKH/impl/DataM/OpenstaandeVerkoopFactuur.cls.xml	(.../OpenstaandeVerkoopFactuur.cls.xml)	(revision 34803)
+++ vhTest/Mock/DOM/BKH/impl/DataM/OpenstaandeVerkoopFactuur.cls.xml	(.../OpenstaandeVerkoopFactuur.cls.xml)	(revision 34809)
@@ -9,158 +9,11 @@
 <Super>DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur,Tools.Mock.MockClassBase</Super>
 <Inheritance>right</Inheritance>
 
-<Method name="GeefAantalHerinneringen">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefAantalHerinneringen")
+<Method name="InitNode">
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("InitNode")
 ]]></Implementation>
 </Method>
-
-<Method name="GeefCode">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefCode")
-]]></Implementation>
-</Method>
-
-<Method name="GeefFactuurDatum">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefFactuurDatum")
-]]></Implementation>
-</Method>
-
-<Method name="GeefFactuurID">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefFactuurID")
-]]></Implementation>
-</Method>
-
-<Method name="GeefKortingKontantInMuntKlant">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefKortingKontantInMuntKlant")
-]]></Implementation>
-</Method>
-
-<Method name="GeefMunt">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefMunt")
-]]></Implementation>
-</Method>
-
-<Method name="GeefNogTeBetalenInEUR">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefNogTeBetalenInEUR")
-]]></Implementation>
-</Method>
-
-<Method name="GeefNogTeBetalenInMuntKlant">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefNogTeBetalenInMuntKlant")
-]]></Implementation>
-</Method>
-
-<Method name="GeefOmschrijving">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefOmschrijving")
-]]></Implementation>
-</Method>
-
-<Method name="GeefTotaalBedragInMuntKlant">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefTotaalBedragInMuntKlant")
-]]></Implementation>
-</Method>
-
-<Method name="GeefVersieNummer">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefVersieNummer")
-]]></Implementation>
-</Method>
-
-<Method name="GeefVervalDatum">
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefVervalDatum")
-]]></Implementation>
-</Method>
-
-<Method name="Save">
-<Implementation><![CDATA[	do ..VerwerkMethodCall("Save")
-]]></Implementation>
-</Method>
-
-<Method name="ZetAantalHerinneringen">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("ZetAantalHerinneringen",Value)
-]]></Implementation>
-</Method>
-
-<Method name="ZetCode">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("ZetCode",Value)
-]]></Implementation>
-</Method>
-
-<Method name="ZetFactuurDatum">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("ZetFactuurDatum",Value)
-]]></Implementation>
-</Method>
-
-<Method name="ZetKortingKontantInMuntKlant">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("ZetKortingKontantInMuntKlant",Value)
-]]></Implementation>
-</Method>
-
-<Method name="ZetMunt">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("ZetMunt",Value)
-]]></Implementation>
-</Method>
-
-<Method name="ZetNogTeBetalenInEUR">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("ZetNogTeBetalenInEUR",Value)
-]]></Implementation>
-</Method>
-
-<Method name="ZetNogTeBetalenInMuntKlant">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("ZetNogTeBetalenInMuntKlant",Value)
-]]></Implementation>
-</Method>
-
-<Method name="ZetOmschrijving">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("ZetOmschrijving",Value)
-]]></Implementation>
-</Method>
-
-<Method name="ZetTotaalBedragInMuntKlant">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("ZetTotaalBedragInMuntKlant",Value)
-]]></Implementation>
-</Method>
-
-<Method name="ZetVersieNummer">
-<FormalSpec>Value:%String</FormalSpec>
-<Implementation><![CDATA[	do ..VerwerkMethodCall("ZetVersieNummer",Value)
-]]></Implementation>
-</Method>
-
-<Method name="ZetVervalDatum">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("ZetVervalDatum",Value)
-]]></Implementation>
-</Method>
 </Class>
 
 
FishEye: Tag 34802 refers to a dead (removed) revision in file `DOM/BKH/impl/DataM/OpenstaandeFactuur.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?