APPS.Halux.PPS.Activiteit.ProductieSequentieAwareActiviteit TAXDwarsverdelingInkorten %String TAXDwarsverdelingInkorten %String TAORbox Dwarsverdeling inkorten 1 ActiviteitGroepID:%String APPS.Halux.PPS.Activiteit.Activiteit 1 APPS.Halux.PPS.dto.SequentieGebaseerdeUitvoeringInfo Item:APPS.Halux.common.ProductieSequentieItem 0 { #dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = Item.GeefHalffabItemsBoom() #dim DwarsverdelingItem As DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem = HalffabItemsBoom.GeefHalffabItem(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Dwarsverdeling()) #dim DwarsverdelingHouderItem As DOM.PM.Maatwerk.Calc.HF.IHalffabItem = HalffabItemsBoom.GeefHalffabItem(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).DwarsverdelingHouder()) Do ..MaakEnSaveWerklijstItem(Item, DwarsverdelingItem, IngegevenKenmerken, HalffabItemsBoom, DwarsverdelingHouderItem, "Boven") If (IngegevenKenmerken.DwarsverdelingType = ##class(DOM.PM.enu.TAORDwarsverdelingType).Dubbel()) { Set DwarsverdelingItem = HalffabItemsBoom.GeefHalffabItem(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).DwarsverdelingOnder()) Do ..MaakEnSaveWerklijstItem(Item, DwarsverdelingItem, IngegevenKenmerken, HalffabItemsBoom, DwarsverdelingHouderItem, "Onder") } } ]]> Item:APPS.Halux.common.ProductieSequentieItem,DwarsverdelingItem:DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken,HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,DwarsverdelingHouderItem:DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem,DwarsverdelingType:%String 1 1 1 Item:APPS.Halux.common.ProductieSequentieItem,Product:DOM.PM.MaatwerkProduct 1 %String %Library.CacheStorage