Index: TECH/DateTime.cls.xml
===================================================================
diff -u -r619 -r630
--- TECH/DateTime.cls.xml	(.../DateTime.cls.xml)	(revision 619)
+++ TECH/DateTime.cls.xml	(.../DateTime.cls.xml)	(revision 630)
@@ -378,7 +378,7 @@
 <ClassMethod>1</ClassMethod>
 <FormalSpec>Datum:%Date</FormalSpec>
 <ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit $Translate($$EXTDATE^vhLib.DataTypes(Datum,"DS2"),"\",".")
+<Implementation><![CDATA[	Quit $Translate($$EXTDATE^vhLib.DataTypes(Datum,"DK4"),"-",".")
 ]]></Implementation>
 </Method>
 </Class>