Index: APPS/VKP/Order/impl/SpaceTowerSplitser.cls.xml
===================================================================
diff -u -r33254 -r33302
--- APPS/VKP/Order/impl/SpaceTowerSplitser.cls.xml	(.../SpaceTowerSplitser.cls.xml)	(revision 33254)
+++ APPS/VKP/Order/impl/SpaceTowerSplitser.cls.xml	(.../SpaceTowerSplitser.cls.xml)	(revision 33302)
@@ -13,6 +13,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="OrderAPI">
+<Type>DOM.VKP.OrderAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>OrderLijnSplitser:APPS.VKP.Order.impl.OrderLijnSplitser=""</FormalSpec>
 <Private>1</Private>
@@ -21,6 +26,7 @@
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..OrderLijnSplitser = $$$Inject(OrderLijnSplitser,##class(APPS.VKP.Order.impl.OrderLijnSplitser).%New())
+	Set ..OrderAPI = ##class(DOM.DomeinContext).Instance().GeefOrderAPI()
 	Set ..ProductTypeAPI = ##class(DOM.DomeinContext).Instance().GeefProductTypeAPI()
 	Quit $$$OK
 ]]></Implementation>
@@ -29,28 +35,36 @@
 <Method name="SplitsSpaceTowerLijnen">
 <FormalSpec>OrderID:%String</FormalSpec>
 <Implementation><![CDATA[
-	#dim Order As DOM.VKP.Order = ##class(DOM.DomeinContext).Instance().GeefOrderAPI().GeefOrder(OrderID)
+	#dim Order As DOM.VKP.Order = ..OrderAPI.GeefOrder(OrderID)
 	#dim ProductOrderLijnIterator As TECH.Iterator = ..GeefReversedProductOrderLijnIterator(Order)
 	While ProductOrderLijnIterator.HasNext(){
 		#dim ProductOrderLijn As DOM.VKP.ProductOrderlijn = ProductOrderLijnIterator.Next()
 		If ..ProductTypeAPI.IsSpaceTowerProduct(ProductOrderLijn.GeefProductID()) {
+			Do ..SplitsSpaceTowerLijn(ProductOrderLijn)
+		}
+	}
+]]></Implementation>
+</Method>
 
-			#dim LijnAantalBeforeSplits As %Numeric = ""
-			#dim OrderLijnAantal As %Numeric = ProductOrderLijn.GeefAantal()
+<Method name="SplitsSpaceTowerLijn">
+<FormalSpec>ProductOrderLijn:DOM.VKP.ProductOrderlijn</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim LijnAantalBeforeSplits As %Numeric = ""
+	#dim OrderLijnAantal As %Numeric = ProductOrderLijn.GeefAantal()
 
-			While (OrderLijnAantal > 1) && (OrderLijnAantal '= LijnAantalBeforeSplits) {
-				Set LijnAantalBeforeSplits = OrderLijnAantal
-				Do ..OrderLijnSplitser.SplitsAfAantal(Order.GeefID(),ProductOrderLijn.GeefLijnVolgNr(), 1)
-				Do ProductOrderLijn.Reload()
-				Set OrderLijnAantal = ProductOrderLijn.GeefAantal()
-			}
-		}
-		
+	While (OrderLijnAantal > 1) && (OrderLijnAantal '= LijnAantalBeforeSplits) {
+		Set LijnAantalBeforeSplits = OrderLijnAantal
+		Do ..OrderLijnSplitser.SplitsAfAantal(ProductOrderLijn.GeefOrderID(),ProductOrderLijn.GeefLijnVolgNr(), 1)
+		Do ProductOrderLijn.Reload()
+		Set OrderLijnAantal = ProductOrderLijn.GeefAantal()
 	}
 ]]></Implementation>
 </Method>
 
 <Method name="GeefReversedProductOrderLijnIterator">
+<Description>
+Deze method kan mogelijk verplaatst worden naar 'één of andere' OrderService of OrderAPI </Description>
 <FormalSpec>Order:DOM.VKP.Order</FormalSpec>
 <Private>1</Private>
 <ReturnType>TECH.Iterator</ReturnType>