Index: APPS/Halux/PPS/Activiteit/impl/TAOR/Front/VerwerkingIDBepaler.cls.xml
===================================================================
diff -u -r68115 -r68124
--- APPS/Halux/PPS/Activiteit/impl/TAOR/Front/VerwerkingIDBepaler.cls.xml	(.../VerwerkingIDBepaler.cls.xml)	(revision 68115)
+++ APPS/Halux/PPS/Activiteit/impl/TAOR/Front/VerwerkingIDBepaler.cls.xml	(.../VerwerkingIDBepaler.cls.xml)	(revision 68124)
@@ -66,13 +66,9 @@
 <Private>1</Private>
 <ReturnType>TECH.String</ReturnType>
 <Implementation><![CDATA[
-	#dim Prefix As %String = "F"
+	#dim IsSpecialWorkshopAfhandeling As %Boolean = (..Front.GeefKleur() = ##class(DOM.PM.enu.TAORLadeKleur).WalnutMediumBrown())
 	
-	If (..Front.GeefKleur() = ##class(DOM.PM.enu.TAORLadeKleur).WalnutMediumBrown()) {
-		Set Prefix = "S" // SpecialWorkshop
-	}
-	
-	Quit Prefix
+	Quit $$$If(IsSpecialWorkshopAfhandeling, "S", "F")
 ]]></Implementation>
 </Method>
 
Index: APPS/Halux/common/impl/ProductieGroepBepalerTAX.cls.xml
===================================================================
diff -u -r68119 -r68124
--- APPS/Halux/common/impl/ProductieGroepBepalerTAX.cls.xml	(.../ProductieGroepBepalerTAX.cls.xml)	(revision 68119)
+++ APPS/Halux/common/impl/ProductieGroepBepalerTAX.cls.xml	(.../ProductieGroepBepalerTAX.cls.xml)	(revision 68124)
@@ -41,8 +41,8 @@
 	#dim TaxLade As DOM.PM.TAORProduct.TAORLade = ..ProductTypeApi.GeefTAORboxProduct(ProductId)
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = TaxLade.GeefIngegevenKenmerken()
 	
-	If (IngegevenKenmerken.LadeKleur = ##class(DOM.PM.enu.TAORLadeKleur).WalnutMediumBrown()) {
-		// WalnutMediumBrown = SpecialsPM heeft prio boven Opstartfase, voor het geval beide true zijn.
+	If (..IsProductieMetMinstensDeelsSpecialWorkshopAfhandeling(IngegevenKenmerken)) {
+		// Heeft prio boven Opstartfase, voor het geval beiden true zijn.
 		Set ..ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).SpecialsPM() // Nog te vervangen door nieuw aan te maken ProductieGroep "SpecialWorkshop"
 	} ElseIf (..ProductieOpstartfaseBepaler.IsInOpstartfase(TaxLade)) {
 		Set ..ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Opstartfase()
@@ -85,6 +85,14 @@
 ]]></Implementation>
 </Method>
 
+<Method name="IsProductieMetMinstensDeelsSpecialWorkshopAfhandeling">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (IngegevenKenmerken.LadeKleur = ##class(DOM.PM.enu.TAORLadeKleur).WalnutMediumBrown())
+]]></Implementation>
+</Method>
+
 <Method name="VerwerkBulkPerOnderdeelGegroepeerd">
 <Private>1</Private>
 <Implementation><![CDATA[	set ..ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).BulkPerOnderdeelGegroepeerd()