Index: APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/BatchNaarObjectiveDataGenerator.cls.xml
===================================================================
diff -u -r71412 -r71415
--- APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/BatchNaarObjectiveDataGenerator.cls.xml	(.../BatchNaarObjectiveDataGenerator.cls.xml)	(revision 71412)
+++ APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/BatchNaarObjectiveDataGenerator.cls.xml	(.../BatchNaarObjectiveDataGenerator.cls.xml)	(revision 71415)
@@ -144,7 +144,7 @@
 	Do ##class(TECH.ListUtils).AppendList(Opties, ..GeefOptiesVoorStuklijst(Product, SequentieNummerBinnenToeleveringGeformateerd))
 	Do ##class(TECH.ListUtils).AppendList(Opties, ..GeefOptiesVoorKenmerken(Product, SequentieNummerBinnenToeleveringGeformateerd))
 	Do ##class(TECH.ListUtils).AppendList(Opties, ..GeefBijkomendeOpties(Product.GeefIngegevenKenmerken(), Product.GeefHalffabItemsBoom(), SequentieNummerBinnenToeleveringGeformateerd))
-	Do ##class(TECH.ListUtils).AppendList(Opties, ..GeefOptiesProductInfo(UitvoeringInfo.ProductID, Toelevering.GeefID(), UitvoeringInfo.SequentieNummerBinnenToelevering))
+	Do ##class(TECH.ListUtils).AppendList(Opties, ..GeefOptiesProductInfo(Product, Toelevering, UitvoeringInfo.SequentieNummerBinnenToelevering))
 	
 	Quit Opties
 ]]></Implementation>
@@ -342,13 +342,13 @@
 </Method>
 
 <Method name="GeefOptiesProductInfo">
-<FormalSpec>ProductId:%String,ToeleveringId:%String,SequentieNummerBinnenToelevering:%String</FormalSpec>
+<FormalSpec>Product:DOM.PM.MaatwerkProduct,Toelevering:DOM.AKP.Toelevering,SequentieNummerBinnenToelevering:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>%ListOfObjects</ReturnType>
 <Implementation><![CDATA[
 	Set LijstProductInfo = ##class(%ListOfObjects).%New()
 	
-	#dim DnaCodeIterator As TECH.Iterator =  ..DnaCodeRepository.ZoekViaToeleveringEnProductNummer(ToeleveringId, ProductId)	
+	#dim DnaCodeIterator As TECH.Iterator =  ..DnaCodeRepository.ZoekViaToeleveringEnProductNummer(Toelevering.GeefID(), Product.GeefID())	
 	#dim DnaCodes As %ListOfDataTypes = ##class(TECH.ListUtils).IteratorToList(DnaCodeIterator)
 	#dim DnaCode As %String = ""
 	#dim DnaCodeIngekort As %String = ""
@@ -360,8 +360,23 @@
 	}
 	Do LijstProductInfo.Insert(..GeefOptie(..PrependNul(SequentieNummerBinnenToelevering), "-" _ "DNA-code", DnaCode))
 	Do LijstProductInfo.Insert(..GeefOptie(..PrependNul(SequentieNummerBinnenToelevering), "-" _ "PIN", DnaCode))
-	Do LijstProductInfo.Insert(..GeefOptie(..PrependNul(SequentieNummerBinnenToelevering), "-" _ "SHORTPIN", DnaCodeIngekort))	
+	Do LijstProductInfo.Insert(..GeefOptie(..PrependNul(SequentieNummerBinnenToelevering), "-" _ "SHORTPIN", DnaCodeIngekort))
 	
+	#dim AxInventTransId As %String = ""
+	#dim AxConfigId As %String = ""
+	#dim ToeleveringLijnGevonden As %Boolean = $$$False
+	#dim ToeleveringLijnIterator As DOM.AKP.impl.DataM.DataMToeleveringLijnIterator = Toelevering.GeefToeleveringLijnIterator()	
+	While (ToeleveringLijnIterator.HasNext() && $$$Not(ToeleveringLijnGevonden)) {
+		#dim ProductToeleveringLijn As DOM.AKP.impl.DataM.DataMProductToeleveringLijn = ToeleveringLijnIterator.Next()
+		If ProductToeleveringLijn.GeefProductID() = Product.GeefID() {
+			Set AxInventTransId = ProductToeleveringLijn.GeefAxInventTransId()
+			Set AxConfigId = ProductToeleveringLijn.GeefAxConfigId()
+			Set ToeleveringLijnGevonden = $$$True
+		}
+	}
+	Do LijstProductInfo.Insert(..GeefOptie(..PrependNul(SequentieNummerBinnenToelevering), "-" _ "InventTransID", AxInventTransId))
+	Do LijstProductInfo.Insert(..GeefOptie(..PrependNul(SequentieNummerBinnenToelevering), "-" _ "AxConfigId", AxConfigId))
+	
 	Quit LijstProductInfo
 ]]></Implementation>
 </Method>