Index: APPS/Blum/impl/OnlineProductConfiguratorService.cls.xml =================================================================== diff -u -r41079 -r41085 --- APPS/Blum/impl/OnlineProductConfiguratorService.cls.xml (.../OnlineProductConfiguratorService.cls.xml) (revision 41079) +++ APPS/Blum/impl/OnlineProductConfiguratorService.cls.xml (.../OnlineProductConfiguratorService.cls.xml) (revision 41085) @@ -58,11 +58,13 @@ Do OfferteHoofding.Save() Set Webshop.ID = OfferteHoofding.GeefID() Set Webshop.Taal = Klant.Toegang.Taal.BasisTaalID() - Set Webshop.Type = "Vhisie3" + Set Webshop.URL = ##class(TECH.Config.ConfigMgr).Instance().GeefString("APPS.Blum.impl.OnlineProductConfiguratorService.JSONResult.Vhisie3URL") + Set Webshop.URL = Webshop.URL _"?aTaal=" _Webshop.Taal _"&WebshopID=" _Webshop.ID } else { Set Webshop.ID = ..Vhisie4WinkelkarConverteerder.Converteer(UserCart, Klant.Klant) Set Webshop.Taal = Klant.Klant.GeefTaal() - Set Webshop.Type = "Vhisie4" + Set Webshop.URL = ##class(TECH.Config.ConfigMgr).Instance().GeefString("APPS.Blum.impl.OnlineProductConfiguratorService.JSONResult.Vhisie4URL") + Set Webshop.URL = Webshop.URL _"?destination=/ov/manage/" _Webshop.ID Do ..Rapporteur.MailMeldingenNaarOV(..Vhisie4WinkelkarConverteerder.GeefMeldingen(), UserCart.userName, Klant.Klant.GeefID()) }