Index: vhUnitTest/DOM/PM/impl/TBXLangtekstCreator/Test.cls.xml =================================================================== diff -u -r67060 -r67322 --- vhUnitTest/DOM/PM/impl/TBXLangtekstCreator/Test.cls.xml (.../Test.cls.xml) (revision 67060) +++ vhUnitTest/DOM/PM/impl/TBXLangtekstCreator/Test.cls.xml (.../Test.cls.xml) (revision 67322) @@ -179,6 +179,8 @@ Set VerwijderdeHalffabItemsOpHalffabItemsBoom = ##class(%ArrayOfObjects).%New() Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.TBXRol).InschuifElement()) + Do ..TbxKenmerken.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TBXRol).InschuifElement()) + Set ..TbxKenmerken.ZijwandVerhogingType = ..Enum.ZijwandVerhogingType.InschuifElement Set ..TbxKenmerken.LegacyKenmerken.ItemKV = "ALU.MG" @@ -357,7 +359,7 @@ If ($IsObject(VerwijderdeHalffabItems)) { Set HalffabItemsBoom.VerwijderdeHalffabItems = VerwijderdeHalffabItems } - Quit ..TbxLangtekstCreator.GeefLangtekst(..TbxKenmerken, HalffabItemsBoom, Taal,, "") + Quit ..TbxLangtekstCreator.GeefLangtekst(..TbxKenmerken, HalffabItemsBoom, Taal,, HalffabItemsBoom) //2e HalffabItemsBoom is placeholder, onherwerkte boom bestaat niet in .NET ]]>