Index: FLOWHALUX.mac.rou
===================================================================
diff -u -r47973 -r48613
--- FLOWHALUX.mac.rou	(.../FLOWHALUX.mac.rou)	(revision 47973)
+++ FLOWHALUX.mac.rou	(.../FLOWHALUX.mac.rou)	(revision 48613)
@@ -355,15 +355,16 @@
  ;
  ; Wijzigen van de tandembox en legrabox productiedagen
 ModTBXProdDagen
- New R,sFL,ModFrom,ModTo,From,To,Subject,Body,Bulk,Probox,Karton,VHOSS,K,DisplayOnly
- New BulkVan,ProboxVan,KartonVan,VHOSSVan, AlleVoor
+ New R,sFL,ModFrom,ModTo,From,To,Subject,Body,Bulk,Probox,Karton,VHOSS,K,DisplayOnly,TAX
+ New BulkVan,ProboxVan,KartonVan,VHOSSVan, AlleVoor,TAXVan
  Set Bulk = ##class(DOM.VKP.impl.TBXProductieDagenData).OpenId("Bulk")
  Set Probox = ##class(DOM.VKP.impl.TBXProductieDagenData).OpenId("Probox")
  Set Karton = ##class(DOM.VKP.impl.TBXProductieDagenData).OpenId("Karton")
  Set VHOSS = ##class(DOM.VKP.impl.TBXProductieDagenData).OpenId("VHOSS")
- Set AlleVoor = Bulk.GlobaleDefault_D_Probox.GlobaleDefault_D_Karton.GlobaleDefault_D_VHOSS.GlobaleDefault
+  Set TAX = ##class(DOM.VKP.impl.TBXProductieDagenData).OpenId("TAX")
+ Set AlleVoor = Bulk.GlobaleDefault_D_Probox.GlobaleDefault_D_Karton.GlobaleDefault_D_VHOSS.GlobaleDefault_D_TAX.GlobaleDefault
  Set sFL(1) = AlleVoor
- Set BulkVan=$P(sFL(1),D,1), ProboxVan=$P(sFL(1),D,2), KartonVan=$P(sFL(1),D,3) ,VHOSSVan=$P(sFL(1),D,4)
+ Set BulkVan=$P(sFL(1),D,1), ProboxVan=$P(sFL(1),D,2), KartonVan=$P(sFL(1),D,3) ,VHOSSVan=$P(sFL(1),D,4) ,TAXVan=$P(sFL(1),D,5)
  Set DisplayOnly=0
  Lock +ProductieDagenData:1 Else  Set DisplayOnly=1  
  
@@ -384,20 +385,23 @@
 	 	Set Probox.GlobaleDefault=$P(sFL(1),D,2)
 	 	Set Karton.GlobaleDefault=$P(sFL(1),D,3)
 	 	Set VHOSS.GlobaleDefault=$P(sFL(1),D,4)
+	 	Set TAX.GlobaleDefault=$P(sFL(1),D,5)
  	
 	 	Do Bulk.Save()
 	 	Do Probox.Save()
 	 	Do Karton.Save()
 	 	Do VHOSS.Save()
+	 	Do TAX.Save()
  	
 	 	Set From=$$$SystemMail("Productie")
 	 	Set To=$LB(##class(TECH.Config.ConfigMgr).Instance().GetString("FLOWHALUX_ModTBXProdDagen_MailTo"))
-		Set Subject="TBX/LBX productiedagen"
-	 	Set Body="De TBX/LBX productiedagen zijn door "_$$USERNAME^vhUSER(,2)_" gewijzigd.<br/>"
+		Set Subject="TBX/LBX/TA'OR productiedagen"
+	 	Set Body="De TBX/LBX/TA'OR productiedagen zijn door "_$$USERNAME^vhUSER(,2)_" gewijzigd.<br/>"
 	 	Set Body=Body_"<br/>Karton: D+"_KartonVan_$S(KartonVan'=Karton.GlobaleDefault:" naar D+"_Karton.GlobaleDefault_".",1:"")
 	 	Set Body=Body_"<br/>Bulk: D+"_BulkVan_$S(BulkVan'=Bulk.GlobaleDefault:" naar D+"_Bulk.GlobaleDefault_".",1:"")
 	 	Set Body=Body_"<br/>Probox: D+"_ProboxVan_$S(ProboxVan'=Probox.GlobaleDefault:" naar D+"_Probox.GlobaleDefault_".",1:"")
 	 	Set Body=Body_"<br/>VHOSS: D+"_VHOSSVan_$S(VHOSSVan'=VHOSS.GlobaleDefault:" naar D+"_VHOSS.GlobaleDefault_".",1:"")
+	 	Set Body=Body_"<br/>TA'OR: D+"_TAXVan_$S(TAXVan'=TAX.GlobaleDefault:" naar D+"_TAX.GlobaleDefault_".",1:"")
 	 	Set R=$$SendMiniMail^vhLib(From,To,Subject,Body,,1)
 	 }
  }