Index: APPS/TBXWeb/Utils/impl/LadeDesignControleur.cls.xml
===================================================================
diff -u -r579 -r582
--- APPS/TBXWeb/Utils/impl/LadeDesignControleur.cls.xml	(.../LadeDesignControleur.cls.xml)	(revision 579)
+++ APPS/TBXWeb/Utils/impl/LadeDesignControleur.cls.xml	(.../LadeDesignControleur.cls.xml)	(revision 582)
@@ -22,7 +22,7 @@
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 	Set ..TBXContext = TBXContext
-	Set ..RefDatum = $H+15
+	Set ..RefDatum = ##class(TECH.DateTime).CurrentDate()
 	Quit $$$OK
 ]]></Implementation>
 </Method>