Index: TECH/DateTime.cls.xml
===================================================================
diff -u -r663 -r664
--- TECH/DateTime.cls.xml	(.../DateTime.cls.xml)	(revision 663)
+++ TECH/DateTime.cls.xml	(.../DateTime.cls.xml)	(revision 664)
@@ -150,7 +150,7 @@
 <Method name="CurrentDateVoorQueries">
 <ClassMethod>1</ClassMethod>
 <ReturnType>%Date</ReturnType>
-<Implementation><![CDATA[	Quit $Select($System.SQL.GetSelectMode()=1:$ZDate($H,3),1:$P($H,1))
+<Implementation><![CDATA[	Quit $Select($System.SQL.GetSelectMode()=1:$ZDate($H,3),1:$P($H,",",1))
 ]]></Implementation>
 </Method>