Index: WS/Blum/OnlineProductConfigurator.cls.xml
===================================================================
diff -u -r34498 -r41031
--- WS/Blum/OnlineProductConfigurator.cls.xml	(.../OnlineProductConfigurator.cls.xml)	(revision 34498)
+++ WS/Blum/OnlineProductConfigurator.cls.xml	(.../OnlineProductConfigurator.cls.xml)	(revision 41031)
@@ -87,8 +87,16 @@
 <FormalSpec>Webshop:APPS.Blum.OnlineProductConfigurator.dto.Webshop</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	#dim VhisieURL As %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("VhisieURL")
-	quit ..ConverteerURL(VhisieURL_"?aTaal="_Webshop.Taal_"&WebshopID="_Webshop.ID)
+	#dim VhisieURL As %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("APPS.Blum.impl.OnlineProductConfiguratorService.JSONResult." _Webshop.Type _"URL")
+	
+	If (Webshop.Type = "Vhisie3") {
+		Set VhisieURL = VhisieURL_"?aTaal="_Webshop.Taal_"&WebshopID="_Webshop.ID
+	} ElseIf (Webshop.Type = "Vhisie4") {
+		Set VhisieURL = VhisieURL_"?destination=/ov/manage/"_Webshop.ID
+	} Else {
+		Set Exception = ##class(TECH.Exceptions.GeneralErrorException).%New("Blum OPC - Er is een fout opgetreden tijdens het opstellen van de URL voor winkelkarID " _Webshop.ID _"!")
+	}
+	quit ..ConverteerURL(VhisieURL)
 ]]></Implementation>
 </Method>
 
Index: vhDeploy/Deploy20170418xBLUMOPCVhisieURL.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy20170418xBLUMOPCVhisieURL.cls.xml	(revision 0)
+++ vhDeploy/Deploy20170418xBLUMOPCVhisieURL.cls.xml	(revision 41031)
@@ -0,0 +1,47 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Deploy20170418xBLUMOPCVhisieURL">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>BLUM OPC URL voor productie en development</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Do ..ZetVhisie4URL()
+	Do ..CopyVhisie3URL()
+]]></Implementation>
+</Method>
+
+<Method name="ZetVhisie4URL">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	#dim Sleutel As %String = "APPS.Blum.impl.OnlineProductConfiguratorService.JSONResult.Vhisie4URL"
+	#dim ProductieWaarde As %String = "http://new.vanhoecke.be/user/login"
+	#dim DevelopmentWaarde As %String = "http://website.testing.vanhoecke.be/user/login"
+	
+	If ('(##class(TECH.Config.ConfigMgr).Instance().BestaatSleutel(Sleutel)))
+	{
+		If (##class(TECH.Config.ConfigMgr).Instance().GetOmgeving() = "PROD"){
+			Do ##class(TECH.Config.ConfigMgr).Instance().SetString(Sleutel,ProductieWaarde)
+		}Else{
+			Do ##class(TECH.Config.ConfigMgr).Instance().SetString(Sleutel,DevelopmentWaarde)
+		}
+	}
+]]></Implementation>
+</Method>
+
+<Method name="CopyVhisie3URL">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	#dim Vhisie3URL As %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("VhisieURL")
+	Do ##class(TECH.Config.ConfigMgr).Instance().SetString("APPS.Blum.impl.OnlineProductConfiguratorService.JSONResult.Vhisie3URL", Vhisie3URL)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>