Index: BLIMP.mac.rou
===================================================================
diff -u -r36674 -r36805
--- BLIMP.mac.rou	(.../BLIMP.mac.rou)	(revision 36674)
+++ BLIMP.mac.rou	(.../BLIMP.mac.rou)	(revision 36805)
@@ -21,7 +21,7 @@
 SCANONLINE ; verwerken van alle EDI bestanden opgeroepen van BLVWIMP
  Set XMLBestandenList = ##class(APPS.EDIExport.AankoopOrderResponse.impl.BLUM.Ontvanger).%New().Ontvang()
  Set DespXMLBestandenList = ##class(APPS.AKP.AankoopControle.BLUM.impl.DespatchBerichtOntvanger).%New().Ontvang()
- Do ##class(APPS.EDIExport.AankoopOrderResponse.impl.BLUM.Kopieerder).%New().Kopieer()
+ Do ##class(APPS.EDIExport.AankoopOrderResponse.impl.BLUM.Bewaarder).%New().KopieerNaarBLimp()
  Set MSMGATEWAY=##class(TECH.Config.ConfigMgr).Instance().GetString("MSMGATEWAY")
  Set Dir=##class(TECH.Files).AppendSubPath(MSMGATEWAY,"\EDI_IN\")
  Set File=$$DISPDIR^vhDEV(Dir,"*.*",,,(XMLBestandenList.Count() + DespXMLBestandenList.Count()))