Index: vhPowerTools/DOM/VKP/impl/ProductieDagen/TAORProductieDagenDataKlantDefaults.cls.xml
===================================================================
diff -u -r61583 -r62999
--- vhPowerTools/DOM/VKP/impl/ProductieDagen/TAORProductieDagenDataKlantDefaults.cls.xml	(.../TAORProductieDagenDataKlantDefaults.cls.xml)	(revision 61583)
+++ vhPowerTools/DOM/VKP/impl/ProductieDagen/TAORProductieDagenDataKlantDefaults.cls.xml	(.../TAORProductieDagenDataKlantDefaults.cls.xml)	(revision 62999)
@@ -7,6 +7,7 @@
 <ClassMethod>1</ClassMethod>
 <FormalSpec>TAORKartonProductieDagen:%String,TAORProboxProductieDagen:%String</FormalSpec>
 <Implementation><![CDATA[
+	/*  ---  Update SFS - 12486 - Normaal vast D+2 ---  */
 	#dim TAORKartonProductieDagenSFS = TAORKartonProductieDagen - 1
 	#dim SetFilteSFS As %String = "KlantDefaults = '"_TAORKartonProductieDagenSFS_"'"
 	#dim WhereFilterSFS As %String = "element_key = '12486' AND TAORProductieDagenData = 'Karton'" 
@@ -16,14 +17,29 @@
 	Set SetFilteSFS = "KlantDefaults = '"_TAORProboxProductieDagenSFS_"'"
 	Set WhereFilterSFS = "element_key = '12486' AND TAORProductieDagenData = 'Probox'"
 	Do ..UpdateKalender(SetFilteSFS, WhereFilterSFS)
+	/*  -------------------  */
 	
+	/*  ---  Update DARO-23968 - Normaal vast D+2 ---  */
+	#dim TAORKartonProductieDagenDARO = TAORKartonProductieDagen - 1
+	#dim SetFilteDARO As %String = "KlantDefaults = '"_TAORKartonProductieDagenDARO_"'"
+	#dim WhereFilterDARO As %String = "element_key = '23968' AND TAORProductieDagenData = 'Karton'" 
+	Do ..UpdateKalender(SetFilteSFS, WhereFilterSFS)
+	
+	#dim TAORProboxProductieDagenDARO = TAORProboxProductieDagen - 1
+	Set SetFilteDARO = "KlantDefaults = '"_TAORProboxProductieDagenDARO_"'"
+	Set WhereFilterDARO = "element_key = '23968' AND TAORProductieDagenData = 'Probox'"
+	Do ..UpdateKalender(SetFilteSFS, WhereFilterSFS)
+	/*  -------------------  */
+	
+	/*  ---  Update HDE - 32672 - Normaal vast D+3 ---  */
 	#dim SetFilterHDE As %String = "KlantDefaults = '"_TAORProboxProductieDagen_"'"
 	#dim WhereFilterHDE As %String = "element_key = '32672' AND TAORProductieDagenData = 'Probox'"
 	Do ..UpdateKalender(SetFilterHDE, WhereFilterHDE)
-	
+		
 	Set SetFilterHDE = "KlantDefaults = '"_TAORKartonProductieDagen_"'"
 	Set WhereFilterHDE = "element_key = '32672' AND TAORProductieDagenData = 'Karton'"
 	Do ..UpdateKalender(SetFilterHDE, WhereFilterHDE)
+	/*  -------------------  */
 ]]></Implementation>
 </Method>