Index: WS/TBX/OrderAbstract.cls.xml
===================================================================
diff -u -r591 -r609
--- WS/TBX/OrderAbstract.cls.xml	(.../OrderAbstract.cls.xml)	(revision 591)
+++ WS/TBX/OrderAbstract.cls.xml	(.../OrderAbstract.cls.xml)	(revision 609)
@@ -384,10 +384,23 @@
  Set:($E(sTxt,1)=";") $E(sTxt,1)=""
  Quit sTxt
 etgVervalDatumOFF()
+ Quit:(..OFFVervallenNieuwPrijs20150701()) "30-06-2015"   ; Datum : hard-coded return-value  :-P 
  Quit $TR($ZD($P($$$DateH(..IngaveTijdStip),",",1)+30,4),"/","-")
 ]]></Implementation>
 </Method>
 
+<Method name="OFFVervallenNieuwPrijs20150701">
+<Description>
+Tijdelijk actief in de periode rond 01 juli 2015 (tot 30 dagen later) </Description>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	#define DollarH01Juli2015   63734
+
+	Quit ($P($$$DateH(..IngaveTijdStip),",",1) < $$$DollarH01Juli2015 ) && ($H > ($$$DollarH01Juli2015-1-2))
+]]></Implementation>
+</Method>
+
 <Method name="AddToSubmitToVHLog">
 <FormalSpec>Status:%String,Info:%String</FormalSpec>
 <ProcedureBlock>1</ProcedureBlock>
Index: WS/TBX/Order.cls.xml
===================================================================
diff -u -r579 -r609
--- WS/TBX/Order.cls.xml	(.../Order.cls.xml)	(revision 579)
+++ WS/TBX/Order.cls.xml	(.../Order.cls.xml)	(revision 609)
@@ -437,7 +437,7 @@
 	}
 	Else
 	{	
-		Set IsVervallen=(..DagenVervallen(RefDatum,AantalDagenGeldig)>0)
+		Set IsVervallen=(..DagenVervallen(RefDatum,AantalDagenGeldig)>0) || (..OFFVervallenNieuwPrijs20150701())
 		If (IsVervallen)
 		{
 			Set VervalReden = ##class(APPS.TBXWeb.enu.RedenOfferteVervallen).DuurOfferteVerstreken()