Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective.cls.xml
===================================================================
diff -u -r73012 -r73344
--- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective.cls.xml	(.../BatchNaarObjective.cls.xml)	(revision 73012)
+++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective.cls.xml	(.../BatchNaarObjective.cls.xml)	(revision 73344)
@@ -30,6 +30,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="BatchPitchedRepository">
+<Type>APPS.Halux.Planning.Pitching.impl.BatchPitchedRepository</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>ToeleveringApi:DOM.AKP.ToeleveringAPI="",BatchNaarObjectiveDataGenerator:APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.BatchNaarObjectiveDataGenerator="",MailApi:TECH.Mail.MailAPI=""</FormalSpec>
 <Private>1</Private>
@@ -42,6 +47,7 @@
 	Set ..MESService = ##class(APPS.Halux.PPS.MES.MESService).%New()
 	Set ..Logger = ##class(vhLib.Logger).%New("APPS.Halux.PPS.Document.impl.LBX.BatchNaarObjective")
 	Set ..MailApi = $$$Inject(MailApi, ##class(TECH.Context).Instance().GeefMailAPI())
+	Set ..BatchPitchedRepository = ##class(APPS.Halux.Planning.Pitching.impl.BatchPitchedRepository).%New()
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -55,7 +61,7 @@
 </Method>
 
 <Method name="VerwerkUitvoeringInfoLijst">
-<FormalSpec>Lijst:APPS.Halux.PPS.dto.UitvoeringInfoLijst</FormalSpec>
+<FormalSpec>Lijst:APPS.Halux.PPS.dto.UitvoeringInfoLijst,ActiviteitParameters:APPS.Halux.PPS.Activiteit.ActiviteitParameters,ActieParameters:%ListOfDataTypes=""</FormalSpec>
 <ReturnType>APPS.Halux.PPS.dto.UitvoeringResultaat</ReturnType>
 <Implementation><![CDATA[
 	#dim UitvoeringStatus As APPS.Halux.PPS.enu.UitvoeringStatus = ##class(APPS.Halux.PPS.enu.UitvoeringStatus).InUitvoering()
@@ -64,18 +70,34 @@
 	#dim AantalUitSublijstenUitvoeringInfo As %Integer = UitvoeringInfoLijstGesplitst.Size
 	Set UitvoeringInfoIterator = ##class(TECH.ListIterator).%New(UitvoeringInfoLijstGesplitst)
 	
-	#dim IndexUitvoeringInfoLijstGesplitst As %Integer = 1
-	While UitvoeringInfoIterator.HasNext() {
-		#dim UitvoeringInfoLijst As APPS.Halux.PPS.dto.UitvoeringInfoLijst = UitvoeringInfoIterator.Next()
+	#dim UitvoeringInfo As APPS.Halux.PPS.Activiteit.impl.common.dto.BatchNaarObjectiveUitvoeringInfo = Lijst.GetAt(1)
+	#dim IsBatchAlGepitched As %Boolean = ..BatchPitchedRepository.IsBatchGepitched(UitvoeringInfo.BatchID)
+	#dim FilterToeleveringId As %String = ""
+	
+	If (IsBatchAlGepitched) {
+		If ($$$Not(ActieParameters = "") && $$$Not(..BevatBatchVhoss(Lijst))) {
+			Set ActieParameterIterator = ##class(TECH.ListIterator).%New(ActieParameters)
+			Set FilterToeleveringId = ActieParameterIterator.Next()
+		} Else {
+			Set UitvoeringStatus = ##class(APPS.Halux.PPS.enu.UitvoeringStatus).Fout()
+		}
+	}
+	
+	If $$$Not(UitvoeringStatus = ##class(APPS.Halux.PPS.enu.UitvoeringStatus).Fout()) {
+		#dim IndexUitvoeringInfoLijstGesplitst As %Integer = 1
+		While UitvoeringInfoIterator.HasNext() {
+			#dim UitvoeringInfoLijst As APPS.Halux.PPS.dto.UitvoeringInfoLijst = UitvoeringInfoIterator.Next()
+			
+			#dim SuffixId As %String = ..GeefSuffixId(AantalUitSublijstenUitvoeringInfo, IndexUitvoeringInfoLijstGesplitst)
+			#dim BatchData As %ListOfObjects = ..GenereerBatchDataVoorUitvoeringInfoLijst(UitvoeringInfoLijst, SuffixId, FilterToeleveringId)
+			Do ..ExporteerDataNaarXmlDocument(BatchData, SuffixId)
+			
+			Set IndexUitvoeringInfoLijstGesplitst = $Increment(IndexUitvoeringInfoLijstGesplitst)
+		}
 		
-		#dim SuffixId As %String = ..GeefSuffixId(AantalUitSublijstenUitvoeringInfo, IndexUitvoeringInfoLijstGesplitst)
-		#dim BatchData As %ListOfObjects = ..GenereerBatchDataVoorUitvoeringInfoLijst(UitvoeringInfoLijst, SuffixId)
-		Do ..ExporteerDataNaarXmlDocument(BatchData, SuffixId)
-		
-		Set IndexUitvoeringInfoLijstGesplitst = $Increment(IndexUitvoeringInfoLijstGesplitst)
+		Set UitvoeringStatus = ##class(APPS.Halux.PPS.enu.UitvoeringStatus).Succes()
 	}
 	
-	Set UitvoeringStatus = ##class(APPS.Halux.PPS.enu.UitvoeringStatus).Succes()
 	Quit UitvoeringStatus
 ]]></Implementation>
 </Method>
@@ -115,7 +137,7 @@
 </Method>
 
 <Method name="GenereerBatchDataVoorUitvoeringInfoLijst">
-<FormalSpec>UitvoeringInfoLijst:APPS.Halux.PPS.dto.UitvoeringInfoLijst,SuffixId:%String</FormalSpec>
+<FormalSpec>UitvoeringInfoLijst:APPS.Halux.PPS.dto.UitvoeringInfoLijst,SuffixId:%String,FilterToeleveringId:%String=""</FormalSpec>
 <ReturnType>%ListOfObjects</ReturnType>
 <ReturnTypeParams>ELEMENTTYPE="APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveData"</ReturnTypeParams>
 <Implementation><![CDATA[
@@ -131,7 +153,7 @@
 			If (..BevatBatchVhoss(UitvoeringInfoLijst)) {
 				Set BatchDataLijst = ..GeefVhossBatchDataLijst(Batch, UitvoeringInfoLijstIterator, UitvoeringInfoLijst.Size, SuffixId)
 			} Else {
-				Set BatchDataLijst = ..GeefStandaardBatchDataLijst(Batch, UitvoeringInfoLijstIterator, UitvoeringInfoLijst.Size, SuffixId)
+				Set BatchDataLijst = ..GeefStandaardBatchDataLijst(Batch, UitvoeringInfoLijstIterator, UitvoeringInfoLijst.Size, SuffixId, FilterToeleveringId)
 			}	
 			
 		}
@@ -169,7 +191,7 @@
 </Method>
 
 <Method name="GeefStandaardBatchDataLijst">
-<FormalSpec>Batch:APPS.Halux.common.Batch,UitvoeringInfoLijstIterator:TECH.Iterator,AantalLades:%Integer,SuffixId:%String</FormalSpec>
+<FormalSpec>Batch:APPS.Halux.common.Batch,UitvoeringInfoLijstIterator:TECH.Iterator,AantalLades:%Integer,SuffixId:%String,FilterToeleveringId:%String=""</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	Set BatchDataLijst = ##class(%ListOfObjects).%New()
@@ -178,14 +200,17 @@
 	
 	While ToeleveringenIterator.HasNext() {
 		#dim ToeleveringId As %String = ToeleveringenIterator.Next().GeefID()
-		#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, AantalLades, SuffixId)
-		Do ##class(TECH.ListUtils).AppendList(BatchData.Opties, ..BatchNaarObjectiveDataGenerator.GenereerAlgemeneInfoOptiesVoorToelevering(Toelevering, Batch.GeefCategorie()))
-		Do ##class(TECH.ListUtils).AppendList(BatchData.Opties, ..GeefOptiesVoorToelevering(Toelevering, UitvoeringInfoLijstIterator))
-		
-		Do BatchDataLijst.Insert(BatchData)
+		If (($$$Not(FilterToeleveringId = "") && (ToeleveringId = FilterToeleveringId)) || (FilterToeleveringId = "")) {
+			#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, AantalLades, SuffixId)
+			Do ##class(TECH.ListUtils).AppendList(BatchData.Opties, ..BatchNaarObjectiveDataGenerator.GenereerAlgemeneInfoOptiesVoorToelevering(Toelevering, Batch.GeefCategorie()))
+			Do ##class(TECH.ListUtils).AppendList(BatchData.Opties, ..GeefOptiesVoorToelevering(Toelevering, UitvoeringInfoLijstIterator))
+			
+			Do BatchDataLijst.Insert(BatchData)
+		}
 	}
 	
 	Quit BatchDataLijst
Index: APPS/Halux/PPS/impl/AansturingActieVoorActiviteit.cls.xml
===================================================================
diff -u -r68857 -r73344
--- APPS/Halux/PPS/impl/AansturingActieVoorActiviteit.cls.xml	(.../AansturingActieVoorActiviteit.cls.xml)	(revision 68857)
+++ APPS/Halux/PPS/impl/AansturingActieVoorActiviteit.cls.xml	(.../AansturingActieVoorActiviteit.cls.xml)	(revision 73344)
@@ -67,6 +67,11 @@
 <Required>1</Required>
 </Property>
 
+<Property name="Batch">
+<Type>APPS.Halux.common.Batch</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="MaakActie">
 <ClassMethod>1</ClassMethod>
 <FormalSpec>Categorie:APPS.Halux.common.enu.Categorie,Omschrijving:%String,IsMogelijkZonderBatch:%Boolean,VolgNummer:%Integer,ActiviteitGroepID:%String,IsStandaardActie:%Boolean=0,ActiviteitID:%String,InformatieID:%String="",ActiviteitLijnID:%String=""</FormalSpec>
@@ -156,10 +161,11 @@
 bekomen door een query op ActiviteitgroepID, ActiviteitNaam en BatchID, en
 daarbinnen de wachtende items (werklijststatus = Wachtend).  Als de
 InformatieID ingevuld is, wordt ie ook in de query opgenomen.</Description>
-<FormalSpec>BatchID:%String,ActieParameters:%ListOfDataTypes</FormalSpec>
+<FormalSpec>BatchID:%String,ActieParameters:%ListOfDataTypes=""</FormalSpec>
 <ReturnType>APPS.Halux.PPS.dto.ActieResultaat</ReturnType>
 <Implementation><![CDATA[
 	#dim Batch As APPS.Halux.common.Batch = ##class(APPS.ApplicatieContext).Instance().GeefProductieAPI().GeefBatchService().GeefBatch(BatchID)
+	
 	If ( ..DocumentMagWordenAfgedrukt(Batch.GeefLijn(), Batch.GeefCategorie(), Batch.GeefProductieGroep())) {
 		#dim ActiviteitGroepID As %String = ..ActiviteitGroepID
 		#dim ActiviteitID As %String = ..ActiviteitID
@@ -179,7 +185,7 @@
 		
 		If WerklijstItemIDs.Count() > 0 {
 			#dim Activiteit As 	APPS.Halux.PPS.Activiteit.Activiteit = ##class(APPS.Halux.PPS.Activiteit.Activiteit).OpenId(ActiviteitID)	
-			Do Activiteit.VoerUitWerklijstItems(WerklijstItemIDs, ..GeefUitvoeringParameter("Printer"))
+			Do Activiteit.VoerUitWerklijstItems(WerklijstItemIDs, ..GeefUitvoeringParameter("Printer"), ActieParameters)
 		}
 	}
 	quit ..GeefGeslaagdAansturingResultaat()
@@ -218,10 +224,18 @@
 </Method>
 
 <Method name="GeefParameters">
+<FormalSpec>BatchID:%String</FormalSpec>
 <ReturnType>%ListOfObjects</ReturnType>
 <ReturnTypeParams>ELEMENTTYPE="APPS.common.Actie.dto.ActieParameter"</ReturnTypeParams>
 <Implementation><![CDATA[
 	#dim Parameters As List Of APPS.common.Actie.dto.ActieParameter = ##super()	
+	#dim Batch As APPS.Halux.common.Batch = ##class(APPS.ApplicatieContext).Instance().GeefProductieAPI().GeefBatchService().GeefBatch(BatchID)
+	Set ..Batch = Batch
+	
+	If (..Omschrijving = "Batch naar Objective") {
+		Do ..MaakParameterListVoorBatchNaarObjective(.Parameters)
+	}
+	
 	Quit Parameters
 ]]></Implementation>
 </Method>
@@ -277,6 +291,25 @@
 ]]></Implementation>
 </Method>
 
+<Method name="MaakParameterListVoorBatchNaarObjective">
+<FormalSpec><![CDATA[&ParameterList:%ListOfObjects(ELEMENTTYPE="APPS.common.Actie.dto.ActieParameter")]]></FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	If $$$Not(##class(TECH.StringUtils).Equals(..Batch.GeefProductieGroep(), ##class(APPS.Halux.common.enu.ProductieGroep).Kast(), ##class(APPS.Halux.common.enu.ProductieGroep).MVXSpoelbakVHoss(), ##class(APPS.Halux.common.enu.ProductieGroep).LBXSpoelbakVHoss(),  ##class(APPS.Halux.common.enu.ProductieGroep).TBXOrionGrijsVhoss())) {
+		Set Parameter = ##class(APPS.common.Actie.dto.EnumerationActieParameter).%New("")
+		Set Parameter.Type = ##class(APPS.common.Actie.enu.Type).Enumeratie()
+		
+		#dim Toeleveringen As %ListOfDataTypes = ##class(TECH.ListUtils).CopyListOfDataTypes(..Batch.GeefToeleveringen())
+		Do ##class(TECH.Algo.Sort.InsertionSort).Sort(Toeleveringen,##class(TECH.Comparator.StringComparator).%New())
+		Set Parameter.ActueleWaarden = Toeleveringen
+		Set Parameter.DisplayWaarden = Toeleveringen
+		
+		Set Parameter.Prompt = "Toelevering:"
+		Do ParameterList.Insert(Parameter)
+	}
+]]></Implementation>
+</Method>
+
 <Storage name="Default">
 <Type>%Library.CacheStorage</Type>
 <DefaultData>AansturingActieVoorActiviteitDefaultData</DefaultData>
@@ -297,6 +330,12 @@
 <Value name="5">
 <Value>ActiviteitLijnID</Value>
 </Value>
+<Value name="6">
+<Value>ProductieGroep</Value>
+</Value>
+<Value name="7">
+<Value>Batch</Value>
+</Value>
 </Data>
 </Storage>
 </Class>
Index: APPS/Halux/PPS/Document/impl/EtiketAfdrukker.cls.xml
===================================================================
diff -u -r68833 -r73344
--- APPS/Halux/PPS/Document/impl/EtiketAfdrukker.cls.xml	(.../EtiketAfdrukker.cls.xml)	(revision 68833)
+++ APPS/Halux/PPS/Document/impl/EtiketAfdrukker.cls.xml	(.../EtiketAfdrukker.cls.xml)	(revision 73344)
@@ -52,7 +52,7 @@
 
 <Method name="VerwerkUitvoeringInfoLijst">
 <Final>1</Final>
-<FormalSpec>Lijst:APPS.Halux.PPS.dto.UitvoeringInfoLijst,ActiviteitParameters:APPS.Halux.PPS.Activiteit.ActiviteitParameters,IsKlantEtiketSpaceStep:%Boolean=$$$False</FormalSpec>
+<FormalSpec>Lijst:APPS.Halux.PPS.dto.UitvoeringInfoLijst,ActiviteitParameters:APPS.Halux.PPS.Activiteit.ActiviteitParameters,ActieParameters:%ListOfDataTypes="",IsKlantEtiketSpaceStep:%Boolean=$$$False</FormalSpec>
 <ReturnType>APPS.Halux.PPS.dto.UitvoeringResultaat</ReturnType>
 <Implementation><![CDATA[
 	Set ..ActiviteitParameters = ActiviteitParameters
Index: APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiketSpaceStep.cls.xml
===================================================================
diff -u -r62318 -r73344
--- APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiketSpaceStep.cls.xml	(.../KlantEtiketSpaceStep.cls.xml)	(revision 62318)
+++ APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiketSpaceStep.cls.xml	(.../KlantEtiketSpaceStep.cls.xml)	(revision 73344)
@@ -36,7 +36,7 @@
 		Set ActiviteitParameters = ##class(APPS.Halux.PPS.Activiteit.ActiviteitParameters).%New()
 		Set ActiviteitParameters.Printer = ..GeefUitvoeringParameter(##class(APPS.Halux.PPS.enu.UitvoeringParameter).Printer())
 		
-		Do ##class(APPS.Halux.PPS.Activiteit.impl.LBX.KlantEtiketten.LijstVerwerker).%New().VerwerkUitvoeringInfoLijst(UitvoeringInfoLijst,ActiviteitParameters,$$$True)
+		Do ##class(APPS.Halux.PPS.Activiteit.impl.LBX.KlantEtiketten.LijstVerwerker).%New().VerwerkUitvoeringInfoLijst(UitvoeringInfoLijst,ActiviteitParameters, ,$$$True)
 	}
 	
 	Quit ..GeefGeslaagdAansturingResultaat()
Index: vhTest/Fake/APPS/Halux/Planning/Pitching/impl/BatchPitchedRepository.cls.xml
===================================================================
diff -u -r71731 -r73344
--- vhTest/Fake/APPS/Halux/Planning/Pitching/impl/BatchPitchedRepository.cls.xml	(.../BatchPitchedRepository.cls.xml)	(revision 71731)
+++ vhTest/Fake/APPS/Halux/Planning/Pitching/impl/BatchPitchedRepository.cls.xml	(.../BatchPitchedRepository.cls.xml)	(revision 73344)
@@ -16,7 +16,13 @@
 
 <Method name="Bewaar">
 <FormalSpec>Data:TECH.Persistent</FormalSpec>
-<Implementation><![CDATA[
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="IsBatchGepitched">
+<FormalSpec>BatchId:%Integer</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ""
 ]]></Implementation>
 </Method>
 
@@ -49,14 +55,12 @@
 
 <Method name="VerwijderViaID">
 <FormalSpec>ID:%String</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="VerwijderViaObject">
 <FormalSpec>Data:TECH.Persistent</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="ZoekAlle">
Index: vhTest/Mock/APPS/Halux/Planning/Pitching/impl/BatchPitchedRepository.cls.xml
===================================================================
diff -u -r71731 -r73344
--- vhTest/Mock/APPS/Halux/Planning/Pitching/impl/BatchPitchedRepository.cls.xml	(.../BatchPitchedRepository.cls.xml)	(revision 71731)
+++ vhTest/Mock/APPS/Halux/Planning/Pitching/impl/BatchPitchedRepository.cls.xml	(.../BatchPitchedRepository.cls.xml)	(revision 73344)
@@ -49,6 +49,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="IsBatchGepitched">
+<FormalSpec>BatchId:%Integer</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("IsBatchGepitched",BatchId)
+]]></Implementation>
+</Method>
+
 <Method name="Maak">
 <ReturnType>TECH.Persistent</ReturnType>
 <Implementation><![CDATA[	quit ..VerwerkMethodCall("Maak")
Index: APPS/Halux/PPS/Activiteit/impl/WerklijstItemsUitvoerder.cls.xml
===================================================================
diff -u -r72997 -r73344
--- APPS/Halux/PPS/Activiteit/impl/WerklijstItemsUitvoerder.cls.xml	(.../WerklijstItemsUitvoerder.cls.xml)	(revision 72997)
+++ APPS/Halux/PPS/Activiteit/impl/WerklijstItemsUitvoerder.cls.xml	(.../WerklijstItemsUitvoerder.cls.xml)	(revision 73344)
@@ -27,18 +27,18 @@
 </Method>
 
 <Method name="VoerUit">
-<FormalSpec>Activiteit:APPS.Halux.PPS.Activiteit.Activiteit,WerklijstItemIDs:%ListOfDataTypes,VerwerkerParameter:%CacheString=""</FormalSpec>
+<FormalSpec>Activiteit:APPS.Halux.PPS.Activiteit.Activiteit,WerklijstItemIDs:%ListOfDataTypes,VerwerkerParameter:%CacheString="",ActieParameters:%ListOfDataTypes=""</FormalSpec>
 <Implementation><![CDATA[
 	#dim UitvoeringInfoLijstPerInformatieID As %ArrayOfObjects = ..GeefUitvoeringInfoLijstPerInformatieID(WerklijstItemIDs)
-	do ..VoerUitUitvoeringInfoLijstPerInformatieID(UitvoeringInfoLijstPerInformatieID,Activiteit,VerwerkerParameter)
+	do ..VoerUitUitvoeringInfoLijstPerInformatieID(UitvoeringInfoLijstPerInformatieID,Activiteit,VerwerkerParameter, ActieParameters)
 ]]></Implementation>
 </Method>
 
 <Method name="VoerUitUitvoeringInfoLijstPerInformatieID">
 <Description><![CDATA[
 Methode die de lijst opstelt voor onder andere mattenlijsten van LBX en TAX, de code die de lijst opstelt voor TBX is te vinden onder: BL.PPS.TBX.DocsV1 -> MatLijst()
 Deze methode stelt ook de "Picking: onderdelen" lijst van onderandere TAX op]]></Description>
-<FormalSpec>UitvoeringInfoLijstPerInformatieID:%ArrayOfObjects,Activiteit:APPS.Halux.PPS.Activiteit.Activiteit,VerwerkerParameter:%CacheString=""</FormalSpec>
+<FormalSpec>UitvoeringInfoLijstPerInformatieID:%ArrayOfObjects,Activiteit:APPS.Halux.PPS.Activiteit.Activiteit,VerwerkerParameter:%CacheString="",ActieParameters:%ListOfDataTypes=""</FormalSpec>
 <Private>1</Private>
 <ReturnType>APPS.Halux.PPS.dto.UitvoeringResultaat</ReturnType>
 <Implementation><![CDATA[
@@ -134,7 +134,7 @@
 				}
 			}	
 			If (SamengesteldeLijst.Count()>0 && ObjectIsMat) {
-				Set UitvoeringResultaat = Verwerker.VerwerkUitvoeringInfoLijst(SamengesteldeLijst,ActiviteitParameters)
+				Set UitvoeringResultaat = Verwerker.VerwerkUitvoeringInfoLijst(SamengesteldeLijst,ActiviteitParameters, ActieParameters)
 				Do UitvoeringLijstIterator.Reset()
 				#dim i = 1
 				While UitvoeringLijstIterator.HasNext() {
@@ -145,7 +145,7 @@
 				}
 			}
 			else {
-				Set UitvoeringResultaat = Verwerker.VerwerkUitvoeringInfoLijst(UitvoeringInfoLijst,ActiviteitParameters)
+				Set UitvoeringResultaat = Verwerker.VerwerkUitvoeringInfoLijst(UitvoeringInfoLijst,ActiviteitParameters, ActieParameters)
 				
 			}
 		}
Index: APPS/Halux/PPS/UitvoeringInfoLijstVerwerker.cls.xml
===================================================================
diff -u -r51453 -r73344
--- APPS/Halux/PPS/UitvoeringInfoLijstVerwerker.cls.xml	(.../UitvoeringInfoLijstVerwerker.cls.xml)	(revision 51453)
+++ APPS/Halux/PPS/UitvoeringInfoLijstVerwerker.cls.xml	(.../UitvoeringInfoLijstVerwerker.cls.xml)	(revision 73344)
@@ -19,7 +19,7 @@
 
 <Method name="VerwerkUitvoeringInfoLijst">
 <Abstract>1</Abstract>
-<FormalSpec>Lijst:APPS.Halux.PPS.dto.UitvoeringInfoLijst,ActiviteitParameters:APPS.Halux.PPS.Activiteit.ActiviteitParameters</FormalSpec>
+<FormalSpec>Lijst:APPS.Halux.PPS.dto.UitvoeringInfoLijst,ActiviteitParameters:APPS.Halux.PPS.Activiteit.ActiviteitParameters,ActieParameters:%ListOfDataTypes=""</FormalSpec>
 <ReturnType>APPS.Halux.PPS.dto.UitvoeringResultaat</ReturnType>
 </Method>
 </Class>
Index: APPS/Halux/PPS/Activiteit/Activiteit.cls.xml
===================================================================
diff -u -r29059 -r73344
--- APPS/Halux/PPS/Activiteit/Activiteit.cls.xml	(.../Activiteit.cls.xml)	(revision 29059)
+++ APPS/Halux/PPS/Activiteit/Activiteit.cls.xml	(.../Activiteit.cls.xml)	(revision 73344)
@@ -267,10 +267,10 @@
 
 Indien er nog andere activiteiten zijn met dezelfde code in andere
 ActiviteitGroepen, wordt hun status veranderd naar "EldersUitgevoerd".</Description>
-<FormalSpec>WerklijstItemIDs:%ListOfDataTypes,VerwerkerParameter:%CacheString=""</FormalSpec>
+<FormalSpec>WerklijstItemIDs:%ListOfDataTypes,VerwerkerParameter:%CacheString="",ActieParameters:%ListOfDataTypes=""</FormalSpec>
 <Implementation><![CDATA[
 	set WerklijstItemsUitvoerder = ##class(APPS.Halux.PPS.Activiteit.impl.WerklijstItemsUitvoerder).%New()
-	do WerklijstItemsUitvoerder.VoerUit($this,WerklijstItemIDs,VerwerkerParameter)
+	do WerklijstItemsUitvoerder.VoerUit($this,WerklijstItemIDs,VerwerkerParameter, ActieParameters)
 ]]></Implementation>
 </Method>
 
Index: APPS/Halux/Planning/Pitching/impl/BatchPitchedRepository.cls.xml
===================================================================
diff -u -r71731 -r73344
--- APPS/Halux/Planning/Pitching/impl/BatchPitchedRepository.cls.xml	(.../BatchPitchedRepository.cls.xml)	(revision 71731)
+++ APPS/Halux/Planning/Pitching/impl/BatchPitchedRepository.cls.xml	(.../BatchPitchedRepository.cls.xml)	(revision 73344)
@@ -51,6 +51,20 @@
 	Quit ResultSetIterator.Next().Pitchorde
 ]]></Implementation>
 </Method>
+
+<Method name="IsBatchGepitched">
+<FormalSpec>BatchId:%Integer</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	#dim SqlTableName As TECH.String = ##class(TECH.CompiledClassUtils).GetSQLTableName(..#DataClassName)
+	#dim SqlStatement As TECH.String = "SELECT ID FROM " _SqlTableName _ " WHERE Batch = " _ BatchId 
+				
+	#dim ResultSet As TECH.ResultSet = ..QueryAPI.GetResultSet(##class(TECH.DynamicQuery).%New(SqlStatement))
+	#dim ResultSetIterator As TECH.Iterator = ##class(TECH.ResultSetIterator).%New(ResultSet)
+	
+	Quit ResultSetIterator.HasNext()
+]]></Implementation>
+</Method>
 </Class>