Index: WS/AX/DocGen/OrderService.cls.xml
===================================================================
diff -u -r48225 -r48277
--- WS/AX/DocGen/OrderService.cls.xml	(.../OrderService.cls.xml)	(revision 48225)
+++ WS/AX/DocGen/OrderService.cls.xml	(.../OrderService.cls.xml)	(revision 48277)
@@ -23,12 +23,16 @@
 <WebMethod>1</WebMethod>
 <Implementation><![CDATA[
 	#dim KlantNr As %String = $ZSTRIP($$$Trim(OrderData.KLANTNR),"*C")
+	#dim OrderNr As %String = $ZSTRIP($$$Trim(OrderData.ORDERNR),"*C")
+	If OrderNr = "" {
+		Do ##class(TECH.Exceptions.InvalidInputException).Throw("The field ORDERNR is empty or invalid ('"_$$$LCVT(OrderData.ORDERNR)_"').")
+	}
 	
 	Set pxDoc = ##class(BL.Flow.Proxy.pxFlowDocs).%New()
 	Do pxDoc.Orders.Insert(OrderData)
 	
-	#dim FilePath As %String = ..DefaultPDFName(OrderData.ORDERNR)
-	#dim sc As %Status = ##class(BL.Flow.Order.Doc).RenderAndFileDocFromDto(pxDoc, .FilePath, OrderData.ORDERNR, KlantNr)
+	#dim FilePath As %String = ..DefaultPDFName(OrderNr)
+	#dim sc As %Status = ##class(BL.Flow.Order.Doc).RenderAndFileDocFromDto(pxDoc, .FilePath, OrderNr, KlantNr)
 	Do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(sc)
 	
 	Set RenderResultaat = ##class(WS.AX.DocGen.dto.RenderResultaat).%New()