Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/BatchNaarObjectiveDataGenerator.cls.xml
===================================================================
diff -u -r71552 -r71765
--- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/BatchNaarObjectiveDataGenerator.cls.xml	(.../BatchNaarObjectiveDataGenerator.cls.xml)	(revision 71552)
+++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/BatchNaarObjectiveDataGenerator.cls.xml	(.../BatchNaarObjectiveDataGenerator.cls.xml)	(revision 71765)
@@ -4,6 +4,11 @@
 <Abstract>1</Abstract>
 <Super>TECH.RegisteredObject</Super>
 
+<Property name="ToeleveringAantalRollenOptiesGenerator">
+<Type>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.OptieGenerator.ToeleveringAantalRollenOptiesGenerator</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="DataVoorToeleveringGenerator">
 <Type>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.DataVoorToeleveringGenerator</Type>
 <Private>1</Private>
@@ -30,6 +35,7 @@
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
+	Set ..ToeleveringAantalRollenOptiesGenerator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.OptieGenerator.ToeleveringAantalRollenOptiesGenerator).%New()
 	Set ..DataVoorToeleveringGenerator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.DataVoorToeleveringGenerator).%New()
 	Set ..SequentieOptieGenerator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.OptieGenerator.SequentieOptiesGenerator).%New()
 	Set ..ProductOptiesGenerator = ##class(APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.OptieGenerator.ProductOptiesGenerator).%New()
@@ -52,16 +58,24 @@
 <Implementation><![CDATA[
 	Set Opties = ##class(%ListOfObjects).%New()
 	
+	Do ##class(TECH.ListUtils).AppendList(Opties, ..GenereerAantalRollenVoorToelevering(Toelevering, UitvoeringInfo))
 	Do ##class(TECH.ListUtils).AppendList(Opties, ..GenereerSequentieOpties(Toelevering, UitvoeringInfo))
 	Do ##class(TECH.ListUtils).AppendList(Opties, ..GenereerProductOpties(Toelevering, UitvoeringInfo))
 	Do ##class(TECH.ListUtils).AppendList(Opties, ..GenereerRollenEnStuklijstOpties(Toelevering, UitvoeringInfo))
 	Do ##class(TECH.ListUtils).AppendList(Opties, ..GenereerAlgemeneKenmerkenOpties(Toelevering, UitvoeringInfo))
-	Do ##class(TECH.ListUtils).AppendList(Opties, ..GenereerIngegevenKenmerkenOpties(Toelevering, UitvoeringInfo))
+	Do ##class(TECH.ListUtils).AppendList(Opties, ..GenereerIngegevenKenmerkenOpties(Toelevering, UitvoeringInfo))	
 	
 	Quit Opties
 ]]></Implementation>
 </Method>
 
+<Method name="GenereerAantalRollenVoorToelevering">
+<FormalSpec>Toelevering:DOM.AKP.Toelevering,UitvoeringInfo:APPS.Halux.PPS.Activiteit.impl.common.dto.BatchNaarObjectiveUitvoeringInfo</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[	Quit ..ToeleveringAantalRollenOptiesGenerator.GenereerOptiesVoorLade(Toelevering, UitvoeringInfo)
+]]></Implementation>
+</Method>
+
 <Method name="GenereerSequentieOpties">
 <FormalSpec>Toelevering:DOM.AKP.Toelevering,UitvoeringInfo:APPS.Halux.PPS.Activiteit.impl.common.dto.BatchNaarObjectiveUitvoeringInfo</FormalSpec>
 <Private>1</Private>