Index: AXimpl/Dynamics/SalesOrderIn/Converter/ToeleveringService.cls.xml
===================================================================
diff -u -r48282 -r48287
--- AXimpl/Dynamics/SalesOrderIn/Converter/ToeleveringService.cls.xml	(.../ToeleveringService.cls.xml)	(revision 48282)
+++ AXimpl/Dynamics/SalesOrderIn/Converter/ToeleveringService.cls.xml	(.../ToeleveringService.cls.xml)	(revision 48287)
@@ -26,18 +26,18 @@
 <Implementation><![CDATA[
 	Do ##class(vhLib.OldSchool).InitVars()			
 
-	#dim ToeleveringIDArray As TECH.MultiDim = ..GeefToeleveringIDArray(Order)
+	#dim ToeleveringIDArray As TECH.MultiDim = ""
 	
-	Do ..VerwijderToeleveringenMetVrijeOrderlijnen(ToeleveringIDArray)
+	Do ..GeefToeleveringIDArray(Order, .ToeleveringIDArray)
+	
+	Do ..VerwijderToeleveringenMetVrijeOrderlijnen(.ToeleveringIDArray)
 ]]></Implementation>
 </Method>
 
 <Method name="GeefToeleveringIDArray">
-<FormalSpec>Order:DOM.VKP.Order</FormalSpec>
+<FormalSpec><![CDATA[Order:DOM.VKP.Order,&ToeleveringIDArray]]></FormalSpec>
 <Private>1</Private>
-<ReturnType>TECH.MultiDim</ReturnType>
 <Implementation><![CDATA[
-	#dim ToeleveringIDArray As TECH.MultiDim = ""
 	#dim ToeleveringID As %String = ""
 	
 	#dim OrderLijnIterator As TECH.ListIterator = Order.GeefProductOrderLijnIterator()
@@ -53,13 +53,11 @@
 			}
 		}
 	}
-	
-	Quit ToeleveringIDArray
 ]]></Implementation>
 </Method>
 
 <Method name="VerwijderToeleveringenMetVrijeOrderlijnen">
-<FormalSpec>ToeleveringIDArray:TECH.MultiDim</FormalSpec>
+<FormalSpec><![CDATA[&ToeleveringIDArray:TECH.MultiDim]]></FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	#dim ToeleveringID As %String = ""