Index: TECH/DateTime.cls.xml
===================================================================
diff -u -r1084 -r1542
--- TECH/DateTime.cls.xml	(.../DateTime.cls.xml)	(revision 1084)
+++ TECH/DateTime.cls.xml	(.../DateTime.cls.xml)	(revision 1542)
@@ -336,6 +336,14 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Kwartaal">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>TijdExpressie:%TimeStamp</FormalSpec>
+<ReturnType>%Integer</ReturnType>
+<Implementation><![CDATA[	Quit $SYSTEM.SQL.QUARTER(TijdExpressie)
+]]></Implementation>
+</Method>
+
 <Method name="Jaar">
 <Description>
 Werkt ook met %Date</Description>