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
+
+