Index: vhUnitTest/APPS/common/VKP/MogelijkeLeverdatumsBepaler/Test.cls.xml
===================================================================
diff -u -r45021 -r52709
--- vhUnitTest/APPS/common/VKP/MogelijkeLeverdatumsBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 45021)
+++ vhUnitTest/APPS/common/VKP/MogelijkeLeverdatumsBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 52709)
@@ -120,6 +120,28 @@
 	Do VerzendWijzeBepalerMock.Verifieer()
 ]]></Implementation>
 </Method>
+
+<Method name="Test winkelkar Met levadres en verzendingswijze en HerbestellingBijProbleem word de verzendwijze door de verzendwijzebepaler bepaald">
+<Implementation><![CDATA[
+	#dim Winkelkar As DOM.EC.Winkelkar.Winkelkar = ##class(vhTest.Utils.DOM.EC.Winkelkar.Winkelkar).WinkelkarMetHerbestellingBijProbleem()
+
+	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)
+	
+	#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)
+
+	Set MogelijkeLeverdatumsBepaler = ##class(APPS.common.VKP.MogelijkeLeverdatumsBepaler).%New(VerzendwijzeBepalerMock,VroegsteLeverDatumBepalerMock)	
+	Do MogelijkeLeverdatumsBepaler.GeefMogelijkeLeverdatums(Winkelkar, LeverAdres)
+	
+	
+	Do VerzendwijzeBepalerMock.Verifieer()
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: APPS/common/VKP/MogelijkeLeverdatumsBepaler.cls.xml
===================================================================
diff -u -r44644 -r52709
--- APPS/common/VKP/MogelijkeLeverdatumsBepaler.cls.xml	(.../MogelijkeLeverdatumsBepaler.cls.xml)	(revision 44644)
+++ APPS/common/VKP/MogelijkeLeverdatumsBepaler.cls.xml	(.../MogelijkeLeverdatumsBepaler.cls.xml)	(revision 52709)
@@ -71,7 +71,7 @@
 <Implementation><![CDATA[
 	Quit:(LeverAdres="") ..VerzendWijzeBepaler.GeefVerzendWijze(Winkelkar)
 	Quit:(LeverAdres.GeefVerzendingWijze()="") ..VerzendWijzeBepaler.GeefVerzendWijze(Winkelkar)
-	
+	Quit:(Winkelkar.HeeftHerbestellingBijProbleem()) ..VerzendWijzeBepaler.GeefVerzendWijze(Winkelkar)
 	Quit ##class(APPS.VKP.VerzendWijze).%New(Winkelkar.GeefKlantID(), LeverAdres.GeefVerzendingWijze(), LeverAdres.GeefLand().GeefCode(), LeverAdres.GeefPostcode())
 ]]></Implementation>
 </Method>