Index: vhUnitTest/TECH/Format/impl/FormatAPI/FormatDate/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/TECH/Format/impl/FormatAPI/FormatDate/Test.cls.xml	(revision 0)
+++ vhUnitTest/TECH/Format/impl/FormatAPI/FormatDate/Test.cls.xml	(revision 2006)
@@ -0,0 +1,38 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.TECH.Format.impl.FormatAPI.FormatDate.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="TestInputDatumCorrectFormaat">
+<Implementation><![CDATA[
+	Set FormatAPI = ##class(TECH.Format.impl.FormatAPI).%New()
+	
+	#dim DatumCorrectFormaat = "63700"
+	#dim GeformatteerdeDatum As %String = FormatAPI.FormatDate(DatumCorrectFormaat,"dd-mm-yyyy")
+	#dim GeformatteerdeDatumMetTijd As %String = FormatAPI.FormatDate(DatumCorrectFormaat,"dd-mm-yyyy hh:nn:ss")
+	
+	Do $$$AssertEquals(GeformatteerdeDatum,"28-05-2015")
+	Do $$$AssertEquals(GeformatteerdeDatumMetTijd,"28-05-2015 00:00:00")
+]]></Implementation>
+</Method>
+
+<Method name="TestInputDatumMetTijdsdeel">
+<Description>
+Deze test-method is bedoeld om aan te geven dat de FormatDate() method tolerant is qua input-formaat. 
+Deze test-method is dus niet bedoeld om het "opgelegde" gedrag vast te leggen.                        
+M.a.w. hyet gebruik hiervan is op eigen risico, beter gebruik maken van de method FormatHorolog()  !  </Description>
+<Implementation><![CDATA[
+	Set FormatAPI = ##class(TECH.Format.impl.FormatAPI).%New()
+	
+	#dim DatumDatumMetTijdsdeel = "63700,33300"
+	#dim GeformatteerdeDatum As %String = FormatAPI.FormatDate(DatumDatumMetTijdsdeel,"dd-mm-yyyy")
+	#dim GeformatteerdeDatumMetTijd As %String = FormatAPI.FormatDate(DatumDatumMetTijdsdeel,"dd-mm-yyyy hh:nn:ss")
+	
+	Do $$$AssertEquals(GeformatteerdeDatum,"28-05-2015")
+	Do $$$AssertEquals(GeformatteerdeDatumMetTijd,"28-05-2015 09:15:00")
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>