Index: vhUnitTest/APPS/VKP/Order/impl/SpaceTowerSplitser/SplitsSpaceTowerLijnen/Test.cls.xml
===================================================================
diff -u -r33236 -r33252
--- vhUnitTest/APPS/VKP/Order/impl/SpaceTowerSplitser/SplitsSpaceTowerLijnen/Test.cls.xml	(.../Test.cls.xml)	(revision 33236)
+++ vhUnitTest/APPS/VKP/Order/impl/SpaceTowerSplitser/SplitsSpaceTowerLijnen/Test.cls.xml	(.../Test.cls.xml)	(revision 33252)
@@ -23,6 +23,11 @@
 <Default>19996</Default>
 </Parameter>
 
+<Parameter name="OrderIDMet2SpaceTowerLijnen">
+<Type>%String</Type>
+<Default>19995</Default>
+</Parameter>
+
 <Property name="Order">
 <Type>DOM.VKP.Order</Type>
 <Private>1</Private>
@@ -122,20 +127,20 @@
 ]]></Implementation>
 </Method>
 
-<Method name="TestOrderMetSpaceTowerAantal3">
+<Method name="aTestOrderMetSpaceTowerAantal3">
 <Implementation><![CDATA[
-	#dim Order As DOM.VKP.Order = ..OrderAPI.GeefOrder(..#OrderID)
-	Set ^KOD(1000,"F",..#OrderID,101) = "703000 \"_$$$SpaceTowerProductID_"\1\\\619\0#0\8\619\619\703000 \L\\\100\619\KF0\\\\E1\EUR\\\63981\\\\\\\\\\\\\\\\\\\\\1"
-	Do ..OrderDataUtil.WijzigOrderLijn(..OrderLijnVeld.Aantal, 1000, ..#OrderID, 101, 3)
+	#dim OrderID As %String = ..#OrderID
+	#dim Order As DOM.VKP.Order = ..OrderAPI.GeefOrder(OrderID)
+	Do ..OrderDataUtil.WijzigOrderLijn(..OrderLijnVeld.Aantal, 1000, OrderID, 101, 3)
 	
 	;Set OrderLijnSplitserMock = ##class(vhTest.Mock.APPS.VKP.Order.impl.OrderLijnSplitser).%New()
-	;Do OrderLijnSplitserMock.VerwachtMethodCall("SplitsAfAantal",..#OrderID,101,1).DanDoeNiks()
+	;Do OrderLijnSplitserMock.VerwachtMethodCall("SplitsAfAantal",OrderID,101,1).DanDoeNiks()
 	Set SpaceTowerSplitser = ##class(APPS.VKP.Order.impl.SpaceTowerSplitser).%New()  ; OrderLijnSplitserMock)
 	Do SpaceTowerSplitser.SplitsSpaceTowerLijnen(Order.GeefID())
 	
 	// Reload Order
 	Set Order = ""
-	Set Order = ..OrderAPI.GeefOrder(..#OrderID)
+	Set Order = ..OrderAPI.GeefOrder(OrderID)
 	
 	#dim OrderLijnIterator As TECH.Iterator = Order.GeefOrderLijnIterator()
 	
@@ -149,6 +154,32 @@
 ]]></Implementation>
 </Method>
 
+<Method name="TestOrderMetSpaceTowerAantal3en2">
+<Implementation><![CDATA[
+	#dim OrderID As %String = ..#OrderIDMet2SpaceTowerLijnen
+	#dim Order As DOM.VKP.Order = ..OrderAPI.GeefOrder(OrderID)
+	Do ..OrderDataUtil.WijzigOrderLijn(..OrderLijnVeld.Aantal, 1000, OrderID, 101, 3)
+	Do ..OrderDataUtil.WijzigOrderLijn(..OrderLijnVeld.Aantal, 1000, OrderID, 102, 2)
+	
+	Set SpaceTowerSplitser = ##class(APPS.VKP.Order.impl.SpaceTowerSplitser).%New()  ; OrderLijnSplitserMock)
+	Do SpaceTowerSplitser.SplitsSpaceTowerLijnen(Order.GeefID())
+	
+	// Reload Order
+	Set Order = ""
+	Set Order = ..OrderAPI.GeefOrder(OrderID)
+	
+	#dim OrderLijnIterator As TECH.Iterator = Order.GeefOrderLijnIterator()
+	
+	Do ..AssertVolgendeOrderLijn(OrderLijnIterator, ##class(DOM.VKP.enu.OrderLijnType).Product(), 101, 1)
+	Do ..AssertVolgendeOrderLijn(OrderLijnIterator, ##class(DOM.VKP.enu.OrderLijnType).Product(), 102, 1)
+	Do ..AssertVolgendeOrderLijn(OrderLijnIterator, ##class(DOM.VKP.enu.OrderLijnType).Product(), 103, 1)
+	Do ..AssertVolgendeOrderLijn(OrderLijnIterator, ##class(DOM.VKP.enu.OrderLijnType).Product(), 104, 1)
+	Do ..AssertVolgendeOrderLijn(OrderLijnIterator, ##class(DOM.VKP.enu.OrderLijnType).Product(), 105, 1)
+
+	Do $$$AssertFalse(OrderLijnIterator.HasNext())
+]]></Implementation>
+</Method>
+
 <Method name="AssertVolgendeOrderLijn">
 <FormalSpec>OrderLijnIterator:TECH.Iterator,VerwachtOrderLijnType:DOM.VKP.enu.OrderLijnType,VerwachtLijnVolgNr:%Integer,VerwachteAantal:%Integer=1</FormalSpec>
 <Private>1</Private>
@@ -169,6 +200,7 @@
 	Do ..MaakOrderZonderLijnen(..#OrderIDZonderLijnen)
 	Do ..MaakOrderMetEenTekstLijn(..#OrderIDMetTekstLijn)
 	Do ..MaakOrderMetEenProductLijn(..#OrderIDMetProductLijn)
+	Do ..MaakOrderMetTweeSpaceTowerLijnen(..#OrderIDMet2SpaceTowerLijnen)
 ]]></Implementation>
 </Method>
 
@@ -179,6 +211,7 @@
 	Do ##class(vhUnitTest.DataHelper).VerwijderOrder(..#OrderIDZonderLijnen)
 	Do ##class(vhUnitTest.DataHelper).VerwijderOrder(..#OrderIDMetTekstLijn)
 	Do ##class(vhUnitTest.DataHelper).VerwijderOrder(..#OrderIDMetProductLijn)
+	Do ##class(vhUnitTest.DataHelper).VerwijderOrder(..#OrderIDMet2SpaceTowerLijnen)
 ]]></Implementation>
 </Method>
 
@@ -225,6 +258,20 @@
 ]]></Implementation>
 </Method>
 
+<Method name="MaakOrderMetTweeSpaceTowerLijnen">
+<FormalSpec>OrderID:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#define SpaceTowerProductID    1352575
+	#define SpaceTower2ProductID   1354035
+
+	Do ..MaakOrderHoofding(OrderID,103)
+	Set ^KOD(1000,"F",OrderID,101) = "703000 \"_$$$SpaceTowerProductID _"\1\\\619\0#0\8\619\619\703000 \L\\\100\619\KF0\\\\E1\EUR\\\63981\\\\\\\\\\\\\\\\\\\\\1"
+	Set ^KOD(1000,"F",OrderID,102) = "703000 \"_$$$SpaceTower2ProductID_"\1\\\444\0#0\8\619\619\703000 \L\\\110\619\KF0\\\\E1\EUR\\\63981\\\\\\\\\\\\\\\\\\\\\1"
+	Do ##class(vhUnitTest.DataHelper).MaakOrderCompleet(1000,OrderID)
+]]></Implementation>
+</Method>
+
 <Method name="MaakOrderHoofding">
 <FormalSpec>OrderID:%String,VolgendLijnNr:%Integer=101</FormalSpec>
 <Private>1</Private>
Index: APPS/VKP/Order/impl/SpaceTowerSplitser.cls.xml
===================================================================
diff -u -r33236 -r33252
--- APPS/VKP/Order/impl/SpaceTowerSplitser.cls.xml	(.../SpaceTowerSplitser.cls.xml)	(revision 33236)
+++ APPS/VKP/Order/impl/SpaceTowerSplitser.cls.xml	(.../SpaceTowerSplitser.cls.xml)	(revision 33252)
@@ -30,7 +30,7 @@
 <FormalSpec>OrderID:%String</FormalSpec>
 <Implementation><![CDATA[
 	#dim Order As DOM.VKP.Order = ##class(DOM.DomeinContext).Instance().GeefOrderAPI().GeefOrder(OrderID)
-	#dim ProductOrderLijnIterator As TECH.Iterator = Order.GeefProductOrderLijnIterator()
+	#dim ProductOrderLijnIterator As TECH.Iterator = ..GeefReversedProductOrderLijnIterator(Order)
 	While ProductOrderLijnIterator.HasNext(){
 		#dim ProductOrderLijn As DOM.VKP.ProductOrderlijn = ProductOrderLijnIterator.Next()
 		If ..ProductTypeAPI.IsSpaceTowerProduct(ProductOrderLijn.GeefProductID()) {
@@ -43,6 +43,21 @@
 	}
 ]]></Implementation>
 </Method>
+
+<Method name="GeefReversedProductOrderLijnIterator">
+<FormalSpec>Order:DOM.VKP.Order</FormalSpec>
+<Private>1</Private>
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[
+	Set ReversedOrderlijnen = ##class(%ListOfObjects).%New()
+	#dim ProductOrderLijnIterator As TECH.Iterator = Order.GeefProductOrderLijnIterator()
+	While ProductOrderLijnIterator.HasNext(){
+		#dim ProductOrderLijn As DOM.VKP.ProductOrderlijn = ProductOrderLijnIterator.Next()
+		Do ReversedOrderlijnen.InsertAt(ProductOrderLijn,1)
+	}
+	Quit ##class(TECH.ListIterator).%New(ReversedOrderlijnen)
+]]></Implementation>
+</Method>
 </Class>