Index: TECH/DateTime.cls.xml
===================================================================
diff -u -r1578 -r1600
--- TECH/DateTime.cls.xml	(.../DateTime.cls.xml)	(revision 1578)
+++ TECH/DateTime.cls.xml	(.../DateTime.cls.xml)	(revision 1600)
@@ -21,6 +21,14 @@
 ]]></Implementation>
 </Method>
 
+<Method name="TextToDate">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>Text:%String</FormalSpec>
+<ReturnType>%Date</ReturnType>
+<Implementation><![CDATA[	Quit $$INTDATE^vhDTyp(Text)
+]]></Implementation>
+</Method>
+
 <Method name="TimestampToSeconds">
 <ClassMethod>1</ClassMethod>
 <FormalSpec>Timestamp:%TimeStamp</FormalSpec>