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) ]]>