Index: DOM/LEV/impl/DataM/DataMToeleveringLijn.cls.xml
===================================================================
diff -u -r1075 -r3113
--- DOM/LEV/impl/DataM/DataMToeleveringLijn.cls.xml	(.../DataMToeleveringLijn.cls.xml)	(revision 1075)
+++ DOM/LEV/impl/DataM/DataMToeleveringLijn.cls.xml	(.../DataMToeleveringLijn.cls.xml)	(revision 3113)
@@ -20,6 +20,16 @@
 <Private>1</Private>
 </Property>
 
+<Property name="Order">
+<Type>DOM.OV.Order</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="OrderLijn">
+<Type>DOM.OV.Orderlijn</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>Toelevering:DOM.LEV.Toelevering,LijnNr:%Integer,LijnInfo:%String</FormalSpec>
 <Private>1</Private>
@@ -41,7 +51,14 @@
 
 <Method name="GeefOrderLijn">
 <ReturnType>DOM.OV.Orderlijn</ReturnType>
-<Implementation><![CDATA[	Quit ..GeefOrder().GeefOrderLijn($Piece(..LijnInfo,"\",28))
+<Implementation><![CDATA[
+	If ('$IsObject(..OrderLijn))
+	{
+		Set Order = ..GeefOrder()
+		Set OrderLijnID = $Piece(..LijnInfo,"\",28)
+		If ($IsObject(Order) && (OrderLijnID '= "")) Set ..OrderLijn = Order.GeefOrderLijn(OrderLijnID)
+	}
+	Quit ..OrderLijn
 ]]></Implementation>
 </Method>
 
@@ -59,7 +76,13 @@
 
 <Method name="GeefOrder">
 <ReturnType>DOM.OV.Order</ReturnType>
-<Implementation><![CDATA[	Quit ##class(DOM.DomeinContext).Instance().GeefOrderAPI().GeefOrder($Piece(..LijnInfo,"\",27))
+<Implementation><![CDATA[
+	If ('$IsObject(..Order))
+	{
+		Set OrderID = $Piece(..LijnInfo,"\",27)
+		If (OrderID '= "") Set ..Order = ##class(DOM.DomeinContext).Instance().GeefOrderAPI().GeefOrder(OrderID)
+	}
+	Quit ..Order
 ]]></Implementation>
 </Method>
 </Class>