Index: vhUnitTest/Prod/VoorraadBeweging/AxReferentieBepaler/Test.cls.xml
===================================================================
diff -u -r54451 -r54462
--- vhUnitTest/Prod/VoorraadBeweging/AxReferentieBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 54451)
+++ vhUnitTest/Prod/VoorraadBeweging/AxReferentieBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 54462)
@@ -149,6 +149,7 @@
 	#dim BonDummy As DOM.VKP.Bon = ##class(vhTest.Mock.DOM.VKP.Bon).%New()
 	
 	Do ..OrderApiMock.IndienMethodCall("BestaatBon", ..#BonNummer).DanReturn($$$True)
+	Do ..ToeleveringApiMock.IndienMethodCall("BestaatToelevering", ..#BonNummer).DanReturn($$$False)
 	Do ..OrderApiMock.IndienMethodCall("GeefBon", ..#BonNummer, "F").DanReturn(BonDummy)
 	
 	#dim AxReferentieBepaler As Prod.VoorraadBeweging.AxReferentieBepaler = ##class(Prod.VoorraadBeweging.AxReferentieBepaler).%New(..#BonNummer, ..#LijnNummer, ..OrderApiMock, ..ToeleveringApiMock, ..TranslatorFake)
Index: Prod/VoorraadBeweging/AxReferentieBepaler.cls.xml
===================================================================
diff -u -r54451 -r54462
--- Prod/VoorraadBeweging/AxReferentieBepaler.cls.xml	(.../AxReferentieBepaler.cls.xml)	(revision 54451)
+++ Prod/VoorraadBeweging/AxReferentieBepaler.cls.xml	(.../AxReferentieBepaler.cls.xml)	(revision 54462)
@@ -89,48 +89,40 @@
 	#dim UniekLijnNummer As %Integer
 	
 	If (($$$HasLength(BonOfToeleveringNummer)) && ($$$HasLength(LijnNummer))) {
-		Set IsBon = ..OrderApi.BestaatBon(BonOfToeleveringNummer)
-		If $$$Not(IsBon) {
-			Set IsToelevering = ..ToeleveringApi.BestaatToelevering(BonOfToeleveringNummer)
-		}
-	}
-	
-	If IsBon {
-		Set Bon = ..OrderApi.GeefBon(BonOfToeleveringNummer)
-		If $Data(^BON("IU",BonOfToeleveringNummer,LijnNummer)) {
+		If (..IsBon(BonOfToeleveringNummer) && ($Data(^BON("IU",BonOfToeleveringNummer,LijnNummer)))) {
+			Set Bon = ..OrderApi.GeefBon(BonOfToeleveringNummer)
 			Set UniekLijnNummer = ^BON("IU",BonOfToeleveringNummer,LijnNummer)
 			Set BonLijn = Bon.GeefBonLijnViaVolgnummer(UniekLijnNummer)
 			Set ..AxConfigId = BonLijn.GeefAxConfigId()
 			Set ..AxInventTransId = BonLijn.GeefAxInventTransId()
 			Set ..AxItemId = BonLijn.GeefAxMaatwerkGenerischItemId()
-		} Else {
-			Do ..ZetIdsLeeg()
-		}
-	} ElseIf IsToelevering {
-		Set Toelevering = ..ToeleveringApi.GeefToelevering(BonOfToeleveringNummer)
-		If $Data(^TO("IU",BonOfToeleveringNummer,LijnNummer)) {
+		} ElseIf (..IsToelevering(BonOfToeleveringNummer) && ($Data(^TO("IU",BonOfToeleveringNummer,LijnNummer)))) {
+			Set Toelevering = ..ToeleveringApi.GeefToelevering(BonOfToeleveringNummer)
 			Set UniekLijnNummer = ^TO("IU",BonOfToeleveringNummer,LijnNummer)
 			Set ToeleveringLijn = Toelevering.GeefToeleveringLijnViaVolgNr(UniekLijnNummer)
 			Set ..AxConfigId = ToeleveringLijn.GeefAxConfigId()
 			Set ..AxInventTransId = ToeleveringLijn.GeefAxInventTransId()
 			Set ..AxItemId = ToeleveringLijn.GeefAxMaatwerkGenerischItemId()
-		} Else {
-			Do ..ZetIdsLeeg()
 		}
-	} Else {
-		Do ..ZetIdsLeeg()
 	}
 ]]></Implementation>
 </Method>
 
-<Method name="ZetIdsLeeg">
+<Method name="IsBon">
+<FormalSpec>BonOfToeleveringNummer:%Integer</FormalSpec>
 <Private>1</Private>
-<Implementation><![CDATA[
-	Set ..AxConfigId = ""
-	Set ..AxInventTransId = ""
-	Set ..AxItemId = ""
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ..OrderApi.BestaatBon(BonOfToeleveringNummer)
 ]]></Implementation>
 </Method>
+
+<Method name="IsToelevering">
+<FormalSpec>BonOfToeleveringNummer:%Integer</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ..ToeleveringApi.BestaatToelevering(BonOfToeleveringNummer)
+]]></Implementation>
+</Method>
 </Class>