Index: vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerTBX/GeefProductieGroep/Test.cls.xml
===================================================================
diff -u -r59626 -r59636
--- vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerTBX/GeefProductieGroep/Test.cls.xml (.../Test.cls.xml) (revision 59626)
+++ vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerTBX/GeefProductieGroep/Test.cls.xml (.../Test.cls.xml) (revision 59636)
@@ -261,6 +261,66 @@
]]>
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
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()
1
Index: vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerTAX/GeefProductieGroep/Test.cls.xml
===================================================================
diff -u -r57836 -r59636
--- vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerTAX/GeefProductieGroep/Test.cls.xml (.../Test.cls.xml) (revision 57836)
+++ vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerTAX/GeefProductieGroep/Test.cls.xml (.../Test.cls.xml) (revision 59636)
@@ -104,6 +104,36 @@
]]>
+
+
+
+
+
+
+
+
+
+
+
+
KlantId:%String,Kenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken,IsInOpstartFase:%Boolean,VerwachteProductieGroep:APPS.Halux.common.enu.ProductieGroep
1
@@ -115,15 +145,15 @@
Do ProductTypeApiMock.VerwachtMethodCall("GeefMaatwerkProduct", ..#ProductID).DanReturn(MaatwerkProductMock)
#dim ProductieOpstartfaseBepalerMock As vhTest.Mock.APPS.Halux.common.impl.ProductieGroepBepaler.ProductieOpstartfaseBepalerTAX = ##class(vhTest.Mock.APPS.Halux.common.impl.ProductieGroepBepaler.ProductieOpstartfaseBepalerTAX).%New()
- Do ProductieOpstartfaseBepalerMock.VerwachtMethodCall("IsInOpstartfase", MaatwerkProductMock).DanReturn(IsInOpstartFase)
+ Do ProductieOpstartfaseBepalerMock.IndienMethodCall("IsInOpstartfase", MaatwerkProductMock).DanReturn(IsInOpstartFase)
#dim ProductieGroepBepaler As APPS.Halux.common.impl.ProductieGroepBepalerTAX = ##class(APPS.Halux.common.impl.ProductieGroepBepalerTAX).%New(ProductTypeApiMock, ProductieOpstartfaseBepalerMock)
#dim ProductieGroep As APPS.Halux.common.enu.ProductieGroep = ProductieGroepBepaler.GeefProductieGroep(KlantId, ..#ProductID)
Do $$$AssertEquals(ProductieGroep, VerwachteProductieGroep)
Do ProductTypeApiMock.Verifieer()
- Do ProductieOpstartfaseBepalerMock.Verifieer()
+ ///Do ProductieOpstartfaseBepalerMock.Verifieer()
Do MaatwerkProductMock.Verifieer()
]]>
Index: APPS/Halux/common/impl/ProductieGroepBepalerTBX.cls.xml
===================================================================
diff -u -r59626 -r59636
--- APPS/Halux/common/impl/ProductieGroepBepalerTBX.cls.xml (.../ProductieGroepBepalerTBX.cls.xml) (revision 59626)
+++ APPS/Halux/common/impl/ProductieGroepBepalerTBX.cls.xml (.../ProductieGroepBepalerTBX.cls.xml) (revision 59636)
@@ -53,6 +53,8 @@
If (..IsKlantDeDecker(KlantId) && ..IsKleurOrionGrijs(TBXLade)) {
Set ProductieGroep = ..ProductieGroep.TBXOrionGrijs
+ } ElseIf (..IsSpecialKLT(KlantId, Verpakking)){
+ Set ProductieGroep = ..ProductieGroep.SpecialKLT
} ElseIf (..ProductieOpstartfaseBepaler.IsInOpstartfase(TBXLade, ProductId)) {
Set ProductieGroep = ..ProductieGroep.Opstartfase
} ElseIf (ODSP '= "") {
Index: APPS/Halux/common/impl/ProductieGroepBepalerTAX.cls.xml
===================================================================
diff -u -r58214 -r59636
--- APPS/Halux/common/impl/ProductieGroepBepalerTAX.cls.xml (.../ProductieGroepBepalerTAX.cls.xml) (revision 58214)
+++ APPS/Halux/common/impl/ProductieGroepBepalerTAX.cls.xml (.../ProductieGroepBepalerTAX.cls.xml) (revision 59636)
@@ -41,7 +41,9 @@
#dim TaxLade As DOM.PM.MaatwerkProduct = ..ProductTypeApi.GeefMaatwerkProduct(ProductId)
#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = TaxLade.GeefIngegevenKenmerken()
- If (..ProductieOpstartfaseBepaler.IsInOpstartfase(TaxLade)) {
+ If (..IsSpecialKLT(KlantId, IngegevenKenmerken.VerpakkingType)){
+ Set ..ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).SpecialKLT()
+ } ElseIf (..ProductieOpstartfaseBepaler.IsInOpstartfase(TaxLade)) {
Set ..ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Opstartfase()
} ElseIf $$$Not(..IsVolledig(IngegevenKenmerken)) {
Set ..ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Specials()
Index: APPS/Halux/common/impl/ProductieGroepBepalerLBX.cls.xml
===================================================================
diff -u -r58591 -r59636
--- APPS/Halux/common/impl/ProductieGroepBepalerLBX.cls.xml (.../ProductieGroepBepalerLBX.cls.xml) (revision 58591)
+++ APPS/Halux/common/impl/ProductieGroepBepalerLBX.cls.xml (.../ProductieGroepBepalerLBX.cls.xml) (revision 59636)
@@ -64,11 +64,12 @@
} ElseIf ..IsKlantHein(KlantId) {
Set ProductieGroep = ..ProductieGroep.Specials
} Else {
-
Set ..MaatwerkProduct = ..ProductTypeApi.GeefMaatwerkProduct(ProductId)
Set ..IngegevenKenmerken = ..MaatwerkProduct.GeefIngegevenKenmerken()
- If (..ProductieOpstartfaseBepaler.IsInOpstartfase(..MaatwerkProduct)) {
+ If (..IsSpecialKLT(KlantId, ..IngegevenKenmerken.VerpakkingType)){
+ Set ProductieGroep = ..ProductieGroep.SpecialKLT
+ } ElseIf (..ProductieOpstartfaseBepaler.IsInOpstartfase(..MaatwerkProduct)) {
Set ProductieGroep = ..ProductieGroep.Opstartfase
} ElseIf $$$Not(..IsProductieWijzeVolledig()) {
Set ProductieGroep = ..ProductieGroep.Specials
Index: vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerLBX/GeefProductieGroep/Test.cls.xml
===================================================================
diff -u -r58456 -r59636
--- vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerLBX/GeefProductieGroep/Test.cls.xml (.../Test.cls.xml) (revision 58456)
+++ vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerLBX/GeefProductieGroep/Test.cls.xml (.../Test.cls.xml) (revision 59636)
@@ -225,6 +225,39 @@
]]>
+
+
+
+
+
+
+
+
+
+
+
+
IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken,VerwachteProductieGroep:APPS.Halux.common.enu.ProductieGroep,FakeKlantID:DOM.VKP.VanHoeckeKlantID="",IsInOpstartFase:%Boolean=0,ToeleveringSplitser:APPS.Halux.common.ToeleveringSplitser=""