Index: DOM/VKP/Order/impl/OrderLijnProductService.cls.xml
===================================================================
diff -u -r33314 -r33316
--- DOM/VKP/Order/impl/OrderLijnProductService.cls.xml	(.../OrderLijnProductService.cls.xml)	(revision 33314)
+++ DOM/VKP/Order/impl/OrderLijnProductService.cls.xml	(.../OrderLijnProductService.cls.xml)	(revision 33316)
@@ -24,6 +24,9 @@
 <ReturnType>DOM.common.ProductID</ReturnType>
 <Implementation><![CDATA[
 	#dim Order As DOM.VKP.Order = ..OrderAPI.GeefOrder(OrderID)
+	If (OrderLijnVolgnummer="") {
+		Do ##class(TECH.Exceptions.InvalidInputException).Throw("OrderLijn met leeg volgnummer bestaat niet (OrderID '"_OrderID_"').")
+	}
 	#dim OrderLijn As DOM.VKP.impl.DataM.DataMProductOrderlijn = Order.GeefOrderLijnViaVolgnummer(OrderLijnVolgnummer)
 	If $$$Not($IsObject(OrderLijn)) {
 		Do ##class(TECH.Exceptions.InvalidInputException).Throw("Orderlijn '"_OrderLijnVolgnummer_"' bestaat niet voor OrderID '"_OrderID_"'.")
Index: vhUnitTest/DOM/VKP/Order/impl/OrderLijnProductService/GeefProductID/Test.cls.xml
===================================================================
diff -u -r33314 -r33316
--- vhUnitTest/DOM/VKP/Order/impl/OrderLijnProductService/GeefProductID/Test.cls.xml	(.../Test.cls.xml)	(revision 33314)
+++ vhUnitTest/DOM/VKP/Order/impl/OrderLijnProductService/GeefProductID/Test.cls.xml	(.../Test.cls.xml)	(revision 33316)
@@ -42,11 +42,21 @@
 ]]></Implementation>
 </Method>
 
-<Method name="TestOrderLijnIseEenTekstlijn">
+<Method name="Test: OrderLijn Is Geen ProductLijn Maar Een TekstLijn">
 <Implementation><![CDATA[	; TO DO   (gedrag nog te bepalen) : exception of return "" ?
 ]]></Implementation>
 </Method>
 
+<Method name="Test: OrderLijnVolgnummer Leeg Verwacht Exceptie">
+<Implementation><![CDATA[
+	#dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("OrderLijn met leeg volgnummer bestaat niet", "OrderID '"_..#OrderID_"'")
+	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New(##class(TECH.Exceptions.InvalidInputException).%ClassName(1),Substrings))
+
+	Set OrderLijnProductService = ##class(DOM.VKP.Order.impl.OrderLijnProductService).%New()
+	Do $$$AssertEquals(OrderLijnProductService.GeefProductID(..#OrderID,""),"")
+]]></Implementation>
+</Method>
+
 <Method name="Test: OrderLijn Bestaat Niet Verwacht Exceptie">
 <Implementation><![CDATA[
 	#dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("Orderlijn '"_"UT_OnbestaandeLijnVolgnummer"_"' bestaat niet voor OrderID '"_..#OrderID_"'")