Index: BLEXP.mac.rou
===================================================================
diff -u -r922 -r1396
--- BLEXP.mac.rou	(.../BLEXP.mac.rou)	(revision 922)
+++ BLEXP.mac.rou	(.../BLEXP.mac.rou)	(revision 1396)
@@ -13,7 +13,7 @@
 	 Set FileNm=FileNm_$E(100+$P(Tijd,":",1),2,3)_$E(100+$P(Tijd,":",2),2,3)_$E(100+$P(Tijd,":",3),2,3)_".OUT"
 	 ;Set FileNm="DATA.OUT"
 	 Set MSMGATEWAY=##Class(TECH.Config.ConfigMgr).Instance().GetString("MSMGATEWAY")
-	 Set Dev=$$OPEN^vhDEV(MSMGATEWAY_"\EDI_OUT\",FileNm,"W","M")
+	 Set Dev=$$OPEN^vhDEV(##class(TECH.Files).AppendSubPath(MSMGATEWAY,"\EDI_OUT\"),FileNm,"W","M")
 	 Use Dev
 	 Set I=""
 	 For  Set I=$O(^BLExport(I)) Quit:I=""  Do