Index: DOM/VKP/impl/DataM/DataMOrder.cls.xml
===================================================================
diff -u -r56861 -r58343
--- DOM/VKP/impl/DataM/DataMOrder.cls.xml	(.../DataMOrder.cls.xml)	(revision 56861)
+++ DOM/VKP/impl/DataM/DataMOrder.cls.xml	(.../DataMOrder.cls.xml)	(revision 58343)
@@ -532,6 +532,25 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefOrderLijnIteratorVolgensAxInventTransId">
+<FormalSpec>AxInventTransId:%String</FormalSpec>
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[
+	#dim OrderLijnListVolgensAxInventTransId As %ListOfObjects = ##class(%ListOfObjects).%New()
+	#dim OrderLijnIterator As TECH.Iterator = ..GeefOrderLijnIterator()
+	#dim OrderLijn As DOM.VKP.Orderlijn
+	
+	While (OrderLijnIterator.HasNext()) {
+		Set OrderLijn = OrderLijnIterator.Next()
+		If (OrderLijn.GeefAxInventTransId() = AxInventTransId) {
+			Do OrderLijnListVolgensAxInventTransId.Insert(OrderLijn)
+		}
+	}
+	
+	Quit ##class(TECH.ListIterator).%New(OrderLijnListVolgensAxInventTransId)
+]]></Implementation>
+</Method>
+
 <Method name="LaadOrderLijnenIndienNodig">
 <Private>1</Private>
 <Implementation><![CDATA[