Index: vhConsistency/ConsistencyCheck.cls.xml
===================================================================
diff -u -r2961 -r2964
--- vhConsistency/ConsistencyCheck.cls.xml	(.../ConsistencyCheck.cls.xml)	(revision 2961)
+++ vhConsistency/ConsistencyCheck.cls.xml	(.../ConsistencyCheck.cls.xml)	(revision 2964)
@@ -33,11 +33,6 @@
 <Method name="VoerAlleChecksUit">
 <FormalSpec>ToonAlles:%Boolean=0,StuurMail:%Boolean,CheckName:%String</FormalSpec>
 <Implementation><![CDATA[
-		
-		Do ..Meldingen.WriteLine("Consistency Checks :")
-		Do ..Meldingen.WriteLine("--------------------")
-		Do ..Meldingen.WriteLine()
-		
 		set rs = ##class(%ResultSet).%New("%Dictionary.ClassDefinitionQuery:SubclassOf")
 		do rs.Execute("vhConsistency.Check")
 		while rs.Next() {
@@ -54,6 +49,7 @@
 ErrHandling Set CheckGefaald = 1 Do ..Meldingen.Write(ClassName_" : GEFAALD "_$C(13,10,9)_##class(TECH.ExceptionHandler).Catch().ToString()_$C(13,10))
 Finally
 			Do ..CheckAfgerond(ClassName, CheckGefaald, ToonAlles, StuurMail)
+			Do ..Meldingen.Clear()
 		}
 ]]></Implementation>
 </Method>