Index: APPS/Halux/Machine/OpdeelZaag/impl/OptimalisatieBestandGenerator.cls.xml
===================================================================
diff -u -r40927 -r68150
--- APPS/Halux/Machine/OpdeelZaag/impl/OptimalisatieBestandGenerator.cls.xml	(.../OptimalisatieBestandGenerator.cls.xml)	(revision 40927)
+++ APPS/Halux/Machine/OpdeelZaag/impl/OptimalisatieBestandGenerator.cls.xml	(.../OptimalisatieBestandGenerator.cls.xml)	(revision 68150)
@@ -28,14 +28,14 @@
 </Method>
 
 <Method name="Genereer">
-<FormalSpec>BatchID:%String,OptimalisatieDataLijst:APPS.Halux.Machine.OpdeelZaag.dto.OptimalisatieDataLijst,Afhandeling:APPS.Halux.Machine.OpdeelZaag.enu.Afhandeling,Client:APPS.Halux.Machine.OpdeelZaag.enu.Client,IsRework:%Boolean=0</FormalSpec>
+<FormalSpec>BatchID:%String,OptimalisatieDataLijst:APPS.Halux.Machine.OpdeelZaag.dto.OptimalisatieDataLijst,Afhandeling:APPS.Halux.Machine.OpdeelZaag.enu.Afhandeling,Client:APPS.Halux.Machine.OpdeelZaag.enu.Client,IsRework:%Boolean=0,IsSpecialWorkshop:%Boolean=0</FormalSpec>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	#dim RapportData As APPS.common.Rapport.dto.BestandRapportDataDataTransferObjectBased = ##class(APPS.common.Rapport.dto.BestandRapportDataDataTransferObjectBased).%New()
 	
 	Set RapportData.DataVelden = ..GeefDataVelden()
 	Set RapportData.DataTransferObjecten = OptimalisatieDataLijst
-	Set RapportData.BestandVolledigeNaam = ..PadGenerator.Genereer(Client, Afhandeling, "ImportFile", BatchID, IsRework)
+	Set RapportData.BestandVolledigeNaam = ..PadGenerator.Genereer(Client, Afhandeling, ..GeefBestandNaamPrefix(IsSpecialWorkshop), BatchID, IsRework)
 	
 	Quit ..RapportGenerator.MaakBestand(RapportData)
 ]]></Implementation>
@@ -83,6 +83,23 @@
 	Do KeyValueList.InsertKeyValue(DataClassName, Eigenschap)
 ]]></Implementation>
 </Method>
+
+<Method name="GeefBestandNaamPrefix">
+<FormalSpec>IsSpecialWorkshop:%Boolean</FormalSpec>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	Quit:(IsSpecialWorkshop) "ImportFileSpecialWorkshop_AantalStuks_" _ ..GeefAantalStuksSpecialWorkshopFronten()
+	Quit "ImportFile"
+]]></Implementation>
+</Method>
+
+<Method name="GeefAantalStuksSpecialWorkshopFronten">
+<Private>1</Private>
+<ReturnType>%Integer</ReturnType>
+<Implementation><![CDATA[	Quit 0
+]]></Implementation>
+</Method>
 </Class>