Index: DOM/PM/Maatwerk/LadeInfo/impl/Plaat/Factory.cls.xml =================================================================== diff -u -r36796 -r36807 --- DOM/PM/Maatwerk/LadeInfo/impl/Plaat/Factory.cls.xml (.../Factory.cls.xml) (revision 36796) +++ DOM/PM/Maatwerk/LadeInfo/impl/Plaat/Factory.cls.xml (.../Factory.cls.xml) (revision 36807) @@ -37,13 +37,28 @@ 1 DOM.PM.Maatwerk.LadeInfo.Plaat iere: " _ Rol _ " |||" _ HalffabItem _ " ||| " _ LadeOnderdeel) + //Do ##class(Tools.Wlip).%New(42).Stack() #dim PlaatHalffabItem As DOM.PM.Maatwerk.Calc.HF.IHalffabItem = HalffabItem.GeefHalffabItem(Rol) + ;Do ##class(Tools.Wlip).%New(42).String("PlaatHalffabItem: " _ PlaatHalffabItem) #dim Plaat As DOM.PM.Maatwerk.LadeInfo.Plaat = ..ObjectApi.New(KlasseNaam, LadeOnderdeel, PlaatHalffabItem, Kenmerken) + ;Do ##class(Tools.Wlip).%New(42).String(Rol _ " ||||||||||||" _ Plaat) + Quit Plaat ]]> + + +LadeOnderdeel:DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel,HalffabItem:DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem,Kenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken +1 +DOM.PM.Maatwerk.LadeInfo.Plaat + +