Index: TECH/ObjectUtils/impl/Differenciator.cls.xml
===================================================================
diff -u -r1757 -r1959
--- TECH/ObjectUtils/impl/Differenciator.cls.xml	(.../Differenciator.cls.xml)	(revision 1757)
+++ TECH/ObjectUtils/impl/Differenciator.cls.xml	(.../Differenciator.cls.xml)	(revision 1959)
@@ -30,8 +30,8 @@
 				set itList1 = ##class(TECH.ListIterator).%New(WaardePropertyObject)
 				set itList2 = ##class(TECH.ListIterator).%New(WaardePropertyVerwachtObject)
 				while itList1.HasNext() && success {
-					#dim Value1 As %String = itList1.Next()
-					#dim Value2 As %String = itList2.Next()
+					#dim Value1 As %String = $$$LCVT(itList1.Next())
+					#dim Value2 As %String = $$$LCVT(itList2.Next())
 					set success = ( Value1 = Value2)
 					if 'success do ObjectDifferences.Insert("Item "_itList1.Key()_" verschillend : *"_Value1 _ "* <> *"_Value2_"*")
 				}