Index: vhConsistency/Checks/DOM/PM/SelectieKenmerken.cls.xml
===================================================================
diff -u -r54663 -r54675
--- vhConsistency/Checks/DOM/PM/SelectieKenmerken.cls.xml	(.../SelectieKenmerken.cls.xml)	(revision 54663)
+++ vhConsistency/Checks/DOM/PM/SelectieKenmerken.cls.xml	(.../SelectieKenmerken.cls.xml)	(revision 54675)
@@ -14,6 +14,12 @@
 <Type>APPS.PM.Maatwerk.impl.BerekeningServiceProduct</Type>
 </Property>
 
+<Property name="MeldingCounter">
+<Type>%Integer</Type>
+<InitialExpression>0</InitialExpression>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <Description>
 Do ##class(vhConsistency.ConsistencyCheck).VoerUit(1,1,"vhConsistency.Checks.DOM.PM.SelectieKenmerken")</Description>
@@ -55,6 +61,45 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VoegVolgendeMeldingToe">
+<FormalSpec>Melding:%String=""</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Set ..MeldingCounter = ..MeldingCounter + 1
+	
+	If (..MeldingCounter = 1) {
+		Do ..VoegToeVoorafgaandelijkeMelding()
+	}
+	
+	Do ..VoegMeldingToe(Melding)
+]]></Implementation>
+</Method>
+
+<Method name="VoegToeVoorafgaandelijkeMelding">
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do ..VoegMeldingToe(" ")
+	Do ..VoegMeldingToe("DIT IS EEN CHECK DIE PROBEERT EEN AANTAL MAATWERKCONFIGURATIES DOOR CACHE TE LATEN HERBEREKENEN. DEZE MAIL WORDT GESTUURD NAAR ZOWEL ICT ALS PM. ")
+	Do ..VoegMeldingToe("ALS JE DEZE MAIL ONTVANGT, DAN BETEKENT DIT DAT MINSTENS 1 VAN DE GEPROBEERDE MAATWERKCONFIGURATIES DOOR CACHE NIET MEER BEREKEND KAN WORDEN. ")
+	Do ..VoegMeldingToe("MOGELIJKE REDENEN ZIJN: ")
+	Do ..VoegMeldingToe("- De selectiekenmerken zijn gewijzigd. ")
+	Do ..VoegMeldingToe("- Er is code gewijzigd in Cache. ")
+	Do ..VoegMeldingToe("  ")
+	Do ..VoegMeldingToe("- ALS HET GAAT OVER EEN GEVAL VAN GEWIJZIGDE SELECTIEKENMERKEN: ")
+	Do ..VoegMeldingToe("    Dan is PM het meest aangewezen om dit op te lossen, zij zijn mogelijks bezig geweest met aanpassingen hieraan. ")
+	Do ..VoegMeldingToe("    In dat geval dient deze mail dan ook als bijstand voor PM, zodat zij weten dat hun aanpassingen voor problemen gaan zorgen. ")
+	Do ..VoegMeldingToe("- IN ALLE ANDERE GEVALLEN ZAL DIT OPGELOST MOETEN WORDEN DOOR ICT: ")
+	Do ..VoegMeldingToe("    Momenteel worden voor deze check alle StandaardLaden herberekend uit volgende klassen: ")
+	Do ..VoegMeldingToe("        + "_##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken).%ClassName(1)_" ")
+	Do ..VoegMeldingToe("        + "_##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).%ClassName(1)_" ")
+	Do ..VoegMeldingToe("    Mogelijks is er daarin een aanpassing aangebracht. ")
+	Do ..VoegMeldingToe("    Anders logs checken (laatste GetLatest) en/of debuggen. ")
+	Do ..VoegMeldingToe("   ")
+	Do ..VoegMeldingToe("HET ONDERSTAANDE KAN EEN LICHT WERPEN OP WAT (bv. welk halffabrikaat) VERANTWOORDELIJK IS VOOR HET FALEN VAN DE TEST... ")
+	Do ..VoegMeldingToe("    ")
+]]></Implementation>
+</Method>
+
 <Method name="BerekenStandaardLadenInKlasse">
 <FormalSpec>ClassDefinition:TECH.ClassInfo.ClassDefinition,ClassName:%String</FormalSpec>
 <Private>1</Private>
@@ -111,7 +156,7 @@
 		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
 		#dim ExceptieData As %String = Exception.GeefErrorInformatie()
 		
-		Do ..VoegMeldingToe(ExceptieData)
+		Do ..VoegVolgendeMeldingToe(ExceptieData)
 	}
 ]]></Implementation>
 </Method>
@@ -161,7 +206,7 @@
 	While ParameterIterator.HasNext() {
 		Set Parameter = ParameterIterator.Next()
 		If ($$$Not(Parameter.GeefType() = "DOM.PM.enu.LBXVerpakkingType") && $$$Not(Parameter.GeefType() = "DOM.PM.enu.TAORVerpakkingType")) {
-			Do ..VoegMeldingToe("In de vhTest.Utils.DOM-StandaardLade-klassen (LBX en TAOR) zijn methods gevonden die, naast de Verpakking-parameter, nog meer parameters hebben. Deze uitbreiding is niet voorzien in deze check! De voorziene werking van de check komt daardoor niet in het gedrang.")
+			Do ..VoegVolgendeMeldingToe("In de vhTest.Utils.DOM-StandaardLade-klassen (LBX en TAOR) zijn methods gevonden die, naast de Verpakking-parameter, nog meer parameters hebben. Deze uitbreiding is niet voorzien in deze check! De voorziene werking van de check komt daardoor niet in het gedrang.")
 		} ElseIf ((Parameter.GeefType() = "DOM.PM.enu.LBXVerpakkingType") || (Parameter.GeefType() = "DOM.PM.enu.TAORVerpakkingType")) {
 			Set VerpakkingIterator = $classmethod(Parameter.GeefType(),"ValueListIterator")
 			Continue