Index: WSimpl/Vhisie4/Auth/HandelAuthenticator.cls.xml
===================================================================
diff -u -r45472 -r45475
--- WSimpl/Vhisie4/Auth/HandelAuthenticator.cls.xml	(.../HandelAuthenticator.cls.xml)	(revision 45472)
+++ WSimpl/Vhisie4/Auth/HandelAuthenticator.cls.xml	(.../HandelAuthenticator.cls.xml)	(revision 45475)
@@ -58,8 +58,13 @@
 <Private>1</Private>
 </Property>
 
+<Property name="KlantSessieDataBepaler">
+<Type>APPS.EC.KlantSessieDataBepaler</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>LoginParameterBepaler:WSimpl.Unishop.Login.ParameterBepaler,Logger:vhLib.Logger,HandelKlantDataRepository:DOM.VKP.impl.HandelKlantDataRepository,HandelPersonalityRepository:DOM.common.impl.HandelPersonalityRepository,WebshopSessionService:APPS.EC.WebshopSessionService,KlantDataBewaarder:APPS.VKP.KlantDataBewaarder,SettingsManager:WSimpl.Vhisie4.SettingsManager,LoginKortingBewaarder:WSimpl.Unishop.Login.KortingBewaarder,UrlBepaler:APPS.EC.Webshop.UrlBepaler</FormalSpec>
+<FormalSpec>LoginParameterBepaler:WSimpl.Unishop.Login.ParameterBepaler,Logger:vhLib.Logger,HandelKlantDataRepository:DOM.VKP.impl.HandelKlantDataRepository,HandelPersonalityRepository:DOM.common.impl.HandelPersonalityRepository,WebshopSessionService:APPS.EC.WebshopSessionService,KlantDataBewaarder:APPS.VKP.KlantDataBewaarder,SettingsManager:WSimpl.Vhisie4.SettingsManager,LoginKortingBewaarder:WSimpl.Unishop.Login.KortingBewaarder,UrlBepaler:APPS.EC.Webshop.UrlBepaler,KlantSessieDataBepaler:APPS.EC.KlantSessieDataBepaler</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -76,6 +81,7 @@
 	Set ..KortingBewaarder = $$$Inject(LoginKortingBewaarder,##class(WSimpl.Unishop.Login.KortingBewaarder).%New())
 	Set ..Response = ##class(WS.Vhisie4.Auth.DecrypteerResponse).%New()
 	Set ..UrlBepaler = $$$Inject(UrlBepaler,##class(APPS.EC.Webshop.impl.UrlBepaler).%New())
+	Set ..KlantSessieDataBepaler = $$$Inject(KlantSessieDataBepaler,##class(APPS.EC.impl.KlantSessieDataBepaler).%New())
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -237,13 +243,33 @@
 		Set Response.GebruikerId = 1
 		Set Response.GebruikerNaam = ""
 		Set Response.KlantNaam = KlantData.Naam
-		Set Response.DataOpt = ##class(vhPowerTools.APPS.EC.KlantSessieDataGeneratorUnishop).%New().GenereerDataOpt(..SettingsManager.GeefWebshopVerwerker(HandelPersonality),Response.KlantId,Response.KlantNaam,Response.GebruikerId,RegistreerContactGegevensRequest.EmailAdres,RegistreerContactGegevensRequest.Header.Taal,RegistreerContactGegevensRequest.KortingFactor)
+		Set Response.DataOpt = ..GenereerDataOpt(..SettingsManager.GeefWebshopVerwerker(HandelPersonality),Response.KlantId,Response.KlantNaam,Response.GebruikerId,RegistreerContactGegevensRequest.EmailAdres,RegistreerContactGegevensRequest.Header.Taal,RegistreerContactGegevensRequest.KortingFactor)
+		
+		Do ..KortingBewaarder.BewaarMeegegevenKorting(RegistreerContactGegevensRequest.Ref,Response.DataOpt)
 	}
 	
 	Quit Response
 ]]></Implementation>
 </Method>
 
+<Method name="GenereerDataOpt">
+<FormalSpec>UnishopVerwerker:APPS.EC.enu.UniShopVerwerker,KlantId:%String,Klantnaam:%String,GebruikerId:%String,Email:%String="ict_development@vanhoecke.be",Taal:WSimpl.Unishop.enu.Taal="N",Korting:%String="0"</FormalSpec>
+<ReturnType>%String</ReturnType>
+<WebMethod>1</WebMethod>
+<Implementation><![CDATA[
+	#dim KlantSessieData As APPS.EC.dto.KlantSessieData = ##class(APPS.EC.dto.KlantSessieData).%New()
+	
+	Set KlantSessieData.Email = Email
+	Set KlantSessieData.KlantID = KlantId
+	set KlantSessieData.GebruikerID = GebruikerId
+	Set KlantSessieData.KlantNaam = Klantnaam
+	Set KlantSessieData.Korting = Korting
+	Set KlantSessieData.Taal = Taal
+	
+	Quit ..KlantSessieDataBepaler.GeefEncryptedKlantSessieDataVoorHandel(KlantSessieData, UnishopVerwerker)
+]]></Implementation>
+</Method>
+
 <Method name="GeefHandelKlantDataVoorRegistreer">
 <FormalSpec>KlantId:DOM.VKP.VanHoeckeKlantID,RegistreerContactGegevensRequest:WS.Vhisie4.Auth.RegistreerContactGegevensRequest</FormalSpec>
 <Private>1</Private>