Index: APPS/Halux/common/impl/ProductieGroepBepalerTBX.cls.xml
===================================================================
diff -u -r59714 -r59858
--- APPS/Halux/common/impl/ProductieGroepBepalerTBX.cls.xml	(.../ProductieGroepBepalerTBX.cls.xml)	(revision 59714)
+++ APPS/Halux/common/impl/ProductieGroepBepalerTBX.cls.xml	(.../ProductieGroepBepalerTBX.cls.xml)	(revision 59858)
@@ -51,12 +51,12 @@
 	#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 (..IsKlantDeDecker(KlantId) && ..IsKleurOrionGrijs(TBXLade)) {
+	If (..ProductieOpstartfaseBepaler.IsInOpstartfase(TBXLade, ProductId)) {
+		Set ProductieGroep = ..ProductieGroep.Opstartfase
+	} ElseIf (..IsKlantDeDecker(KlantId) && ..IsKleurOrionGrijs(TBXLade)) {
 		Set ProductieGroep = ..ProductieGroep.TBXOrionGrijs
 	} ElseIf (..IsSpecialsKlant(KlantId, Verpakking)){
 		Set ProductieGroep = ..ProductieGroep.SpecialsKlant	
-	} ElseIf (..ProductieOpstartfaseBepaler.IsInOpstartfase(TBXLade, ProductId)) {
-		Set ProductieGroep = ..ProductieGroep.Opstartfase
 	} ElseIf (ODSP '= "") {
 		Set ProductieGroep = ..ProductieGroep.Specials
 	} ElseIf (..IsBuroOfHangmappenLade(TBXLade)) {
Index: vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerTBX/GeefProductieGroep/Test.cls.xml
===================================================================
diff -u -r59714 -r59858
--- vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerTBX/GeefProductieGroep/Test.cls.xml	(.../Test.cls.xml)	(revision 59714)
+++ vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerTBX/GeefProductieGroep/Test.cls.xml	(.../Test.cls.xml)	(revision 59858)
@@ -215,49 +215,40 @@
 
 <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)
+	#dim TBXLade As DOM.PM.TBXProduct.TBXLade = ..GeefTBXLade()
 	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">
+<Method name="Test lade voor klant DeDecker zonder kleur OG komt in default productiegroep Stuk">
 <Implementation><![CDATA[
-	#dim Verpakking As DOM.PM.enu.TBXVerpakking = ##class(DOM.PM.enu.TBXVerpakking).Pallet()
-	
-	#dim TBXLade As DOM.PM.TBXProduct.TBXLade = ..GeefTBXLade(Verpakking)
+	#dim TBXLade As DOM.PM.TBXProduct.TBXLade = ..GeefTBXLade()
 	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)
+	Do ..AssertProductieGroep(TBXLade, IngegevenKenmerken, ##class(APPS.Halux.common.enu.ProductieGroep).Stuk(),OrionGrijsKlant,,"", $$$True)
 ]]></Implementation>
 </Method>
 
-<Method name="Test lade voor andere klant dan DeDecker met kleur OG komt in default productiegroep Pallet">
+<Method name="Test lade voor andere klant dan DeDecker met kleur OG komt in default productiegroep Stuk">
 <Implementation><![CDATA[
-	#dim Verpakking As DOM.PM.enu.TBXVerpakking = ##class(DOM.PM.enu.TBXVerpakking).Pallet()
-	
-	#dim TBXLade As DOM.PM.TBXProduct.TBXLade = ..GeefTBXLade(Verpakking)
+	#dim TBXLade As DOM.PM.TBXProduct.TBXLade = ..GeefTBXLade()
 	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)
+	Do ..AssertProductieGroep(TBXLade, IngegevenKenmerken, ##class(APPS.Halux.common.enu.ProductieGroep).Stuk(),OrionGrijsKlant,,"", $$$True)
 ]]></Implementation>
 </Method>
 
@@ -284,7 +275,7 @@
 		
 	#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 Klant As DOM.VKP.VanHoeckeKlantID = ##class(DOM.VKP.enu.Klant).DeVliegher()
 	
 	Do ..AssertProductieGroep(TBXLade, IngegevenKenmerken, ##class(APPS.Halux.common.enu.ProductieGroep).SpecialsKlant(),Klant,,"", $$$True)
@@ -355,14 +346,15 @@
 	Do ProductTypeApiStub.IndienMethodCall("IsLadeVanSpaceTowerProduct", ..#ProductID).DanReturn($$$False)
 	Do ProductTypeApiStub.IndienMethodCall("IsVersienummerPrbsIngevuld", ..#ProductID).DanReturn($$$True)	
 	
-	#dim ProductieOpstartfaseBepalerStub As vhTest.Mock.APPS.Halux.common.impl.ProductieGroepBepaler.ProductieOpstartfaseBepalerTBX = ##class(vhTest.Mock.APPS.Halux.common.impl.ProductieGroepBepaler.ProductieOpstartfaseBepalerTBX).%New()
+	#dim ProductieOpstartfaseBepalerMock As vhTest.Mock.APPS.Halux.common.impl.ProductieGroepBepaler.ProductieOpstartfaseBepalerTBX = ##class(vhTest.Mock.APPS.Halux.common.impl.ProductieGroepBepaler.ProductieOpstartfaseBepalerTBX).%New()
 	
-	Do ProductieOpstartfaseBepalerStub.IndienMethodCall("IsInOpstartfase", TBXLade, ..#ProductID).DanReturn(IsInOpstartFase)
+	Do ProductieOpstartfaseBepalerMock.VerwachtMethodCall("IsInOpstartfase", TBXLade, ..#ProductID).DanReturn(IsInOpstartFase)
 		
-	#dim ProductieGroepBepaler As APPS.Halux.common.impl.ProductieGroepBepalerTBX = ##class(APPS.Halux.common.impl.ProductieGroepBepalerTBX).%New(ProductTypeApiStub, ProductieOpstartfaseBepalerStub,,ToeleveringSplitser)
+	#dim ProductieGroepBepaler As APPS.Halux.common.impl.ProductieGroepBepalerTBX = ##class(APPS.Halux.common.impl.ProductieGroepBepalerTBX).%New(ProductTypeApiStub, ProductieOpstartfaseBepalerMock,,ToeleveringSplitser)
 	#dim ProductieGroep As APPS.Halux.common.enu.ProductieGroep = ProductieGroepBepaler.GeefProductieGroep(FakeKlantID, ..#ProductID)
 	
 	Do $$$AssertEquals(ProductieGroep, VerwachteProductieGroep)
+	Do ProductieOpstartfaseBepalerMock.Verifieer()
 ]]></Implementation>
 </Method>
 </Class>