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 +