Index: APPS/EC/impl/KlantInstellingenServiceGalimberti.cls.xml =================================================================== diff -u --- APPS/EC/impl/KlantInstellingenServiceGalimberti.cls.xml (revision 0) +++ APPS/EC/impl/KlantInstellingenServiceGalimberti.cls.xml (revision 55206) @@ -0,0 +1,22 @@ + + + +APPS.common.impl.KlantInstellingenService + + +KlantID:DOM.VKP.VanHoeckeKlantID,VerpakkingType:DOM.PM.enu.LBXVerpakkingType +%Boolean + + + + +KlantID:DOM.VKP.VanHoeckeKlantID,VerpakkingType:DOM.PM.enu.TAORVerpakkingType +%Boolean + + + + + + Index: APPS/EC/impl/ECommerceAPI.cls.xml =================================================================== diff -u -r53785 -r55206 --- APPS/EC/impl/ECommerceAPI.cls.xml (.../ECommerceAPI.cls.xml) (revision 53785) +++ APPS/EC/impl/ECommerceAPI.cls.xml (.../ECommerceAPI.cls.xml) (revision 55206) @@ -106,6 +106,8 @@ Set KlantInstellingenService = ##class(APPS.EC.impl.KlantInstellingenServiceBeslagDesign).%New() } ElseIf (Personality.GeefID() = ..Personality.Zweygart) { Set KlantInstellingenService = ##class(APPS.EC.impl.KlantInstellingenServiceZweygart).%New() + } ElseIf (Personality.GeefID() = ..Personality.Galimberti) { + Set KlantInstellingenService = ##class(APPS.EC.impl.KlantInstellingenServiceGalimberti).%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.")) }