Index: APPS/Halux/PPS/Activiteit/impl/common/BatchNaarObjectiveIoCContainer.cls.xml
===================================================================
diff -u -r71904 -r72220
--- APPS/Halux/PPS/Activiteit/impl/common/BatchNaarObjectiveIoCContainer.cls.xml	(.../BatchNaarObjectiveIoCContainer.cls.xml)	(revision 71904)
+++ APPS/Halux/PPS/Activiteit/impl/common/BatchNaarObjectiveIoCContainer.cls.xml	(.../BatchNaarObjectiveIoCContainer.cls.xml)	(revision 72220)
@@ -5,7 +5,9 @@
 
 <Method name="Initialization">
 <ClassMethod>1</ClassMethod>
-<Implementation><![CDATA[	#execute set ^TECH.Config.IoC.Container("APPS.Halux.PPS.Activiteit.impl.common.BatchNaarObjectiveIoCContainer","BatchPitchExportedService")="APPS.Halux.Planning.Pitching.impl.BatchPitchExportedService"
+<Implementation><![CDATA[
+	#execute set ^TECH.Config.IoC.Container("APPS.Halux.PPS.Activiteit.impl.common.BatchNaarObjectiveIoCContainer","BatchPitchExportedService")="APPS.Halux.Planning.Pitching.impl.BatchPitchExportedService"
+	#execute set ^TECH.Config.IoC.Container("APPS.Halux.PPS.Activiteit.impl.common.BatchNaarObjectiveIoCContainer","OBJTIdentLookupService")="OBJTimpl.PM.OBJTIdentLookupService"
 ]]></Implementation>
 </Method>
 </Class>
Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/RollenEnStuklijstOptiesGenerator.cls.xml
===================================================================
diff -u -r71844 -r72220
--- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/RollenEnStuklijstOptiesGenerator.cls.xml	(.../RollenEnStuklijstOptiesGenerator.cls.xml)	(revision 71844)
+++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/RollenEnStuklijstOptiesGenerator.cls.xml	(.../RollenEnStuklijstOptiesGenerator.cls.xml)	(revision 72220)
@@ -8,6 +8,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="OBJTIdentLookupService">
+<Type>OBJTimpl.PM.OBJTIdentLookupService</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>ProductApi:DOM.PM.ProductAPI=""</FormalSpec>
 <Private>1</Private>
@@ -16,6 +21,7 @@
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..ProductApi = $$$Inject(ProductApi, ##class(DOM.PM.impl.ProductAPI).%New())
+	Set ..OBJTIdentLookupService = ##class(APPS.Halux.PPS.Activiteit.impl.common.BatchNaarObjectiveIoCContainer).Instance().Resolve("OBJTIdentLookupService")
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -65,15 +71,17 @@
 <Private>1</Private>
 <ReturnType>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveOptions</ReturnType>
 <Implementation><![CDATA[
-	#dim IdentNummer As %String = ""		
+	#dim OBJTIdentNummer As %String = ""		
 	If (HalffabItem.%Extends("DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem")) {
 		#dim ConcreetHalffabItem As DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem = HalffabItem
 		#dim Halffab As DOM.PM.Maatwerk.Calc.HF.Halffab = ConcreetHalffabItem.GeefHalffab()
-		Set IdentNummer = ..ProductApi.GeefIdentNummerVoorProductId(Halffab.GeefProductID())
+		#dim IdentNummer As %String = ..ProductApi.GeefIdentNummerVoorProductId(Halffab.GeefProductID())
+		Set OBJTIdentNummer = ..OBJTIdentLookupService.GeefOBJTIdentNr(IdentNummer)
+		Do ##class(Tools.Wlip).%New(26).String("OBJTI: " _ OBJTIdentNummer)
 	}
 	
 	#dim Naam As %String = "-INPUT[" _ ..PrependNul(Index, 2) _ "]|QTY|ROL"
-	#dim Waarde As %String = IdentNummer _ "|"_ ##class(TECH.Math).Round(HalffabItem.GeefAantal(), 4) _ "|" _ ..GeefRolNaam(HalffabItem, IngegevenKenmerken)
+	#dim Waarde As %String = OBJTIdentNummer _ "|"_ ##class(TECH.Math).Round(HalffabItem.GeefAantal(), 4) _ "|" _ ..GeefRolNaam(HalffabItem, IngegevenKenmerken)
 	
 	Quit ..GeefOptieVoorLade(SequentieNummerLade, Naam, Waarde)
 ]]></Implementation>