Index: APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective.cls.xml
===================================================================
diff -u -r71474 -r71497
--- APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective.cls.xml	(.../BatchNaarObjective.cls.xml)	(revision 71474)
+++ APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective.cls.xml	(.../BatchNaarObjective.cls.xml)	(revision 71497)
@@ -26,7 +26,7 @@
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..ToeleveringApi = $$$Inject(ToeleveringApi,##class(DOM.DomeinContext).Instance().GeefToeleveringAPI())
-	Set ..BatchNaarObjectiveDataGenerator = $$$Inject(BatchNaarObjectiveDataGenerator, ##class(APPS.Halux.PPS.Document.impl.LBX.BatchNaarObjective.BatchNaarObjectiveDataGenerator).%New())
+	Set ..BatchNaarObjectiveDataGenerator = $$$Inject(BatchNaarObjectiveDataGenerator, ##class(APPS.Halux.PPS.Document.impl.LBX.BatchNaarObjective.BatchNaarObjectiveDataGeneratorLbx).%New())
 	Set ..MESService = ##class(APPS.Halux.PPS.MES.MESService).%New()
 	
 	Quit $$$OK
@@ -59,20 +59,23 @@
 		#dim Batch As APPS.Halux.common.Batch  = ##class(APPS.ApplicatieContext).Instance().GeefProductieAPI().GeefBatchService().GeefBatch(BatchId)
 		#dim ToeleveringenIterator As TECH.Iterator = Batch.GeefToeleveringIterator()
 		#dim UitvoeringInfoLijstIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(UitvoeringInfoLijst)
+		//Temp
+		#dim Index As %Integer = 0
 		
 		If (..MESService.IsActiefVoorMes(Batch.GeefLijn(), 1)) {
 			While ToeleveringenIterator.HasNext() {
 				#dim ToeleveringId As %String = ToeleveringenIterator.Next().GeefID()
 				#dim Toelevering As DOM.AKP.Toelevering = ..ToeleveringApi.GeefToelevering(ToeleveringId)
-				#dim BatchData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = ..BatchNaarObjectiveDataGenerator.GenereerBatchDataVoorToelevering(Batch, Toelevering)
+				Set Index = Index + 1
+				#dim BatchData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = ..BatchNaarObjectiveDataGenerator.GenereerBatchDataVoorToelevering(Batch, Toelevering, Index)
 				Set BatchData.Opties = ##class(%ListOfObjects).%New()
 				
 				// LBX ! 
 				Set ToeleveringProductInfoOptiesGenerator = ##class(APPS.Halux.PPS.Document.impl.LBX.BatchNaarObjective.OptieGenerator.ToeleveringProductInfoOptiesGeneratorLbx).%New()
 				Do ##class(TECH.ListUtils).AppendList(BatchData.Opties, ToeleveringProductInfoOptiesGenerator.GenereerOptiesVoorLade(Toelevering))
 				
 				While (UitvoeringInfoLijstIterator.HasNext()) {
-					#dim UitvoeringInfo As APPS.Halux.PPS.Activiteit.impl.common.dto.DetailBladUitvoeringInfo = UitvoeringInfoLijstIterator.Next()
+					#dim UitvoeringInfo As APPS.Halux.PPS.Activiteit.impl.common.dto.BatchNaarObjectiveUitvoeringInfo = UitvoeringInfoLijstIterator.Next()
 					
 					If (UitvoeringInfo.ToeleveringID = ToeleveringId) {
 						#dim OptiesVoorAlleLades As %ListOfObjects = ..BatchNaarObjectiveDataGenerator.GenereerOptiesVoorLade(Toelevering, UitvoeringInfo)