Index: vhUnitTest/APPS/common/VKP/MogelijkeLeverdatumsBepaler/Test.cls.xml
===================================================================
diff -u -r52709 -r54290
--- vhUnitTest/APPS/common/VKP/MogelijkeLeverdatumsBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 52709)
+++ vhUnitTest/APPS/common/VKP/MogelijkeLeverdatumsBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 54290)
@@ -49,7 +49,7 @@
 <Private>1</Private>
 <Implementation><![CDATA[
 	Set VerzendWijzeBepalerStub = ##class(vhTest.Mock.APPS.EC.impl.VerzendWijzeBepaler).%New()
-	Do VerzendWijzeBepalerStub.IndienMethodCall("GeefVerzendWijze", $$$ElkeWaarde).DanReturn("")
+	Do VerzendWijzeBepalerStub.IndienMethodCall("GeefVerzendWijze", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn("")
 	
 	Set VroegsteLeverDatumBepalerStub = ##class(vhTest.Mock.APPS.EC.impl.VroegsteLeverdatumBepaler).%New()
 	Do VroegsteLeverDatumBepalerStub.IndienMethodCall("GeefVroegsteLeverdatumPerLijn",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn(VroegsteLeverdatumList)
@@ -68,7 +68,7 @@
 	#dim LeegLeverAdres As DOM.VKP.LeverAdres = ""
 	
 	Set VerzendWijzeBepalerMock = ##class(vhTest.Mock.APPS.EC.impl.VerzendWijzeBepaler).%New()
-	Do VerzendWijzeBepalerMock.VerwachtMethodCall("GeefVerzendWijze", Winkelkar).ExactAantalKeer(1).DanReturn("")
+	Do VerzendWijzeBepalerMock.VerwachtMethodCall("GeefVerzendWijze", Winkelkar, LeegLeverAdres).ExactAantalKeer(1).DanReturn("")
 	
 	Set VroegsteLeverDatumBepalerStub = ##class(vhTest.Mock.APPS.EC.impl.VroegsteLeverdatumBepaler).%New()
 	Do VroegsteLeverDatumBepalerStub.IndienMethodCall("GeefVroegsteLeverdatumPerLijn",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn(##class(%ListOfDataTypes).%New())
@@ -88,7 +88,7 @@
 	Do LeverAdres.ZetVerzendingWijze("")
 	
 	Set VerzendWijzeBepalerMock = ##class(vhTest.Mock.APPS.EC.impl.VerzendWijzeBepaler).%New()
-	Do VerzendWijzeBepalerMock.VerwachtMethodCall("GeefVerzendWijze", Winkelkar).ExactAantalKeer(1).DanReturn("")
+	Do VerzendWijzeBepalerMock.VerwachtMethodCall("GeefVerzendWijze", Winkelkar, LeverAdres).ExactAantalKeer(1).DanReturn("")
 	
 	Set VroegsteLeverDatumBepalerStub = ##class(vhTest.Mock.APPS.EC.impl.VroegsteLeverdatumBepaler).%New()
 	Do VroegsteLeverDatumBepalerStub.IndienMethodCall("GeefVroegsteLeverdatumPerLijn",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn(##class(%ListOfDataTypes).%New())
@@ -108,7 +108,7 @@
 	Do LeverAdres.ZetVerzendingWijze("DI1")
 	
 	Set VerzendWijzeBepalerMock = ##class(vhTest.Mock.APPS.EC.impl.VerzendWijzeBepaler).%New()
-	Do VerzendWijzeBepalerMock.VerwachtMethodCall("GeefVerzendWijze", Winkelkar).ExactAantalKeer(0)
+	Do VerzendWijzeBepalerMock.VerwachtMethodCall("GeefVerzendWijze", Winkelkar, LeverAdres).ExactAantalKeer(1).DanReturn("")
 	
 	Set VroegsteLeverDatumBepalerStub = ##class(vhTest.Mock.APPS.EC.impl.VroegsteLeverdatumBepaler).%New()
 	Do VroegsteLeverDatumBepalerStub.IndienMethodCall("GeefVroegsteLeverdatumPerLijn",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn(##class(%ListOfDataTypes).%New())
@@ -125,13 +125,13 @@
 <Implementation><![CDATA[
 	#dim Winkelkar As DOM.EC.Winkelkar.Winkelkar = ##class(vhTest.Utils.DOM.EC.Winkelkar.Winkelkar).WinkelkarMetHerbestellingBijProbleem()
 
+	#dim LeverAdres as DOM.VKP.LeverAdres = ##class(vhTest.Utils.DOM.VKP.LeverAdres).Belgisch()
+	Do LeverAdres.ZetVerzendingWijze("AFH")
+
 	Set VerzendwijzeBepalerMock = ##class(vhTest.Mock.APPS.EC.impl.VerzendWijzeBepaler).%New()
 	#dim DeVerzendwijze as APPS.VKP.VerzendWijze = ##class(vhTest.Utils.APPS.VKP.VerzendWijze).GeefVerzendWijze()
-	Do VerzendwijzeBepalerMock.VerwachtMethodCall("GeefVerzendWijze",Winkelkar).DanReturn(DeVerzendwijze)
+	Do VerzendwijzeBepalerMock.VerwachtMethodCall("GeefVerzendWijze",Winkelkar, LeverAdres).DanReturn(DeVerzendwijze)
 	
-	#dim LeverAdres as DOM.VKP.LeverAdres = ##class(vhTest.Utils.DOM.VKP.LeverAdres).Belgisch()
-	Do LeverAdres.ZetVerzendingWijze("AFH")
-	
 	Set VroegsteLeverDatumBepalerMock = ##class(vhTest.Mock.APPS.EC.impl.VroegsteLeverdatumBepaler).%New()
 	Do VroegsteLeverDatumBepalerMock.IndienMethodCall("GeefVroegsteLeverdatum",Winkelkar,DeVerzendwijze).DanReturn($h)