Index: APPS/EC/impl/ECommerceAPI.cls.xml =================================================================== diff -u -r64405 -r64675 --- APPS/EC/impl/ECommerceAPI.cls.xml (.../ECommerceAPI.cls.xml) (revision 64405) +++ APPS/EC/impl/ECommerceAPI.cls.xml (.../ECommerceAPI.cls.xml) (revision 64675) @@ -152,6 +152,10 @@ Set KlantInstellingenService = ##class(APPS.EC.impl.KlantInstellingenServiceHaefeleIT).%New() } ElseIf (Personality.GeefID() = ..Personality.HaefeleAT) { Set KlantInstellingenService = ##class(APPS.EC.impl.KlantInstellingenServiceHaefeleAT).%New() + } ElseIf (Personality.GeefID() = ..Personality.HaefeleFR) { + Set KlantInstellingenService = ##class(APPS.EC.impl.KlantInstellingenServiceHaefeleFR).%New() + } ElseIf (Personality.GeefID() = ..Personality.HaefeleDK) { + Set KlantInstellingenService = ##class(APPS.EC.impl.KlantInstellingenServiceHaefeleDK).%New() } Else { Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Voor Personality '" _ $Select($IsObject(Personality):Personality.GeefID(),1:"[geen object]") _ "' bestaat geen KlantInstellingenService.")) }