Index: APPS/EC/impl/ConfiguratorService/ConfiguratorServiceTemplate.cls.xml =================================================================== diff -u -r30824 -r30828 --- APPS/EC/impl/ConfiguratorService/ConfiguratorServiceTemplate.cls.xml (.../ConfiguratorServiceTemplate.cls.xml) (revision 30824) +++ APPS/EC/impl/ConfiguratorService/ConfiguratorServiceTemplate.cls.xml (.../ConfiguratorServiceTemplate.cls.xml) (revision 30828) @@ -110,8 +110,15 @@ /*Als $$$Not(IsDuoColorActief) en is TAORKenmerken zet dan ladebinnenkleur gelijk aan ladekleur property get mag dan ook weg op de taorkenmerken*/ - If IngegevenKenmerken.%Extends(##class(APPS.PM.Maatwerk.dto.TAORKenmerken).%ClassName(1)) && - (..IsActiefValidator.If.Setting("IsActiefTAORDuoColor").En.Rol("ICTmedewerker", "Productbeheerder").IsInvalid()) { + Set KenmerkWijzigingenIterator = ##class(TECH.ListIterator).%New(KenmerkWijzigingen) + #dim IsWijzigingLadeKleur As %Boolean = $$$False + While KenmerkWijzigingenIterator.HasNext() && $$$Not(IsWijzigingLadeKleur) { + #dim KenmerkWijziging As APPS.PM.Maatwerk.dto.IngegevenKenmerkWijzigingen = KenmerkWijzigingenIterator.Next() + Set IsWijzigingLadeKleur = KenmerkWijziging.KenmerkNaam = "LadeKleur" + } + If IsWijzigingLadeKleur && + IngegevenKenmerken.%Extends(##class(APPS.PM.Maatwerk.dto.TAORKenmerken).%ClassName(1)) && + (..IsActiefValidator.If.Setting("IsActiefTAORDuoColor").En.Rol("ICTmedewerker", "Productbeheerder").IsValid()) { Set AangepasteIngegevenKenmerken.LadeBinnenKleur = AangepasteIngegevenKenmerken.LadeKleur } Do ##class(Tools.Wlip).%New(26).DataTransferObject(AangepasteIngegevenKenmerken)