Index: APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/BatchNaarObjectiveDataGenerator.cls.xml
===================================================================
diff -u -r71456 -r71457
--- APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/BatchNaarObjectiveDataGenerator.cls.xml	(.../BatchNaarObjectiveDataGenerator.cls.xml)	(revision 71456)
+++ APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/BatchNaarObjectiveDataGenerator.cls.xml	(.../BatchNaarObjectiveDataGenerator.cls.xml)	(revision 71457)
@@ -13,6 +13,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="LegacyPartijApi">
+<Type>DOM.PARTIJ.LegacyPartijAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>OrderApi:DOM.VKP.OrderAPI="",PartijApi:DOM.PARTIJ.PartijAPI=""</FormalSpec>
 <Private>1</Private>
@@ -22,6 +27,7 @@
 <Implementation><![CDATA[
 	Set ..OrderApi = $$$Inject(OrderApi, ##class(DOM.VKP.impl.DataM.DataMOrderAPI).%New())
 	Set ..PartijApi = $$$Inject(PartijApi, ##class(DOM.DomeinContext).Instance().GeefPartijAPI())
+	Set ..LegacyPartijApi = ##class(DOM.DomeinContext).Instance().GeefLegacyPartijAPI()
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -51,7 +57,7 @@
 	
 	#dim Partij As DOM.PARTIJ.Partij = ..PartijApi.GeefPartij(Toelevering.GeefKlantID())
 	Set BatchNaarObjectiveData.KlantNaam = Partij.GeefNaam()
-	Set BatchNaarObjectiveData.KlantId = Toelevering.GeefKlantID()
+	Set BatchNaarObjectiveData.KlantId = ..LegacyPartijApi.GeefKlantNummerVoorPartijID(Toelevering.GeefKlantID())  ; 
 	
 	Set BatchNaarObjectiveData.ReceptNaam = "Template Lade TLM.Template Lade TLM M1.10" // Receptnaam tijdelijk invullen als vaste waarde
 	Set BatchNaarObjectiveData.Rangorde = "2485/253746" // Receptnaam tijdelijk invullen als vaste waarde