Index: vhUnitTest/APPS/OrderUitvoering/SamenDoorsturenSFSControle/UTToelevering.cls.xml
===================================================================
diff -u -r29059 -r58404
--- vhUnitTest/APPS/OrderUitvoering/SamenDoorsturenSFSControle/UTToelevering.cls.xml	(.../UTToelevering.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/OrderUitvoering/SamenDoorsturenSFSControle/UTToelevering.cls.xml	(.../UTToelevering.cls.xml)	(revision 58404)
@@ -27,6 +27,14 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefProductLijnIterator">
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[
+	Set Lijnen = ##class(%ListOfDataTypes).%New()
+	Quit ##class(TECH.ListIterator).%New(Lijnen)
+]]></Implementation>
+</Method>
+
 <Method name="GeefKlantID">
 <ReturnType>DOM.common.PartijID</ReturnType>
 <Implementation><![CDATA[	quit ""
Index: vhUnitTest/APPS/OrderUitvoering/SamenDoorsturenControle/UTToelevering.cls.xml
===================================================================
diff -u -r29059 -r58404
--- vhUnitTest/APPS/OrderUitvoering/SamenDoorsturenControle/UTToelevering.cls.xml	(.../UTToelevering.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/OrderUitvoering/SamenDoorsturenControle/UTToelevering.cls.xml	(.../UTToelevering.cls.xml)	(revision 58404)
@@ -27,6 +27,14 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefProductLijnIterator">
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[
+	Set Lijnen = ##class(%ListOfDataTypes).%New()
+	Quit ##class(TECH.ListIterator).%New(Lijnen)
+]]></Implementation>
+</Method>
+
 <Method name="GeefKlantID">
 <ReturnType>DOM.common.PartijID</ReturnType>
 <Implementation><![CDATA[	quit ""