Index: vhTest/Utils/APPS/PM/Maatwerk/dto/LBXKenmerken.cls.xml =================================================================== diff -u -r40676 -r40749 --- vhTest/Utils/APPS/PM/Maatwerk/dto/LBXKenmerken.cls.xml (.../LBXKenmerken.cls.xml) (revision 40676) +++ vhTest/Utils/APPS/PM/Maatwerk/dto/LBXKenmerken.cls.xml (.../LBXKenmerken.cls.xml) (revision 40749) @@ -142,7 +142,10 @@ Set MATKenmerken = ##class(APPS.PM.Maatwerk.dto.MATKenmerken).%New() Set MATKenmerken.Materiaal = ##class(DOM.PM.enu.MATMateriaal).AntislipFiber() Set MATKenmerken.Kleur = ##class(DOM.PM.enu.MATKleur).AntiSlipFiberWit() - Do LbxKenmerken.GekoppeldeIngegevenKenmerken.Insert(MATKenmerken) + Set GekoppeldIngegevenKenmerk = ##class(APPS.PM.Maatwerk.dto.GekoppeldIngegevenKenmerk).%New() + Set GekoppeldIngegevenKenmerk.IngegevenKenmerken = MATKenmerken + Set GekoppeldIngegevenKenmerk.Key = ##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).Mat() + Do LbxKenmerken.GekoppeldeIngegevenKenmerken.Insert(GekoppeldIngegevenKenmerk) Quit LbxKenmerken ]]> Index: ECONimpl/PM/Maatwerk/AppsConverter/EconNaarApps/Lbx.cls.xml =================================================================== diff -u -r40717 -r40749 --- ECONimpl/PM/Maatwerk/AppsConverter/EconNaarApps/Lbx.cls.xml (.../Lbx.cls.xml) (revision 40717) +++ ECONimpl/PM/Maatwerk/AppsConverter/EconNaarApps/Lbx.cls.xml (.../Lbx.cls.xml) (revision 40749) @@ -115,7 +115,10 @@ } If $$$HasLength(MATKenmerken.Materiaal) { - Do LbxKenmerken.GekoppeldeIngegevenKenmerken.Insert(MATKenmerken) + Set GekoppeldIngegevenKenmerk = ##class(APPS.PM.Maatwerk.dto.GekoppeldIngegevenKenmerk).%New() + Set GekoppeldIngegevenKenmerk.IngegevenKenmerken = MATKenmerken + Set GekoppeldIngegevenKenmerk.Key = ##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).Mat() + Do LbxKenmerken.GekoppeldeIngegevenKenmerken.Insert(GekoppeldIngegevenKenmerk) } ]]>