Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/dto/BatchNaarObjectiveNumeriekeVelden.cls.xml =================================================================== diff -u --- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/dto/BatchNaarObjectiveNumeriekeVelden.cls.xml (revision 0) +++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/dto/BatchNaarObjectiveNumeriekeVelden.cls.xml (revision 74672) @@ -0,0 +1,31 @@ + + + +%SerialObject,%XML.Adaptor + + +%String +1 + + + +%String + + + + +%Library.CacheSerialState +BatchNaarObjectiveNumeriekeVeldenState +^APPS.HaluxF90F.BatchNaarObB53ES + +listnode + + +BerekendeVolumeEenheden + + + + + + + Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator.cls.xml =================================================================== diff -u -r74472 -r74672 --- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator.cls.xml (.../HoofdDataGenerator.cls.xml) (revision 74472) +++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator.cls.xml (.../HoofdDataGenerator.cls.xml) (revision 74672) @@ -44,6 +44,11 @@ 1 + +APPS.Halux.common.ProductieSequentieItemRepository +1 + + BatchPitchExportedService:APPS.Halux.Planning.Pitching.impl.BatchPitchExportedService="",OrderApi:DOM.VKP.OrderAPI="",PartijApi:DOM.PARTIJ.PartijAPI="",LegacyPartijApi:DOM.PARTIJ.LegacyPartijAPI="",Logger:vhLib.Logger="",VerkoopAPI:DOM.VKP.VerkoopAPI="",LabelLogoBepaler:BL.Flow.Levering.LabelLogoBepaler="",KlantinstellingenRepository:DOM.Halux.AAP.KlantinstellingenRepository="" 1 @@ -59,6 +64,7 @@ Set ..VerkoopAPI = $$$Inject(VerkoopAPI, ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI()) Set ..LabelLogoBepaler = $$$Inject(LabelLogoBepaler, ##class(BL.Flow.Levering.LabelLogoBepaler).%New()) Set ..KlantinstellingenRepository = $$$Inject(KlantinstellingenRepository, ##class(DOM.Halux.AAP.KlantinstellingenRepository).%New()) + Set ..ProductieSequentieItemRepository = ##class(APPS.Halux.common.ProductieSequentieItemRepository).%New() Quit $$$OK ]]> @@ -96,7 +102,7 @@ Set GebruikersVelden.DatumVelden = ..GeefDatumVelden(Toelevering) Set GebruikersVelden.TekstVelden = ..GeefTekstVelden(Batch, Toelevering, SequentieNummerToelevering) Set GebruikersVelden.Vlag = ..GeefVlagVelden(Batch, Toelevering, SequentieNummerToelevering) - Set GebruikersVelden.NumeriekeVelden = "" + Set GebruikersVelden.NumeriekeVelden = ..GeefNumeriekeVelden(Batch, Toelevering) Set BatchNaarObjectiveData.GebruikersVelden = GebruikersVelden ]]> @@ -114,6 +120,18 @@ ]]> + +Batch:APPS.Halux.common.Batch,Toelevering:DOM.AKP.Toelevering +1 +APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveNumeriekeVelden + + + Toelevering:DOM.AKP.Toelevering 1 @@ -442,6 +460,24 @@ Quit ##class(TECH.ListUtils).PiecesToListbuild(OorsprongKettingString, "), (") ]]> + + +Batch:APPS.Halux.common.Batch,Toelevering:DOM.AKP.Toelevering +1 +%Integer + + Index: APPS/Halux/common/ProductieSequentieItem.cls.xml =================================================================== diff -u -r74468 -r74672 --- APPS/Halux/common/ProductieSequentieItem.cls.xml (.../ProductieSequentieItem.cls.xml) (revision 74468) +++ APPS/Halux/common/ProductieSequentieItem.cls.xml (.../ProductieSequentieItem.cls.xml) (revision 74672) @@ -127,6 +127,10 @@ + +%Integer + + DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom 1 @@ -294,6 +298,9 @@ StapelAfbeelding + +GeladenInContainerNummer + Index: APPS/Halux/common/ProductieSequentie.cls.xml =================================================================== diff -u -r74474 -r74672 --- APPS/Halux/common/ProductieSequentie.cls.xml (.../ProductieSequentie.cls.xml) (revision 74474) +++ APPS/Halux/common/ProductieSequentie.cls.xml (.../ProductieSequentie.cls.xml) (revision 74672) @@ -517,6 +517,7 @@ Set MatchGevonden = $$$True Set Sortering(SequenceData.ProductionSequence) = ProductieSequentieItem Set ProductieSequentieItem.StapelAfbeelding = SequenceData.StackingImage + Set ProductieSequentieItem.GeladenInContainerNummer = SequenceData.LoadedInContainerNr } } Do SequenceDataIterator.Reset() Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/dto/BatchNaarObjectiveGebruikersVelden.cls.xml =================================================================== diff -u -r74411 -r74672 --- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/dto/BatchNaarObjectiveGebruikersVelden.cls.xml (.../BatchNaarObjectiveGebruikersVelden.cls.xml) (revision 74411) +++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/dto/BatchNaarObjectiveGebruikersVelden.cls.xml (.../BatchNaarObjectiveGebruikersVelden.cls.xml) (revision 74672) @@ -19,7 +19,7 @@ -TECH.String +APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveNumeriekeVelden Index: APPS/Halux/common/ProductieSequentieItemRepository.cls.xml =================================================================== diff -u -r67810 -r74672 --- APPS/Halux/common/ProductieSequentieItemRepository.cls.xml (.../ProductieSequentieItemRepository.cls.xml) (revision 67810) +++ APPS/Halux/common/ProductieSequentieItemRepository.cls.xml (.../ProductieSequentieItemRepository.cls.xml) (revision 74672) @@ -25,6 +25,23 @@ Quit ToeleveringIDLijst ]]> + + +BatchID:%String,ToeleveringID:%String +%Integer + +