Index: vhUnitTest/APPS/EDIExport/AankoopOrderResponse/impl/BLUM/Ontvanger/Ontvang/Test.cls.xml
===================================================================
diff -u -r35401 -r35497
--- vhUnitTest/APPS/EDIExport/AankoopOrderResponse/impl/BLUM/Ontvanger/Ontvang/Test.cls.xml	(.../Test.cls.xml)	(revision 35401)
+++ vhUnitTest/APPS/EDIExport/AankoopOrderResponse/impl/BLUM/Ontvanger/Ontvang/Test.cls.xml	(.../Test.cls.xml)	(revision 35497)
@@ -3,14 +3,29 @@
 <Class name="vhUnitTest.APPS.EDIExport.AankoopOrderResponse.impl.BLUM.Ontvanger.Ontvang.Test">
 <Super>vhUnitTest.TestCase</Super>
 
+<Property name="ImportXML">
+<Type>%Boolean</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="OnBeforeOneTest">
 <FormalSpec>aTestName:%String</FormalSpec>
 <Implementation><![CDATA[
 	Do ##super(aTestName)
+	Set ..ImportXML = ##class(TECH.Config.ConfigMgr).Instance().GetString("AankoopOrderResponse.BLUM.ImportXML")
+	Do ##class(TECH.Config.ConfigMgr).Instance().ZetString("AankoopOrderResponse.BLUM.ImportXML",1)
 	Do ##class(TECH.Config.ConfigMgr).Instance().ZetString("MSMGATEWAY",..GeefBestandLocatie(),..#Applicatie)
 ]]></Implementation>
 </Method>
 
+<Method name="OnAfterOneTest">
+<FormalSpec>aTestCase:%String</FormalSpec>
+<Implementation><![CDATA[
+	Do ##class(TECH.Config.ConfigMgr).Instance().ZetString("AankoopOrderResponse.BLUM.ImportXML",..ImportXML)
+	do ##super(aTestCase)
+]]></Implementation>
+</Method>
+
 <Method name="Test : Onvangt() leest xml bestand zonder foutmelding">
 <Implementation><![CDATA[
 	#dim VolledigeBestandNaam As %String = ..GeefAankoopOrderLocatie() _"DummyBestand.xml"