Index: vhUnitTest/APPS/EC/impl/OfferteUrlBepaler/AlleenLezen/Test.cls.xml
===================================================================
diff -u -r46609 -r50626
--- vhUnitTest/APPS/EC/impl/OfferteUrlBepaler/AlleenLezen/Test.cls.xml	(.../Test.cls.xml)	(revision 46609)
+++ vhUnitTest/APPS/EC/impl/OfferteUrlBepaler/AlleenLezen/Test.cls.xml	(.../Test.cls.xml)	(revision 50626)
@@ -20,7 +20,9 @@
 	Do ##class(TECH.Config.ConfigMgr).Instance().ZetString("APPS.EC.impl.Webshop.UrlBepaler_V3_Dupont", "http://unittest.du-pont.be", ..#Applicatie)
 	Do ##class(TECH.Config.ConfigMgr).Instance().ZetString("APPS.EC.impl.Webshop.UrlBepaler_V3_Kisch", "http://unittest.kisch.nl", ..#Applicatie)	
 	Do ##class(TECH.Config.ConfigMgr).Instance().ZetString("APPS.EC.impl.Webshop.UrlBepaler_V3_VanRaemdonck", "http://unittest.vanraemdonck.eu", ..#Applicatie)
+	Do ##class(TECH.Config.ConfigMgr).Instance().ZetString("APPS.EC.impl.Webshop.UrlBepaler_V4_Daro", "http://unittest.daro.eu", ..#Applicatie)
 
+
 	Set ..OfferteUrlBepaler = ##class(APPS.EC.Webshop.impl.OfferteUrlBepaler).%New()
 ]]></Implementation>
 </Method>
@@ -88,6 +90,15 @@
 ]]></Implementation>
 </Method>
 
+<Method name="TestDaro">
+<Implementation><![CDATA[
+	#Dim VerwachteURL As TECH.String = "http://unittest.daro.eu/user/login?destination=cart/overview/5678"
+	#Dim Personality As DOM.common.enu.Personality = ##class(DOM.common.enu.Personality).Daro()
+	
+	Do ..AssertURL(VerwachteURL, Personality, ##class(DOM.VKP.enu.Klant).TestklantVanHoecke())
+]]></Implementation>
+</Method>
+
 <Method name="AssertURL">
 <FormalSpec>VerwachteURL:TECH.String,PersonalityID:DOM.common.enu.Personality,KlantID:DOM.VKP.VanHoeckeKlantID</FormalSpec>
 <Private>1</Private>
@@ -99,7 +110,12 @@
 	Do OfferteMock.IndienMethodCall("GeefKlantID").DanReturn(KlantID)
 	Do OfferteMock.IndienMethodCall("GeefID").DanReturn(1234)
 	Do OfferteMock.IndienMethodCall("GeefPersonality").DanReturn(##class(DOM.DomeinContext).Instance().GeefCommonAPI().GeefPersonality(PersonalityID))
-	Do OfferteMock.IndienMethodCall("GeefWebshopVersie").DanReturn(##class(APPS.EC.enu.WebshopVersie).V3())
+	Do OfferteMock.IndienMethodCall("GeefExterneId").DanReturn(5678)
+	If PersonalityID = ##class(DOM.common.enu.Personality).Daro() {
+		Do OfferteMock.IndienMethodCall("GeefWebshopVersie").DanReturn(##class(APPS.EC.enu.WebshopVersie).V4())
+	} Else {
+		Do OfferteMock.IndienMethodCall("GeefWebshopVersie").DanReturn(##class(APPS.EC.enu.WebshopVersie).V3())
+	}
 	
 	#Dim URL As TECH.String = ..OfferteUrlBepaler.GeefURL(OfferteMock, ##class(APPS.EC.enu.WebshopModus).AlleenLezen())