Index: APPS/EC/impl/KlantInstellingenServiceBeslagDesign.cls.xml
===================================================================
diff -u
--- APPS/EC/impl/KlantInstellingenServiceBeslagDesign.cls.xml	(revision 0)
+++ APPS/EC/impl/KlantInstellingenServiceBeslagDesign.cls.xml	(revision 52650)
@@ -0,0 +1,22 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.EC.impl.KlantInstellingenServiceBeslagDesign">
+<Super>TECH.RegisteredObject</Super>
+
+<Method name="MagKlantLBXVerpakkingTypeBestellen">
+<FormalSpec>KlantID:DOM.VKP.VanHoeckeKlantID,VerpakkingType:DOM.PM.enu.LBXVerpakkingType</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (VerpakkingType = ##class(DOM.PM.enu.LBXVerpakkingType).V1())
+]]></Implementation>
+</Method>
+
+<Method name="MagKlantTAORVerpakkingTypeBestellen">
+<FormalSpec>KlantID:DOM.VKP.VanHoeckeKlantID,VerpakkingType:DOM.PM.enu.TAORVerpakkingType</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (VerpakkingType = ##class(DOM.PM.enu.TAORVerpakkingType).V1())
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/EC/impl/ECommerceAPI.cls.xml
===================================================================
diff -u -r46643 -r52650
--- APPS/EC/impl/ECommerceAPI.cls.xml	(.../ECommerceAPI.cls.xml)	(revision 46643)
+++ APPS/EC/impl/ECommerceAPI.cls.xml	(.../ECommerceAPI.cls.xml)	(revision 52650)
@@ -102,6 +102,8 @@
 		Set KlantInstellingenService = ##class(APPS.EC.impl.KlantInstellingenServiceHein).%New()
 	} ElseIf (Personality.GeefID() = ..Personality.Seefelder) {
 		Set KlantInstellingenService = ##class(APPS.EC.impl.KlantInstellingenServiceSeefelder).%New()
+	} ElseIf (Personality.GeefID() = ..Personality.BeslagDesign) {
+		Set KlantInstellingenService = ##class(APPS.EC.impl.KlantInstellingenServiceBeslagDesign).%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."))
 	}