Index: TECH/DateTime.cls.xml
===================================================================
diff -u -r877 -r1084
--- TECH/DateTime.cls.xml	(.../DateTime.cls.xml)	(revision 877)
+++ TECH/DateTime.cls.xml	(.../DateTime.cls.xml)	(revision 1084)
@@ -256,6 +256,14 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefDagInWeek">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>Dag:%Integer</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..DagNaam(Dag+3)
+]]></Implementation>
+</Method>
+
 <Method name="IsWeekdag">
 <ClassMethod>1</ClassMethod>
 <FormalSpec>Dag:%Date</FormalSpec>