Index: APPS/EC/impl/ConfiguratorService/InterneKenmerkMogelijkhedenPostProcessor.cls.xml =================================================================== diff -u -r29639 -r29646 --- APPS/EC/impl/ConfiguratorService/InterneKenmerkMogelijkhedenPostProcessor.cls.xml (.../InterneKenmerkMogelijkhedenPostProcessor.cls.xml) (revision 29639) +++ APPS/EC/impl/ConfiguratorService/InterneKenmerkMogelijkhedenPostProcessor.cls.xml (.../InterneKenmerkMogelijkhedenPostProcessor.cls.xml) (revision 29646) @@ -72,6 +72,13 @@ Do TAORKenmerken.NietMeeleveren.Remove(Rol.FrontBevestiging) } } + + If (##class(TECH.ListUtils).Contains(TAORKenmerken.NietMeeleveren, Rol.TiponSynchronisatieStang) || ##class(TECH.ListUtils).Contains(TAORKenmerken.NietMeeleveren, Rol.TiponSynchronisatieTandwiel)) { + Do TAORKenmerken.NietMeeleveren.Insert(Rol.TiponSynchronisatieStang _ Rol.TiponSynchronisatieTandwiel) + + Do ##class(TECH.ListUtils).RemoveItemFromList(Rol.TiponSynchronisatieStang, TAORKenmerken.NietMeeleveren) + Do ##class(TECH.ListUtils).RemoveItemFromList(Rol.TiponSynchronisatieTandwiel, TAORKenmerken.NietMeeleveren) + } ]]> Index: APPS/EC/impl/ConfiguratorService/WebshopKenmerkDomeinPostProcessor.cls.xml =================================================================== diff -u -r29640 -r29646 --- APPS/EC/impl/ConfiguratorService/WebshopKenmerkDomeinPostProcessor.cls.xml (.../WebshopKenmerkDomeinPostProcessor.cls.xml) (revision 29640) +++ APPS/EC/impl/ConfiguratorService/WebshopKenmerkDomeinPostProcessor.cls.xml (.../WebshopKenmerkDomeinPostProcessor.cls.xml) (revision 29646) @@ -87,7 +87,7 @@ Do ..KenmerkMogelijkhedenUtils.VerwijderMogelijkeWaarde(..KenmerkMogelijkheden, ..TAORKenmerkNaam.NietMeeleveren, Rol.BodemOndersteuning) Do ..KenmerkMogelijkhedenUtils.VerwijderMogelijkeWaarde(..KenmerkMogelijkheden, ..TAORKenmerkNaam.NietMeeleveren, Rol.Koppeling) - Do ..KenmerkMogelijkhedenUtils.VerwijderMogelijkeWaarde(..KenmerkMogelijkheden, ..TAORKenmerkNaam.NietMeeleveren, Rol.TiponSynchronisatieStang) + Do ..KenmerkMogelijkhedenUtils.VerwijderMogelijkeWaarde(..KenmerkMogelijkheden, ..TAORKenmerkNaam.NietMeeleveren, Rol.TiponSynchronisatieStang _ Rol.TiponSynchronisatieTandwiel) Do ..KenmerkMogelijkhedenUtils.VerwijderMogelijkeWaarde(..KenmerkMogelijkheden, ..TAORKenmerkNaam.NietMeeleveren, Rol.Opvullijst) Do ..KenmerkMogelijkhedenUtils.VerwijderMogelijkeWaarde(..KenmerkMogelijkheden, ..TAORKenmerkNaam.NietMeeleveren, Rol.AfdekkapBoven) Index: APPS/EC/impl/ConfiguratorService/KenmerkDomeinPostProcessor.cls.xml =================================================================== diff -u -r29637 -r29646 --- APPS/EC/impl/ConfiguratorService/KenmerkDomeinPostProcessor.cls.xml (.../KenmerkDomeinPostProcessor.cls.xml) (revision 29637) +++ APPS/EC/impl/ConfiguratorService/KenmerkDomeinPostProcessor.cls.xml (.../KenmerkDomeinPostProcessor.cls.xml) (revision 29646) @@ -107,7 +107,7 @@ Do NietMeeleveren.Insert(Rol.FrontBevestiging) Do NietMeeleveren.Insert(Rol.Glijder) Do NietMeeleveren.Insert(Rol.Koppeling) - Do NietMeeleveren.Insert(Rol.TiponSynchronisatieStang) + Do NietMeeleveren.Insert(Rol.TiponSynchronisatieStang _ Rol.TiponSynchronisatieTandwiel) Do NietMeeleveren.Insert(Rol.Opvullijst) Do NietMeeleveren.Insert(Rol.AfdekkapBoven) Index: APPS/PM/Maatwerk/impl/DtoNaarKenmerkVisitor.cls.xml =================================================================== diff -u -r29463 -r29646 --- APPS/PM/Maatwerk/impl/DtoNaarKenmerkVisitor.cls.xml (.../DtoNaarKenmerkVisitor.cls.xml) (revision 29463) +++ APPS/PM/Maatwerk/impl/DtoNaarKenmerkVisitor.cls.xml (.../DtoNaarKenmerkVisitor.cls.xml) (revision 29646) @@ -89,7 +89,17 @@ Set IngegevenKenmerken.GUIKenmerken.IsBinnenbreedte = TAORKenmerken.IsBinnenbreedte Set IngegevenKenmerken.GUIKenmerken.WandDikte = TAORKenmerken.CorpusWandDikte + + #Dim Rol As DOM.PM.Maatwerk.Calc.HF.enu.TAORRol.AutoComplete = ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol.AutoComplete).%New() + #Dim TiponSynchronisatieStangEnTandwiel As TECH.String = Rol.TiponSynchronisatieStang _ Rol.TiponSynchronisatieTandwiel + If (##class(TECH.ListUtils).Contains(TAORKenmerken.NietMeeleveren, TiponSynchronisatieStangEnTandwiel)) { + Do TAORKenmerken.NietMeeleveren.Insert(Rol.TiponSynchronisatieStang) + Do TAORKenmerken.NietMeeleveren.Insert(Rol.TiponSynchronisatieTandwiel) + + Do ##class(TECH.ListUtils).RemoveItemFromList(Rol.TiponSynchronisatieStang _ Rol.TiponSynchronisatieTandwiel,TAORKenmerken.NietMeeleveren) + } + Quit $$$OK ]]> Index: vhUnitTest/APPS/EC/InterneConfiguratorService/GeefDomeinVoorIngegevenKenmerken/TAOR/Test.cls.xml =================================================================== diff -u -r29645 -r29646 --- vhUnitTest/APPS/EC/InterneConfiguratorService/GeefDomeinVoorIngegevenKenmerken/TAOR/Test.cls.xml (.../Test.cls.xml) (revision 29645) +++ vhUnitTest/APPS/EC/InterneConfiguratorService/GeefDomeinVoorIngegevenKenmerken/TAOR/Test.cls.xml (.../Test.cls.xml) (revision 29646) @@ -40,7 +40,7 @@ Do VerwachteWaarden.Insert(..Rol.FrontBevestiging) Do VerwachteWaarden.Insert(..Rol.Glijder) Do VerwachteWaarden.Insert(..Rol.Koppeling) - Do VerwachteWaarden.Insert(..Rol.TiponSynchronisatieStang) + Do VerwachteWaarden.Insert(..Rol.TiponSynchronisatieStang _ ..Rol.TiponSynchronisatieTandwiel) Do VerwachteWaarden.Insert(..Rol.Opvullijst) Do VerwachteWaarden.Insert(..Rol.AfdekkapBoven)