Index: APPS/Halux/Planning/Pitching/impl/BatchPitchDataExporter.cls.xml
===================================================================
diff -u -r73385 -r74429
--- APPS/Halux/Planning/Pitching/impl/BatchPitchDataExporter.cls.xml (.../BatchPitchDataExporter.cls.xml) (revision 73385)
+++ APPS/Halux/Planning/Pitching/impl/BatchPitchDataExporter.cls.xml (.../BatchPitchDataExporter.cls.xml) (revision 74429)
@@ -63,8 +63,9 @@
While BatchesPitched.HasNext() {
#dim PitchedBatch As APPS.Halux.Planning.Pitching.dto.BatchPitched = BatchesPitched.Next()
#dim Batch As APPS.Halux.common.impl.BatchImpl = PitchedBatch.Batch
+ #dim CategorTLM As %Boolean = ((Batch.GeefCategorie() = ##class(APPS.Halux.common.enu.Categorie).Tandembox()) ||(Batch.GeefCategorie() = ##class(APPS.Halux.common.enu.Categorie).Legrabox()) ||(Batch.GeefCategorie() = ##class(APPS.Halux.common.enu.Categorie).Merivobox()))
- If (..MESService.IsActiefVoorMes(Batch.GeefLijn(), ..#MESFaseActief)) {
+ If (..MESService.IsActiefVoorMes(Batch.GeefLijn(), ..#MESFaseActief) && CategorTLM) {
Try {
If ((Batch.IsReedsGestart()) && ($$$Not(..IsBatchExported(Batch.GeefID())))) {
Do ..BatchPitchExportedService.BepaalVolgnummerEnBewaar(PitchedBatch)
@@ -76,7 +77,7 @@
}
} Catch {
#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
- Do ..Logger.Error("ExporteerBatchPitchedDataNaarObjective", Exception.GeefOmschrijving())
+ Do ..Logger.ErrorMail("ExporteerBatchPitchedDataNaarObjective", Exception.GeefOmschrijving())
}
}
@@ -90,8 +91,9 @@
BatchID:%String,IsTriggerResetBatch:%Boolean=0
-AansturingActie:APPS.Halux.PPS.Activiteit.impl.UitvoeringInfoLijstVerwerkerBasis,Batch:APPS.Halux.common.impl.BatchImpl,IsTriggerResetBatch:%Boolean=0
+AansturingActie:APPS.Halux.PPS.Document.impl.common.BatchNaarObjective,Batch:APPS.Halux.common.impl.BatchImpl,IsTriggerResetBatch:%Boolean=0
1