Index: vhUnitTest/APPS/EDIExport/FactuurVerzender/impl/Kvik/Verzender/Verzend/Test.cls.xml
===================================================================
diff -u -r33556 -r34623
--- vhUnitTest/APPS/EDIExport/FactuurVerzender/impl/Kvik/Verzender/Verzend/Test.cls.xml	(.../Test.cls.xml)	(revision 33556)
+++ vhUnitTest/APPS/EDIExport/FactuurVerzender/impl/Kvik/Verzender/Verzend/Test.cls.xml	(.../Test.cls.xml)	(revision 34623)
@@ -5,7 +5,7 @@
 
 <Method name="OnBeforeOneTest">
 <FormalSpec>aTestName:%String</FormalSpec>
-<Implementation><![CDATA[	Do ##class(TECH.Config.ConfigMgr).Instance().ZetString("MSMGATEWAY","E:\CacheExport\2010v2\ADMIN1\MSMGATEWAY",..#Applicatie)
+<Implementation><![CDATA[	Do ##class(TECH.Config.ConfigMgr).Instance().ZetString("MSMGATEWAY",..GeefBestandLocatie(),..#Applicatie)
 ]]></Implementation>
 </Method>
 
@@ -14,7 +14,6 @@
 <Implementation><![CDATA[
 	#dim TestBestandsLocatie As %String = ##class(TECH.Files).AppendSubPath(##class(TECH.Config.ConfigMgr).Instance().GeefString("MSMGATEWAY"),"Kvik\EdiFactuur\Archief") 
 	Do ##class(TECH.File.impl.DirectoryUtils).%New().VerwijderBestanden(TestBestandsLocatie)
-	write TestBestandsLocatie,!
 ]]></Implementation>
 </Method>