Index: DOM/BKH/impl/OpenstaandeVerkoopFactuurRepository.cls.xml
===================================================================
diff -u -r34802 -r34825
--- DOM/BKH/impl/OpenstaandeVerkoopFactuurRepository.cls.xml	(.../OpenstaandeVerkoopFactuurRepository.cls.xml)	(revision 34802)
+++ DOM/BKH/impl/OpenstaandeVerkoopFactuurRepository.cls.xml	(.../OpenstaandeVerkoopFactuurRepository.cls.xml)	(revision 34825)
@@ -3,21 +3,34 @@
 <Class name="DOM.BKH.impl.OpenstaandeVerkoopFactuurRepository">
 <Super>TECH.Mockable</Super>
 
-<Method name="OpenViaKlantIDEnFactuurID">
+<Method name="GeefViaKlantIDEnFactuurID">
 <FormalSpec>KlantID:%String,FactuurID:%String</FormalSpec>
 <ReturnType>DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur</ReturnType>
-<Implementation><![CDATA[	Quit ##class(DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur).%New(KlantID,FactuurID)
+<Implementation><![CDATA[
+	if $$$Not(..BestaatViaKlantIDEnFactuurID(KlantID,FactuurID)) {
+		do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.DataNotFoundException).%New("Geef openstaande factuur gevonden voor klant '"_KlantID_"' en factuur '"_FactuurID_"'"))
+}
+	Quit ##class(DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur).%New(KlantID,FactuurID)
 ]]></Implementation>
 </Method>
 
+<Method name="BestaatViaKlantIDEnFactuurID">
+<FormalSpec>KlantID:%String,FactuurID:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	Set Klant = ##class(DOM.VKP.impl.DataM.DataMKlant).%New($Extract(KlantID,4,*))
+	quit $data(^KKL(Klant.GeefKlantIndexKKL(),FactuurID))
+]]></Implementation>
+</Method>
+
 <Method name="MaakViaKlantIDEnFactuurID">
 <FormalSpec>KlantID:%String,FactuurID:%String</FormalSpec>
 <ReturnType>DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur</ReturnType>
 <Implementation><![CDATA[
 	Set Klant = ##class(DOM.VKP.impl.DataM.DataMKlant).%New($Extract(KlantID,4,*))
-	Set ^KKL(Klant.GeefKlantIndexKKL(),FactuurID)=""
-	
-	Quit ##class(DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur).%New(KlantID,FactuurID)
+	set Factuur = ##class(DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur).%New(KlantID,FactuurID)
+	do Factuur.ZetCode("F")
+	quit Factuur
 ]]></Implementation>
 </Method>
 
@@ -30,9 +43,9 @@
 	
 	Set Klant = ##class(DOM.VKP.impl.DataM.DataMKlant).%New($Extract(KlantID,4,*))
 	Set OpenstaandeFacturenList = ##class(%ListOfObjects).%New()
-  	For  { Set FactuurNummer=$Order(^KKL(Klant.GeefKlantIndexKKL(),FactuurNummer)) Quit:(FactuurNummer="")  Quit:(FactuurNummer'?6N)  
+  	For  { Set FactuurNummer=$Order(^KKL(Klant.GeefKlantIndexKKL(),FactuurNummer)) Quit:(FactuurNummer'?6N)  
   		If ($Piece(^KKL(Klant.GeefKlantIndexKKL(),FactuurNummer),"\",1)="F")||($Piece(^KKL(Klant.GeefKlantIndexKKL(),FactuurNummer),"\",1)="C") {
-  			Do OpenstaandeFacturenList.Insert(..OpenViaKlantIDEnFactuurID(Klant.GeefID(),FactuurNummer))
+  			Do OpenstaandeFacturenList.Insert(..GeefViaKlantIDEnFactuurID(Klant.GeefID(),FactuurNummer))
   		}
   	}
   	
Index: vhUnitTest/DOM/BKH/impl/OpenstaandeVerkoopFactuurRepository/Test.cls.xml
===================================================================
diff -u -r34809 -r34825
--- vhUnitTest/DOM/BKH/impl/OpenstaandeVerkoopFactuurRepository/Test.cls.xml	(.../Test.cls.xml)	(revision 34809)
+++ vhUnitTest/DOM/BKH/impl/OpenstaandeVerkoopFactuurRepository/Test.cls.xml	(.../Test.cls.xml)	(revision 34825)
@@ -14,7 +14,9 @@
 </Property>
 
 <Method name="OnBeforeOneTest">
+<FormalSpec>aTestName:%String</FormalSpec>
 <Implementation><![CDATA[
+	do ##super(aTestName)
 	Set ..Consument = ##class(vhTest.Data.DOM.VKP.VanHoeckeKlant).MaakBelgischeConsument()
 	
 	Set ^KKL(..Consument.GeefKlantIndexKKL(),999)="Deze wil niet te zien krijgen, nummer te kort"
@@ -29,15 +31,15 @@
 
 <Method name="OnAfterAllTests">
 <Implementation><![CDATA[
-	 Do ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().VerwijderKlant(..Consument.GeefID())
-	 Quit $$$OK
+	Do ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().VerwijderKlant(..Consument.GeefID())
+	do ##super()
 ]]></Implementation>
 </Method>
 
 <Method name="Test: Openen van bestaande OpenstaandeVerkoopFactuur">
 <Implementation><![CDATA[
 	#dim OpenstaandeVerkoopFactuur As DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur
-	Set OpenstaandeVerkoopFactuur = ..OpenstaandeVerkoopFactuurRepository.OpenViaKlantIDEnFactuurID(..Consument.GeefID(),123455)
+	Set OpenstaandeVerkoopFactuur = ..OpenstaandeVerkoopFactuurRepository.GeefViaKlantIDEnFactuurID(..Consument.GeefID(),123455)
 		
 	Do $$$AssertTrue($IsObject(OpenstaandeVerkoopFactuur))
 	Do $$$AssertEquals(OpenstaandeVerkoopFactuur.GeefVervalDatum(),"21.05.16","")
@@ -62,7 +64,7 @@
 	#dim OpenstaandeVerkoopFactuur As DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur
 	Set OpenstaandeVerkoopFactuur = ..OpenstaandeVerkoopFactuurRepository.MaakViaKlantIDEnFactuurID(..Consument.GeefID(),987654)
 	
-	Do $$$AssertEquals(OpenstaandeVerkoopFactuur.GeefFactuurID(),987654,"")
+	Do $$$AssertEquals(OpenstaandeVerkoopFactuur.GeefFactuurID(),987654)
 ]]></Implementation>
 </Method>
 
@@ -71,12 +73,13 @@
 	#dim OpenstaandeVerkoopFactuur As DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur
 	
 	Set OpenstaandeVerkoopFactuur = ..OpenstaandeVerkoopFactuurRepository.MaakViaKlantIDEnFactuurID(..Consument.GeefID(),654321)
-	Do $$$AssertTrue($IsObject(OpenstaandeVerkoopFactuur))	
+	Do ..OpenstaandeVerkoopFactuurRepository.Bewaar(OpenstaandeVerkoopFactuur)
 	
+	do $$$AssertTrue(..OpenstaandeVerkoopFactuurRepository.BestaatViaKlantIDEnFactuurID(..Consument.GeefID(),654321))
+	
 	Do ..OpenstaandeVerkoopFactuurRepository.VerwijderViaKlantIDEnFactuurID(..Consument.GeefID(),654321)
 	
-	Set OpenstaandeVerkoopFactuur = ..OpenstaandeVerkoopFactuurRepository.OpenViaKlantIDEnFactuurID(..Consument.GeefID(),654321)	
-	Do $$$AssertFalse($IsObject(OpenstaandeVerkoopFactuur))
+	Do $$$AssertFalse(..OpenstaandeVerkoopFactuurRepository.BestaatViaKlantIDEnFactuurID(..Consument.GeefID(),654321))
 ]]></Implementation>
 </Method>
 
@@ -99,7 +102,7 @@
 	
 	Do ..OpenstaandeVerkoopFactuurRepository.Bewaar(OpenstaandeVerkoopFactuur)
 	
-	Set OpenstaandeVerkoopFactuur = ..OpenstaandeVerkoopFactuurRepository.OpenViaKlantIDEnFactuurID(..Consument.GeefID(),987654)
+	Set OpenstaandeVerkoopFactuur = ..OpenstaandeVerkoopFactuurRepository.GeefViaKlantIDEnFactuurID(..Consument.GeefID(),987654)
 	#dim Code As %String = OpenstaandeVerkoopFactuur.GeefCode()
 	Do $$$AssertEquals(Code,"C","")
 ]]></Implementation>
Index: vhTest/Mock/DOM/BKH/impl/OpenstaandeVerkoopFactuurRepository.cls.xml
===================================================================
diff -u -r34802 -r34825
--- vhTest/Mock/DOM/BKH/impl/OpenstaandeVerkoopFactuurRepository.cls.xml	(.../OpenstaandeVerkoopFactuurRepository.cls.xml)	(revision 34802)
+++ vhTest/Mock/DOM/BKH/impl/OpenstaandeVerkoopFactuurRepository.cls.xml	(.../OpenstaandeVerkoopFactuurRepository.cls.xml)	(revision 34825)
@@ -9,23 +9,30 @@
 <Super>DOM.BKH.impl.OpenstaandeVerkoopFactuurRepository,Tools.Mock.MockClassBase</Super>
 <Inheritance>right</Inheritance>
 
+<Method name="BestaatViaKlantIDEnFactuurID">
+<FormalSpec>KlantID:%String,FactuurID:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("BestaatViaKlantIDEnFactuurID",KlantID,FactuurID)
+]]></Implementation>
+</Method>
+
 <Method name="Bewaar">
 <FormalSpec>OpenstaandeFactuur:DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur</FormalSpec>
 <Implementation><![CDATA[	do ..VerwerkMethodCall("Bewaar",OpenstaandeFactuur)
 ]]></Implementation>
 </Method>
 
-<Method name="MaakViaKlantIDEnFactuurID">
+<Method name="GeefViaKlantIDEnFactuurID">
 <FormalSpec>KlantID:%String,FactuurID:%String</FormalSpec>
 <ReturnType>DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("MaakViaKlantIDEnFactuurID",KlantID,FactuurID)
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefViaKlantIDEnFactuurID",KlantID,FactuurID)
 ]]></Implementation>
 </Method>
 
-<Method name="OpenViaKlantIDEnFactuurID">
+<Method name="MaakViaKlantIDEnFactuurID">
 <FormalSpec>KlantID:%String,FactuurID:%String</FormalSpec>
 <ReturnType>DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("OpenViaKlantIDEnFactuurID",KlantID,FactuurID)
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("MaakViaKlantIDEnFactuurID",KlantID,FactuurID)
 ]]></Implementation>
 </Method>
 
Index: DOM/BKH/impl/DataM/OpenstaandeVerkoopFactuur.cls.xml
===================================================================
diff -u -r34809 -r34825
--- DOM/BKH/impl/DataM/OpenstaandeVerkoopFactuur.cls.xml	(.../OpenstaandeVerkoopFactuur.cls.xml)	(revision 34809)
+++ DOM/BKH/impl/DataM/OpenstaandeVerkoopFactuur.cls.xml	(.../OpenstaandeVerkoopFactuur.cls.xml)	(revision 34825)
@@ -17,10 +17,13 @@
 	
 	#dim GlobalPersistenceMgr = ##class(TECH.Persistentie.GlobalPersistenceMgr).Instance()
 	
-	If $Length(..PartijID) && $Length(..FactuurID) && $Data(@(..#Global_"("""_Klant.GeefKlantIndexKKL()_""","_..FactuurID_")")) {
-		Set ..Node = GlobalPersistenceMgr.GeefNode(..#Global,Klant.GeefKlantIndexKKL(),..FactuurID)
+	#dim Index As %String = Klant.GeefKlantIndexKKL()
+	
+	If $Length(..PartijID) && $Length(..FactuurID) && $Data(@(..#Global_"("""_Index_""","_..FactuurID_")")) {
+		Set ..Node = GlobalPersistenceMgr.GeefNode(..#Global,Index,..FactuurID)
 	} Else {
-		set Status = $$$ERROR($$$GeneralError,..GeefFoutMelding())
+		Set ..Node = GlobalPersistenceMgr.MaakLegeNode()
+		Do GlobalPersistenceMgr.MaakNodePersistent(..Node,..#Global,Index,..FactuurID)
 	}
 	
 	Quit Status
Index: AX/Uitgaand/BKH/OpenstaandeVerkoopFactuur/impl/Synchroniser.cls.xml
===================================================================
diff -u -r34804 -r34825
--- AX/Uitgaand/BKH/OpenstaandeVerkoopFactuur/impl/Synchroniser.cls.xml	(.../Synchroniser.cls.xml)	(revision 34804)
+++ AX/Uitgaand/BKH/OpenstaandeVerkoopFactuur/impl/Synchroniser.cls.xml	(.../Synchroniser.cls.xml)	(revision 34825)
@@ -89,7 +89,7 @@
 <ReturnType>DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur</ReturnType>
 <Implementation><![CDATA[
 	#dim OpenstaandeVerkoopFactuur As DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur
-	Set OpenstaandeVerkoopFactuur = ..OpenstaandeVerkoopFactuurRepository.OpenViaKlantIDEnFactuurID(##class(AX.common.impl.ConvertAXToAdmin).ConvertCustomerID(Transactie.CUSTACCOUNT),Transactie.VOUCHER)
+	Set OpenstaandeVerkoopFactuur = ..OpenstaandeVerkoopFactuurRepository.GeefViaKlantIDEnFactuurID(##class(AX.common.impl.ConvertAXToAdmin).ConvertCustomerID(Transactie.CUSTACCOUNT),Transactie.VOUCHER)
 	
 	if $$$Not($IsObject(OpenstaandeVerkoopFactuur)){
 		Set OpenstaandeVerkoopFactuur = ..OpenstaandeVerkoopFactuurRepository.MaakViaKlantIDEnFactuurID(##class(AX.common.impl.ConvertAXToAdmin).ConvertCustomerID(Transactie.CUSTACCOUNT),Transactie.VOUCHER)
Index: vhTest/Fake/DOM/BKH/impl/OpenstaandeVerkoopFactuurRepository.cls.xml
===================================================================
diff -u -r34802 -r34825
--- vhTest/Fake/DOM/BKH/impl/OpenstaandeVerkoopFactuurRepository.cls.xml	(.../OpenstaandeVerkoopFactuurRepository.cls.xml)	(revision 34802)
+++ vhTest/Fake/DOM/BKH/impl/OpenstaandeVerkoopFactuurRepository.cls.xml	(.../OpenstaandeVerkoopFactuurRepository.cls.xml)	(revision 34825)
@@ -13,25 +13,39 @@
 ]]></Implementation>
 </Method>
 
+<Method name="BestaatViaKlantIDEnFactuurID">
+<FormalSpec>KlantID:%String,FactuurID:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="BestaatViaLeverancierIDEnFactuurID">
+<FormalSpec>KlantID:%String,FactuurID:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
 <Method name="Bewaar">
 <FormalSpec>OpenstaandeFactuur:DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur</FormalSpec>
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
-<Method name="CreateOpenstaandeVerkoopFactuur">
+<Method name="GeefViaKlantIDEnFactuurID">
+<FormalSpec>KlantID:%String,FactuurID:%String</FormalSpec>
 <ReturnType>DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur</ReturnType>
 <Implementation><![CDATA[	Quit ""
 ]]></Implementation>
 </Method>
 
-<Method name="MaakViaKlantIDEnFactuurID">
-<FormalSpec>KlantID:%String,FactuurID:%String</FormalSpec>
+<Method name="CreateOpenstaandeVerkoopFactuur">
 <ReturnType>DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur</ReturnType>
 <Implementation><![CDATA[	Quit ""
 ]]></Implementation>
 </Method>
 
-<Method name="OpenViaKlantIDEnFactuurID">
+<Method name="MaakViaKlantIDEnFactuurID">
 <FormalSpec>KlantID:%String,FactuurID:%String</FormalSpec>
 <ReturnType>DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur</ReturnType>
 <Implementation><![CDATA[	Quit ""
@@ -60,7 +74,7 @@
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
-<Method name="OpenViaKlantEnFactuurID">
+<Method name="GeefViaKlantEnFactuurID">
 <FormalSpec>KlantID:%String,FactuurID:%String</FormalSpec>
 <ReturnType>DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur</ReturnType>
 <Implementation><![CDATA[	Quit ""