Index: vhDeploy/D20241211xConfigItemsSwitchVisidotNaarDfs.cls.xml
===================================================================
diff -u
--- vhDeploy/D20241211xConfigItemsSwitchVisidotNaarDfs.cls.xml	(revision 0)
+++ vhDeploy/D20241211xConfigItemsSwitchVisidotNaarDfs.cls.xml	(revision 74228)
@@ -0,0 +1,77 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.D20241211xConfigItemsSwitchVisidotNaarDfs">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>ConfigItems aanpassen : Switch naar nieuwe Dfs voor Visidot</Default>
+</Parameter>
+
+<Property name="ConfigMgr">
+<Type>TECH.Config.ConfigMgr</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Set DeployKlasse = ..%New()
+	Do DeployKlasse.Init()
+	Do DeployKlasse.PasAanConfigItems()
+]]></Implementation>
+</Method>
+
+<Method name="Init">
+<Private>1</Private>
+<Implementation><![CDATA[	Set ..ConfigMgr = ##class(TECH.Config.ConfigMgr).Instance()
+]]></Implementation>
+</Method>
+
+<Method name="PasAanConfigItems">
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim ConfigSleutel1 As %String = "APPS.VisiDot.EndAfhandelaar.FileLocation"
+	#dim ConfigSleutel2 As %String = "APPS.VisiDot.ZijkantAfhandelaar.FileLocation"
+
+	Do ..MaakAanConfigItemVoorVisidot(ConfigSleutel1, "CACHE01",      "\\vanhoecke.be\T2_APPS\PRD\VisiDot")
+	Do ..MaakAanConfigItemVoorVisidot(ConfigSleutel2, "CACHE01",      "\\vanhoecke.be\T2_APPS\PRD\VisiDot")
+	
+	Do ..MaakAanConfigItemVoorVisidot(ConfigSleutel1, "CACHEACP2010", "\\vanhoecke.be\T2_APPS\ACP\CacheExport\2010v2\DEV1\Visidot")
+	Do ..MaakAanConfigItemVoorVisidot(ConfigSleutel2, "CACHEACP2010", "\\vanhoecke.be\T2_APPS\ACP\CacheExport\2010v2\DEV1\Visidot")
+	
+	Do ..MaakAanConfigItemVoorVisidot(ConfigSleutel1, "CACHETST2010", "\\vanhoecke.be\T2_APPS\DEV\CacheExport\2010v2\DEV1\Visidot")
+	Do ..MaakAanConfigItemVoorVisidot(ConfigSleutel2, "CACHETST2010", "\\vanhoecke.be\T2_APPS\DEV\CacheExport\2010v2\DEV1\Visidot")
+
+ /*
+	Voor de volledigheid : 
+	=======================
+	Dit is de actuele waarde op cache01 :
+  	^TECH.Config.ConfigItemD("PROD","APPS.VisiDot.EndAfhandelaar.FileLocation")		= 	$lb("","\\notes01\Archive\VisiDot\PROD")
+  	^TECH.Config.ConfigItemD("PROD","APPS.VisiDot.ZijkantAfhandelaar.FileLocation")	= 	$lb("","\\notes01\Archive\VisiDot\PROD")
+  	
+  	
+  	Op cacheACP2010 : 
+  	van  : "\\Notes01\FOP\TestOutput\CacheAcp2010\CacheExport\2010v2\DEV1\Visidot"
+  	naar : "\\vanhoecke.be\T2_APPS\ACP\CacheExport\2010v2\DEV1\Visidot"
+	  
+  	Op cacheTST2010 : 
+  	van  : "e:\CacheExport\2010v2\DEV1\Visidot"
+  	naar : "\\vanhoecke.be\T2_APPS\DEV\CacheExport\2010v2\DEV1\Visidot"
+*/
+]]></Implementation>
+</Method>
+
+<Method name="MaakAanConfigItemVoorVisidot">
+<FormalSpec>ConfigSleutel:%String,Server:%String,ConfigWaarde:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	If (Server = "*") || (##class(TECH.StringUtils).Equals($$$Server,Server)) {
+		Do ..ConfigMgr.ZetString(ConfigSleutel, ConfigWaarde )
+	}
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>