Index: APPS/Verpakking/DoosService.cls.xml
===================================================================
diff -u -r69674 -r69828
--- APPS/Verpakking/DoosService.cls.xml	(.../DoosService.cls.xml)	(revision 69674)
+++ APPS/Verpakking/DoosService.cls.xml	(.../DoosService.cls.xml)	(revision 69828)
@@ -72,7 +72,7 @@
 <Method name="GeefDoos">
 <FormalSpec><![CDATA[ProductGroep:%String,ReceptNaam:%String,MachineID:APPS.Verpakking.enu.MachineID,Aantal:%Integer,&Params:%String,ProductId:%String,Prioriteit:%String="-1",BaseRef:%String,&CallBack:%List="",BoxDataID:%String=""]]></FormalSpec>
 <Implementation><![CDATA[
-	If $$$Not(MachineID = ##class(APPS.Verpakking.enu.MachineID).VH()) {
+	If ($$$Not(MachineID = ##class(APPS.Verpakking.enu.MachineID).VH()) || (ProductGroep = "KAD")) {
 		If $$$Not($$$Server = "CACHE01") {
 			Set Prioriteit = "-1" 
 		} Else {
Index: BL/PPS/KAD/OptiBox.cls.xml
===================================================================
diff -u -r69603 -r69828
--- BL/PPS/KAD/OptiBox.cls.xml	(.../OptiBox.cls.xml)	(revision 69603)
+++ BL/PPS/KAD/OptiBox.cls.xml	(.../OptiBox.cls.xml)	(revision 69828)
@@ -141,11 +141,11 @@
 	Set OptiID=..#obSimple
 	;do WAIP^vhDBG(15,"KAD Params",.Params)
 	
-	If (##class(TECH.Config.ConfigMgr).Instance().GetString("APPS.Verpakking.Machine."_MachineID_"_Codepad") = "Cache") {
+	If ((##class(TECH.Config.ConfigMgr).Instance().GetString("APPS.Verpakking.Machine."_MachineID_"_Codepad") = "Cache") && (OptiID '= "KAD||Vouw errond")) {
 		Set Status=##class(BL.Prod.OptiBox.Optimize).OneBox($$$SplitID(OptiID), .Params, Qty, BaseRef, .PRNr, .CallBack, .SnijPrioriteit, .PPSOutput, .MachineID)
 	}
 	
-	If (##class(TECH.Config.ConfigMgr).Instance().GetString("APPS.Verpakking.Machine."_MachineID_"_Codepad") = "NodeRed") {
+	If ((##class(TECH.Config.ConfigMgr).Instance().GetString("APPS.Verpakking.Machine."_MachineID_"_Codepad") = "NodeRed") || (OptiID = "KAD||Vouw errond")) {
 		Try {
 			Set DoosService = ##class(APPS.Verpakking.DoosService).%New()
 			Do DoosService.GeefDoos($$$SplitID(OptiID), .MachineID, .Qty, .Params, .PRNr, .SnijPrioriteit, BaseRef, .CallBack, "")