Index: BL/PPS/TBX/DocRugwandhouderLijst.cls.xml =================================================================== diff -u -r2848 -r2853 --- BL/PPS/TBX/DocRugwandhouderLijst.cls.xml (.../DocRugwandhouderLijst.cls.xml) (revision 2848) +++ BL/PPS/TBX/DocRugwandhouderLijst.cls.xml (.../DocRugwandhouderLijst.cls.xml) (revision 2853) @@ -69,8 +69,10 @@ Set HouderAantal = HouderIterator.Next() Set HouderPRNr = HouderIterator.Key() Set HouderProduct = ##class(DOM.DomeinContext).Instance().GeefProductAPI().GeefProduct(HouderPRNr) - Do Document.GeefKolom(1).Insert($LG(##class(Prod.Kenmerk.DataDefinitie).Get("TB",HouderPRNr,"Kleur"),1)) - Do Document.GeefKolom(2).Insert($LG(##class(Prod.Kenmerk.DataDefinitie).Get("TB",HouderPRNr,"RugHoogte"),1)) + Do Document.GeefKolom(1).Insert(HouderProduct.GeefKleur()) + Set Hoogte = HouderProduct.GeefVoorZijwandHoogte() + If (HouderProduct.IsLVormig()) Set Hoogte = Hoogte_".22" + Do Document.GeefKolom(2).Insert(Hoogte) Do Document.GeefKolom(3).Insert(HouderAantal) Do Document.GeefKolom(4).Insert(HouderProduct.GeefKorttekst()) }