Index: vhDeploy/JBL/Deploy20110929x1619.cls.xml
===================================================================
diff -u
--- vhDeploy/JBL/Deploy20110929x1619.cls.xml	(revision 0)
+++ vhDeploy/JBL/Deploy20110929x1619.cls.xml	(revision 2222)
@@ -0,0 +1,25 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="vhDeploy.JBL.Deploy20110929x1619">
+<ProcedureBlock>1</ProcedureBlock>
+<Super>svn.Deploy</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Parameter name="Omschrijving">
+<Default>ConfigItem instellen VisiDot Server locatie bestanden</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	If (##class(TECH.Config.ConfigMgr).Instance().GetOmgeving()="PROD") {
+		Do ##class(TECH.Config.ConfigMgr).Instance().SetString("APPS.VisiDot.Server.Foto.FileLocation","\\visidot01\Director_Root_VHK\Reader_Root\Photos")
+	}ElseIf(##class(TECH.Config.ConfigMgr).Instance().GetOmgeving()="TEST") {
+		Do ##class(TECH.Config.ConfigMgr).Instance().SetString("APPS.VisiDot.Server.Foto.FileLocation","\\notes01\Archive\VisiDot\TEST")
+	}Else{
+		Do ##class(TECH.Config.ConfigMgr).Instance().SetString("APPS.VisiDot.Server.Foto.FileLocation","\\notes01\Archive\VisiDot\DEV")
+	}
+]]></Implementation>
+</Method>
+</Class>
+</Export>
Index: APPS/VisiDot/impl/CleanUp.cls.xml
===================================================================
diff -u -r2104 -r2222
--- APPS/VisiDot/impl/CleanUp.cls.xml	(.../CleanUp.cls.xml)	(revision 2104)
+++ APPS/VisiDot/impl/CleanUp.cls.xml	(.../CleanUp.cls.xml)	(revision 2222)
@@ -20,14 +20,11 @@
 		
 		/// Files op Notes01\Archive opkuisen
 		Set Locatie = ##class(TECH.Files).AppendFile(##class(TECH.Config.ConfigMgr).Instance().GetString("APPS.VisiDot.ZijkantAfhandelaar.FileLocation"),"\")
-		Do SCANDIR^vhDEV(Locatie,"*.*",.Resultaat,"X",2)
+		Do SCANDIR^vhDEV(Locatie,"*.*",.Resultaat,"X",..#AantalDagen)
 		
 		/// Files op VisiDot_W7 opkuisen
-		/// ---------------
-		/// OPMERRKING JBL : nog te doen, maar Zetes had liever dat deze gedurende de test nog bleven staan.
-		/// ---------------
-		Set Locatie = "\\visidot_w7\VisiDotPhotos\"
-		//Do $$SCANDIR^vhDEV(Locatie,"*",.Resultaat,"X",..#AantalDagen)
+		Set Locatie = ##class(TECH.Files).AppendFile(##class(TECH.Config.ConfigMgr).Instance().GetString("APPS.VisiDot.Server.Foto.FileLocation"),"\")
+		Do SCANDIR^vhDEV(Locatie,"*",.Resultaat,"X",..#AantalDagen)
 				
 		Quit $$$OK
 ]]></Implementation>