Index: vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/Opdeelzaag/OptimalisatieBestandenGenerator/VoerUit/TestProductGroep.cls.xml
===================================================================
diff -u
--- vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/Opdeelzaag/OptimalisatieBestandenGenerator/VoerUit/TestProductGroep.cls.xml	(revision 0)
+++ vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/Opdeelzaag/OptimalisatieBestandenGenerator/VoerUit/TestProductGroep.cls.xml	(revision 38153)
@@ -0,0 +1,65 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.Opdeelzaag.OptimalisatieBestandenGenerator.VoerUit.TestProductGroep">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test: productiegroep wordt opgehaald met juiste batchID">
+<Implementation><![CDATA[
+	#dim UitvoeringInfoDummy As APPS.Halux.PPS.Activiteit.impl.TAOR.dto.OpdeelzaagUitvoeringInfo
+	Set UitvoeringInfoDummy = ##class(vhTest.Utils.APPS.Halux.PPS.Activiteit.impl.TAOR.dto.OpdeelzaagUitvoeringInfo).UitvoeringInfo()
+	
+	#dim BatchServiceMock As vhTest.Mock.APPS.Halux.common.BatchService = ##class(vhTest.Mock.APPS.Halux.common.BatchService).%New()
+	Do BatchServiceMock.VerwachtMethodCall("GeefProductieGroep",UitvoeringInfoDummy.BatchID).DanReturn(##class(APPS.Halux.common.enu.ProductieGroep).SpecialsPM())
+	
+	#dim FileWriterFake As vhTest.Fake.TECH.File.FileWriter = ##class(vhTest.Fake.TECH.File.FileWriter).%New()
+	#dim OptimalisatieBestandenGenerator As APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.Opdeelzaag.OptimalisatieBestandenGenerator
+	Set OptimalisatieBestandenGenerator = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.Opdeelzaag.OptimalisatieBestandenGenerator).%New(BatchServiceMock, FileWriterFake)
+	
+	Do OptimalisatieBestandenGenerator.VerzamelData(UitvoeringInfoDummy)
+	Do OptimalisatieBestandenGenerator.VoerUit()
+
+	Do BatchServiceMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: Voor producten in productiegroep specialPM worden geen bestanden gegenereerd voor automatische verwerking">
+<Implementation><![CDATA[
+	#dim UitvoeringInfoDummy As APPS.Halux.PPS.Activiteit.impl.TAOR.dto.OpdeelzaagUitvoeringInfo
+	Set UitvoeringInfoDummy = ##class(vhTest.Utils.APPS.Halux.PPS.Activiteit.impl.TAOR.dto.OpdeelzaagUitvoeringInfo).UitvoeringInfo()
+	
+	#dim BatchServiceStub As vhTest.Mock.APPS.Halux.common.BatchService = ##class(vhTest.Mock.APPS.Halux.common.BatchService).%New()
+	Do BatchServiceStub.IndienMethodCall("GeefProductieGroep",UitvoeringInfoDummy.BatchID).DanReturn(##class(APPS.Halux.common.enu.ProductieGroep).SpecialsPM())
+	
+	#dim FileWriterFake As vhTest.Fake.TECH.File.FileWriter = ##class(vhTest.Fake.TECH.File.FileWriter).%New()
+	#dim OptimalisatieBestandenGenerator As APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.Opdeelzaag.OptimalisatieBestandenGenerator
+	Set OptimalisatieBestandenGenerator = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.Opdeelzaag.OptimalisatieBestandenGenerator).%New(BatchServiceStub, FileWriterFake)
+	
+	Do OptimalisatieBestandenGenerator.VerzamelData(UitvoeringInfoDummy)
+	Do OptimalisatieBestandenGenerator.VoerUit()
+
+	Do $$$AssertEquals(FileWriterFake.GeefBestandNamen().Count(),0)
+]]></Implementation>
+</Method>
+
+<Method name="Test: Voor producten in productiegroep worden bestanden gegenereerd voor automatische verwerking">
+<Implementation><![CDATA[
+	#dim UitvoeringInfoDummy As APPS.Halux.PPS.Activiteit.impl.TAOR.dto.OpdeelzaagUitvoeringInfo
+	Set UitvoeringInfoDummy = ##class(vhTest.Utils.APPS.Halux.PPS.Activiteit.impl.TAOR.dto.OpdeelzaagUitvoeringInfo).UitvoeringInfo()
+	
+	#dim BatchServiceStub As vhTest.Mock.APPS.Halux.common.BatchService = ##class(vhTest.Mock.APPS.Halux.common.BatchService).%New()
+	Do BatchServiceStub.IndienMethodCall("GeefProductieGroep",UitvoeringInfoDummy.BatchID).DanReturn(##class(APPS.Halux.common.enu.ProductieGroep).Stuk())
+	
+	#dim FileWriterFake As vhTest.Fake.TECH.File.FileWriter = ##class(vhTest.Fake.TECH.File.FileWriter).%New()
+	#dim OptimalisatieBestandenGenerator As APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.Opdeelzaag.OptimalisatieBestandenGenerator
+	Set OptimalisatieBestandenGenerator = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.LijstVerwerkers.Opdeelzaag.OptimalisatieBestandenGenerator).%New(BatchServiceStub, FileWriterFake)
+	
+	Do OptimalisatieBestandenGenerator.VerzamelData(UitvoeringInfoDummy)
+	Do OptimalisatieBestandenGenerator.VoerUit()
+
+	Do $$$AssertTrue(FileWriterFake.GeefBestandNamen().Count()>0)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/Opdeelzaag/OptimalisatieBestandenGenerator.cls.xml
===================================================================
diff -u -r35541 -r38153
--- APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/Opdeelzaag/OptimalisatieBestandenGenerator.cls.xml	(.../OptimalisatieBestandenGenerator.cls.xml)	(revision 35541)
+++ APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/Opdeelzaag/OptimalisatieBestandenGenerator.cls.xml	(.../OptimalisatieBestandenGenerator.cls.xml)	(revision 38153)
@@ -44,6 +44,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="BatchService">
+<Type>APPS.Halux.common.impl.BatchService</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="BatchID">
 <Type>%String</Type>
 <Private>1</Private>
@@ -55,17 +60,21 @@
 </Property>
 
 <Method name="%OnNew">
+<FormalSpec>BatchService:APPS.Halux.common.impl.BatchService,FileWriter:TECH.File.FileWriter</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	Set ..FileWriter = ##class(TECH.Context).Instance().GeefFileAPI().GeefFileWriter()
+	Set ..FileWriter = $$$Inject(FileWriter, ##class(TECH.Context).Instance().GeefFileAPI().GeefFileWriter())
+	Set ..BatchService = $$$Inject(BatchService,##class(APPS.Halux.common.impl.BatchService).%New())
+	
 	Set ..FileNameGenerator = ##class(TECH.Context).Instance().GeefFileAPI().GeefFileNameGenerator()
 	Set ..PadGenerator = ##class(APPS.Halux.Machine.OpdeelZaag.impl.OptimalisatieBestandPadGenerator).%New()
 	Set ..FileExtension = ##class(TECH.File.IoCContainer).Instance().Resolve("FileExtension")
 	Set ..OpdeelZaagOptimalisatieBestandGenerator = ##class(APPS.Halux.Machine.OpdeelZaag.impl.OptimalisatieBestandGenerator).%New()
 	
+		
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -87,7 +96,11 @@
 	#dim AfhandelingIterator As TECH.Iterator = ##class(APPS.Halux.Machine.OpdeelZaag.enu.Afhandeling).ValueListIterator()
 	
 	While (AfhandelingIterator.HasNext()) {
+
 		#dim Afhandeling As APPS.Halux.Machine.OpdeelZaag.enu.Afhandeling = AfhandelingIterator.Next()
+		
+		continue:..BatchService.GeefProductieGroep(..BatchID)=##class(APPS.Halux.common.enu.ProductieGroep).SpecialsPM()
+		
 		#dim ClientIterator As TECH.Iterator = ##class(APPS.Halux.Machine.OpdeelZaag.enu.Client).ValueListIterator()
 		
 		While (ClientIterator.HasNext()) {
Index: vhTest/Utils/APPS/Halux/PPS/Activiteit/impl/TAOR/dto/OpdeelzaagUitvoeringInfo.cls.xml
===================================================================
diff -u
--- vhTest/Utils/APPS/Halux/PPS/Activiteit/impl/TAOR/dto/OpdeelzaagUitvoeringInfo.cls.xml	(revision 0)
+++ vhTest/Utils/APPS/Halux/PPS/Activiteit/impl/TAOR/dto/OpdeelzaagUitvoeringInfo.cls.xml	(revision 38153)
@@ -0,0 +1,28 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Utils.APPS.Halux.PPS.Activiteit.impl.TAOR.dto.OpdeelzaagUitvoeringInfo">
+<Super>TECH.RegisteredObject</Super>
+
+<Method name="UitvoeringInfo">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.Halux.PPS.Activiteit.impl.TAOR.dto.OpdeelzaagUitvoeringInfo</ReturnType>
+<Implementation><![CDATA[
+	#dim UitvoeringInfo As APPS.Halux.PPS.Activiteit.impl.TAOR.dto.OpdeelzaagUitvoeringInfo
+	Set UitvoeringInfo = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.dto.OpdeelzaagUitvoeringInfo).%New()
+	Set UitvoeringInfo.BatchID = "Dummy_BatchID"
+	Set UitvoeringInfo.IsRework = $$$False
+	Set UitvoeringInfo.OptimalisatieData = ##class(APPS.Halux.PPS.Activiteit.impl.common.dto.OptimalisatieData).%New()
+	Set UitvoeringInfo.OptimalisatieData.Aantal = 1
+	Set UitvoeringInfo.OptimalisatieData.Barcode = "Dummy_BarCode"
+	Set UitvoeringInfo.OptimalisatieData.Breedte = 500 
+	Set UitvoeringInfo.OptimalisatieData.Dikte = 16
+	Set UitvoeringInfo.OptimalisatieData.Lengte = 1000
+	Set UitvoeringInfo.OptimalisatieData.Omschrijving = "Dummy_Omschrijving"
+	Set UitvoeringInfo.OptimalisatieData.Decor = ##class(APPS.Halux.PPS.enu.TAORDecor).Melamine()
+	Quit UitvoeringInfo
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>