Index: vhDeploy/Deploy20170117xVhisie4WInkelkarKlassenamen.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy20170117xVhisie4WInkelkarKlassenamen.cls.xml	(revision 0)
+++ vhDeploy/Deploy20170117xVhisie4WInkelkarKlassenamen.cls.xml	(revision 39146)
@@ -0,0 +1,46 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Deploy20170117xVhisie4WInkelkarKlassenamen">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Config item voor switchen tussen productie en dummy klassen.</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Do ..ZetConfigItem("MaakWinkelkar")
+	Do ..ZetConfigItem("BereidVoorBestelling")
+	Do ..ZetConfigItem("BestelWinkelkar")
+	Do ..ZetConfigItem("VerwijderWinkelkar")
+	Do ..ZetConfigItem("HerberekenMaatwerk")
+	Do ..ZetConfigItem("BewaarMaatwerkLijn")
+	Do ..ZetConfigItem("BewaarProductLijn")
+	Do ..ZetConfigItem("VerwijderLijn")
+]]></Implementation>
+</Method>
+
+<Method name="ZetConfigItem">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>KlasseNaam:%String</FormalSpec>
+<Implementation><![CDATA[
+	#dim Sleutel As %String = "WSimpl.Vhisie4.Winkelkar.WinkelkarService." _KlasseNaam _"_Implementatie"
+	#dim ProductieWaarde As %String = "WSimpl.Vhisie4.Winkelkar.WinkelkarService." _KlasseNaam
+	#dim DevelopmentWaarde As %String = "WSimpl.Vhisie4.Winkelkar.WinkelkarServiceDummy." _KlasseNaam
+	
+	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>
+</Class>
+
+
+</Export>
FishEye: Tag 39146 refers to a dead (removed) revision in file `vhDeploy/Deploy20170111xVhisie4WInkelkarKlassenamen.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
Index: WS/Vhisie4/Winkelkar/WinkelkarService.cls.xml
===================================================================
diff -u -r39019 -r39146
--- WS/Vhisie4/Winkelkar/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 39019)
+++ WS/Vhisie4/Winkelkar/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 39146)
@@ -243,8 +243,7 @@
 <FormalSpec>KlasseNaam:%String</FormalSpec>
 <ReturnType>TECH.RegisteredObject</ReturnType>
 <Implementation><![CDATA[
-	#dim VolledigeKlasseNaam As TECH.String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("WSimpl.Vhisie4.Winkelkar.WinkelkarService.Packagenaam")
-	Set VolledigeKlasseNaam = VolledigeKlasseNaam _"." _KlasseNaam
+	#dim VolledigeKlasseNaam As TECH.String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("WSimpl.Vhisie4.Winkelkar.WinkelkarService." _KlasseNaam _"_Implementatie")
 	Quit ..ObjectApi.New(VolledigeKlasseNaam)
 ]]></Implementation>
 </Method>
Index: vhDeploy/Deploy20170117xVerwijderrVhisie4WInkelkarKlassenamen.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy20170117xVerwijderrVhisie4WInkelkarKlassenamen.cls.xml	(revision 0)
+++ vhDeploy/Deploy20170117xVerwijderrVhisie4WInkelkarKlassenamen.cls.xml	(revision 39146)
@@ -0,0 +1,19 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Deploy20170117xVerwijderrVhisie4WInkelkarKlassenamen">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Niet gebruikte sleutel verwijderen.</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[	Do ##class(TECH.Config.ConfigMgr).Instance().WisSleutel("WSimpl.Vhisie4.Winkelkar.WinkelkarService.Packagenaam")
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>