Index: Tools/ObjectDumper/Base.cls.xml
===================================================================
diff -u -r1709 -r1907
--- Tools/ObjectDumper/Base.cls.xml	(.../Base.cls.xml)	(revision 1709)
+++ Tools/ObjectDumper/Base.cls.xml	(.../Base.cls.xml)	(revision 1907)
@@ -49,6 +49,7 @@
 <ReturnType>%ListOfDataTypes</ReturnType>
 <Implementation><![CDATA[
 	#dim UnformattedList As %Collection.AbstractList = ..GetUnformattedResult()	
+	
 	quit ..FormatUnformattedList(UnformattedList)
 ]]></Implementation>
 </Method>
@@ -61,7 +62,8 @@
 	
 	set itProperties = ##class(TECH.ListIterator).%New(..GetProperties())
 	while itProperties.HasNext() {
-		#dim Property As Tools.ObjectDumper.dto.Property = itProperties.Next()		
+		#dim Property As Tools.ObjectDumper.dto.Property = itProperties.Next()	
+			
 		try {
 			continue:..SkipProperty(Property.Name)
 			if Property.ClassType = ##class(Tools.ObjectDumper.enu.ClassType).DataType() {
@@ -105,10 +107,12 @@
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
-	#dim SkipProperty As %Boolean = 0
-	if 'SkipProperty { set SkipProperty = ( PropertyName="Attributes" ) }
-	if 'SkipProperty { set SkipProperty = ##class(TECH.StringUtils).StartsWith(PropertyName,"%") }
-	quit SkipProperty
+	#Dim SkipProperty As %Boolean = $$$False
+	
+	Set:($$$Not(SkipProperty)) SkipProperty = (PropertyName = "Attributes")
+	Set:($$$Not(SkipProperty)) SkipProperty = ##class(TECH.StringUtils).StartsWith(PropertyName, "%")
+	
+	Quit SkipProperty
 ]]></Implementation>
 </Method>