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
+
+