Index: vhTest/Fake/DOM/BKH/impl/DataM/OpenstaandeVerkoopFactuur.cls.xml
===================================================================
diff -u -r34988 -r35009
--- vhTest/Fake/DOM/BKH/impl/DataM/OpenstaandeVerkoopFactuur.cls.xml	(.../OpenstaandeVerkoopFactuur.cls.xml)	(revision 34988)
+++ vhTest/Fake/DOM/BKH/impl/DataM/OpenstaandeVerkoopFactuur.cls.xml	(.../OpenstaandeVerkoopFactuur.cls.xml)	(revision 35009)
@@ -101,65 +101,38 @@
 
 <Method name="ZetAantalHerinneringen">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ""
-]]></Implementation>
 </Method>
 
 <Method name="ZetCode">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ""
-]]></Implementation>
 </Method>
 
 <Method name="ZetFactuurDatum">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ""
-]]></Implementation>
+<FormalSpec>Value:%Date</FormalSpec>
 </Method>
 
 <Method name="ZetKortingKontantInMuntKlant">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ""
-]]></Implementation>
 </Method>
 
 <Method name="ZetMunt">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ""
-]]></Implementation>
 </Method>
 
 <Method name="ZetNogTeBetalenInEUR">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ""
-]]></Implementation>
 </Method>
 
 <Method name="ZetNogTeBetalenInMuntKlant">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ""
-]]></Implementation>
 </Method>
 
 <Method name="ZetOmschrijving">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ""
-]]></Implementation>
 </Method>
 
 <Method name="ZetTotaalBedragInMuntKlant">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ""
-]]></Implementation>
 </Method>
 
 <Method name="ZetVersieNummer">
@@ -168,10 +141,7 @@
 </Method>
 
 <Method name="ZetVervalDatum">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ""
-]]></Implementation>
+<FormalSpec>Value:%Date</FormalSpec>
 </Method>
 </Class>
 
Index: DOM/BKH/impl/DataM/OpenstaandeFactuur.cls.xml
===================================================================
diff -u -r34932 -r35009
--- DOM/BKH/impl/DataM/OpenstaandeFactuur.cls.xml	(.../OpenstaandeFactuur.cls.xml)	(revision 34932)
+++ DOM/BKH/impl/DataM/OpenstaandeFactuur.cls.xml	(.../OpenstaandeFactuur.cls.xml)	(revision 35009)
@@ -62,7 +62,6 @@
 
 <Method name="ZetCode">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	Do ..Node.ZetPiece(1,Value)
 ]]></Implementation>
 </Method>
@@ -74,9 +73,8 @@
 </Method>
 
 <Method name="ZetFactuurDatum">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Do ..Node.ZetPiece(2,Value)
+<FormalSpec>Value:%Date</FormalSpec>
+<Implementation><![CDATA[	Do ..Node.ZetPiece(2,$$EXTDATE^vhLib.DataTypes(Value,"DKP"))
 ]]></Implementation>
 </Method>
 
@@ -87,9 +85,8 @@
 </Method>
 
 <Method name="ZetVervalDatum">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Do ..Node.ZetPiece(3,Value)
+<FormalSpec>Value:%Date</FormalSpec>
+<Implementation><![CDATA[	Do ..Node.ZetPiece(3,$$EXTDATE^vhLib.DataTypes(Value,"DKP"))
 ]]></Implementation>
 </Method>
 
@@ -101,7 +98,6 @@
 
 <Method name="ZetTotaalBedragInMuntKlant">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	Do ..Node.ZetPiece(4,Value)
 ]]></Implementation>
 </Method>
@@ -114,7 +110,6 @@
 
 <Method name="ZetNogTeBetalenInMuntKlant">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	Do ..Node.ZetPiece(5,Value)
 ]]></Implementation>
 </Method>
@@ -127,7 +122,6 @@
 
 <Method name="ZetKortingKontantInMuntKlant">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	Do ..Node.ZetPiece(6,Value)
 ]]></Implementation>
 </Method>
@@ -140,7 +134,6 @@
 
 <Method name="ZetOmschrijving">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	Do ..Node.ZetPiece(7,Value)
 ]]></Implementation>
 </Method>
@@ -153,7 +146,6 @@
 
 <Method name="ZetAantalHerinneringen">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	Do ..Node.ZetPiece(8,Value)
 ]]></Implementation>
 </Method>
@@ -166,7 +158,6 @@
 
 <Method name="ZetMunt">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	Do ..Node.ZetPiece(9,Value)
 ]]></Implementation>
 </Method>
@@ -179,7 +170,6 @@
 
 <Method name="ZetNogTeBetalenInEUR">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	Do ..Node.ZetPiece(10,Value)
 ]]></Implementation>
 </Method>
Index: vhUnitTest/DOM/BKH/impl/OpenstaandeAankoopFactuurRepository/Test.cls.xml
===================================================================
diff -u -r34827 -r35009
--- vhUnitTest/DOM/BKH/impl/OpenstaandeAankoopFactuurRepository/Test.cls.xml	(.../Test.cls.xml)	(revision 34827)
+++ vhUnitTest/DOM/BKH/impl/OpenstaandeAankoopFactuurRepository/Test.cls.xml	(.../Test.cls.xml)	(revision 35009)
@@ -51,7 +51,7 @@
 	Set OpenstaandeVerkoopFactuur = ..OpenstaandeAankoopFactuurRepository.GeefViaLeverancierIDEnFactuurID(..LeverancierID,123455)
 		
 	Do $$$AssertTrue($IsObject(OpenstaandeVerkoopFactuur))
-	Do $$$AssertEquals(OpenstaandeVerkoopFactuur.GeefVervalDatum(),"21.05.16","")
+	Do $$$AssertEqualsDate(OpenstaandeVerkoopFactuur.GeefVervalDatum(),"21.05.2016")
 ]]></Implementation>
 </Method>
 
@@ -60,11 +60,11 @@
 	#dim OpenstaandeVerkoopFactuurIterator as TECH.Iterator
 	Set OpenstaandeVerkoopFactuurIterator = ..OpenstaandeAankoopFactuurRepository.ZoekViaLeverancierID(..LeverancierID)
 	
-	Do $$$AssertTrue(OpenstaandeVerkoopFactuurIterator.HasNext(),"")
+	Do $$$AssertTrue(OpenstaandeVerkoopFactuurIterator.HasNext())
 	Do OpenstaandeVerkoopFactuurIterator.Next()
-	Do $$$AssertTrue(OpenstaandeVerkoopFactuurIterator.HasNext(),"")
+	Do $$$AssertTrue(OpenstaandeVerkoopFactuurIterator.HasNext())
 	Do OpenstaandeVerkoopFactuurIterator.Next()
-	Do $$$AssertFalse(OpenstaandeVerkoopFactuurIterator.HasNext(),"")
+	Do $$$AssertFalse(OpenstaandeVerkoopFactuurIterator.HasNext())
 ]]></Implementation>
 </Method>
 
@@ -73,7 +73,7 @@
 	#dim OpenstaandeVerkoopFactuur As DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur
 	Set OpenstaandeVerkoopFactuur = ..OpenstaandeAankoopFactuurRepository.MaakViaLeverancierIDEnFactuurID(..LeverancierID,987654)
 	
-	Do $$$AssertEquals(OpenstaandeVerkoopFactuur.GeefFactuurID(),987654,"")
+	Do $$$AssertEquals(OpenstaandeVerkoopFactuur.GeefFactuurID(),987654)
 ]]></Implementation>
 </Method>
 
@@ -99,7 +99,7 @@
 	#dim OpenstaandeVerkoopFactuurIterator as TECH.Iterator
 	Set OpenstaandeVerkoopFactuurIterator = ..OpenstaandeAankoopFactuurRepository.ZoekViaLeverancierID(..LeverancierID)
 	
-	Do $$$AssertFalse(OpenstaandeVerkoopFactuurIterator.HasNext(),"")
+	Do $$$AssertFalse(OpenstaandeVerkoopFactuurIterator.HasNext())
 ]]></Implementation>
 </Method>
 
@@ -111,11 +111,11 @@
 	
 	Do ..OpenstaandeAankoopFactuurRepository.Bewaar(OpenstaandeVerkoopFactuur)
 	
-	set OpenstaandeVerkoopFactuur = ""
+	Set OpenstaandeVerkoopFactuur = $$$NULLOREF
 	
 	Set OpenstaandeVerkoopFactuur = ..OpenstaandeAankoopFactuurRepository.GeefViaLeverancierIDEnFactuurID(..LeverancierID,987654)
 	#dim Code As %String = OpenstaandeVerkoopFactuur.GeefCode()
-	Do $$$AssertEquals(Code,"C","")
+	Do $$$AssertEquals(Code,"C")
 ]]></Implementation>
 </Method>
 </Class>
Index: vhTest/Mock/DOM/BKH/OpenstaandeFactuur.cls.xml
===================================================================
diff -u -r34932 -r35009
--- vhTest/Mock/DOM/BKH/OpenstaandeFactuur.cls.xml	(.../OpenstaandeFactuur.cls.xml)	(revision 34932)
+++ vhTest/Mock/DOM/BKH/OpenstaandeFactuur.cls.xml	(.../OpenstaandeFactuur.cls.xml)	(revision 35009)
@@ -100,64 +100,55 @@
 
 <Method name="ZetAantalHerinneringen">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("ZetAantalHerinneringen",Value)
+<Implementation><![CDATA[	do ..VerwerkMethodCall("ZetAantalHerinneringen",Value)
 ]]></Implementation>
 </Method>
 
 <Method name="ZetCode">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("ZetCode",Value)
+<Implementation><![CDATA[	do ..VerwerkMethodCall("ZetCode",Value)
 ]]></Implementation>
 </Method>
 
 <Method name="ZetFactuurDatum">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("ZetFactuurDatum",Value)
+<FormalSpec>Value:%Date</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("ZetFactuurDatum",Value)
 ]]></Implementation>
 </Method>
 
 <Method name="ZetKortingKontantInMuntKlant">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("ZetKortingKontantInMuntKlant",Value)
+<Implementation><![CDATA[	do ..VerwerkMethodCall("ZetKortingKontantInMuntKlant",Value)
 ]]></Implementation>
 </Method>
 
 <Method name="ZetMunt">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("ZetMunt",Value)
+<Implementation><![CDATA[	do ..VerwerkMethodCall("ZetMunt",Value)
 ]]></Implementation>
 </Method>
 
 <Method name="ZetNogTeBetalenInEUR">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("ZetNogTeBetalenInEUR",Value)
+<Implementation><![CDATA[	do ..VerwerkMethodCall("ZetNogTeBetalenInEUR",Value)
 ]]></Implementation>
 </Method>
 
 <Method name="ZetNogTeBetalenInMuntKlant">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("ZetNogTeBetalenInMuntKlant",Value)
+<Implementation><![CDATA[	do ..VerwerkMethodCall("ZetNogTeBetalenInMuntKlant",Value)
 ]]></Implementation>
 </Method>
 
 <Method name="ZetOmschrijving">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("ZetOmschrijving",Value)
+<Implementation><![CDATA[	do ..VerwerkMethodCall("ZetOmschrijving",Value)
 ]]></Implementation>
 </Method>
 
 <Method name="ZetTotaalBedragInMuntKlant">
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("ZetTotaalBedragInMuntKlant",Value)
+<Implementation><![CDATA[	do ..VerwerkMethodCall("ZetTotaalBedragInMuntKlant",Value)
 ]]></Implementation>
 </Method>
 
@@ -168,9 +159,8 @@
 </Method>
 
 <Method name="ZetVervalDatum">
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("ZetVervalDatum",Value)
+<FormalSpec>Value:%Date</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("ZetVervalDatum",Value)
 ]]></Implementation>
 </Method>
 </Class>
Index: DOM/BKH/OpenstaandeFactuur.cls.xml
===================================================================
diff -u -r34932 -r35009
--- DOM/BKH/OpenstaandeFactuur.cls.xml	(.../OpenstaandeFactuur.cls.xml)	(revision 34932)
+++ DOM/BKH/OpenstaandeFactuur.cls.xml	(.../OpenstaandeFactuur.cls.xml)	(revision 35009)
@@ -29,7 +29,6 @@
 <Method name="ZetCode">
 <Abstract>1</Abstract>
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
 </Method>
 
 <Method name="GeefFactuurDatum">
@@ -39,8 +38,7 @@
 
 <Method name="ZetFactuurDatum">
 <Abstract>1</Abstract>
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
+<FormalSpec>Value:%Date</FormalSpec>
 </Method>
 
 <Method name="GeefVervalDatum">
@@ -50,8 +48,7 @@
 
 <Method name="ZetVervalDatum">
 <Abstract>1</Abstract>
-<FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
+<FormalSpec>Value:%Date</FormalSpec>
 </Method>
 
 <Method name="GeefTotaalBedragInMuntKlant">
@@ -62,7 +59,6 @@
 <Method name="ZetTotaalBedragInMuntKlant">
 <Abstract>1</Abstract>
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
 </Method>
 
 <Method name="GeefNogTeBetalenInMuntKlant">
@@ -73,7 +69,6 @@
 <Method name="ZetNogTeBetalenInMuntKlant">
 <Abstract>1</Abstract>
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
 </Method>
 
 <Method name="GeefKortingKontantInMuntKlant">
@@ -84,7 +79,6 @@
 <Method name="ZetKortingKontantInMuntKlant">
 <Abstract>1</Abstract>
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
 </Method>
 
 <Method name="GeefOmschrijving">
@@ -95,7 +89,6 @@
 <Method name="ZetOmschrijving">
 <Abstract>1</Abstract>
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
 </Method>
 
 <Method name="GeefAantalHerinneringen">
@@ -106,7 +99,6 @@
 <Method name="ZetAantalHerinneringen">
 <Abstract>1</Abstract>
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
 </Method>
 
 <Method name="GeefMunt">
@@ -117,7 +109,6 @@
 <Method name="ZetMunt">
 <Abstract>1</Abstract>
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
 </Method>
 
 <Method name="GeefNogTeBetalenInEUR">
@@ -128,7 +119,6 @@
 <Method name="ZetNogTeBetalenInEUR">
 <Abstract>1</Abstract>
 <FormalSpec>Value:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
 </Method>
 
 <Method name="Save">