Index: APPS/Halux/PPS/Activiteit/impl/TAOR/common/OpdeelzaagOptimalisatieDataAanvuller.cls.xml
===================================================================
diff -u -r40482 -r40536
--- APPS/Halux/PPS/Activiteit/impl/TAOR/common/OpdeelzaagOptimalisatieDataAanvuller.cls.xml (.../OpdeelzaagOptimalisatieDataAanvuller.cls.xml) (revision 40482)
+++ APPS/Halux/PPS/Activiteit/impl/TAOR/common/OpdeelzaagOptimalisatieDataAanvuller.cls.xml (.../OpdeelzaagOptimalisatieDataAanvuller.cls.xml) (revision 40536)
@@ -23,6 +23,11 @@
1
+
+TECH.Format.FormatAPI
+1
+
+
LadeOnderdeel:DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel
1
@@ -35,6 +40,7 @@
set ..EtiketInfoBepaler = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.common.EtiketInfoBepaler).%New()
set ..DateTimeAPI = ##class(TECH.Context).Instance().GeefDateTimeAPI()
set ..AssemblageKarRepository = ##class(APPS.Halux.PPS.TAORProductie.impl.AssemblageKarRepository).%New()
+ set ..FormatAPI = ##class(TECH.Context).Instance().GeefFormatAPI()
Quit $$$OK
]]>
@@ -54,7 +60,7 @@
set UitvoeringInfo.OptimalisatieData.EtiketLijn3 = EtiketInfo.Lijn3
set UitvoeringInfo.OptimalisatieData.EtiketLijn4 = EtiketInfo.Lijn4
- set UitvoeringInfo.OptimalisatieData.Banding = $E(##class(TECH.StringUtils).StripAllExceptNumeric(##class(%TimeStamp).LogicalToDisplay(UitvoeringInfo.DueOutTijdstip)),1,10)
+ set UitvoeringInfo.OptimalisatieData.Banding = ..FormatAPI.FormatTimeStamp(UitvoeringInfo.DueOutTijdstip,"jjjjmmddhh")
set UitvoeringInfo.OptimalisatieData.Rework = $$$If(UitvoeringInfo.IsRework,"Rework","NoRework")
set UitvoeringInfo.OptimalisatieData.Kar = ( UitvoeringInfo.BatchID*1000 ) + ..AssemblageKarRepository.ZoekKarVolgnummerViaSequentieNr(UitvoeringInfo.BatchID,UitvoeringInfo.SequentieNummer)
]]>