Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective.cls.xml
===================================================================
diff -u -r73009 -r73012
--- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective.cls.xml	(.../BatchNaarObjective.cls.xml)	(revision 73009)
+++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective.cls.xml	(.../BatchNaarObjective.cls.xml)	(revision 73012)
@@ -129,9 +129,9 @@
 		
 		If (..MESService.IsActiefVoorMes(Batch.GeefLijn(), MesFaseActief)) {	
 			If (..BevatBatchVhoss(UitvoeringInfoLijst)) {
-				Set BatchDataLijst = ..GeefVhossBatchDataLijst(Batch, UitvoeringInfoLijstIterator, SuffixId)
+				Set BatchDataLijst = ..GeefVhossBatchDataLijst(Batch, UitvoeringInfoLijstIterator, UitvoeringInfoLijst.Size, SuffixId)
 			} Else {
-				Set BatchDataLijst = ..GeefStandaardBatchDataLijst(Batch, UitvoeringInfoLijstIterator, SuffixId)
+				Set BatchDataLijst = ..GeefStandaardBatchDataLijst(Batch, UitvoeringInfoLijstIterator, UitvoeringInfoLijst.Size, SuffixId)
 			}	
 			
 		}
@@ -142,15 +142,15 @@
 </Method>
 
 <Method name="GeefVhossBatchDataLijst">
-<FormalSpec>Batch:APPS.Halux.common.Batch,UitvoeringInfoLijstIterator:TECH.Iterator,SuffixId:%String</FormalSpec>
+<FormalSpec>Batch:APPS.Halux.common.Batch,UitvoeringInfoLijstIterator:TECH.Iterator,AantalLades:%Integer,SuffixId:%String</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	Set BatchDataLijst = ##class(%ListOfObjects).%New()
 	
 	#dim ToeleveringenIterator As TECH.Iterator = Batch.GeefToeleveringIterator()
 	#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.GenereerDataVoorBatch(Batch, Toelevering, 1, SuffixId)
+	#dim BatchData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = ..BatchNaarObjectiveDataGenerator.GenereerDataVoorBatch(Batch, Toelevering, 1, AantalLades, SuffixId)
 	
 	Do ##class(TECH.ListUtils).AppendList(BatchData.Opties, ..BatchNaarObjectiveDataGenerator.GenereerAlgemeneInfoOptiesVoorBatch(Batch))
 	Do ##class(TECH.ListUtils).AppendList(BatchData.Opties, ..GeefOptiesVoorToelevering(Toelevering, UitvoeringInfoLijstIterator))
@@ -169,7 +169,7 @@
 </Method>
 
 <Method name="GeefStandaardBatchDataLijst">
-<FormalSpec>Batch:APPS.Halux.common.Batch,UitvoeringInfoLijstIterator:TECH.Iterator,SuffixId:%String</FormalSpec>
+<FormalSpec>Batch:APPS.Halux.common.Batch,UitvoeringInfoLijstIterator:TECH.Iterator,AantalLades:%Integer,SuffixId:%String</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	Set BatchDataLijst = ##class(%ListOfObjects).%New()
@@ -181,7 +181,7 @@
 		#dim Toelevering As DOM.AKP.Toelevering = ..ToeleveringApi.GeefToelevering(ToeleveringId)
 		Set IndexToelevering = IndexToelevering + 1
 		
-		#dim BatchData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = ..BatchNaarObjectiveDataGenerator.GenereerDataVoorToelevering(Batch, Toelevering, IndexToelevering, SuffixId)
+		#dim BatchData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = ..BatchNaarObjectiveDataGenerator.GenereerDataVoorToelevering(Batch, Toelevering, IndexToelevering, AantalLades, SuffixId)
 		Do ##class(TECH.ListUtils).AppendList(BatchData.Opties, ..BatchNaarObjectiveDataGenerator.GenereerAlgemeneInfoOptiesVoorToelevering(Toelevering, Batch.GeefCategorie()))
 		Do ##class(TECH.ListUtils).AppendList(BatchData.Opties, ..GeefOptiesVoorToelevering(Toelevering, UitvoeringInfoLijstIterator))
 		
Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator.cls.xml
===================================================================
diff -u -r73004 -r73012
--- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator.cls.xml	(.../HoofdDataGenerator.cls.xml)	(revision 73004)
+++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator.cls.xml	(.../HoofdDataGenerator.cls.xml)	(revision 73012)
@@ -59,25 +59,25 @@
 </Method>
 
 <Method name="GenereerData">
-<FormalSpec>Batch:APPS.Halux.common.Batch,Toelevering:DOM.AKP.Toelevering,SequentieNummerToelevering:%Integer,SuffixId:%String=""</FormalSpec>
+<FormalSpec>Batch:APPS.Halux.common.Batch,Toelevering:DOM.AKP.Toelevering,SequentieNummerToelevering:%Integer,AantalLades:%Integer,SuffixId:%String=""</FormalSpec>
 <ReturnType>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData</ReturnType>
 <Implementation><![CDATA[
 	Set BatchNaarObjectiveData = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData).%New()
-	Do ..VoegToeAlgemenInfo(BatchNaarObjectiveData, Batch, Toelevering, SuffixId)
+	Do ..VoegToeAlgemeneInfo(BatchNaarObjectiveData, Batch, Toelevering, AantalLades, SuffixId)
 	Do ..VoegToeGebruikersVelden(BatchNaarObjectiveData, Batch, Toelevering, SequentieNummerToelevering)
 	
 	Quit BatchNaarObjectiveData
 ]]></Implementation>
 </Method>
 
-<Method name="VoegToeAlgemenInfo">
-<FormalSpec><![CDATA[&BatchNaarObjectiveData:APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData,Batch:APPS.Halux.common.Batch,Toelevering:DOM.AKP.Toelevering,SuffixId:%String]]></FormalSpec>
+<Method name="VoegToeAlgemeneInfo">
+<FormalSpec><![CDATA[&BatchNaarObjectiveData:APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData,Batch:APPS.Halux.common.Batch,Toelevering:DOM.AKP.Toelevering,AantalLades:%String,SuffixId:%String]]></FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	Set BatchNaarObjectiveData.Id = ..GeefId(Toelevering, SuffixId)
 	Set BatchNaarObjectiveData.Omschrijving = ..GeefWaardeOfNull("Productieorder gegenereerd vanuit Caché")
 	Set BatchNaarObjectiveData.ReceptNaam = ##class(TECH.Config.ConfigMgr).Instance().GeefString("APPS.Halux.PPS.Document.impl.BatchNaarObjective_Receptnaam")
-	Set BatchNaarObjectiveData.AantalLades = ..GeefWaardeOfNull(..GeefAantalLades(Batch, Toelevering))
+	Set BatchNaarObjectiveData.AantalLades = ..GeefWaardeOfNull(AantalLades)
 	Set BatchNaarObjectiveData.DueBefore = ..GeefWaardeOfNull(..FormateerHorolog(Toelevering.GeefDueOutTime()))
 ]]></Implementation>
 </Method>
@@ -204,7 +204,6 @@
 </Method>
 
 <Method name="GeefAantalLades">
-<Abstract>1</Abstract>
 <FormalSpec>Batch:APPS.Halux.common.Batch,Toelevering:DOM.AKP.Toelevering</FormalSpec>
 <Private>1</Private>
 <ReturnType>%Integer</ReturnType>
Index: vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator/DataVoorToeleveringGenerator/GenereerData/Test.cls.xml
===================================================================
diff -u -r73004 -r73012
--- vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator/DataVoorToeleveringGenerator/GenereerData/Test.cls.xml	(.../Test.cls.xml)	(revision 73004)
+++ vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator/DataVoorToeleveringGenerator/GenereerData/Test.cls.xml	(.../Test.cls.xml)	(revision 73012)
@@ -77,7 +77,7 @@
 	Do LegacyPartijApiMock.VerwachtMethodCall("GeefKlantNummerVoorPartijID", "K||1234").ExactAantalKeer(1).DanReturn(KlantId)
 		
 	Set DataVoorToeleveringGenerator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.HoofdDataGenerator.DataVoorToeleveringGenerator).%New(BatchPitchExportedServiceMock, OrderApiMock, PartijAPIMock, LegacyPartijApiMock)
-	#dim BatchNaarObjectiveData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = DataVoorToeleveringGenerator.GenereerData(BatchMock, ToeleveringMock, ..#SequentieNummerToelevering)
+	#dim BatchNaarObjectiveData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = DataVoorToeleveringGenerator.GenereerData(BatchMock, ToeleveringMock, ..#SequentieNummerToelevering, ..#AantalLades)
 	
 	Do $$$AssertEquals(BatchNaarObjectiveData.Id, ..#ToeleveringId)
 	Do $$$AssertEquals(BatchNaarObjectiveData.Omschrijving, "Productieorder gegenereerd vanuit Caché")
@@ -161,7 +161,7 @@
 	Do LegacyPartijApiMock.VerwachtMethodCall("GeefKlantNummerVoorPartijID", "K||1234").ExactAantalKeer(1).DanReturn(KlantId)
 		
 	Set DataVoorToeleveringGenerator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.HoofdDataGenerator.DataVoorToeleveringGenerator).%New(BatchPitchExportedServiceMock, OrderApiMock, PartijAPIMock, LegacyPartijApiMock)
-	#dim BatchNaarObjectiveData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = DataVoorToeleveringGenerator.GenereerData(BatchMock, ToeleveringMock, ..#SequentieNummerToelevering, DummySuffixId)
+	#dim BatchNaarObjectiveData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = DataVoorToeleveringGenerator.GenereerData(BatchMock, ToeleveringMock, ..#SequentieNummerToelevering, ..#AantalLades, DummySuffixId)
 	
 	Do $$$AssertEquals(BatchNaarObjectiveData.Id, ..#ToeleveringId _ "_" _ DummySuffixId)
 	Do $$$AssertEquals(BatchNaarObjectiveData.Omschrijving, "Productieorder gegenereerd vanuit Caché")
@@ -198,7 +198,7 @@
 	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.DataNotFoundException",Substring))
 	
 	Set DataVoorToeleveringGenerator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.HoofdDataGenerator.DataVoorToeleveringGenerator).%New(BatchPitchExportedServiceMock, "", "", "", LoggerMock)
-	#dim BatchNaarObjectiveData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = DataVoorToeleveringGenerator.GenereerData(BatchMock, ToeleveringMock, ..#SequentieNummerToelevering)
+	#dim BatchNaarObjectiveData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = DataVoorToeleveringGenerator.GenereerData(BatchMock, ToeleveringMock, ..#SequentieNummerToelevering, ..#AantalLades)
 	
 	Do BatchPitchExportedServiceMock.Verifieer()
 	Do BatchMock.Verifieer()
@@ -229,7 +229,7 @@
 	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.DataCorruptException",Substring))
 	
 	Set DataVoorToeleveringGenerator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.HoofdDataGenerator.DataVoorToeleveringGenerator).%New(BatchPitchExportedServiceMock, "", "", "", LoggerMock)
-	#dim BatchNaarObjectiveData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = DataVoorToeleveringGenerator.GenereerData(BatchMock, ToeleveringMock, ..#SequentieNummerToelevering)
+	#dim BatchNaarObjectiveData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = DataVoorToeleveringGenerator.GenereerData(BatchMock, ToeleveringMock, ..#SequentieNummerToelevering, ..#AantalLades)
 	
 	Do BatchPitchExportedServiceMock.Verifieer()
 	Do BatchMock.Verifieer()
@@ -283,7 +283,7 @@
 	Do LegacyPartijApiMock.VerwachtMethodCall("GeefKlantNummerVoorPartijID", "K||1234").ExactAantalKeer(1).DanReturn(KlantId)
 		
 	Set DataVoorToeleveringGenerator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.HoofdDataGenerator.DataVoorToeleveringGenerator).%New(BatchPitchExportedServiceMock, OrderApiMock, PartijAPIMock, LegacyPartijApiMock)
-	#dim BatchNaarObjectiveData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = DataVoorToeleveringGenerator.GenereerData(BatchMock, ToeleveringMock, ..#SequentieNummerToelevering)
+	#dim BatchNaarObjectiveData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = DataVoorToeleveringGenerator.GenereerData(BatchMock, ToeleveringMock, ..#SequentieNummerToelevering, ..#AantalLades)
 		
 	If ($$$AssertTrue($IsObject(BatchNaarObjectiveData.GebruikersVelden))) {
 		#dim GebruikersVelden As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveGebruikersVelden = BatchNaarObjectiveData.GebruikersVelden
@@ -350,7 +350,7 @@
 	Do LegacyPartijApiMock.VerwachtMethodCall("GeefKlantNummerVoorPartijID", "K||1234").ExactAantalKeer(1).DanReturn(KlantId)
 		
 	Set DataVoorToeleveringGenerator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.HoofdDataGenerator.DataVoorToeleveringGenerator).%New(BatchPitchExportedServiceMock, OrderApiMock, PartijAPIMock, LegacyPartijApiMock)
-	#dim BatchNaarObjectiveData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = DataVoorToeleveringGenerator.GenereerData(BatchMock, ToeleveringMock, ..#SequentieNummerToelevering)
+	#dim BatchNaarObjectiveData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = DataVoorToeleveringGenerator.GenereerData(BatchMock, ToeleveringMock, ..#SequentieNummerToelevering, ..#AantalLades)
 		
 	If ($$$AssertTrue($IsObject(BatchNaarObjectiveData.GebruikersVelden))) {
 		#dim GebruikersVelden As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveGebruikersVelden = BatchNaarObjectiveData.GebruikersVelden
@@ -391,7 +391,6 @@
 <Implementation><![CDATA[
 	#dim ToeleveringMock As vhTest.Mock.DOM.AKP.Toelevering = ##class(vhTest.Utils.DOM.AKP.Toelevering).ToeleveringMetLijn()
 	Do ToeleveringMock.VerwachtMethodCall("GeefID").DanReturn(ToeleveringId)
-	Do ToeleveringMock.VerwachtMethodCall("GeefAantalProducten").DanReturn(AantalLades)
 	Do ToeleveringMock.VerwachtMethodCall("GeefDueOutTime").DanReturn(Horolog)
 	Do ToeleveringMock.VerwachtMethodCall("GeefOrderID").DanReturn(OrderId)
 	Do ToeleveringMock.VerwachtMethodCall("GeefOorsprongKetting").DanReturn(OorsprongKetting)
Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/BatchNaarObjectiveDataGenerator.cls.xml
===================================================================
diff -u -r73004 -r73012
--- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/BatchNaarObjectiveDataGenerator.cls.xml	(.../BatchNaarObjectiveDataGenerator.cls.xml)	(revision 73004)
+++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/BatchNaarObjectiveDataGenerator.cls.xml	(.../BatchNaarObjectiveDataGenerator.cls.xml)	(revision 73012)
@@ -64,20 +64,20 @@
 </Method>
 
 <Method name="GenereerDataVoorToelevering">
-<FormalSpec>Batch:APPS.Halux.common.Batch,Toelevering:DOM.AKP.Toelevering,SequentieNummerToelevering:%Integer,SuffixId:%String</FormalSpec>
+<FormalSpec>Batch:APPS.Halux.common.Batch,Toelevering:DOM.AKP.Toelevering,SequentieNummerToelevering:%Integer,AantalLades:%Integer,SuffixId:%String</FormalSpec>
 <ReturnType>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData</ReturnType>
 <Implementation><![CDATA[
 	#dim DataVoorToeleveringGenerator As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.HoofdDataGenerator.DataVoorToeleveringGenerator = ..HoofdDataGeneratorFactory.MaakDataVoorToeleveringGenerator()
-	Quit DataVoorToeleveringGenerator.GenereerData(Batch, Toelevering, SequentieNummerToelevering, SuffixId)
+	Quit DataVoorToeleveringGenerator.GenereerData(Batch, Toelevering, SequentieNummerToelevering, AantalLades, SuffixId)
 ]]></Implementation>
 </Method>
 
 <Method name="GenereerDataVoorBatch">
-<FormalSpec>Batch:APPS.Halux.common.Batch,Toelevering:DOM.AKP.Toelevering,SequentieNummerToelevering:%Integer,SuffixId:%String</FormalSpec>
+<FormalSpec>Batch:APPS.Halux.common.Batch,Toelevering:DOM.AKP.Toelevering,SequentieNummerToelevering:%Integer,AantalLades:%Integer,SuffixId:%String</FormalSpec>
 <ReturnType>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData</ReturnType>
 <Implementation><![CDATA[
 	#dim DataVoorBatchGenerator As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.HoofdDataGenerator.DataVoorBatchGenerator = ..HoofdDataGeneratorFactory.MaakDataVoorBatchGenerator()
-	Quit DataVoorBatchGenerator.GenereerData(Batch, Toelevering, SequentieNummerToelevering, SuffixId)
+	Quit DataVoorBatchGenerator.GenereerData(Batch, Toelevering, SequentieNummerToelevering, AantalLades, SuffixId)
 ]]></Implementation>
 </Method>