Index: vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/TestBase.cls.xml
===================================================================
diff -u -r32006 -r35513
--- vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/TestBase.cls.xml (.../TestBase.cls.xml) (revision 32006)
+++ vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/TestBase.cls.xml (.../TestBase.cls.xml) (revision 35513)
@@ -53,8 +53,34 @@
do ..InitialiseBodemSlicingDataBewaarder()
do ##class(APPS.Halux.Machine.ZijkantFrees.data.ZijkantFreesDataLocal).%KillExtent()
-
do ##class(TECH.File.IoCContainer).Instance().Register("FileExtension",##class(vhTest.Fake.TECH.File.FileExtension).%New())
+
+ #dim Sleutel As %String = "APPS.Halux.Machine.OpdeelZaag.impl.OptimalisatieBestandGenerator"
+ #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()
+ #dim ClientIterator As TECH.Iterator = ##class(APPS.Halux.Machine.OpdeelZaag.enu.Client).ValueListIterator()
+
+ While (ClientIterator.HasNext()) {
+ #dim Client As APPS.Halux.Machine.OpdeelZaag.enu.Client = ClientIterator.Next()
+ #dim BestandLocatie As %String = ##class(TECH.Files).AppendSubPath(..BestandLocatie, Client)
+ #dim ImportBestandLocatie As %String = ##class(TECH.Files).AppendSubPath(BestandLocatie, "Import" _ Afhandeling)
+
+ Do ##class(Tools.Wlip).%New(42).String("Bestandlocatie::::" _ BestandLocatie _ " ||| " _ ..BestandLocatie)
+
+ Do ##class(TECH.Config.ConfigMgr).Instance().ZetString(Sleutel _ "_FileLocation_" _ Afhandeling _ "_" _ Client, ImportBestandLocatie, ..#Applicatie)
+ }
+ }
+
+
+ #dim WatchFolderBestandLocatie As TECH.String = ##class(TECH.Files).AppendSubPath(..BestandLocatie, "Biesse")
+ Set WatchFolderBestandLocatie = ##class(TECH.Files).AppendSubPath(WatchFolderBestandLocatie, "WatchFolder")
+
+ Do ##class(TECH.Config.ConfigMgr).Instance().ZetString(Sleutel _ "_BatchFileLocation", WatchFolderBestandLocatie, ..#Applicatie)
+
+
+ /*
#dim BiesseBestandLocatie As TECH.String = ##class(TECH.Files).AppendFile(..BestandLocatie,"Biesse")
#dim BiesseImportBestandLocatie As TECH.String = ##class(TECH.Files).AppendFile(BiesseBestandLocatie,"Import")
@@ -66,7 +92,7 @@
#dim BiesseWatchFolderBestandLocatie As TECH.String = ##class(TECH.Files).AppendFile(BiesseBestandLocatie,"WatchFolder")
do ##class(TECH.Config.ConfigMgr).Instance().ZetString("APPS.Halux.Machine.OpdeelZaag.impl.OptimalisatieBestandGenerator_BatchFileLocation",BiesseWatchFolderBestandLocatie,..#Applicatie)
-
+ */
set AssemblageKarRepository = ##class(APPS.Halux.PPS.TAORProductie.impl.AssemblageKarRepository).%New()
do AssemblageKarRepository.VerwijderViaBatchID(..#BatchID)
]]>
Index: APPS/Halux/Machine/Opdeelzaag.cls.xml
===================================================================
diff -u -r29059 -r35513
--- APPS/Halux/Machine/Opdeelzaag.cls.xml (.../Opdeelzaag.cls.xml) (revision 29059)
+++ APPS/Halux/Machine/Opdeelzaag.cls.xml (.../Opdeelzaag.cls.xml) (revision 35513)
@@ -5,9 +5,9 @@
1
-AansturingsWijze:%String=""
+AansturingsWijze:%String="",Client:%String=""
%String
-
Index: APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/Opdeelzaag/OptimalisatieBestandenGenerator.cls.xml
===================================================================
diff -u -r29059 -r35513
--- APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/Opdeelzaag/OptimalisatieBestandenGenerator.cls.xml (.../OptimalisatieBestandenGenerator.cls.xml) (revision 29059)
+++ APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/Opdeelzaag/OptimalisatieBestandenGenerator.cls.xml (.../OptimalisatieBestandenGenerator.cls.xml) (revision 35513)
@@ -3,6 +3,16 @@
APPS.Halux.PPS.impl.UitvoeringInfoDeelVerwerker
+
+APPS.Halux.Machine.OpdeelZaag.enu.Afhandeling.AutoComplete
+1
+
+
+
+APPS.Halux.Machine.OpdeelZaag.enu.Client.AutoComplete
+1
+
+
TECH.File.FileWriter
1
@@ -13,6 +23,11 @@
1
+
+APPS.Halux.Machine.OpdeelZaag.impl.OptimalisatieBestandPadGenerator
+1
+
+
TECH.File.FileExtension
1
@@ -47,6 +62,7 @@
-Afhandeling:APPS.Halux.Machine.OpdeelZaag.enu.Afhandeling,Tijdstip:%TimeStamp
+Afhandeling:APPS.Halux.Machine.OpdeelZaag.enu.Afhandeling,Client:APPS.Halux.Machine.OpdeelZaag.enu.Client,Tijdstip:%TimeStamp
1
-TeOptimaliserenBestanden:%ListOfDataTypes,TimeStamp:%TimeStamp,Afhandeling:APPS.Halux.Machine.OpdeelZaag.enu.Afhandeling
+TeOptimaliserenBestanden:%ListOfDataTypes,ImportListBestandNaam:%String,Afhandeling:APPS.Halux.Machine.OpdeelZaag.enu.Afhandeling,Client:APPS.Halux.Machine.OpdeelZaag.enu.Client
1
-%String
-OptimalisatieNaam:TECH.String
+ImportListBestandNaam:TECH.String
1
TECH.String
nul")
Index: APPS/Halux/Machine/OpdeelZaag/impl/OptimalisatieBestandGenerator.cls.xml
===================================================================
diff -u -r34281 -r35513
--- APPS/Halux/Machine/OpdeelZaag/impl/OptimalisatieBestandGenerator.cls.xml (.../OptimalisatieBestandGenerator.cls.xml) (revision 34281)
+++ APPS/Halux/Machine/OpdeelZaag/impl/OptimalisatieBestandGenerator.cls.xml (.../OptimalisatieBestandGenerator.cls.xml) (revision 35513)
@@ -8,49 +8,38 @@
1
-
-TECH.File.FileNameGenerator
+
+APPS.Halux.Machine.OpdeelZaag.impl.OptimalisatieBestandPadGenerator
1
-RapportGenerator:APPS.common.Rapport.BestandGenerator,FilenameGenerator:TECH.File.FileNameGenerator
+RapportGenerator:APPS.common.Rapport.BestandGenerator,PadGenerator:APPS.Halux.Machine.OpdeelZaag.impl.OptimalisatieBestandPadGenerator
1
1
%Status
1
-BatchID:%String,OptimalisatieDataLijst:APPS.Halux.Machine.OpdeelZaag.dto.OptimalisatieDataLijst,Afhandeling:APPS.Halux.Machine.OpdeelZaag.enu.Afhandeling,IsRework:%Boolean=0
+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
%String
-
-BatchID:%String,Afhandeling:APPS.Halux.Machine.OpdeelZaag.enu.Afhandeling,IsRework:%Boolean=0
-1
-
-
-
1
TECH.KeyValue.List
Index: vhUnitTest/APPS/Halux/Machine/OpdeelZaag/impl/OptimalisatieBestandGenerator/Genereer/Test.cls.xml
===================================================================
diff -u -r34281 -r35513
--- vhUnitTest/APPS/Halux/Machine/OpdeelZaag/impl/OptimalisatieBestandGenerator/Genereer/Test.cls.xml (.../Test.cls.xml) (revision 34281)
+++ vhUnitTest/APPS/Halux/Machine/OpdeelZaag/impl/OptimalisatieBestandGenerator/Genereer/Test.cls.xml (.../Test.cls.xml) (revision 35513)
@@ -8,6 +8,16 @@
DummyBatchID
+
+APPS.Halux.Machine.OpdeelZaag.enu.Afhandeling.AutoComplete
+1
+
+
+
+APPS.Halux.Machine.OpdeelZaag.enu.Client.AutoComplete
+1
+
+
APPS.Halux.Machine.OpdeelZaag.impl.OptimalisatieBestandGenerator
1
@@ -37,7 +47,7 @@
do ..InitClassUnderTest()
#dim BatchID As %String = ..#BatchID
- do ..BestandGeneratorImpl.Genereer(BatchID,..GeefDummyOptimalisatieDataLijst(),##class(APPS.Halux.Machine.OpdeelZaag.enu.Afhandeling).Automatisch())
+ do ..BestandGeneratorImpl.Genereer(BatchID, ..GeefDummyOptimalisatieDataLijst(), ..Afhandeling.Automatisch, ..Client.Biesse)
#dim BestandNaam As %String = FakeRapportGenerator.GeefBestandNaam()
Index: vhDeploy/Deploy20160622xConfigItemOpdeelzaagBestanden.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy20160622xConfigItemOpdeelzaagBestanden.cls.xml (revision 0)
+++ vhDeploy/Deploy20160622xConfigItemOpdeelzaagBestanden.cls.xml (revision 35513)
@@ -0,0 +1,56 @@
+
+
+
+vhDeploy.Deploy
+
+
+%String
+Instellen config item - Optimalisatie Opdeelzaag voor Biesse en Ardis Client
+
+
+
+1
+
+
+
+
+1
+SleutelSuffix:%String,Folder:%String
+1
+
+
+
+
+1
+SleutelSuffix:%String
+1
+
+
+
+
+
+
Index: APPS/Halux/Machine/OpdeelZaag/impl/OptimalisatieBestandPadGenerator.cls.xml
===================================================================
diff -u
--- APPS/Halux/Machine/OpdeelZaag/impl/OptimalisatieBestandPadGenerator.cls.xml (revision 0)
+++ APPS/Halux/Machine/OpdeelZaag/impl/OptimalisatieBestandPadGenerator.cls.xml (revision 35513)
@@ -0,0 +1,104 @@
+
+
+
+APPS.Halux.Machine.OpdeelZaag.enu.Client.Verwerker,TECH.RegisteredObject
+
+
+%String
+1
+
+
+
+%String
+1
+
+
+
+%String
+1
+
+
+
+%String
+1
+
+
+
+TECH.File.FileNameGenerator
+1
+
+
+
+%Boolean
+1
+
+
+
+FilenameGenerator:TECH.File.FileNameGenerator
+1
+1
+%Status
+1
+
+
+
+
+Client:APPS.Halux.Machine.OpdeelZaag.enu.Client,Afhandeling:APPS.Halux.Machine.OpdeelZaag.enu.Afhandeling,BestandNaamPrefix:%String,BatchID:%String,IsRework:%Boolean
+%String
+
+
+
+
+1
+
+
+
+
+1
+
+
+
+
+1
+%String
+
+
+
+
+1
+%String
+
+
+
+
+
+