Index: WS/AX/DocGen/AankoopOrderService.cls.xml =================================================================== diff -u -r44663 -r46882 --- WS/AX/DocGen/AankoopOrderService.cls.xml (.../AankoopOrderService.cls.xml) (revision 44663) +++ WS/AX/DocGen/AankoopOrderService.cls.xml (.../AankoopOrderService.cls.xml) (revision 46882) @@ -26,13 +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) + 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 = "\\FOP\fop\AX_TEST\LBLUMJULIUS299947.pdf" ;FilePath + Set RenderResultaat.DocumentNaam = FilePath quit RenderResultaat ]]>