Index: APPS/EC/impl/WebshopSessieGenerator/LoginParametersNaarSessieConverter.cls.xml
===================================================================
diff -u -r36504 -r41626
--- APPS/EC/impl/WebshopSessieGenerator/LoginParametersNaarSessieConverter.cls.xml	(.../LoginParametersNaarSessieConverter.cls.xml)	(revision 36504)
+++ APPS/EC/impl/WebshopSessieGenerator/LoginParametersNaarSessieConverter.cls.xml	(.../LoginParametersNaarSessieConverter.cls.xml)	(revision 41626)
@@ -56,6 +56,15 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwerkHaefeleNL">
+<FormalSpec>HaefeleNLPersonality:DOM.common.HaefeleNLPersonality</FormalSpec>
+<Implementation><![CDATA[
+	Set ..WebshopSessie = ##class(APPS.EC.impl.HaefeleNLWebshopSessie).%New(..LoginParameters.GebruikerID)
+	Do ..BewaarKlant(HaefeleNLPersonality,..GeefKlantData())
+	Do ..WebshopSessie.ZetKlant(..LoginParameters.KlantID,..LoginParameters.KlantNaam)
+]]></Implementation>
+</Method>
+
 <Method name="VerwerkSFS">
 <FormalSpec>SFSPersonality:DOM.common.SFSPersonality</FormalSpec>
 <Implementation><![CDATA[
Index: APPS/EC/impl/HaefeleNLWebshopSessie.cls.xml
===================================================================
diff -u
--- APPS/EC/impl/HaefeleNLWebshopSessie.cls.xml	(revision 0)
+++ APPS/EC/impl/HaefeleNLWebshopSessie.cls.xml	(revision 41626)
@@ -0,0 +1,19 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.EC.impl.HaefeleNLWebshopSessie">
+<Super>APPS.EC.impl.HandelWebshopSessie</Super>
+
+<Method name="GeefTeGebruikenPersonalityID">
+<Private>1</Private>
+<ReturnType>DOM.common.enu.Personality</ReturnType>
+<Implementation><![CDATA[	Quit ##class(DOM.common.enu.Personality).HaefeleNL()
+]]></Implementation>
+</Method>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+</Storage>
+</Class>
+
+
+</Export>