Index: APPS/Halux/common/impl/ProductieGroepBepalerLBX.cls.xml
===================================================================
diff -u -r58401 -r58453
--- APPS/Halux/common/impl/ProductieGroepBepalerLBX.cls.xml (.../ProductieGroepBepalerLBX.cls.xml) (revision 58401)
+++ APPS/Halux/common/impl/ProductieGroepBepalerLBX.cls.xml (.../ProductieGroepBepalerLBX.cls.xml) (revision 58453)
@@ -61,13 +61,13 @@
Set ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Opstartfase()
} ElseIf $$$Not(..IsProductieWijzeVolledig(IngegevenKenmerken)) {
Set ProductieGroep = ..ProductieGroep.Specials
- } ElseIf (..IngegevenKenmerkenTypeAPI.IsSpoelbaklade(IngegevenKenmerken) && $$$Not(..IsVHossVerpakking(IngegevenKenmerken)) && (..IsAfsplitsenNodig("LBX_SM_SP"))) {
+ } ElseIf (..IngegevenKenmerkenTypeAPI.IsSpoelbaklade(IngegevenKenmerken) && $$$Not(..IsVHossVerpakking(IngegevenKenmerken)) && (..IsAfsplitsenNodig(##class(APPS.Halux.common.enu.ProductieGroepGroepering).LbxSpSiSl()))) {
Set ProductieGroep = ..ProductieGroep.LBXSpoelbak
- } ElseIf (..IngegevenKenmerkenTypeAPI.IsSpoelbaklade(IngegevenKenmerken) && (..IsVHossVerpakking(IngegevenKenmerken)) && (..IsAfsplitsenNodig("LBX_SM_SP"))) {
+ } ElseIf (..IngegevenKenmerkenTypeAPI.IsSpoelbaklade(IngegevenKenmerken) && (..IsVHossVerpakking(IngegevenKenmerken)) && (..IsAfsplitsenNodig(##class(APPS.Halux.common.enu.ProductieGroepGroepering).LbxSpSiSl()))) {
Set ProductieGroep = ..ProductieGroep.LBXSpoelbakVHoss
- } ElseIf (..IngegevenKenmerkenTypeAPI.IsSmalleLade(IngegevenKenmerken) && (..IsAfsplitsenNodig("LBX_SM_SP"))) {
+ } ElseIf (..IngegevenKenmerkenTypeAPI.IsSmalleLade(IngegevenKenmerken) && (..IsAfsplitsenNodig(##class(APPS.Halux.common.enu.ProductieGroepGroepering).LbxSpSiSl()))) {
Set ProductieGroep = ..ProductieGroep.LBXSpoelbak
- } ElseIf (..IngegevenKenmerkenTypeAPI.IsSifonlade(IngegevenKenmerken) && (..IsAfsplitsenNodig("LBX_SM_SP"))) {
+ } ElseIf (..IngegevenKenmerkenTypeAPI.IsSifonlade(IngegevenKenmerken) && (..IsAfsplitsenNodig(##class(APPS.Halux.common.enu.ProductieGroepGroepering).LbxSpSiSl()))) {
Set ProductieGroep = ..ProductieGroep.LBXSpoelbak
} Else {
If (..IsV1Verpakking(IngegevenKenmerken)) {
Index: vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerLBX/GeefProductieGroep/Test.cls.xml
===================================================================
diff -u -r58403 -r58453
--- vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerLBX/GeefProductieGroep/Test.cls.xml (.../Test.cls.xml) (revision 58403)
+++ vhUnitTest/APPS/Halux/common/impl/ProductieGroepBepalerLBX/GeefProductieGroep/Test.cls.xml (.../Test.cls.xml) (revision 58453)
@@ -62,7 +62,7 @@
Set IngegevenKenmerken.VerpakkingType = ##class(DOM.PM.enu.LBXVerpakkingType).V1()
Set ToeleveringSplitserMock = ##class(vhTest.Mock.APPS.Halux.common.ToeleveringSplitser).%New()
- Do ToeleveringSplitserMock.VerwachtMethodCall("IsNodigTeSplitsen","LBX_SM_SP").DanReturn($$$True)
+ Do ToeleveringSplitserMock.VerwachtMethodCall("IsNodigTeSplitsen",##class(APPS.Halux.common.enu.ProductieGroepGroepering).LbxSpSiSl()).DanReturn($$$True)
Do ..AssertProductieGroep(IngegevenKenmerken, ##class(APPS.Halux.common.enu.ProductieGroep).LBXSpoelbak(),,,ToeleveringSplitserMock)
@@ -76,7 +76,7 @@
Set IngegevenKenmerken.VerpakkingType = ##class(DOM.PM.enu.LBXVerpakkingType).V1()
Set ToeleveringSplitserMock = ##class(vhTest.Mock.APPS.Halux.common.ToeleveringSplitser).%New()
- Do ToeleveringSplitserMock.VerwachtMethodCall("IsNodigTeSplitsen","LBX_SM_SP").DanReturn($$$True)
+ Do ToeleveringSplitserMock.VerwachtMethodCall("IsNodigTeSplitsen",##class(APPS.Halux.common.enu.ProductieGroepGroepering).LbxSpSiSl()).DanReturn($$$True)
Do ..AssertProductieGroep(IngegevenKenmerken, ##class(APPS.Halux.common.enu.ProductieGroep).LBXSpoelbak(),,,ToeleveringSplitserMock)
@@ -99,7 +99,7 @@
Set IngegevenKenmerken.VerpakkingType = ##class(DOM.PM.enu.LBXVerpakkingType).V1()
Set ToeleveringSplitserMock = ##class(vhTest.Mock.APPS.Halux.common.ToeleveringSplitser).%New()
- Do ToeleveringSplitserMock.VerwachtMethodCall("IsNodigTeSplitsen","LBX_SM_SP").DanReturn($$$False)
+ Do ToeleveringSplitserMock.VerwachtMethodCall("IsNodigTeSplitsen",##class(APPS.Halux.common.enu.ProductieGroepGroepering).LbxSpSiSl()).DanReturn($$$False)
Do ..AssertProductieGroep(IngegevenKenmerken, ##class(APPS.Halux.common.enu.ProductieGroep).Stuk(),,,ToeleveringSplitserMock)
@@ -113,7 +113,7 @@
Set IngegevenKenmerken.VerpakkingType = ##class(DOM.PM.enu.LBXVerpakkingType).V1()
Set ToeleveringSplitserMock = ##class(vhTest.Mock.APPS.Halux.common.ToeleveringSplitser).%New()
- Do ToeleveringSplitserMock.VerwachtMethodCall("IsNodigTeSplitsen","LBX_SM_SP").DanReturn($$$True)
+ Do ToeleveringSplitserMock.VerwachtMethodCall("IsNodigTeSplitsen",##class(APPS.Halux.common.enu.ProductieGroepGroepering).LbxSpSiSl()).DanReturn($$$True)
Do ..AssertProductieGroep(IngegevenKenmerken, ##class(APPS.Halux.common.enu.ProductieGroep).LBXSpoelbak(),,,ToeleveringSplitserMock)
@@ -135,7 +135,7 @@
Set IngegevenKenmerken.VerpakkingType = ##class(DOM.PM.enu.LBXVerpakkingType).VHoss()
Set ToeleveringSplitserMock = ##class(vhTest.Mock.APPS.Halux.common.ToeleveringSplitser).%New()
- Do ToeleveringSplitserMock.VerwachtMethodCall("IsNodigTeSplitsen","LBX_SM_SP").DanReturn($$$True)
+ Do ToeleveringSplitserMock.VerwachtMethodCall("IsNodigTeSplitsen",##class(APPS.Halux.common.enu.ProductieGroepGroepering).LbxSpSiSl()).DanReturn($$$True)
Do ..AssertProductieGroep(IngegevenKenmerken, ##class(APPS.Halux.common.enu.ProductieGroep).LBXSpoelbakVHoss(),,,ToeleveringSplitserMock)
Index: APPS/Halux/common/impl/ToeleveringSplitser.cls.xml
===================================================================
diff -u -r58275 -r58453
--- APPS/Halux/common/impl/ToeleveringSplitser.cls.xml (.../ToeleveringSplitser.cls.xml) (revision 58275)
+++ APPS/Halux/common/impl/ToeleveringSplitser.cls.xml (.../ToeleveringSplitser.cls.xml) (revision 58453)
@@ -9,12 +9,12 @@
-APPS.Halux.common.impl.AantallenInToeleveringTeller
+APPS.Halux.common.AantallenInToeleveringTeller
1
-AantallenInToeleveringTeller:APPS.Halux.common.impl.AantallenInToeleveringTeller
+AantallenInToeleveringTeller:APPS.Halux.common.AantallenInToeleveringTeller
1
1
%Status
Index: APPS/Halux/common/impl/AantallenInToeleveringTeller.cls.xml
===================================================================
diff -u -r58326 -r58453
--- APPS/Halux/common/impl/AantallenInToeleveringTeller.cls.xml (.../AantallenInToeleveringTeller.cls.xml) (revision 58326)
+++ APPS/Halux/common/impl/AantallenInToeleveringTeller.cls.xml (.../AantallenInToeleveringTeller.cls.xml) (revision 58453)
@@ -42,7 +42,7 @@
#dim Key As APPS.Halux.common.enu.ProductieGroep = ProductieGroep
If (ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).LBXSpoelbak()) || (ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).LBXSpoelbakVHoss()) {
- Set Key = "LBX_SM_SP"
+ Set Key = ##class(APPS.Halux.common.enu.ProductieGroepGroepering).LbxSpSiSl()
}
Do ..AantalPerGroep.VerhoogMetAantal(Key, Aantal)
Index: vhUnitTest/APPS/APPS/Halux/common/impl/AantallenInToeleveringTeller/GeefAantal/Test.cls.xml
===================================================================
diff -u -r58323 -r58453
--- vhUnitTest/APPS/APPS/Halux/common/impl/AantallenInToeleveringTeller/GeefAantal/Test.cls.xml (.../Test.cls.xml) (revision 58323)
+++ vhUnitTest/APPS/APPS/Halux/common/impl/AantallenInToeleveringTeller/GeefAantal/Test.cls.xml (.../Test.cls.xml) (revision 58453)
@@ -46,7 +46,7 @@
Do ..VoegToeAantalVoorProduct(4 ,"ProductId_LBX_SP_VHoss")
Do ..VoegToeAantalVoorProduct(5 ,"ProductId_LBX_SML")
- Do ..AssertAantallenInToelevering("LBX_SM_SP",11)
+ Do ..AssertAantallenInToelevering("LBX_SP_SI_SL",11)
// Voor de afzonderlijke ProductieGroepen geen aantallen
Do ..AssertAantallenInToelevering(##class(APPS.Halux.common.enu.ProductieGroep).LBXSpoelbak(),0)