Index: APPS/Halux/common/impl/ProductieGroepBepalerLBX.cls.xml =================================================================== diff -u -r58453 -r58454 --- APPS/Halux/common/impl/ProductieGroepBepalerLBX.cls.xml (.../ProductieGroepBepalerLBX.cls.xml) (revision 58453) +++ APPS/Halux/common/impl/ProductieGroepBepalerLBX.cls.xml (.../ProductieGroepBepalerLBX.cls.xml) (revision 58454) @@ -23,6 +23,11 @@ 1 + +DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken +1 + + ProductTypeApi:DOM.PM.ProductTypeAPI="",ProductieOpstartfaseBepaler:APPS.Halux.common.impl.ProductieGroepBepaler.ProductieOpstartfaseBepalerLBX="",IngegevenKenmerkenTypeAPI:DOM.PM.Maatwerk.IngegevenKenmerkenTypeAPI="",ToeleveringSplitser:APPS.Halux.common.ToeleveringSplitser="" 1 @@ -55,28 +60,28 @@ Set ProductieGroep = ..ProductieGroep.Specials } Else { #dim MaatwerkProduct As DOM.PM.MaatwerkProduct = ..ProductTypeApi.GeefMaatwerkProduct(ProductId) - #dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = MaatwerkProduct.GeefIngegevenKenmerken() + Set ..IngegevenKenmerken = MaatwerkProduct.GeefIngegevenKenmerken() If (..ProductieOpstartfaseBepaler.IsInOpstartfase(MaatwerkProduct)) { - Set ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Opstartfase() - } ElseIf $$$Not(..IsProductieWijzeVolledig(IngegevenKenmerken)) { + Set ProductieGroep = ..ProductieGroep.Opstartfase + } ElseIf $$$Not(..IsProductieWijzeVolledig()) { Set ProductieGroep = ..ProductieGroep.Specials - } ElseIf (..IngegevenKenmerkenTypeAPI.IsSpoelbaklade(IngegevenKenmerken) && $$$Not(..IsVHossVerpakking(IngegevenKenmerken)) && (..IsAfsplitsenNodig(##class(APPS.Halux.common.enu.ProductieGroepGroepering).LbxSpSiSl()))) { + } ElseIf (..IsSpoelbaklade() && $$$Not(..IsVHossVerpakking()) && (..IsAfsplitsenNodig(##class(APPS.Halux.common.enu.ProductieGroepGroepering).LbxSpSiSl()))) { Set ProductieGroep = ..ProductieGroep.LBXSpoelbak - } ElseIf (..IngegevenKenmerkenTypeAPI.IsSpoelbaklade(IngegevenKenmerken) && (..IsVHossVerpakking(IngegevenKenmerken)) && (..IsAfsplitsenNodig(##class(APPS.Halux.common.enu.ProductieGroepGroepering).LbxSpSiSl()))) { + } ElseIf (..IsSpoelbaklade() && (..IsVHossVerpakking()) && (..IsAfsplitsenNodig(##class(APPS.Halux.common.enu.ProductieGroepGroepering).LbxSpSiSl()))) { Set ProductieGroep = ..ProductieGroep.LBXSpoelbakVHoss - } ElseIf (..IngegevenKenmerkenTypeAPI.IsSmalleLade(IngegevenKenmerken) && (..IsAfsplitsenNodig(##class(APPS.Halux.common.enu.ProductieGroepGroepering).LbxSpSiSl()))) { + } ElseIf (..IsSmalleLade() && (..IsAfsplitsenNodig(##class(APPS.Halux.common.enu.ProductieGroepGroepering).LbxSpSiSl()))) { Set ProductieGroep = ..ProductieGroep.LBXSpoelbak - } ElseIf (..IngegevenKenmerkenTypeAPI.IsSifonlade(IngegevenKenmerken) && (..IsAfsplitsenNodig(##class(APPS.Halux.common.enu.ProductieGroepGroepering).LbxSpSiSl()))) { + } ElseIf (..IsSifonlade() && (..IsAfsplitsenNodig(##class(APPS.Halux.common.enu.ProductieGroepGroepering).LbxSpSiSl()))) { Set ProductieGroep = ..ProductieGroep.LBXSpoelbak } Else { - If (..IsV1Verpakking(IngegevenKenmerken)) { + If (..IsV1Verpakking()) { Set ProductieGroep = ..ProductieGroep.Stuk - } ElseIf (..IsVHossVerpakking(IngegevenKenmerken)) { + } ElseIf (..IsVHossVerpakking()) { Set ProductieGroep = ..ProductieGroep.Kast - } ElseIf (..IsProboxVerpakking(IngegevenKenmerken)) { + } ElseIf (..IsProboxVerpakking()) { Set ProductieGroep = ..ProductieGroep.Probox - } ElseIf (..IsPallet(IngegevenKenmerken)) { + } ElseIf (..IsPallet()) { Set ProductieGroep = ..ProductieGroep.Pallet } } @@ -86,43 +91,59 @@ ]]> + +1 +%Boolean + + + + +1 +%Boolean + + + + +1 +%Boolean + + + -IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken 1 %Boolean - -IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken 1 %Boolean - -IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken 1 %Boolean - -IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken 1 %Boolean - -IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken 1 %Boolean - @@ -132,7 +153,6 @@ %Boolean