Index: vhTest/Mock/BL/Legacy/TRANSP/OrderOpBonBepaler.cls.xml
===================================================================
diff -u -r55307 -r55587
--- vhTest/Mock/BL/Legacy/TRANSP/OrderOpBonBepaler.cls.xml	(.../OrderOpBonBepaler.cls.xml)	(revision 55307)
+++ vhTest/Mock/BL/Legacy/TRANSP/OrderOpBonBepaler.cls.xml	(.../OrderOpBonBepaler.cls.xml)	(revision 55587)
@@ -9,16 +9,16 @@
 <Inheritance>right</Inheritance>
 
 <Method name="%OnNew">
-<FormalSpec>ORDW:%String="^ORDW",KUL:%String="^KUL"</FormalSpec>
+<FormalSpec>KUL:%String="^KUL"</FormalSpec>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="HeeftOrderlijnenOpTransport">
-<FormalSpec>OrderID:%String</FormalSpec>
+<FormalSpec>SalesIdAX:%String,KlantNr:%String=""</FormalSpec>
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("HeeftOrderlijnenOpTransport",OrderID)
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("HeeftOrderlijnenOpTransport",SalesIdAX,KlantNr)
 ]]></Implementation>
 </Method>
 </Class>
Index: TRANSPX.mac.rou
===================================================================
diff -u -r53410 -r55587
--- TRANSPX.mac.rou	(.../TRANSPX.mac.rou)	(revision 53410)
+++ TRANSPX.mac.rou	(.../TRANSPX.mac.rou)	(revision 55587)
@@ -57,7 +57,7 @@
  . Set sFL(1)=KLNr,$P(sFL(1),D,9)=$$DEVUSER^vhUSER(),$P(sFL(1),D,10)=$H
  Else  Set KLNr=$P(sFL(1),D)
  Do:'$D(^TRANSP("D",VervRef,"D",GroepNr,"B",BONNr))
- . Set Rembours=$S($$ISREMB^REMBOURS(KLNr,BONNr):##class(BL.Legacy.TRANSP).%New().GeefRemboursBedragVoorBon(BONNr),1:"")
+ . Set Rembours=$S($$ISREMB^REMBOURS(KLNr,BONNr):##class(BL.Legacy.TRANSP).%New().GeefRemboursBedragVoorBon(BONNr,KLNr),1:"")
  . Set Node=$$NODE(BONNr),R=^KUL(KLNr,Node,BONNr,1),Gewicht=$J($P($P(R,D,13),"#",3),0,1)
  . Set $P(sFL("V"),D,3)=$P(sFL("V"),D,3)+Gewicht
  . Set $P(sFL(1),D,2)=$P(sFL(1),D,2)+Rembours
Index: vhTest/Fake/BL/Legacy/TRANSP/OrderOpBonBepaler.cls.xml
===================================================================
diff -u -r55304 -r55587
--- vhTest/Fake/BL/Legacy/TRANSP/OrderOpBonBepaler.cls.xml	(.../OrderOpBonBepaler.cls.xml)	(revision 55304)
+++ vhTest/Fake/BL/Legacy/TRANSP/OrderOpBonBepaler.cls.xml	(.../OrderOpBonBepaler.cls.xml)	(revision 55587)
@@ -7,10 +7,17 @@
 <ProcedureBlock>1</ProcedureBlock>
 <Super>BL.Legacy.TRANSP.OrderOpBonBepaler</Super>
 
+<Method name="%OnNew">
+<FormalSpec>KUL:%String="^KUL"</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="HeeftOrderlijnenOpTransport">
-<FormalSpec>OrderID:%String</FormalSpec>
+<FormalSpec>SalesIdAX:%String,KlantNr:%String=""</FormalSpec>
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit ""
+<Implementation><![CDATA[	quit ""
 ]]></Implementation>
 </Method>
 </Class>
Index: BL/Legacy/TRANSP/OrderOpBonBepaler.cls.xml
===================================================================
diff -u -r55489 -r55587
--- BL/Legacy/TRANSP/OrderOpBonBepaler.cls.xml	(.../OrderOpBonBepaler.cls.xml)	(revision 55489)
+++ BL/Legacy/TRANSP/OrderOpBonBepaler.cls.xml	(.../OrderOpBonBepaler.cls.xml)	(revision 55587)
@@ -3,75 +3,61 @@
 <Class name="BL.Legacy.TRANSP.OrderOpBonBepaler">
 <Super>TECH.Mockable</Super>
 
-<Property name="ORDW">
-<Type>%String</Type>
-<Private>1</Private>
-</Property>
-
 <Property name="KUL">
 <Type>%String</Type>
 <Private>1</Private>
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>ORDW:%String="^ORDW",KUL:%String="^KUL"</FormalSpec>
+<FormalSpec>KUL:%String="^KUL"</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	Set ..ORDW = ORDW
 	Set ..KUL = KUL
 	
 	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="HeeftOrderlijnenOpTransport">
-<FormalSpec>OrderID:%String</FormalSpec>
+<FormalSpec>SalesIdAX:%String,KlantNr:%String=""</FormalSpec>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
 	#dim HeeftOrderlijnenOpTransport As %Boolean = $$$False
 	
-	#dim OLUNr As %String = $Order(@..ORDW@("IO",OrderID,""))
-	While $$$HasLength(OLUNr){
+	#dim ConsolidatieNr As %String = $Order(@..KUL@(KlantNr, "F", ""))
+	
+	While $$$HasLength(ConsolidatieNr){
 
-		#dim ConsolidatieNr As %String = ..GeefConsolidatieNr(OrderID,OLUNr)
-		#dim KlantNr As %String = ..GeefKlantNr(ConsolidatieNr)
-		
-		if ..BonHeeftVervoersReferentie(KlantNr, ConsolidatieNr) {
+		if ..IsBonVanSalesIdAX(SalesIdAX, KlantNr, ConsolidatieNr) && ..BonHeeftVervoersReferentie(KlantNr, ConsolidatieNr) {
 			Set HeeftOrderlijnenOpTransport = $$$True
 		}
 		
-		Set OLUNr = $Order(@..ORDW@("IO",OrderID,OLUNr))
+		Set ConsolidatieNr = $Order(@..KUL@(KlantNr, "F", ConsolidatieNr))
 	}
 	
 	Quit HeeftOrderlijnenOpTransport
 ]]></Implementation>
 </Method>
 
-<Method name="GeefConsolidatieNr">
-<FormalSpec>OrderID:%String,OLUNr:%String</FormalSpec>
+<Method name="IsBonVanSalesIdAX">
+<FormalSpec>SalesIdAX:%String,KlantNr:%String,ConsolidatieNr:%String</FormalSpec>
 <Private>1</Private>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit $G(@..ORDW@("IO",OrderID,OLUNr))
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	#dim SalesIdAXVanBon As %String = $Piece(@..KUL@(KlantNr,"F",ConsolidatieNr,1),"\",58)
+	Quit (SalesIdAXVanBon=SalesIdAX)
 ]]></Implementation>
 </Method>
 
-<Method name="GeefKlantNr">
-<FormalSpec>ConsolidatieNr:%String</FormalSpec>
-<Private>1</Private>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit $Piece(@..ORDW@("D",ConsolidatieNr),"\",1)
-]]></Implementation>
-</Method>
-
 <Method name="BonHeeftVervoersReferentie">
 <FormalSpec>KlantNr:%String,ConsolidatieNr:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
-	#dim VervoersReferentie As %String = $Piece(@..KUL@(KlantNr,ConsolidatieNr,1),"\",8)		
+	#dim VervoersReferentie As %String = $Piece(@..KUL@(KlantNr,"F",ConsolidatieNr,1),"\",8)
 	Quit $$$HasLength(VervoersReferentie)
 ]]></Implementation>
 </Method>
Index: vhUnitTest/BL/Legacy/TRANSP/Test.cls.xml
===================================================================
diff -u -r55580 -r55587
--- vhUnitTest/BL/Legacy/TRANSP/Test.cls.xml	(.../Test.cls.xml)	(revision 55580)
+++ vhUnitTest/BL/Legacy/TRANSP/Test.cls.xml	(.../Test.cls.xml)	(revision 55587)
@@ -47,10 +47,8 @@
 		
 	Set OrderVerwijzingLijnMock1 = ##class(vhTest.Mock.DOM.VKP.OrderVerwijzingOrderlijn).%New()
 	Do OrderVerwijzingLijnMock1.VerwachtMethodCall("GeefSalesIdAX").DanReturn("SalesId1")
-	Do OrderVerwijzingLijnMock1.VerwachtMethodCall("GeefOrderNr").DanReturn("OrderId1")
 	Set OrderVerwijzingLijnMock2 = ##class(vhTest.Mock.DOM.VKP.OrderVerwijzingOrderlijn).%New()
 	Do OrderVerwijzingLijnMock2.VerwachtMethodCall("GeefSalesIdAX").DanReturn("SalesId2")	
-	Do OrderVerwijzingLijnMock2.VerwachtMethodCall("GeefOrderNr").DanReturn("OrderId2")
 	#dim OrderVerwijzingLijnIterator as TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(OrderVerwijzingLijnMock1,OrderVerwijzingLijnMock2)
 	Do BonMock.VerwachtMethodCall("GeefTypeBonLijnIterator",##class(DOM.VKP.enu.BonLijnType).OrderVerwijzing()).DanReturn(OrderVerwijzingLijnIterator)
 	
@@ -62,8 +60,8 @@
 	Do InvoiceAmountServiceMock.VerwachtMethodCall("GeefFactuurBedragen","SalesId2").DanReturn(Return2)
 	
 	Set OrderOpBonBepalerMock = ##class(vhTest.Mock.BL.Legacy.TRANSP.OrderOpBonBepaler).%New()
-	Do OrderOpBonBepalerMock.VerwachtMethodCall("HeeftOrderlijnenOpTransport","OrderId1").DanReturn($$$False)
-	Do OrderOpBonBepalerMock.VerwachtMethodCall("HeeftOrderlijnenOpTransport","OrderId2").DanReturn($$$False)
+	Do OrderOpBonBepalerMock.VerwachtMethodCall("HeeftOrderlijnenOpTransport","SalesId1","").DanReturn($$$False)
+	Do OrderOpBonBepalerMock.VerwachtMethodCall("HeeftOrderlijnenOpTransport","SalesId2","").DanReturn($$$False)
 	
 	Set TRANSP = ##class(BL.Legacy.TRANSP).%New(OrderAPIMock,InvoiceAmountServiceMock,,OrderOpBonBepalerMock)
 	
@@ -85,26 +83,24 @@
 
 	Set BonMock = ##class(vhTest.Mock.DOM.VKP.Bon).%New()	
 	Do OrderAPIMock.VerwachtMethodCall("GeefBon","BONNR").DanReturn(BonMock)
-		
+
 	Set OrderVerwijzingLijnMock1 = ##class(vhTest.Mock.DOM.VKP.OrderVerwijzingOrderlijn).%New()
 	Do OrderVerwijzingLijnMock1.VerwachtMethodCall("GeefSalesIdAX").DanReturn("SalesId1")
-	Do OrderVerwijzingLijnMock1.VerwachtMethodCall("GeefOrderNr").DanReturn("OrderId1")
 	Set OrderVerwijzingLijnMock2 = ##class(vhTest.Mock.DOM.VKP.OrderVerwijzingOrderlijn).%New()
-	Do OrderVerwijzingLijnMock2.VerwachtMethodCall("GeefOrderNr").DanReturn("OrderId2")
+	Do OrderVerwijzingLijnMock2.VerwachtMethodCall("GeefSalesIdAX").DanReturn("SalesId2")
 	
 	#dim OrderVerwijzingLijnIterator as TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(OrderVerwijzingLijnMock1,OrderVerwijzingLijnMock2)
 	Do BonMock.VerwachtMethodCall("GeefTypeBonLijnIterator",##class(DOM.VKP.enu.BonLijnType).OrderVerwijzing()).DanReturn(OrderVerwijzingLijnIterator)
-	
+
 	Set InvoiceAmountServiceMock = ##class(vhTest.Mock.AXimpl.Dynamics.InvoiceAmountOut.InvoiceAmountService).%New()
 	#dim Return1 as AXif.Dynamics.InvoiceAmountOut.tns.VHInvoiceAmountOutputDC = ..GeefVHInvoiceAmountOutputDC(12.1,2.1,1.5)
 	Do InvoiceAmountServiceMock.VerwachtMethodCall("GeefFactuurBedragen","SalesId1").DanReturn(Return1)
 	
 	Set OrderOpBonBepalerMock = ##class(vhTest.Mock.BL.Legacy.TRANSP.OrderOpBonBepaler).%New()
-	Do OrderOpBonBepalerMock.VerwachtMethodCall("HeeftOrderlijnenOpTransport","OrderId1").DanReturn($$$False)
-	Do OrderOpBonBepalerMock.VerwachtMethodCall("HeeftOrderlijnenOpTransport","OrderId2").DanReturn($$$True)
-	
+	Do OrderOpBonBepalerMock.VerwachtMethodCall("HeeftOrderlijnenOpTransport","SalesId1","").DanReturn($$$False)
+	Do OrderOpBonBepalerMock.VerwachtMethodCall("HeeftOrderlijnenOpTransport","SalesId2","").DanReturn($$$True)
 	Set TRANSP = ##class(BL.Legacy.TRANSP).%New(OrderAPIMock,InvoiceAmountServiceMock,,OrderOpBonBepalerMock)
-	
+
 	Do $$$AssertEquals(TRANSP.GeefRemboursBedragVoorBon("BONNR"),10.6)	
 	
 	Do OrderAPIMock.Verifieer()
@@ -148,10 +144,8 @@
 		
 	Set OrderVerwijzingLijnMock1 = ##class(vhTest.Mock.DOM.VKP.OrderVerwijzingOrderlijn).%New()
 	Do OrderVerwijzingLijnMock1.VerwachtMethodCall("GeefSalesIdAX").DanReturn("SalesId1")
-	Do OrderVerwijzingLijnMock1.VerwachtMethodCall("GeefOrderNr").DanReturn("OrderId1")
 	Set OrderVerwijzingLijnMock2 = ##class(vhTest.Mock.DOM.VKP.OrderVerwijzingOrderlijn).%New()
 	Do OrderVerwijzingLijnMock2.VerwachtMethodCall("GeefSalesIdAX").DanReturn("SalesId2")	
-	Do OrderVerwijzingLijnMock2.VerwachtMethodCall("GeefOrderNr").DanReturn("OrderId2")
 	#dim OrderVerwijzingLijnIterator as TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(OrderVerwijzingLijnMock1,OrderVerwijzingLijnMock2)
 	Do BonMock.VerwachtMethodCall("GeefTypeBonLijnIterator",##class(DOM.VKP.enu.BonLijnType).OrderVerwijzing()).DanReturn(OrderVerwijzingLijnIterator)
 	
@@ -163,8 +157,8 @@
 	Do InvoiceAmountServiceMock.IndienMethodCall("GeefFactuurBedragen","SalesId2").DanException(WSException)
 	
 	Set OrderOpBonBepalerMock = ##class(vhTest.Mock.BL.Legacy.TRANSP.OrderOpBonBepaler).%New()
-	Do OrderOpBonBepalerMock.VerwachtMethodCall("HeeftOrderlijnenOpTransport","OrderId1").DanReturn($$$False)
-	Do OrderOpBonBepalerMock.VerwachtMethodCall("HeeftOrderlijnenOpTransport","OrderId2").DanReturn($$$False)
+	Do OrderOpBonBepalerMock.VerwachtMethodCall("HeeftOrderlijnenOpTransport","SalesId1","").DanReturn($$$False)
+	Do OrderOpBonBepalerMock.VerwachtMethodCall("HeeftOrderlijnenOpTransport","SalesId2","").DanReturn($$$False)
 
 	Set TRANSP = ##class(BL.Legacy.TRANSP).%New(OrderAPIMock,InvoiceAmountServiceMock,,OrderOpBonBepalerMock)
 	
@@ -189,10 +183,8 @@
 		
 	Set OrderVerwijzingLijnMock1 = ##class(vhTest.Mock.DOM.VKP.OrderVerwijzingOrderlijn).%New()
 	Do OrderVerwijzingLijnMock1.VerwachtMethodCall("GeefSalesIdAX").DanReturn("SalesId1")
-	Do OrderVerwijzingLijnMock1.VerwachtMethodCall("GeefOrderNr").DanReturn("OrderId1")
 	Set OrderVerwijzingLijnMock2 = ##class(vhTest.Mock.DOM.VKP.OrderVerwijzingOrderlijn).%New()
 	Do OrderVerwijzingLijnMock2.VerwachtMethodCall("GeefSalesIdAX").DanReturn("SalesId2")	
-	Do OrderVerwijzingLijnMock2.VerwachtMethodCall("GeefOrderNr").DanReturn("OrderId2")
 	#dim OrderVerwijzingLijnIterator as TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(OrderVerwijzingLijnMock1,OrderVerwijzingLijnMock2)
 	Do BonMock.VerwachtMethodCall("GeefTypeBonLijnIterator",##class(DOM.VKP.enu.BonLijnType).OrderVerwijzing()).DanReturn(OrderVerwijzingLijnIterator)
 	
@@ -204,8 +196,8 @@
 	Do InvoiceAmountServiceMock.VerwachtMethodCall("GeefFactuurBedragen","SalesId2").DanReturn(Return2)
 
 	Set OrderOpBonBepalerMock = ##class(vhTest.Mock.BL.Legacy.TRANSP.OrderOpBonBepaler).%New()
-	Do OrderOpBonBepalerMock.VerwachtMethodCall("HeeftOrderlijnenOpTransport","OrderId1").DanReturn($$$False)
-	Do OrderOpBonBepalerMock.VerwachtMethodCall("HeeftOrderlijnenOpTransport","OrderId2").DanReturn($$$False)
+	Do OrderOpBonBepalerMock.VerwachtMethodCall("HeeftOrderlijnenOpTransport","SalesId1","").DanReturn($$$False)
+	Do OrderOpBonBepalerMock.VerwachtMethodCall("HeeftOrderlijnenOpTransport","SalesId2","").DanReturn($$$False)
 	
 	Set TRANSP = ##class(BL.Legacy.TRANSP).%New(OrderAPIMock,InvoiceAmountServiceMock,,OrderOpBonBepalerMock)
 	
@@ -230,10 +222,8 @@
 		
 	Set OrderVerwijzingLijnMock1 = ##class(vhTest.Mock.DOM.VKP.OrderVerwijzingOrderlijn).%New()
 	Do OrderVerwijzingLijnMock1.VerwachtMethodCall("GeefSalesIdAX").DanReturn("SalesId1")
-	Do OrderVerwijzingLijnMock1.VerwachtMethodCall("GeefOrderNr").DanReturn("OrderId1")
 	Set OrderVerwijzingLijnMock2 = ##class(vhTest.Mock.DOM.VKP.OrderVerwijzingOrderlijn).%New()
 	Do OrderVerwijzingLijnMock2.VerwachtMethodCall("GeefSalesIdAX").DanReturn("SalesId2")	
-	Do OrderVerwijzingLijnMock2.VerwachtMethodCall("GeefOrderNr").DanReturn("OrderId2")
 	#dim OrderVerwijzingLijnIterator as TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(OrderVerwijzingLijnMock1,OrderVerwijzingLijnMock2)
 	Do BonMock.VerwachtMethodCall("GeefTypeBonLijnIterator",##class(DOM.VKP.enu.BonLijnType).OrderVerwijzing()).DanReturn(OrderVerwijzingLijnIterator)
 	
@@ -244,8 +234,8 @@
 	Do InvoiceAmountServiceMock.IndienMethodCall("GeefFactuurBedragen","SalesId2").DanException(WSException)
 	
 	Set OrderOpBonBepalerMock = ##class(vhTest.Mock.BL.Legacy.TRANSP.OrderOpBonBepaler).%New()
-	Do OrderOpBonBepalerMock.VerwachtMethodCall("HeeftOrderlijnenOpTransport","OrderId1").DanReturn($$$False)
-	Do OrderOpBonBepalerMock.VerwachtMethodCall("HeeftOrderlijnenOpTransport","OrderId2").DanReturn($$$False)
+	Do OrderOpBonBepalerMock.VerwachtMethodCall("HeeftOrderlijnenOpTransport","SalesId1","").DanReturn($$$False)
+	Do OrderOpBonBepalerMock.VerwachtMethodCall("HeeftOrderlijnenOpTransport","SalesId2","").DanReturn($$$False)
 
 	Set TRANSP = ##class(BL.Legacy.TRANSP).%New(OrderAPIMock,InvoiceAmountServiceMock,,OrderOpBonBepalerMock)
 	
Index: vhUnitTest/BL/Legacy/TRANSP/OrderOpBonBepaler/Test.cls.xml
===================================================================
diff -u -r55307 -r55587
--- vhUnitTest/BL/Legacy/TRANSP/OrderOpBonBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 55307)
+++ vhUnitTest/BL/Legacy/TRANSP/OrderOpBonBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 55587)
@@ -5,18 +5,14 @@
 
 <Method name="Test: Order heeft orderlijnen op transport">
 <Implementation><![CDATA[
-	#dim ORDWTemp As %String = "ORDWTemp"
-
-	Set @ORDWTemp@("IO","OrderID","1") = "ConsolidatieNr1"
-	Set @ORDWTemp@("D","ConsolidatieNr1") = "KlantNr\"
-
 	#dim KULTemp As %String = "KULTemp"
-	Set @KULTemp@("KlantNr","ConsolidatieNr1",1) = "\\\\\\\VervRef"
 	
-	Set OrderOpBonBepaler = ##class(BL.Legacy.TRANSP.OrderOpBonBepaler).%New(ORDWTemp,KULTemp)
-	#dim HeeftOrderlijnenOpTransport As %Boolean = OrderOpBonBepaler.HeeftOrderlijnenOpTransport("OrderID")
+	Set $P(@KULTemp@("KlantNr","F","ConsolidatieNr1",1),"\",8) = "VervRef"
+	Set $P(@KULTemp@("KlantNr","F","ConsolidatieNr1",1),"\",58) = "SalesIdAX"
+	
+	Set OrderOpBonBepaler = ##class(BL.Legacy.TRANSP.OrderOpBonBepaler).%New(KULTemp)
+	#dim HeeftOrderlijnenOpTransport As %Boolean = OrderOpBonBepaler.HeeftOrderlijnenOpTransport("SalesIdAX","KlantNr")
 
-	kill @ORDWTemp
 	kill @KULTemp
 	
 	Do $$$AssertTrue(HeeftOrderlijnenOpTransport)
@@ -25,18 +21,14 @@
 
 <Method name="Test: Order heeft geen orderlijnen op transport">
 <Implementation><![CDATA[
-	#dim ORDWTemp As %String = "ORDWTemp"
-
-	Set @ORDWTemp@("IO","OrderID","1") = "ConsolidatieNr1"
-	Set @ORDWTemp@("D","ConsolidatieNr1") = "KlantNr\"
-
 	#dim KULTemp As %String = "KULTemp"
-	Set @KULTemp@("KlantNr","ConsolidatieNr1",1) = "\\\\\\\"
 	
-	Set OrderOpBonBepaler = ##class(BL.Legacy.TRANSP.OrderOpBonBepaler).%New(ORDWTemp,KULTemp)
-	#dim HeeftOrderlijnenOpTransport As %Boolean = OrderOpBonBepaler.HeeftOrderlijnenOpTransport("OrderID")
+	Set $P(@KULTemp@("KlantNr","F","ConsolidatieNr1",1),"\",8) = ""
+	Set $P(@KULTemp@("KlantNr","F","ConsolidatieNr1",1),"\",58) = "SalesIdAX"
+	
+	Set OrderOpBonBepaler = ##class(BL.Legacy.TRANSP.OrderOpBonBepaler).%New(KULTemp)
+	#dim HeeftOrderlijnenOpTransport As %Boolean = OrderOpBonBepaler.HeeftOrderlijnenOpTransport("SalesIdAX","KlantNr")
 
-	kill @ORDWTemp
 	kill @KULTemp
 	
 	Do $$$AssertFalse(HeeftOrderlijnenOpTransport)
@@ -45,21 +37,17 @@
 
 <Method name="Test: Gesplitst order heeft orderlijnen op transport">
 <Implementation><![CDATA[
-	#dim ORDWTemp As %String = "ORDWTemp"
-
-	Set @ORDWTemp@("IO","OrderID","1") = "ConsolidatieNr1"
-	Set @ORDWTemp@("IO","OrderID","2") = "ConsolidatieNr2"
-	Set @ORDWTemp@("D","ConsolidatieNr1") = "KlantNr\"
-	Set @ORDWTemp@("D","ConsolidatieNr2") = "KlantNr\"
-
 	#dim KULTemp As %String = "KULTemp"
-	Set @KULTemp@("KlantNr","ConsolidatieNr1",1) = "\\\\\\\"
-	Set @KULTemp@("KlantNr","ConsolidatieNr2",1) = "\\\\\\\VervRef"
 	
-	Set OrderOpBonBepaler = ##class(BL.Legacy.TRANSP.OrderOpBonBepaler).%New(ORDWTemp,KULTemp)
-	#dim HeeftOrderlijnenOpTransport As %Boolean = OrderOpBonBepaler.HeeftOrderlijnenOpTransport("OrderID")
+	Set $P(@KULTemp@("KlantNr","F","ConsolidatieNr1",1),"\",8) = ""
+	Set $P(@KULTemp@("KlantNr","F","ConsolidatieNr1",1),"\",58) = "SalesIdAX"
 
-	kill @ORDWTemp
+	Set $P(@KULTemp@("KlantNr","F","ConsolidatieNr2",1),"\",8) = "VervRef"
+	Set $P(@KULTemp@("KlantNr","F","ConsolidatieNr2",1),"\",58) = "SalesIdAX"
+	
+	Set OrderOpBonBepaler = ##class(BL.Legacy.TRANSP.OrderOpBonBepaler).%New(KULTemp)
+	#dim HeeftOrderlijnenOpTransport As %Boolean = OrderOpBonBepaler.HeeftOrderlijnenOpTransport("SalesIdAX","KlantNr")
+
 	kill @KULTemp
 	
 	Do $$$AssertTrue(HeeftOrderlijnenOpTransport)
@@ -68,21 +56,36 @@
 
 <Method name="Test: Gesplitst order heeft geen orderlijnen op transport">
 <Implementation><![CDATA[
-	#dim ORDWTemp As %String = "ORDWTemp"
+	#dim KULTemp As %String = "KULTemp"
+	
+	Set $P(@KULTemp@("KlantNr","F","ConsolidatieNr1",1),"\",8) = ""
+	Set $P(@KULTemp@("KlantNr","F","ConsolidatieNr1",1),"\",58) = "SalesIdAX"
 
-	Set @ORDWTemp@("IO","OrderID","1") = "ConsolidatieNr1"
-	Set @ORDWTemp@("IO","OrderID","2") = "ConsolidatieNr2"
-	Set @ORDWTemp@("D","ConsolidatieNr1") = "KlantNr\"
-	Set @ORDWTemp@("D","ConsolidatieNr2") = "KlantNr\"
+	Set $P(@KULTemp@("KlantNr","F","ConsolidatieNr2",1),"\",8) = ""
+	Set $P(@KULTemp@("KlantNr","F","ConsolidatieNr2",1),"\",58) = "SalesIdAX"
+	
+	Set OrderOpBonBepaler = ##class(BL.Legacy.TRANSP.OrderOpBonBepaler).%New(KULTemp)
+	#dim HeeftOrderlijnenOpTransport As %Boolean = OrderOpBonBepaler.HeeftOrderlijnenOpTransport("SalesIdAX","KlantNr")
 
+	kill @KULTemp
+	
+	Do $$$AssertFalse(HeeftOrderlijnenOpTransport)
+]]></Implementation>
+</Method>
+
+<Method name="Test: Gesplitst order heeft geen orderlijnen op transport van dezelfde SalesIdAX">
+<Implementation><![CDATA[
 	#dim KULTemp As %String = "KULTemp"
-	Set @KULTemp@("KlantNr","ConsolidatieNr1",1) = "\\\\\\\"
-	Set @KULTemp@("KlantNr","ConsolidatieNr2",1) = "\\\\\\\"
 	
-	Set OrderOpBonBepaler = ##class(BL.Legacy.TRANSP.OrderOpBonBepaler).%New(ORDWTemp,KULTemp)
-	#dim HeeftOrderlijnenOpTransport As %Boolean = OrderOpBonBepaler.HeeftOrderlijnenOpTransport("OrderID")
+	Set $P(@KULTemp@("KlantNr","F","ConsolidatieNr1",1),"\",8) = ""
+	Set $P(@KULTemp@("KlantNr","F","ConsolidatieNr1",1),"\",58) = "SalesIdAX"
 
-	kill @ORDWTemp
+	Set $P(@KULTemp@("KlantNr","F","ConsolidatieNr2",1),"\",8) = "VervRef"
+	Set $P(@KULTemp@("KlantNr","F","ConsolidatieNr2",1),"\",58) = "Andere SalesIdAX"
+	
+	Set OrderOpBonBepaler = ##class(BL.Legacy.TRANSP.OrderOpBonBepaler).%New(KULTemp)
+	#dim HeeftOrderlijnenOpTransport As %Boolean = OrderOpBonBepaler.HeeftOrderlijnenOpTransport("SalesIdAX","KlantNr")
+
 	kill @KULTemp
 	
 	Do $$$AssertFalse(HeeftOrderlijnenOpTransport)
Index: TRANSP.mac.rou
===================================================================
diff -u -r52861 -r55587
--- TRANSP.mac.rou	(.../TRANSP.mac.rou)	(revision 52861)
+++ TRANSP.mac.rou	(.../TRANSP.mac.rou)	(revision 55587)
@@ -113,7 +113,7 @@
  .Set (BONNr,Rembours,Gewicht)=""
  .For  Set BONNr=$O(Bons("BON",BONNr)) Quit:BONNr=""  Do
  ..Set Node=$$NODE(BONNr)
- ..Set Rembours=Rembours+$S($$ISREMB^REMBOURS(KLNr,BONNr):##class(BL.Legacy.TRANSP).%New().GeefRemboursBedragVoorBon(BONNr),1:"")
+ ..Set Rembours=Rembours+$S($$ISREMB^REMBOURS(KLNr,BONNr):##class(BL.Legacy.TRANSP).%New().GeefRemboursBedragVoorBon(BONNr,KLNr),1:"")
  ..Set R=^KUL(KLNr,Node,BONNr,1),Gewicht=Gewicht+$J($P($P(R,D,13),"#",3),0,1)
  .Set sFL(1)=KLNr_D_Rembours_D_Gewicht,$P(sFL(1),D,9)=$$DEVUSER^vhUSER(),$P(sFL(1),D,10)=$H
  Set sFL("V")=$G(^TRANSP("D",VervRef))
@@ -293,7 +293,7 @@
  .Set (BONNr,Rembours,Gewicht)=""
  .For  Set BONNr=$O(Bons("BON",BONNr)) Quit:BONNr=""  Do
  ..Set Node=$$NODE(BONNr)
- ..Set Rembours=Rembours+$S($$ISREMB^REMBOURS(KLNr,BONNr):##class(BL.Legacy.TRANSP).%New().GeefRemboursBedragVoorBon(BONNr),1:"")
+ ..Set Rembours=Rembours+$S($$ISREMB^REMBOURS(KLNr,BONNr):##class(BL.Legacy.TRANSP).%New().GeefRemboursBedragVoorBon(BONNr,KLNr),1:"")
  ..Set R=^KUL(KLNr,Node,BONNr,1),Gewicht=Gewicht+$J($P($P(R,D,13),"#",3),0,1)
  .If Rembours>0,'##class(CHUI.Flow.Cons.Transport).CheckMaximumRembours(VervRef,GroepNr,Rembours,1) Kill Bons Merge Bons=TempBons,ColList=TempColList Quit
  .Do:$P(sFL(1),D,2,3)'=(Rembours_D_Gewicht)
Index: BL/Legacy/TRANSP.cls.xml
===================================================================
diff -u -r55580 -r55587
--- BL/Legacy/TRANSP.cls.xml	(.../TRANSP.cls.xml)	(revision 55580)
+++ BL/Legacy/TRANSP.cls.xml	(.../TRANSP.cls.xml)	(revision 55587)
@@ -40,7 +40,7 @@
 </Method>
 
 <Method name="GeefRemboursBedragVoorBon">
-<FormalSpec>BONNr:%String</FormalSpec>
+<FormalSpec>BONNr:%String,KlantNr:%String=""</FormalSpec>
 <ReturnType>%Numeric</ReturnType>
 <Implementation><![CDATA[
 	#dim RemboursBedrag as %Numeric = 0
@@ -52,7 +52,7 @@
 			While BonLijnIterator.HasNext(){
 				#dim BonLijn as DOM.VKP.impl.DataM.DataMOrderVerwijzingOrderlijn = BonLijnIterator.Next()
 				try {
-					If $$$Not(..RemboursbedragStaatReedsOpBon(BonLijn.GeefOrderNr())) {
+					If $$$Not(..RemboursbedragStaatReedsOpBon(BonLijn.GeefSalesIdAX(),KlantNr)) {
 						set FactuurBedrag = ..GeefFactuurBedragMetKortingContantVerrekend(..InvoiceAmountService.GeefFactuurBedragen(BonLijn.GeefSalesIdAX()))
 						Set RemboursBedrag = RemboursBedrag + FactuurBedrag
 						Do ..Logger.Info("GeefRemboursBedragVoorBon","Bedrag inclusief korting contant voor factuur van verkoop '"_ FactuurBedrag _"' van bon '"_ BONNr _"' :" _ FactuurBedrag)
@@ -85,9 +85,9 @@
 </Method>
 
 <Method name="RemboursbedragStaatReedsOpBon">
-<FormalSpec>OrderID:%String</FormalSpec>
+<FormalSpec>SalesIdAX:%String,KlantNr:%String=""</FormalSpec>
 <ReturnType>%Boolean</ReturnType>
-<Implementation><![CDATA[	Quit ..OrderOpBonBepaler.HeeftOrderlijnenOpTransport(OrderID)
+<Implementation><![CDATA[	Quit ..OrderOpBonBepaler.HeeftOrderlijnenOpTransport(SalesIdAX, KlantNr)
 ]]></Implementation>
 </Method>
 </Class>