Index: WS/AX/DocGen/AankoopOrderService.cls.xml
===================================================================
diff -u -r44488 -r44657
--- WS/AX/DocGen/AankoopOrderService.cls.xml	(.../AankoopOrderService.cls.xml)	(revision 44488)
+++ WS/AX/DocGen/AankoopOrderService.cls.xml	(.../AankoopOrderService.cls.xml)	(revision 44657)
@@ -26,11 +26,13 @@
 	Do pxDoc.Toeleveringen.Insert(AankoopOrderData)
 	
 	#dim FilePath As %String = ..DefaultPDFName(AankoopOrderData.ToelevNr)
-	#dim sc As %Status = ##class(BL.Flow.Toelevering.Doc).RenderAndFileDocFromDto(pxDoc, .FilePath, AankoopOrderData.ToelevNr) // TODO: deze maken, zoals bij verkooporder.
-	Do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(sc)
+	; #dim sc As %Status = ##class(BL.Flow.Toelevering.Doc).RenderAndFileDocFromDto(pxDoc, .FilePath, AankoopOrderData.ToelevNr) // TODO: deze maken, zoals bij verkooporder.
+	; Do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(sc)
 	
+	; voorlopig voorbeeld bestand meegeven voor test cnext
+	
 	Set RenderResultaat = ##class(WS.AX.DocGen.dto.RenderResultaat).%New()
-	Set RenderResultaat.DocumentNaam = FilePath
+	Set RenderResultaat.DocumentNaam = "\\FOP\fop\AX_TEST\LBLUMJULIUS299947.pdf" ;FilePath
 	quit RenderResultaat
 ]]></Implementation>
 </Method>
@@ -40,9 +42,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.AankoopOrderService.ToeleveringPDF.FilePath")
+	#dim BestandNaam = "Toelev_"_DocRef_"_"_$ZD($H,8)_"."_Extension
+	Quit ##class(TECH.Files).AppendFile(BestandLocatie, BestandNaam)
 ]]></Implementation>
 </Method>
 </Class>