1 APPS.EC.impl.ConfiguratorService.KenmerkPostProcessor Kenmerken:APPS.PM.Maatwerk.dto.IngegevenKenmerken,KenmerkMogelijkheden:APPS.PM.Maatwerk.dto.KenmerkMogelijkheden,Klant:DOM.VKP.VanHoeckeKlant,Personality:DOM.common.impl.Personality MATKenmerken:APPS.PM.Maatwerk.dto.MATKenmerken TAORKenmerken:APPS.PM.Maatwerk.dto.TAORKenmerken ... If ($IsObject(GekoppeldKenmerkMogelijkheden)) { If (TAORKenmerken.LadeDiepte > 650) { Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Materiaal, ..MatEnum.Materiaal.Antislip) Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Materiaal, ..MatEnum.Materiaal.VinylFiberglass) Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Materiaal, ..MatEnum.Materiaal.Flock) If (($IsObject(GekoppeldeMatKenmerken)) && (GekoppeldeMatKenmerken.Materiaal = ..MatEnum.Materiaal.AntislipFiber)) { Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.AntiSlipFiberWit) Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.AntiSlipFiberAntraciet) Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Kleur, ..MatEnum.Kleur.AntiSlipFiberLichtGrijs) } } } // ... en omgekeerd (LadeDiepte > ... verwijderen bij ongeldige MatMaterialen) If ($IsObject(GekoppeldeMatKenmerken)) { If (##class(TECH.StringUtils).Contains(GekoppeldeMatKenmerken.Materiaal, ..MatEnum.Materiaal.Antislip, ..MatEnum.Materiaal.VinylFiberglass)) { Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte700) Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte750) } If (GekoppeldeMatKenmerken.Materiaal = ..MatEnum.Materiaal.AntislipFiber) { If (##class(TECH.StringUtils).Contains(GekoppeldeMatKenmerken.Kleur, ..MatEnum.Kleur.AntiSlipFiberWit, ..MatEnum.Kleur.AntiSlipFiberLichtGrijs, ..MatEnum.Kleur.AntiSlipFiberAntraciet)) { Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte700) Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte750) } } If (GekoppeldeMatKenmerken.Materiaal = ..MatEnum.Materiaal.Flock) { Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte700) Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte750) } } Do:($$$Not(TAORKenmerken.IsBinnenlade)) ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde("ProductieWijze", ##class(APPS.PM.enu.TAORProductieWijze).Front()) Do:(TAORKenmerken.ProductieWijze = ##class(APPS.PM.enu.TAORProductieWijze).Front()) ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.IsBinnenlade, "false") If (($$$Not(..IngegevenKenmerkenTypeAPI.IsGemonteerdeLade(TAORKenmerken))) && ($$$Not(TAORKenmerken.VerpakkingType = ..TAOREnum.VerpakkingType.FlatpackV1))) { Do ..KenmerkMogelijkheden.VerwijderGekoppeldKenmerkMogelijkheid(GekoppeldIKTypeMat) } If ..IngegevenKenmerkenTypeAPI.IsEenLosseComponentenVerpakking(TAORKenmerken) { Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.HeeftZijstabilisering, "true") } If (TAORKenmerken.HeeftZijstabilisering = $$$True) { Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.VerpakkingType, ..TAOREnum.VerpakkingType.BulkPerOnderdeelGegroepeerd) Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.VerpakkingType, ..TAOREnum.VerpakkingType.LosseComponentenInBulk) } ]]> LBXKenmerken:APPS.PM.Maatwerk.dto.LBXKenmerken TaxKenmerken:APPS.PM.Maatwerk.dto.TAORKenmerken 1 ..TAOREnum.LadeDiepte.LadeDiepte650) { Do:(TaxKenmerken.LadeDiepte > 0) ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.GeleiderTechnologie, ..TAOREnum.GeleiderTechnologie.TIPONBLUMOTION) } If (TaxKenmerken.LadeDiepte > 0) { If (TaxKenmerken.LadeDiepte < ..TAOREnum.LadeDiepte.LadeDiepte400) { Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.UitsparingDataCodeZ1, ..TAOREnum.UitsparingCode.Tax300Smal) Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.UitsparingDataCodeZ1, ..TAOREnum.UitsparingCode.Tax300Breed) Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.UitsparingDataCodeZ2, ..TAOREnum.UitsparingCode.Tax300Smal) Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.UitsparingDataCodeZ2, ..TAOREnum.UitsparingCode.Tax300Breed) } If (TaxKenmerken.LadeDiepte < ..TAOREnum.LadeDiepte.LadeDiepte380) { Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.UitsparingDataCodeZ1, ..TAOREnum.UitsparingCode.Tax270Smal) Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.UitsparingDataCodeZ1, ..TAOREnum.UitsparingCode.Tax270Breed) Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.UitsparingDataCodeZ2, ..TAOREnum.UitsparingCode.Tax270Smal) Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.UitsparingDataCodeZ2, ..TAOREnum.UitsparingCode.Tax270Breed) } } // Momenteel nog geen matjes toelaten via configurator. Later wordt dit wellicht wel mogelijk. #dim GekoppeldIKTypeMat As DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType = ##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).Mat() #dim GekoppeldKenmerkMogelijkheden As APPS.PM.Maatwerk.dto.GekoppeldKenmerkMogelijkheden = ..KenmerkMogelijkheden.GeefGekoppeldeKenmerkMogelijkheden(GekoppeldIKTypeMat) If ($IsObject(GekoppeldKenmerkMogelijkheden)) { // Mogelijkheden weghalen : work-around de 4 materialen afzonderlijk verwijderen, want de VerwijderMogelijkeWaarden(MatMateriaal) werkt niet :-? Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Materiaal, ..MatEnum.Materiaal.Antislip) Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Materiaal, ..MatEnum.Materiaal.AntislipFiber) Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Materiaal, ..MatEnum.Materiaal.VinylFiberglass) Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MatEnum.KenmerkNaam.Materiaal, ..MatEnum.Materiaal.Flock) } If ($$$Not(##class(DOM.common.impl.ProjectSettingsAPI).%New().IsActiefTAORDubbeleSifonlade())) { Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.UitsparingDataAantalUitsparingen, ##class(DOM.PM.enu.AantalUitsparingen).Dubbel()) } } Else { Do ..KenmerkMogelijkheden.ZetMogelijkeWaarden(..LBXEnum.KenmerkNaam.ProductieWijze, ##class(APPS.PM.enu.TAORProductieWijze).ValueList()) If ($$$Not(TaxKenmerken.IsBinnenlade)) { Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.ProductieWijze, ##class(APPS.PM.enu.TAORProductieWijze).Front()) } If (TaxKenmerken.ProductieWijze = ##class(APPS.PM.enu.TAORProductieWijze).Front()) { Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.IsBinnenlade, "false") } If (TaxKenmerken.HeeftZijstabilisering) || (TaxKenmerken.GeleiderTechnologie = ..TAOREnum.GeleiderTechnologie.TIPON) || (TaxKenmerken.LadeHoogte = ..TAOREnum.LadeHoogte.F) { Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.Toepassing, ..TAOREnum.Toepassing.Sifon) } ElseIf (##class(TECH.StringUtils).Equals(TaxKenmerken.VerpakkingType, ..TAOREnum.VerpakkingType.FlatpackV1, ..TAOREnum.VerpakkingType.BulkPerOnderdeelGegroepeerd, ..TAOREnum.VerpakkingType.LosseComponentenInBulk )) { Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.Toepassing, ..TAOREnum.Toepassing.Sifon) } } ]]> LBXKenmerken:APPS.PM.Maatwerk.dto.LBXKenmerken 1 LBXKenmerken:APPS.PM.Maatwerk.dto.LBXKenmerken 1 LBXKenmerken:APPS.PM.Maatwerk.dto.LBXKenmerken 1 LBXKenmerken:APPS.PM.Maatwerk.dto.LBXKenmerken 1