Index: vhUnitTest/DOM/VKP/impl/DataM/DataMKlantOpenstaandeFacturenIterator.cls.xml
===================================================================
diff -u -r29059 -r34876
--- vhUnitTest/DOM/VKP/impl/DataM/DataMKlantOpenstaandeFacturenIterator.cls.xml	(.../DataMKlantOpenstaandeFacturenIterator.cls.xml)	(revision 29059)
+++ vhUnitTest/DOM/VKP/impl/DataM/DataMKlantOpenstaandeFacturenIterator.cls.xml	(.../DataMKlantOpenstaandeFacturenIterator.cls.xml)	(revision 34876)
@@ -10,11 +10,11 @@
 	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(##class(DOM.VKP.enu.Klant).TestklantVanHoecke())
 	#dim itFacturen As TECH.Iterator = Klant.GeefOpenstaandeFacturenIterator()
 	do $$$AssertTrue(itFacturen.HasNext())
-	do $$$AssertEquals(itFacturen.Next(),250001,"Eerste openstaande factuur is ok")
+	do $$$AssertEquals(itFacturen.Next(),"K||1000_250001","Eerste openstaande factuur is ok")
 	do $$$AssertTrue(itFacturen.HasNext())
-	do $$$AssertEquals(itFacturen.Next(),250002,"Tweede openstaande factuur is ok")
+	do $$$AssertEquals(itFacturen.Next(),"K||1000_250002","Tweede openstaande factuur is ok")
 	do $$$AssertTrue(itFacturen.HasNext())
-	do $$$AssertEquals(itFacturen.Next(),990009,"Derde openstaande factuur is ok")
+	do $$$AssertEquals(itFacturen.Next(),"K||1000_990009","Derde openstaande factuur is ok")
 	do $$$AssertFalse(itFacturen.HasNext())
 ]]></Implementation>
 </Method>
Index: DOM/VKP/impl/DataM/DataMKlantNative.cls.xml
===================================================================
diff -u -r34716 -r34876
--- DOM/VKP/impl/DataM/DataMKlantNative.cls.xml	(.../DataMKlantNative.cls.xml)	(revision 34716)
+++ DOM/VKP/impl/DataM/DataMKlantNative.cls.xml	(.../DataMKlantNative.cls.xml)	(revision 34876)
@@ -582,7 +582,7 @@
 
 <Method name="GeefOpenstaandeFacturenIterator">
 <ReturnType>TECH.Iterator</ReturnType>
-<Implementation><![CDATA[	quit ##class(DOM.VKP.impl.DataM.DataMKlantOpenstaandeFacturenIterator).%New(..KlantNummer)
+<Implementation><![CDATA[	quit ##class(DOM.VKP.impl.DataM.DataMKlantOpenstaandeFacturenIterator).%New(##class(DOM.DomeinContext).Instance().GeefLegacyPartijAPI().GeefKlantPartijID(..KlantNummer))
 ]]></Implementation>
 </Method>
 
Index: DOM/BKH/impl/VerkoopFactuurVoldaanGenerator.cls.xml
===================================================================
diff -u -r29059 -r34876
--- DOM/BKH/impl/VerkoopFactuurVoldaanGenerator.cls.xml	(.../VerkoopFactuurVoldaanGenerator.cls.xml)	(revision 29059)
+++ DOM/BKH/impl/VerkoopFactuurVoldaanGenerator.cls.xml	(.../VerkoopFactuurVoldaanGenerator.cls.xml)	(revision 34876)
@@ -61,7 +61,7 @@
 	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(PartijID)
 	#dim itOpenstaandeFacturen As TECH.Iterator = Klant.GeefOpenstaandeFacturenIterator()
 	while itOpenstaandeFacturen.HasNext() {
-		#dim OpenstaandeFactuurID As %String = itOpenstaandeFacturen.Next()
+		#dim OpenstaandeFactuurID As %String = $piece(itOpenstaandeFacturen.Next(),"_",2)
 		do ..VoegToeOpenstaandeFactuurAanTijdelijkBestand(OpenstaandeFactuurID)
 	}
 ]]></Implementation>
Index: DOM/VKP/impl/DataM/DataMKlantOpenstaandeFacturenIterator.cls.xml
===================================================================
diff -u -r29059 -r34876
--- DOM/VKP/impl/DataM/DataMKlantOpenstaandeFacturenIterator.cls.xml	(.../DataMKlantOpenstaandeFacturenIterator.cls.xml)	(revision 29059)
+++ DOM/VKP/impl/DataM/DataMKlantOpenstaandeFacturenIterator.cls.xml	(.../DataMKlantOpenstaandeFacturenIterator.cls.xml)	(revision 34876)
@@ -11,49 +11,54 @@
 <Private>1</Private>
 </Property>
 
-<Property name="FactuurID">
+<Property name="FactuurNr">
 <Type>%String</Type>
 <Private>1</Private>
 </Property>
 
+<Property name="KlantID">
+<Type>%String</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>KlantID:DOM.VKP.VanHoeckeKlantID</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
-	#dim PartijID As DOM.common.PartijID = ##class(DOM.DomeinContext).Instance().GeefLegacyPartijAPI().GeefKlantPartijID(KlantID)
-	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(PartijID)
+	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(KlantID)
+	set ..KlantID = KlantID
 	set ..KlantIndex = Klant.GeefKlantIndexKKL()
-	set ..FactuurID = 99999
+	set ..FactuurNr = 99999
 	do ..BepaalVolgendeFactuur()
 	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="HasNext">
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit ..FactuurID'=""
+<Implementation><![CDATA[	Quit ..FactuurNr'=""
 ]]></Implementation>
 </Method>
 
 <Method name="BepaalVolgendeFactuur">
 <Private>1</Private>
 <Implementation><![CDATA[
-	#dim HuidigeFactuur As %String = ..FactuurID
+	#dim HuidigeFactuur As %String = ..FactuurNr
 	set HuidigeFactuur = $order(^KKL(..KlantIndex,HuidigeFactuur))
 	if HuidigeFactuur'?6N set HuidigeFactuur = ""
-	set ..FactuurID = HuidigeFactuur
+	set ..FactuurNr = HuidigeFactuur
 	quit
 ]]></Implementation>
 </Method>
 
 <Method name="Next">
 <ReturnType>%CacheString</ReturnType>
 <Implementation><![CDATA[
-	#dim HuidigeFactuur As %String = ..FactuurID
+	#dim HuidigeFactuur As %String = ..FactuurNr
 	do ..BepaalVolgendeFactuur()
-	quit HuidigeFactuur
+	quit ..KlantID_"_"_HuidigeFactuur
 ]]></Implementation>
 </Method>
 </Class>