Index: APPS/EC/impl/ConfiguratorService/KenmerkMogelijkhedenPostProcessor.cls.xml =================================================================== diff -u -r32350 -r32368 --- APPS/EC/impl/ConfiguratorService/KenmerkMogelijkhedenPostProcessor.cls.xml (.../KenmerkMogelijkhedenPostProcessor.cls.xml) (revision 32350) +++ APPS/EC/impl/ConfiguratorService/KenmerkMogelijkhedenPostProcessor.cls.xml (.../KenmerkMogelijkhedenPostProcessor.cls.xml) (revision 32368) @@ -31,86 +31,82 @@ TAORKenmerken:APPS.PM.Maatwerk.dto.TAORKenmerken 650 ... If ($IsObject(GekoppeldKenmerkMogelijkheden)) { If (TAORKenmerken.LadeDiepte > 650) { Do GekoppeldKenmerkMogelijkheden.KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..MATKenmerkNaam.Materiaal, ##class(DOM.PM.enu.MATMateriaal).Antislip()) } } + // ... en omgekeerd (geen LadeDiepte > 650 bij Antislip) - #Dim MATKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken = ..IngegevenKenmerkenTypeAPI.GeefGekoppeldeIngegevenKenmerken(TAORKenmerken, GekoppeldIKTypeMat) + #dim MATKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken = ..IngegevenKenmerkenTypeAPI.GeefGekoppeldeIngegevenKenmerken(TAORKenmerken, GekoppeldIKTypeMat) If ($IsObject(MATKenmerken)) && (MATKenmerken.Materiaal = ##class(DOM.PM.enu.MATMateriaal).Antislip()) { - Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAORKenmerkNaam.LadeDiepte, ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte700()) - Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAORKenmerkNaam.LadeDiepte, ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte750()) + Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte700) + Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte750) } - do:($$$Not(TAORKenmerken.IsBinnenlade)) ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde("LosseComponent", ##class(APPS.PM.enu.TAORLosseComponent).Front()) - do:(TAORKenmerken.LosseComponent = ##class(APPS.PM.enu.TAORLosseComponent).Front()) ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAORKenmerkNaam.IsBinnenlade, "false") + Do:($$$Not(TAORKenmerken.IsBinnenlade)) ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde("LosseComponent", ##class(APPS.PM.enu.TAORLosseComponent).Front()) + Do:(TAORKenmerken.LosseComponent = ##class(APPS.PM.enu.TAORLosseComponent).Front()) ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.IsBinnenlade, "false") If $$$Not(..IngegevenKenmerkenTypeAPI.IsGemonteerdeLade(TAORKenmerken)) { Do ..KenmerkMogelijkheden.VerwijderGekoppeldKenmerkMogelijkheid(GekoppeldIKTypeMat) } If ..IngegevenKenmerkenTypeAPI.IsEenLosseComponentenVerpakking(TAORKenmerken) { - Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAORKenmerkNaam.HeeftZijstabilisering, "true") + Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.HeeftZijstabilisering, "true") } If (TAORKenmerken.HeeftZijstabilisering = $$$True) { - Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAORKenmerkNaam.VerpakkingType, VerpakkingType.BulkPerOnderdeelGegroepeerd) - Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAORKenmerkNaam.VerpakkingType, VerpakkingType.LosseComponentenInBulk) + Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.VerpakkingType, ..TAOREnum.VerpakkingType.BulkPerOnderdeelGegroepeerd) + Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.VerpakkingType, ..TAOREnum.VerpakkingType.LosseComponentenInBulk) } ]]> LBXKenmerken:APPS.PM.Maatwerk.dto.LBXKenmerken @@ -120,28 +116,28 @@ 1 @@ -152,25 +148,25 @@ 1 @@ -180,8 +176,8 @@ LBXKenmerken:APPS.PM.Maatwerk.dto.LBXKenmerken 1 @@ -190,8 +186,8 @@ LBXKenmerken:APPS.PM.Maatwerk.dto.LBXKenmerken 1 Index: APPS/EC/impl/ConfiguratorService/InterneKenmerkDomeinPostProcessor.cls.xml =================================================================== diff -u -r32173 -r32368 --- APPS/EC/impl/ConfiguratorService/InterneKenmerkDomeinPostProcessor.cls.xml (.../InterneKenmerkDomeinPostProcessor.cls.xml) (revision 32173) +++ APPS/EC/impl/ConfiguratorService/InterneKenmerkDomeinPostProcessor.cls.xml (.../InterneKenmerkDomeinPostProcessor.cls.xml) (revision 32368) @@ -22,8 +22,8 @@ ;op korte termijn via quick fix If ($$$Not(..IsKHoogteBij270en300Beschikbaar(LBXKenmerken))) { - Do ..VerwijderCombinatieLadeHoogteMetLadeDiepte(LBXKenmerken, ##class(DOM.PM.enu.LBXLadeHoogte).K(), ##class(DOM.PM.enu.LBXLadeDiepte).LadeDiepte270()) - Do ..VerwijderCombinatieLadeHoogteMetLadeDiepte(LBXKenmerken, ##class(DOM.PM.enu.LBXLadeHoogte).K(), ##class(DOM.PM.enu.LBXLadeDiepte).LadeDiepte300()) + Do ..VerwijderCombinatieLadeHoogteMetLadeDiepte(LBXKenmerken, ..LBXEnum.LadeHoogte.K, ..LBXEnum.LadeDiepte.LadeDiepte270) + Do ..VerwijderCombinatieLadeHoogteMetLadeDiepte(LBXKenmerken, ..LBXEnum.LadeHoogte.K, ..LBXEnum.LadeDiepte.LadeDiepte300) } ]]> @@ -34,22 +34,22 @@ Do ##super(TAORKenmerken) If $$$Not(##class(DOM.DomeinContext).Instance().GeefProjectSettingsAPI().IsTAORLadeHoogteKActief($$$True)) { - Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAORKenmerkNaam.LadeHoogte, ##class(DOM.PM.enu.TAORLadeHoogte).K()) + Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeHoogte, ..TAOREnum.LadeHoogte.K) } If $$$Not(##class(DOM.DomeinContext).Instance().GeefProjectSettingsAPI().ZijnNieuweTAORLadeDieptesActief($$$True)) { - Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAORKenmerkNaam.LadeDiepte, ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte320()) - Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAORKenmerkNaam.LadeDiepte, ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte380()) - Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAORKenmerkNaam.LadeDiepte, ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte420()) - Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAORKenmerkNaam.LadeDiepte, ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte480()) - Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAORKenmerkNaam.LadeDiepte, ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte520()) - Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAORKenmerkNaam.LadeDiepte, ##class(DOM.PM.enu.TAORLadeDiepte).LadeDiepte580()) + Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte320) + Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte380) + Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte420) + Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte480) + Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte520) + Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeDiepte, ..TAOREnum.LadeDiepte.LadeDiepte580) } If (..IsActiefValidator.If.Setting("IsActiefTAXOnyxGrijs").IsInvalid()) { - Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAORKenmerkNaam.BodemKleur, ##class(DOM.PM.enu.TAORBodemKleur).OnyxGrijs()) - Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAORKenmerkNaam.LadeKleur, ##class(DOM.PM.enu.TAORLadeKleur).OnyxGrijs()) - Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAORKenmerkNaam.LadeBinnenKleur, ##class(DOM.PM.enu.TAORLadeKleur).OnyxGrijs()) + Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.BodemKleur, ..TAOREnum.BodemKleur.OnyxGrijs) + Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeKleur, ..TAOREnum.LadeKleur.OnyxGrijs) + Do ..KenmerkMogelijkheden.VerwijderMogelijkeWaarde(..TAOREnum.KenmerkNaam.LadeBinnenKleur, ..TAOREnum.LadeKleur.OnyxGrijs) } ]]> Index: APPS/EC/impl/ConfiguratorService/KenmerkDomeinPostProcessor.cls.xml =================================================================== diff -u -r32350 -r32368 --- APPS/EC/impl/ConfiguratorService/KenmerkDomeinPostProcessor.cls.xml (.../KenmerkDomeinPostProcessor.cls.xml) (revision 32350) +++ APPS/EC/impl/ConfiguratorService/KenmerkDomeinPostProcessor.cls.xml (.../KenmerkDomeinPostProcessor.cls.xml) (revision 32368) @@ -50,23 +50,23 @@ @@ -75,8 +75,8 @@ LBXKenmerken:APPS.PM.Maatwerk.dto.LBXKenmerken,LadeHoogte:DOM.PM.enu.LBXLadeHoogte,LadeDiepte:DOM.PM.enu.LBXLadeDiepte 1 @@ -85,25 +85,23 @@ @@ -138,20 +136,20 @@ Index: APPS/EC/impl/ConfiguratorService/WebshopKenmerkDomeinPostProcessor.cls.xml =================================================================== diff -u -r32181 -r32368 --- APPS/EC/impl/ConfiguratorService/WebshopKenmerkDomeinPostProcessor.cls.xml (.../WebshopKenmerkDomeinPostProcessor.cls.xml) (revision 32181) +++ APPS/EC/impl/ConfiguratorService/WebshopKenmerkDomeinPostProcessor.cls.xml (.../WebshopKenmerkDomeinPostProcessor.cls.xml) (revision 32368) @@ -38,62 +38,60 @@ 1 @@ -102,43 +100,41 @@ TAORKenmerken:APPS.PM.Maatwerk.dto.TAORKenmerken Index: APPS/EC/impl/ConfiguratorService/KenmerkPostProcessor.cls.xml =================================================================== diff -u -r32350 -r32368 --- APPS/EC/impl/ConfiguratorService/KenmerkPostProcessor.cls.xml (.../KenmerkPostProcessor.cls.xml) (revision 32350) +++ APPS/EC/impl/ConfiguratorService/KenmerkPostProcessor.cls.xml (.../KenmerkPostProcessor.cls.xml) (revision 32368) @@ -4,31 +4,16 @@ 1 APPS.PM.Maatwerk.dto.IngegevenKenmerkenVisitor - -DOM.PM.enu.LBXKenmerkNaam.AutoComplete -1 - - DOM.PM.enu.MATKenmerkNaam.AutoComplete 1 - -DOM.PM.enu.TAORKenmerkNaam.AutoComplete + +DOM.PM.Maatwerk.LBX.impl.BaseEnums 1 - -DOM.PM.Maatwerk.Calc.HF.enu.LBXRol.AutoComplete -1 - - - -DOM.PM.Maatwerk.Calc.HF.enu.TAORRol.AutoComplete -1 - - DOM.PM.Maatwerk.TAX.impl.BaseEnums 1 @@ -73,6 +58,7 @@ Set ..IngegevenKenmerkenTypeAPI = ##class(APPS.ApplicatieContext).Instance().GeefIngegevenKenmerkenTypeAPI() Set ..KenmerkCombinatieVerwijderaar = ##class(APPS.EC.impl.ConfiguratorService.KenmerkMogelijkhedenCombinatieVerwijderaar).%New() Set ..TAOREnum = ##class(DOM.PM.Maatwerk.TAX.impl.BaseEnums).%New() + Set ..LBXEnum = ##class(DOM.PM.Maatwerk.LBX.impl.BaseEnums).%New() Quit $$$OK ]]>