J'aimerai comparer deux "Registered Object" et lister chaque propriété différente
Pour le moment j'ai ce code :
ClassMethod AssertObjectEquals(object As %RegisteredObject, objectToCompare As %RegisteredObject, Output msg As %String) As %Status
{
Set returnValue = 1
// check if same class
Set className = $CLASSNAME(object)
If (className '= $CLASSNAME(objectToCompare)) {
Set returnValue = 0
Set difference = "not same class"
}
If (returnValue) {
// Get the definition to browse properties