Index: APPS/VKP/Order/impl/OrderLijnSplitser.cls.xml
===================================================================
diff -u -r33235 -r33254
--- APPS/VKP/Order/impl/OrderLijnSplitser.cls.xml	(.../OrderLijnSplitser.cls.xml)	(revision 33235)
+++ APPS/VKP/Order/impl/OrderLijnSplitser.cls.xml	(.../OrderLijnSplitser.cls.xml)	(revision 33254)
@@ -31,7 +31,9 @@
 	#dim Order As DOM.VKP.Order = ..OrderAPI.GeefOrder(OrderID)
 	#dim KlantNr As %String = ..LegacyPartijAPI.GeefKlantNummerVoorPartijID(Order.GeefKlantID())
 	
-	Do ..MaakBackOrderLijn(KlantNr, OrderID, LijnID, AantalAfTeSplitsen)
+	If ..KanBACKORDCorrectSplitsen(KlantNr, OrderID, LijnID) {
+		Do ..MaakBackOrderLijn(KlantNr, OrderID, LijnID, AantalAfTeSplitsen)
+	}
 ]]></Implementation>
 </Method>
 
@@ -42,6 +44,19 @@
 <Implementation><![CDATA[	Do BACKORD^FLOWORD6(KlantNr, OrderID, OrderLijnVolgNr, AantalBackOrder, RestAantal, LeverWeekBackOrder)
 ]]></Implementation>
 </Method>
+
+<Method name="KanBACKORDCorrectSplitsen">
+<FormalSpec>KlantNr:%String,OrderID:%String,OrderLijnVolgNr:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	#dim OrderLijnUniekNummer = $P($G(^KOD(KlantNr,"F",OrderID, OrderLijnVolgNr)),"\",15)
+	#dim VolgendOLUNr As %Integer = $$BerekenVolgendOLUNr^FLOWORD6(OrderID,OrderLijnUniekNummer)
+	
+	Quit:($D(^ORD("IU",OrderID,VolgendOLUNr))) $$$False   ;  dit UniekLijnNr bestaat al, mag niet herbruikt worden (UNIEK!) 
+	Quit $$$True
+]]></Implementation>
+</Method>
 </Class>