Index: APPS/Halux/PPS/Document/ProductieDetailDocument/impl/common/BladInhoudBuilderTemplate.cls.xml
===================================================================
diff -u -r52873 -r53547
--- APPS/Halux/PPS/Document/ProductieDetailDocument/impl/common/BladInhoudBuilderTemplate.cls.xml (.../BladInhoudBuilderTemplate.cls.xml) (revision 52873)
+++ APPS/Halux/PPS/Document/ProductieDetailDocument/impl/common/BladInhoudBuilderTemplate.cls.xml (.../BladInhoudBuilderTemplate.cls.xml) (revision 53547)
@@ -190,8 +190,9 @@
#dim DetailLijnZonderHfiIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(..GeefDetailLijnenZonderHalffabItem(Product, HalffabItemsBoom))
While (DetailLijnZonderHfiIterator.HasNext()) {
- Set ProductDetailDataLijn = DetailLijnZonderHfiIterator.Next()
- Set GroepNaam = DetailLijnZonderHfiIterator.Key()
+ #dim DetailLijnKeyValuePair As TECH.KeyValuePair = DetailLijnZonderHfiIterator.Next()
+ Set GroepNaam = DetailLijnKeyValuePair.Key
+ Set ProductDetailDataLijn = DetailLijnKeyValuePair.Value
Do ..VoegToeDetailLijn(DetailLijnenGroepering, GroepNaam, ProductDetailDataLijn)
}
@@ -204,8 +205,8 @@
Deze method overschrijven in de specifieke sub-klasse om "DetailLijnen Zonder HalffabItem" toe te voegen.
Product:DOM.PM.MaatwerkProduct,HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom
1
-%ArrayOfObjects
-TECH.KeyValue.List
+