Index: APPS/VKP/LeveringsTermijnSFS.cls.xml
===================================================================
diff -u -r55795 -r55800
--- APPS/VKP/LeveringsTermijnSFS.cls.xml	(.../LeveringsTermijnSFS.cls.xml)	(revision 55795)
+++ APPS/VKP/LeveringsTermijnSFS.cls.xml	(.../LeveringsTermijnSFS.cls.xml)	(revision 55800)
@@ -69,10 +69,7 @@
 <Method name="GetVroegsteLeverDag">
 <FormalSpec>PickDatum:%Date</FormalSpec>
 <ReturnType>%Date</ReturnType>
-<Implementation><![CDATA[
-	#dim LeverDatum As %Date = ..GetVroegsteLevering(PickDatum)
-	#dim LeverDag As %Date = ..AfrondenLeverDag(LeverDatum)
-	Quit LeverDag
+<Implementation><![CDATA[	Quit ..SFSKalenderRepository.GeefVroegsteDeliveryDateViaPickupDate(PickDatum)
 ]]></Implementation>
 </Method>
 </Class>