Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective.cls.xml
===================================================================
diff -u -r74429 -r74458
--- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective.cls.xml	(.../BatchNaarObjective.cls.xml)	(revision 74429)
+++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective.cls.xml	(.../BatchNaarObjective.cls.xml)	(revision 74458)
@@ -161,7 +161,8 @@
 		#dim ToeleveringId As %String = ToeleveringenIterator.Next()
 		#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, UitvoeringLijstNummer, AantalLades, SuffixId)
-	
+		Set BatchData.GebruikersVelden.Vlag.IsProductionLineFixed = $$$False
+		
 		Do ##class(TECH.ListUtils).AppendList(BatchData.Opties, ..BatchNaarObjectiveDataGenerator.GenereerAlgemeneInfoOptiesVoorBatch(Batch))
 		Do ##class(TECH.ListUtils).AppendList(BatchData.Opties, ..GeefOptiesVoorToelevering(Toelevering, UitvoeringInfoLijstIterator))
 	
@@ -170,6 +171,7 @@
 			Set Toelevering = ..ToeleveringApi.GeefToelevering(ToeleveringId)
 		
 			Do ##class(TECH.ListUtils).AppendList(BatchData.Opties, ..GeefOptiesVoorToelevering(Toelevering, UitvoeringInfoLijstIterator))
+			Set BatchData.GebruikersVelden.Vlag.IsProductionLineFixed = BatchData.GebruikersVelden.Vlag.IsProductionLineFixed || ..GeefIsMinstensEenStalenRugFastMover(BatchData.Opties)
 		}
 	
 		Do BatchDataLijst.Insert(BatchData)
@@ -224,6 +226,7 @@
 				#dim BatchData As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData = ..BatchNaarObjectiveDataGenerator.GenereerDataVoorToelevering(Batch, Toelevering, ..IndexBestanden, AantalLadesInToelevering, SuffixId)
 				Do ##class(TECH.ListUtils).AppendList(BatchData.Opties, ..BatchNaarObjectiveDataGenerator.GenereerAlgemeneInfoOptiesVoorToelevering(Toelevering, Batch.GeefCategorie()))
 				Do ##class(TECH.ListUtils).AppendList(BatchData.Opties, ..GeefOptiesVoorToelevering(Toelevering, UitvoeringInfoLijstIterator))
+				Set BatchData.GebruikersVelden.Vlag.IsProductionLineFixed = ..GeefIsMinstensEenStalenRugFastMover(BatchData.Opties)
 				
 				Do BatchDataLijst.Insert(BatchData)
 			}
@@ -377,6 +380,25 @@
 	Do ..MailApi.VerstuurMail(Mail)
 ]]></Implementation>
 </Method>
+
+<Method name="GeefIsMinstensEenStalenRugFastMover">
+<FormalSpec>Opties:%ListOfObjects</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	#dim IsMinstensEenStalenRugFastMover = "false"
+	#dim OptieIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(Opties)
+	
+	While (OptieIterator.HasNext() && $$$Not(IsMinstensEenStalenRugFastMover)) {
+		#dim Optie As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveOptions = OptieIterator.Next()
+		
+		If (##class(TECH.StringUtils).Contains(Optie.Naam, "BackSteelIsFastMover") && (Optie.Waarde = $$$True)) {
+			Set IsMinstensEenStalenRugFastMover = "true"
+		}
+	}
+	
+	Quit IsMinstensEenStalenRugFastMover
+]]></Implementation>
+</Method>
 </Class>