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>
 
 
Index: vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerTBX/GeefProductieGroep/Test.cls.xml
===================================================================
diff -u -r59386 -r59626
--- vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerTBX/GeefProductieGroep/Test.cls.xml	(.../Test.cls.xml)	(revision 59386)
+++ vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerTBX/GeefProductieGroep/Test.cls.xml	(.../Test.cls.xml)	(revision 59626)
@@ -213,6 +213,54 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test lade voor klant DeDecker met kleur OG komt in productiegroep TbxOrionGrijs">
+<Implementation><![CDATA[
+	#dim Verpakking As DOM.PM.enu.TBXVerpakking = ##class(DOM.PM.enu.TBXVerpakking).Pallet()
+	
+	#dim TBXLade As DOM.PM.TBXProduct.TBXLade = ..GeefTBXLade(Verpakking)
+	Do TBXLade.IndienMethodCall("GeefZijkantKleur").DanReturn(##class(DOM.PM.enu.TBXLadeKleur).OG())
+	
+	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken).StandaardLade()
+	Set IngegevenKenmerken.VerpakkingType = Verpakking
+	
+	#dim OrionGrijsKlant As DOM.VKP.VanHoeckeKlantID = ##class(DOM.VKP.enu.Klant).DeDecker()
+	
+	Do ..AssertProductieGroep(TBXLade, IngegevenKenmerken, ##class(APPS.Halux.common.enu.ProductieGroep).TBXOrionGrijs(),OrionGrijsKlant,,"", $$$True)
+]]></Implementation>
+</Method>
+
+<Method name="Test lade voor klant DeDecker zonder kleur OG komt in default productiegroep Pallet">
+<Implementation><![CDATA[
+	#dim Verpakking As DOM.PM.enu.TBXVerpakking = ##class(DOM.PM.enu.TBXVerpakking).Pallet()
+	
+	#dim TBXLade As DOM.PM.TBXProduct.TBXLade = ..GeefTBXLade(Verpakking)
+	Do TBXLade.IndienMethodCall("GeefZijkantKleur").DanReturn(##class(DOM.PM.enu.TBXLadeKleur).AL())
+	
+	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken).StandaardLade()
+	Set IngegevenKenmerken.VerpakkingType = Verpakking
+	
+	#dim OrionGrijsKlant As DOM.VKP.VanHoeckeKlantID = ##class(DOM.VKP.enu.Klant).DeDecker()
+	
+	Do ..AssertProductieGroep(TBXLade, IngegevenKenmerken, ##class(APPS.Halux.common.enu.ProductieGroep).Pallet(),OrionGrijsKlant,,"", $$$True)
+]]></Implementation>
+</Method>
+
+<Method name="Test lade voor andere klant dan DeDecker met kleur OG komt in default productiegroep Pallet">
+<Implementation><![CDATA[
+	#dim Verpakking As DOM.PM.enu.TBXVerpakking = ##class(DOM.PM.enu.TBXVerpakking).Pallet()
+	
+	#dim TBXLade As DOM.PM.TBXProduct.TBXLade = ..GeefTBXLade(Verpakking)
+	Do TBXLade.IndienMethodCall("GeefZijkantKleur").DanReturn(##class(DOM.PM.enu.TBXLadeKleur).OG())
+	
+	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken).StandaardLade()
+	Set IngegevenKenmerken.VerpakkingType = Verpakking
+	
+	#dim OrionGrijsKlant As DOM.VKP.VanHoeckeKlantID = ##class(DOM.VKP.enu.Klant).TestklantVanHoecke()
+	
+	Do ..AssertProductieGroep(TBXLade, IngegevenKenmerken, ##class(APPS.Halux.common.enu.ProductieGroep).Pallet(),OrionGrijsKlant,,"", $$$True)
+]]></Implementation>
+</Method>
+
 <Method name="GeefTBXLade">
 <FormalSpec>Verpakking:DOM.PM.enu.TBXVerpakking=##class(DOM.PM.enu.TBXVerpakking).StukMetOnderdelen(),OnderdelenSpeciaal:%String="",InbouwBreedte:%Decimal=1324,GeleiderTechnologie:DOM.PM.enu.TBXBlumotion=##class(DOM.PM.enu.TBXBlumotion).Geintegreerd()</FormalSpec>
 <Private>1</Private>
@@ -228,8 +276,8 @@
 	Do TBXLadeStub.IndienMethodCall("GeefInbouwBreedte").DanReturn(InbouwBreedte)
 	Do TBXLadeStub.IndienMethodCall("GeefBlumotion").DanReturn(GeleiderTechnologie)
 	Do TBXLadeStub.IndienMethodCall("GeefAantalHangmappen").DanReturn("")
+	Do TBXLadeStub.IndienMethodCall("GeefZijkantKleur").DanReturn(##class(DOM.PM.enu.TBXLadeKleur).AL())
 	
-	
 	Quit TBXLadeStub
 ]]></Implementation>
 </Method>
@@ -247,15 +295,14 @@
 	Do ProductTypeApiStub.IndienMethodCall("IsLadeVanSpaceTowerProduct", ..#ProductID).DanReturn($$$False)
 	Do ProductTypeApiStub.IndienMethodCall("IsVersienummerPrbsIngevuld", ..#ProductID).DanReturn($$$True)	
 	
-	#dim ProductieOpstartfaseBepalerMock As vhTest.Mock.APPS.Halux.common.impl.ProductieGroepBepaler.ProductieOpstartfaseBepalerTBX = ##class(vhTest.Mock.APPS.Halux.common.impl.ProductieGroepBepaler.ProductieOpstartfaseBepalerTBX).%New()
+	#dim ProductieOpstartfaseBepalerStub As vhTest.Mock.APPS.Halux.common.impl.ProductieGroepBepaler.ProductieOpstartfaseBepalerTBX = ##class(vhTest.Mock.APPS.Halux.common.impl.ProductieGroepBepaler.ProductieOpstartfaseBepalerTBX).%New()
 	
-	Do ProductieOpstartfaseBepalerMock.VerwachtMethodCall("IsInOpstartfase", TBXLade, ..#ProductID).DanReturn(IsInOpstartFase)
-
-	#dim ProductieGroepBepaler As APPS.Halux.common.impl.ProductieGroepBepalerTBX = ##class(APPS.Halux.common.impl.ProductieGroepBepalerTBX).%New(ProductTypeApiStub, ProductieOpstartfaseBepalerMock,,ToeleveringSplitser)
+	Do ProductieOpstartfaseBepalerStub.IndienMethodCall("IsInOpstartfase", TBXLade, ..#ProductID).DanReturn(IsInOpstartFase)
+		
+	#dim ProductieGroepBepaler As APPS.Halux.common.impl.ProductieGroepBepalerTBX = ##class(APPS.Halux.common.impl.ProductieGroepBepalerTBX).%New(ProductTypeApiStub, ProductieOpstartfaseBepalerStub,,ToeleveringSplitser)
 	#dim ProductieGroep As APPS.Halux.common.enu.ProductieGroep = ProductieGroepBepaler.GeefProductieGroep(FakeKlantID, ..#ProductID)
 	
 	Do $$$AssertEquals(ProductieGroep, VerwachteProductieGroep)
-	Do ProductieOpstartfaseBepalerMock.Verifieer()
 ]]></Implementation>
 </Method>
 </Class>