Index: TECH/ObjectUtils/impl/Differenciator.cls.xml =================================================================== diff -u -r1959 -r2085 --- TECH/ObjectUtils/impl/Differenciator.cls.xml (.../Differenciator.cls.xml) (revision 1959) +++ TECH/ObjectUtils/impl/Differenciator.cls.xml (.../Differenciator.cls.xml) (revision 2085) @@ -18,6 +18,8 @@ #dim PropertyInfo As %list = itProperties.Next() #dim Property As %String = itProperties.Key() + continue:(##class(%Dictionary.CompiledProperty).%OpenId(Object.%ClassName(1)_"||"_Property).Private) + #dim PropertyIsCollection As %Boolean = $length($list(PropertyInfo,3)) #dim WaardePropertyObject As %CacheString = $property(Object,Property)