Index: APPS/Halux/Machine/OpdeelZaag/impl/OptimalisatieBestandGenerator.cls.xml
===================================================================
diff -u -r68452 -r68457
--- APPS/Halux/Machine/OpdeelZaag/impl/OptimalisatieBestandGenerator.cls.xml	(.../OptimalisatieBestandGenerator.cls.xml)	(revision 68452)
+++ APPS/Halux/Machine/OpdeelZaag/impl/OptimalisatieBestandGenerator.cls.xml	(.../OptimalisatieBestandGenerator.cls.xml)	(revision 68457)
@@ -35,7 +35,7 @@
 	
 	Set RapportData.DataVelden = ..GeefDataVelden()
 	Set RapportData.DataTransferObjecten = OptimalisatieDataLijst
-	Set RapportData.BestandVolledigeNaam = ..PadGenerator.Genereer(Client, Afhandeling, ..GeefBestandNaamPrefix(IsSpecialWorkshop), BatchID, IsRework)
+	Set RapportData.BestandVolledigeNaam = ..PadGenerator.Genereer(Client, Afhandeling, ..GeefBestandNaamPrefix(OptimalisatieDataLijst, IsSpecialWorkshop), BatchID, IsRework)
 	
 	Quit ..RapportGenerator.MaakBestand(RapportData)
 ]]></Implementation>
@@ -85,19 +85,30 @@
 </Method>
 
 <Method name="GeefBestandNaamPrefix">
-<FormalSpec>IsSpecialWorkshop:%Boolean</FormalSpec>
+<FormalSpec>OptimalisatieDataLijst:APPS.Halux.Machine.OpdeelZaag.dto.OptimalisatieDataLijst,IsSpecialWorkshop:%Boolean</FormalSpec>
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	Quit:(IsSpecialWorkshop) "ImportFileSpecialWorkshop_AantalStuks_" _ ..GeefAantalStuksSpecialWorkshopFronten() _ "_"
+	Quit:(IsSpecialWorkshop) "ImportFileSpecialWorkshop_AantalStuks_" _ ..GeefAantalStuksSpecialWorkshop(OptimalisatieDataLijst)
 	Quit "ImportFile"
 ]]></Implementation>
 </Method>
 
-<Method name="GeefAantalStuksSpecialWorkshopFronten">
+<Method name="GeefAantalStuksSpecialWorkshop">
+<FormalSpec>OptimalisatieDataLijst:APPS.Halux.Machine.OpdeelZaag.dto.OptimalisatieDataLijst</FormalSpec>
 <Private>1</Private>
 <ReturnType>%Integer</ReturnType>
-<Implementation><![CDATA[	Quit 0
+<Implementation><![CDATA[
+	#dim Aantal As %Integer = 0
+	
+	Set OptimalisatieDataLijstIterator = ##class(TECH.ListIterator).%New(OptimalisatieDataLijst)
+	While (OptimalisatieDataLijstIterator.HasNext()) {
+		#dim OptimalisatieData As APPS.Halux.Machine.OpdeelZaag.dto.OptimalisatieData = OptimalisatieDataLijstIterator.Next()
+		
+		Set Aantal = Aantal + OptimalisatieData.Aantal
+	}
+	
+	Quit Aantal
 ]]></Implementation>
 </Method>
 </Class>