Index: APPS/Blum/impl/OnlineProductConfiguratorService.cls.xml
===================================================================
diff -u -r40988 -r41005
--- APPS/Blum/impl/OnlineProductConfiguratorService.cls.xml	(.../OnlineProductConfiguratorService.cls.xml)	(revision 40988)
+++ APPS/Blum/impl/OnlineProductConfiguratorService.cls.xml	(.../OnlineProductConfiguratorService.cls.xml)	(revision 41005)
@@ -46,14 +46,15 @@
 <Implementation><![CDATA[
 	#dim Klant As APPS.Blum.OnlineProductConfigurator.dto.Klant = ..KlantBepaler.GeefKlant(UserCart)
 	Set Webshop = ##class(APPS.Blum.OnlineProductConfigurator.dto.Webshop).%New()
-	Set Webshop.Taal = Klant.Toegang.Taal.BasisTaalID()
 	
 	if Klant.Type = ##class(APPS.Blum.OnlineProductConfigurator.enu.KlantType).Vhisie3() {
 		#dim OfferteHoofding As Flow.Offerte.Hoofding = ..FlowOfferteConverteerder.Converteer(UserCart,Klant.Klant,Klant.Toegang.GeefID())
 		Do OfferteHoofding.Save()
 		Set Webshop.ID = OfferteHoofding.GeefID()
+		Set Webshop.Taal = Klant.Toegang.Taal.BasisTaalID()
 	} else {
 		Set Webshop.ID = ..Vhisie4WinkelkarConverteerder.Converteer(UserCart, Klant.Klant)		
+		Set Webshop.Taal = Klant.Klant.GeefTaal()
 	}	
 	
 	Quit Webshop
Index: vhUnitTest/APPS/Blum/impl/OnlineProductConfiguratorService/Test.cls.xml
===================================================================
diff -u -r40989 -r41005
--- vhUnitTest/APPS/Blum/impl/OnlineProductConfiguratorService/Test.cls.xml	(.../Test.cls.xml)	(revision 40989)
+++ vhUnitTest/APPS/Blum/impl/OnlineProductConfiguratorService/Test.cls.xml	(.../Test.cls.xml)	(revision 41005)
@@ -35,6 +35,7 @@
 	#dim Winkelkar As APPS.Blum.OnlineProductConfigurator.dto.Winkelkar = ..GeefWinkelkar() 
 	#dim Klant As APPS.Blum.OnlineProductConfigurator.dto.Klant = ..GeefKlant()
 	Set Klant.Type = ##class(APPS.Blum.OnlineProductConfigurator.enu.KlantType).Vhisie4()
+	Set Klant.Toegang = "WordtVoorVhisie4NietGebruikt"
 	
 	Set KlantBepalerMock = ##class(vhTest.Mock.APPS.Blum.impl.OnlineProductConfigurator.KlantBepaler).%New()
 	Do KlantBepalerMock.VerwachtMethodCall("GeefKlant", Winkelkar).DanReturn(Klant)
@@ -46,7 +47,7 @@
 	#dim Webshop As APPS.Blum.OnlineProductConfigurator.dto.Webshop = ConfiguratorService.VoegToeAanWinkelkar(Winkelkar)
 	
 	Do $$$AssertEquals(Webshop.ID, "HoofdingID")
-	Do $$$AssertEquals(Webshop.Taal, Klant.Toegang.Taal.BasisTaalID())
+	Do $$$AssertEquals(Webshop.Taal, Klant.Klant.GeefTaal())
 
 	Do KlantBepalerMock.Verifieer()
 	Do ConverteerderMock.Verifieer()