Index: WS/AX/DocGen/OrderService.cls.xml
===================================================================
diff -u -r44361 -r44627
--- WS/AX/DocGen/OrderService.cls.xml	(.../OrderService.cls.xml)	(revision 44361)
+++ WS/AX/DocGen/OrderService.cls.xml	(.../OrderService.cls.xml)	(revision 44627)
@@ -40,9 +40,9 @@
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	#dim FilePath As %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("WS.AX.DocGen.OrderService.OrderPDF.FilePath")
-	Set FilePath = FilePath _"OrderBvs_"_DocRef_"_"_$ZD($H,8)_"."_Extension
-	Quit FilePath
+	#dim BestandLocatie As %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("WS.AX.DocGen.OrderService.OrderPDF.FilePath")
+	#dim BestandNaam = "OrderBvs_"_DocRef_"_"_$ZD($H,8)_"."_Extension
+	Quit ##class(TECH.Files).AppendFile(BestandLocatie, BestandNaam)
 ]]></Implementation>
 </Method>
 </Class>