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)