Index: APPS/VKP/Korting/impl/KortingService.cls.xml =================================================================== diff -u -r53486 -r58718 --- APPS/VKP/Korting/impl/KortingService.cls.xml (.../KortingService.cls.xml) (revision 53486) +++ APPS/VKP/Korting/impl/KortingService.cls.xml (.../KortingService.cls.xml) (revision 58718) @@ -124,7 +124,7 @@ Set lbVariantenVoorTbx = $LB(##class(DOM.PM.enu.Variant).TandemboxAntaro()) } - #dim KopieerKortingVanTbxNaarAndereTypes As %Boolean = (PersonalityID = ##class(DOM.common.enu.Personality).HaefeleNL()) + #dim KopieerKortingVanTbxNaarAndereTypes As %Boolean = ((PersonalityID = ##class(DOM.common.enu.Personality).HaefeleNL())||(PersonalityID = ##class(DOM.common.enu.Personality).HaefeleDE())) If KopieerKortingVanTbxNaarAndereTypes { Set lbVariantenVoorTbx = lbVariantenVoorTbx _ $LB(##class(DOM.PM.enu.Variant).LegraboxPure()) _ $LB(##class(DOM.PM.enu.Variant).Taorbox()) }