Index: APPS/VKP/Order/impl/SpaceTowerSplitser.cls.xml
===================================================================
diff -u -r33302 -r33318
--- APPS/VKP/Order/impl/SpaceTowerSplitser.cls.xml (.../SpaceTowerSplitser.cls.xml) (revision 33302)
+++ APPS/VKP/Order/impl/SpaceTowerSplitser.cls.xml (.../SpaceTowerSplitser.cls.xml) (revision 33318)
@@ -50,11 +50,11 @@
ProductOrderLijn:DOM.VKP.ProductOrderlijn
1
1) && (OrderLijnAantal '= LijnAantalBeforeSplits) {
- Set LijnAantalBeforeSplits = OrderLijnAantal
+ While (OrderLijnAantal > 1) && (OrderLijnAantal '= VorigeAantal) {
+ Set VorigeAantal = OrderLijnAantal
Do ..OrderLijnSplitser.SplitsAfAantal(ProductOrderLijn.GeefOrderID(),ProductOrderLijn.GeefLijnVolgNr(), 1)
Do ProductOrderLijn.Reload()
Set OrderLijnAantal = ProductOrderLijn.GeefAantal()