Index: APPS/Halux/PPS/impl/AansturingActie/common/VoormontageSpaceStep.cls.xml
===================================================================
diff -u -r62054 -r62230
--- APPS/Halux/PPS/impl/AansturingActie/common/VoormontageSpaceStep.cls.xml	(.../VoormontageSpaceStep.cls.xml)	(revision 62054)
+++ APPS/Halux/PPS/impl/AansturingActie/common/VoormontageSpaceStep.cls.xml	(.../VoormontageSpaceStep.cls.xml)	(revision 62230)
@@ -214,6 +214,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefAantalRelevanteProducten">
+<FormalSpec>BatchID:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..GeefMaatwerkProductenLijstMetSpaceSteps(BatchID).Count()
+]]></Implementation>
+</Method>
+
 <Storage name="Default">
 <Type>%Library.CacheStorage</Type>
 <DefaultData>VoormontageSpaceStepDefaultData</DefaultData>
Index: APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiketSpaceStep.cls.xml
===================================================================
diff -u -r62022 -r62230
--- APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiketSpaceStep.cls.xml	(.../KlantEtiketSpaceStep.cls.xml)	(revision 62022)
+++ APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiketSpaceStep.cls.xml	(.../KlantEtiketSpaceStep.cls.xml)	(revision 62230)
@@ -87,6 +87,24 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefAantalRelevanteProducten">
+<FormalSpec>BatchID:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	Set BatchService = ##class(APPS.Halux.Planning.impl.BatchService).%New()
+	#dim AantalProducten As %Integer = 0
+	#dim LijstToeleveringen As APPS.Halux.Planning.dto.BatchToeleveringen = BatchService.GeefToeleveringenInBatch(BatchID)
+	#dim ToeleveringIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(LijstToeleveringen.Toeleveringen)
+	
+	While ToeleveringIterator.HasNext() {		
+		#dim Toelevering As %String = ToeleveringIterator.Next()
+		Set AantalProducten = AantalProducten + Toelevering.AantalProducten					
+	}
+	
+	Quit AantalProducten
+]]></Implementation>
+</Method>
+
 <Storage name="Default">
 <Type>%Library.CacheStorage</Type>
 <DefaultData>KlantEtiketSpaceStepDefaultData</DefaultData>