Index: APPS/Halux/common/impl/ProductieGroepBepalerTBX.cls.xml
===================================================================
diff -u -r59386 -r59626
--- APPS/Halux/common/impl/ProductieGroepBepalerTBX.cls.xml	(.../ProductieGroepBepalerTBX.cls.xml)	(revision 59386)
+++ APPS/Halux/common/impl/ProductieGroepBepalerTBX.cls.xml	(.../ProductieGroepBepalerTBX.cls.xml)	(revision 59626)
@@ -51,7 +51,9 @@
 	#dim IsPallet As %Boolean = ##class(TECH.StringUtils).Equals(Verpakking , ##class(DOM.PM.enu.TBXVerpakking).Pallet(), ##class(DOM.PM.enu.TBXVerpakking).CommissieMetOnderdelen(), ##class(DOM.PM.enu.TBXVerpakking).CommissieZonderOnderdelen())
 	#dim IsVhoss As %Boolean = ##class(TECH.StringUtils).Equals(Verpakking , ##class(DOM.PM.enu.TBXVerpakking).KastMetOnderdelen(), ##class(DOM.PM.enu.TBXVerpakking).KastZonderOnderdelen())
 	
-	If (..ProductieOpstartfaseBepaler.IsInOpstartfase(TBXLade, ProductId)) {
+	If (..IsKlantDeDecker(KlantId) && ..IsKleurOrionGrijs(TBXLade)) {
+		Set ProductieGroep = ..ProductieGroep.TBXOrionGrijs
+	} ElseIf (..ProductieOpstartfaseBepaler.IsInOpstartfase(TBXLade, ProductId)) {
 		Set ProductieGroep = ..ProductieGroep.Opstartfase
 	} ElseIf (ODSP '= "") {
 		Set ProductieGroep = ..ProductieGroep.Specials
@@ -156,6 +158,24 @@
 	Quit (..IngegevenKenmerkenTypeAPI.IsSifonlade(TbxLadeIngegevenKenmerken))
 ]]></Implementation>
 </Method>
+
+<Method name="IsKlantDeDecker">
+<FormalSpec>KlantId:DOM.VKP.VanHoeckeKlantID</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	Quit:($$$IsNullOrEmpty(KlantId)) $$$False
+	Quit KlantId = ##class(DOM.VKP.enu.Klant).DeDecker()
+]]></Implementation>
+</Method>
+
+<Method name="IsKleurOrionGrijs">
+<FormalSpec>HuidigeTbxLade:DOM.PM.TBXProduct.TBXLade</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit HuidigeTbxLade.GeefZijkantKleur() = ##class(DOM.PM.enu.TBXLadeKleur).OG()
+]]></Implementation>
+</Method>
 </Class>