Index: APPS/VKP/LeveringsTermijnSFS.cls.xml
===================================================================
diff -u -r59787 -r59788
--- APPS/VKP/LeveringsTermijnSFS.cls.xml	(.../LeveringsTermijnSFS.cls.xml)	(revision 59787)
+++ APPS/VKP/LeveringsTermijnSFS.cls.xml	(.../LeveringsTermijnSFS.cls.xml)	(revision 59788)
@@ -48,8 +48,8 @@
 	#dim LeverDatums As %String = ""
 	
 	#dim PickupDate As %Date = LeverDatum
-	#dim UntilPickupDate As %Date = ##class(TECH.DateTime).DatumBereken(LeverDatum, AantalWeken, ..#Weken)
-	#dim OrderDate As %Date = ##class(TECH.DateTime).%New().CurrentDate()
+	#dim UntilPickupDate As %Date = ..DateTimeAPI.DatumBereken(LeverDatum, AantalWeken, ..#Weken)
+	#dim OrderDate As %Date = ..DateTimeAPI.CurrentDate()
 	#dim SFSKalenderListIterator As TECH.Iterator = ..SFSKalenderRepository.ZoekViaPickupDateAndOrderDate(PickupDate, UntilPickupDate, ..OrderDate)
 	
 	While SFSKalenderListIterator.HasNext() {