Index: vhUnitTest/TECH/ObjectUtils/ObjectConverter.cls.xml
===================================================================
diff -u -r2211 -r2217
--- vhUnitTest/TECH/ObjectUtils/ObjectConverter.cls.xml	(.../ObjectConverter.cls.xml)	(revision 2211)
+++ vhUnitTest/TECH/ObjectUtils/ObjectConverter.cls.xml	(.../ObjectConverter.cls.xml)	(revision 2217)
@@ -75,6 +75,30 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Conversie vereist veld">
+<Implementation><![CDATA[
+	try {
+
+		set ConversionData = ##class(TECH.ObjectUtils.ObjectConvertData).%New()
+		do ConversionData.Add("AsString","AsString","Set Output = """"")
+
+		set ObjectTo = ##class(vhUnitTest.TECH.ObjectUtils.ObjectConverter.Object).%New()
+
+		do ..ObjectConverter.Convert(..GetObjectFrom(),ObjectTo,ConversionData)
+	
+	} catch {
+		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+		do $$$AssertEquals(Exception.%ClassName(1),"TECH.ObjectUtils.ObjectConverterException")
+		
+		#dim ExceptionList As TECH.ExceptionList = Exception.GeefInnerExcepties()
+		if $$$AssertEquals(ExceptionList.Count(),1) {
+			do $$$AssertEquals(ExceptionList.GetAt(1).%ClassName(1),"TECH.ObjectUtils.ObjectConverterPropertyException")
+			do $$$AssertEquals(ExceptionList.GetAt(1).GeefOmschrijving(),"Invalid output validation. Value '' not valid for 'AsString' on 'vhUnitTest.TECH.ObjectUtils.ObjectConverter.Object'.")
+		}
+	}
+]]></Implementation>
+</Method>
+
 <Method name="Test: Conversie opgegeven waarde bevat een conversie script">
 <Implementation><![CDATA[
 	set ConversionData = ##class(TECH.ObjectUtils.ObjectConvertData).%New()
@@ -84,7 +108,7 @@
 
 	do ..ObjectConverter.Convert(..GetObjectFrom(),ObjectTo,ConversionData)
 	
-	do $$$AssertEquals(ObjectTo.AsInteger,2)
+	do $$$AssertEquals(ObjectTo.AsString,"")
 ]]></Implementation>
 </Method>