Index: ECON/PM/Maatwerk/dto/LbxKenmerken.cls.xml =================================================================== diff -u -r41261 -r41275 --- ECON/PM/Maatwerk/dto/LbxKenmerken.cls.xml (.../LbxKenmerken.cls.xml) (revision 41261) +++ ECON/PM/Maatwerk/dto/LbxKenmerken.cls.xml (.../LbxKenmerken.cls.xml) (revision 41275) @@ -208,7 +208,7 @@ set (Property,Key)="" for { set Property = $order(Properties(Property)) set Key = $order(Keys(Key)) quit:Property="" - set Code = "do KenmerkenArray.SetAt(.."_Property_","""_Key_""")" + set Code = "do:$length(.."_Property_") KenmerkenArray.SetAt(.."_Property_","""_Key_""")" do %code.WriteLine($$$TAB_Code) } Index: ECON/PM/Maatwerk/dto/TaxKenmerken.cls.xml =================================================================== diff -u -r40908 -r41275 --- ECON/PM/Maatwerk/dto/TaxKenmerken.cls.xml (.../TaxKenmerken.cls.xml) (revision 40908) +++ ECON/PM/Maatwerk/dto/TaxKenmerken.cls.xml (.../TaxKenmerken.cls.xml) (revision 41275) @@ -208,7 +208,7 @@ set (Property,Key)="" for { set Property = $order(Properties(Property)) set Key = $order(Keys(Key)) quit:Property="" - set Code = "do KenmerkenArray.SetAt(.."_Property_","""_Key_""")" + set Code = "do:$length(.."_Property_") KenmerkenArray.SetAt(.."_Property_","""_Key_""")" do %code.WriteLine($$$TAB_Code) } Index: ECON/PM/Maatwerk/dto/TbxKenmerken.cls.xml =================================================================== diff -u -r41249 -r41275 --- ECON/PM/Maatwerk/dto/TbxKenmerken.cls.xml (.../TbxKenmerken.cls.xml) (revision 41249) +++ ECON/PM/Maatwerk/dto/TbxKenmerken.cls.xml (.../TbxKenmerken.cls.xml) (revision 41275) @@ -273,9 +273,9 @@ set (Property,Key)="" for { set Property = $order(Properties(Property)) set Key = $order(Keys(Key)) quit:Property="" if ((Property = "Familie") || (Property = "Variant")) { - set Code = "do KenmerkenArray.SetAt(.."_Property_",""Data.Kenmerken."_Property_""")" + set Code = "do:$length(.."_Property_") KenmerkenArray.SetAt(.."_Property_",""Data.Kenmerken."_Property_""")" } else { - set Code = "do KenmerkenArray.SetAt(.."_Property_","""_Key_""")" + set Code = "do:$length(.."_Property_") KenmerkenArray.SetAt(.."_Property_","""_Key_""")" } do %code.WriteLine($$$TAB_Code) }