Index: WS/AX/DocGen/AankoopOrderService.cls.xml
===================================================================
diff -u -r47515 -r48280
--- WS/AX/DocGen/AankoopOrderService.cls.xml	(.../AankoopOrderService.cls.xml)	(revision 47515)
+++ WS/AX/DocGen/AankoopOrderService.cls.xml	(.../AankoopOrderService.cls.xml)	(revision 48280)
@@ -22,11 +22,16 @@
 <ReturnType>WS.AX.DocGen.dto.RenderResultaat</ReturnType>
 <WebMethod>1</WebMethod>
 <Implementation><![CDATA[
+	#dim ToelevNr As %String = $ZSTRIP($$$Trim(AankoopOrderData.ToelevNr),"*C")
+	If ToelevNr = "" {
+		Do ##class(TECH.Exceptions.InvalidInputException).Throw("The field ToelevNr is empty or invalid ('"_$$$LCVT(AankoopOrderData.ToelevNr)_"').")
+	}
+
 	Set pxDoc = ##class(BL.Flow.Proxy.pxFlowDocs).%New()
 	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)
+	#dim FilePath As %String = ..DefaultPDFName(ToelevNr)
+	#dim sc As %Status = ##class(BL.Flow.Toelevering.Doc).RenderAndFileDocFromDto(pxDoc, .FilePath, ToelevNr)
 	Do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(sc)
 	
 	Set RenderResultaat = ##class(WS.AX.DocGen.dto.RenderResultaat).%New()