Doosberekenaar voor LEGRABOX. We gebruiken dezelfde dozen als voor TA'OR BOX, vandaar dat we het dependencies hebben op TA'OR BOX doosklassen. DOM.PM.Verpakking.impl.DoosBerekenaar,DOM.PM.Maatwerk.LBX.impl.Base DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken 1 APPS.PM.Maatwerk.impl.Verpakking.BreedteBepaler 1 HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken,BreedteBepaler:APPS.PM.Maatwerk.impl.Verpakking.BreedteBepaler,ProductID:DOM.common.ProductID="ProductID" %Status 1 DOM.PM.enu.Variant %Boolean 1 TECH.Integer 1 DOM.PM.Verpakking.impl.Doos 1 %Integer 1 %Integer 1 %Integer FysiekeLadeHoogteMM set FysiekeLadeHoogteMM = TmpFysiekeLadeHoogteMM } Quit FysiekeLadeHoogteMM ]]> 1 DOM.PM.Verpakking.DoosLosseOnderdelen geen LO doos If (..HeeftGeleider()) { If (..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte650) { Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.utils.StandaardHulsDefinities).LadeDiepte650() } Elseif (..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte600) { Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.utils.StandaardHulsDefinities).LadeDiepte600() } Elseif (..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte550) { Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.utils.StandaardHulsDefinities).LadeDiepte550() } Elseif (..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte500) { Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.utils.StandaardHulsDefinities).LadeDiepte500() } Elseif (..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte450) { Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.utils.StandaardHulsDefinities).LadeDiepte450() } Elseif (..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte400) { Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.utils.StandaardHulsDefinities).LadeDiepte400() } Elseif (..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte350) { Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.utils.StandaardHulsDefinities).LadeDiepte350() } Elseif (..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte300) { Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.utils.StandaardHulsDefinities).LadeDiepte300() } Elseif (..IngegevenKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte270) { Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.utils.StandaardHulsDefinities).LadeDiepte270() } Else { Set DoosLosseOnderdelen = ##class(APPS.Halux.PPS.Verpakking.impl.DoosLosseOnderdelen).%New() Set DoosLosseOnderdelen.BreedteAndere = ..GeefBreedteAndereLosseOnderdelen() Set DoosLosseOnderdelen.BreedteCorpusProfiel = 65 Set DoosLosseOnderdelen.Diepte = ..IngegevenKenmerken.LadeDiepte Set DoosLosseOnderdelen.Hoogte = 80 } } Quit DoosLosseOnderdelen ]]> 1 TECH.Numeric DoosLade:APPS.Halux.PPS.TAORVerpakking.impl.DoosLade,DoosLosseOnderdelen:DOM.PM.Verpakking.DoosLosseOnderdelen 1 %Boolean %Boolean %Boolean %Boolean %Boolean 1 %Boolean 1 DOM.PM.Verpakking.Volume 1 DOM.PM.Verpakking.Volume