Index: vhUnitTest/TECH/ObjectUtils/ObjectConverter.cls.xml
===================================================================
diff -u -r2217 -r2592
--- vhUnitTest/TECH/ObjectUtils/ObjectConverter.cls.xml	(.../ObjectConverter.cls.xml)	(revision 2217)
+++ vhUnitTest/TECH/ObjectUtils/ObjectConverter.cls.xml	(.../ObjectConverter.cls.xml)	(revision 2592)
@@ -99,9 +99,22 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Conversie opgegeven waarde bevat een conversie script">
+<Method name="Test: Conversie opgegeven waarde bevat een conversie script - Gebruikt ObjectIn">
 <Implementation><![CDATA[
 	set ConversionData = ##class(TECH.ObjectUtils.ObjectConvertData).%New()
+	do ConversionData.Add("AsInteger","AsInteger","Set Output = ObjectIn.AsInteger * 2")
+
+	set ObjectTo = ##class(vhUnitTest.TECH.ObjectUtils.ObjectConverter.Object).%New()
+
+	do ..ObjectConverter.Convert(..GetObjectFrom(),ObjectTo,ConversionData)
+	
+	do $$$AssertEquals(ObjectTo.AsString,"")
+]]></Implementation>
+</Method>
+
+<Method name="Test: Conversie opgegeven waarde bevat een conversie script - Gebruik Input">
+<Implementation><![CDATA[
+	set ConversionData = ##class(TECH.ObjectUtils.ObjectConvertData).%New()
 	do ConversionData.Add("AsInteger","AsInteger","Set Output = Input * 2")
 
 	set ObjectTo = ##class(vhUnitTest.TECH.ObjectUtils.ObjectConverter.Object).%New()