Index: vhUnitTest/DOM/PM/KorttekstUtils/Base.cls.xml
===================================================================
diff -u -r29059 -r42403
--- vhUnitTest/DOM/PM/KorttekstUtils/Base.cls.xml	(.../Base.cls.xml)	(revision 29059)
+++ vhUnitTest/DOM/PM/KorttekstUtils/Base.cls.xml	(.../Base.cls.xml)	(revision 42403)
@@ -55,6 +55,7 @@
 <Implementation><![CDATA[
 	While WaardenIterator.HasNext() {
 		#dim Waarde As TECH.String = WaardenIterator.Next()
+		continue:$$$Not(..AssertNodig(PropertyNaam,Waarde))
 		Set $Property(Kenmerken, PropertyNaam) = Waarde
 		Set Kenmerken = ..PreProcessKenmerken(Kenmerken, Waarde)
 		If $$$AssertTrue(..VerwachteWaarden.IsDefined(Waarde),"De waarde "_Waarde_" is niet gecontroleerd") {
@@ -66,6 +67,14 @@
 ]]></Implementation>
 </Method>
 
+<Method name="AssertNodig">
+<FormalSpec>PropertyNaam:%String,Waarde:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	quit $$$True
+]]></Implementation>
+</Method>
+
 <Method name="PreProcessKenmerken">
 <FormalSpec>Kenmerken:APPS.PM.Maatwerk.dto.LadeKenmerken,Waarde:TECH.String</FormalSpec>
 <Private>1</Private>