Index: vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/VroegsteAfhaalDatum/Test.cls.xml
===================================================================
diff -u -r33580 -r33583
--- vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/VroegsteAfhaalDatum/Test.cls.xml	(.../Test.cls.xml)	(revision 33580)
+++ vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/VroegsteAfhaalDatum/Test.cls.xml	(.../Test.cls.xml)	(revision 33583)
@@ -7,14 +7,23 @@
 
 <Method name="Test : VroegsteAfhaalGatum geeft een datum terug">
 <Implementation><![CDATA[
-	
 	#dim VroegsteLeverDatumBepalerSpy As vhTest.Spy.APPS.EC.impl.VroegsteLeverdatumBepaler = ##Class(vhTest.Spy.APPS.EC.impl.VroegsteLeverdatumBepaler).%New()
 	#dim WinkelKarService As vhUnitTest.APPS.EC.Winkelkar.WinkelkarService.SubClass = ##class(vhUnitTest.APPS.EC.Winkelkar.WinkelkarService.SubClass).%New("","","","",VroegsteLeverDatumBepalerSpy)
 	#dim VroegsteAfhaalDatum As %Date = WinkelKarService.GeefVroegsteAfhaalDatum("DummyWinkelKarID")
 
 	Do $$$AssertEquals(VroegsteAfhaalDatum,VroegsteLeverDatumBepalerSpy.VroegsteAfhaaldatum)
 ]]></Implementation>
 </Method>
+
+<Method name="Test : VroegsteAfhaalGatum gebruikt verzendwijze afhalen">
+<Implementation><![CDATA[
+	#dim VroegsteLeverDatumBepalerSpy As vhTest.Spy.APPS.EC.impl.VroegsteLeverdatumBepaler = ##Class(vhTest.Spy.APPS.EC.impl.VroegsteLeverdatumBepaler).%New()
+	#dim WinkelKarService As vhUnitTest.APPS.EC.Winkelkar.WinkelkarService.SubClass = ##class(vhUnitTest.APPS.EC.Winkelkar.WinkelkarService.SubClass).%New("","","","",VroegsteLeverDatumBepalerSpy)
+	#dim VroegsteAfhaalDatum As %Date = WinkelKarService.GeefVroegsteAfhaalDatum("DummyWinkelKarID")
+
+	Do $$$AssertTrue(VroegsteLeverDatumBepalerSpy.Verzendwijze.IsAfhaling())
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhTest/Spy/APPS/EC/impl/VroegsteLeverdatumBepaler.cls.xml
===================================================================
diff -u -r33580 -r33583
--- vhTest/Spy/APPS/EC/impl/VroegsteLeverdatumBepaler.cls.xml	(.../VroegsteLeverdatumBepaler.cls.xml)	(revision 33580)
+++ vhTest/Spy/APPS/EC/impl/VroegsteLeverdatumBepaler.cls.xml	(.../VroegsteLeverdatumBepaler.cls.xml)	(revision 33583)
@@ -9,11 +9,16 @@
 <Type>%Date</Type>
 </Property>
 
+<Property name="Verzendwijze">
+<Type>APPS.VKP.VerzendWijze</Type>
+</Property>
+
 <Method name="GeefVroegsteLeverdatum">
 <FormalSpec>Winkelkar:DOM.EC.Winkelkar.Winkelkar,Verzendwijze:APPS.VKP.VerzendWijze=""</FormalSpec>
 <ReturnType>%Date</ReturnType>
 <Implementation><![CDATA[
 	Set ..VroegsteAfhaaldatum = ##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentDate()
+	Set ..Verzendwijze = Verzendwijze
 	quit ..VroegsteAfhaaldatum
 ]]></Implementation>
 </Method>