Index: APPS/EDI/Bestel/impl/BestelService/UnishopBesteller.cls.xml
===================================================================
diff -u -r53165 -r53170
--- APPS/EDI/Bestel/impl/BestelService/UnishopBesteller.cls.xml	(.../UnishopBesteller.cls.xml)	(revision 53165)
+++ APPS/EDI/Bestel/impl/BestelService/UnishopBesteller.cls.xml	(.../UnishopBesteller.cls.xml)	(revision 53170)
@@ -63,6 +63,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="LeverdatumBepaler">
+<Type>APPS.EDI.Bestel.impl.BestelService.PlaatsBestelling.LeverdatumBepaler</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>ExterneVerkoopService:APPS.EC.Verkoop.ExterneVerkoopService,ProductConverter:APPS.EDI.common.impl.ProductConverter,OfferteService:APPS.VKP.OfferteService,OrderIngaveService:APPS.VKP.OrderIngaveService,OfferteHoofding:APPS.EC.dto.Hoofding,ProductValidator:APPS.EDI.common.impl.ProductValidator,VroegsteLeverdatumBepaler:APPS.EC.impl.VroegsteLeverdatumBepaler,WinkelkarRepository:DOM.EC.Winkelkar.impl.WinkelkarRepository,OfferteRepository:APPS.VKP.Offerte.impl.OfferteRepository</FormalSpec>
 <Private>1</Private>
@@ -80,6 +85,8 @@
 	Set ..OfferteRepository = $$$Inject(OfferteRepository,##class(APPS.VKP.Offerte.impl.OfferteRepository).%New())
 	Set ..VroegsteLeverdatumBepaler = $$$Inject(VroegsteLeverdatumBepaler, ##class(APPS.EC.impl.VroegsteLeverdatumBepaler).%New())
 	Set ..WinkelkarRepository = $$$Inject(WinkelkarRepository,##class(DOM.EC.Winkelkar.impl.WinkelkarRepository).%New())
+	Set ..LeverdatumBepaler = ##class(APPS.EDI.Bestel.impl.BestelService.PlaatsBestelling.LeverdatumBepaler).%New()
+	
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -286,7 +293,7 @@
 <Private>1</Private>
 <Implementation><![CDATA[
 	#dim VroegsteLeverdatum As %Date = ..VroegsteLeverdatumBepaler.GeefVroegsteLeverdatum(..WinkelkarRepository.GeefViaID(Offerte.GeefWinkelkarID()))
-	Set ..OfferteHoofding.LeveringDetail.Datum = ##class(APPS.EDI.Bestel.impl.BestelService.PlaatsBestelling.LeverdatumBepaler).%New().GeefLeverdatum(..Aanvraag.Header.PersonalityID, ..Aanvraag.Order.GevraagdeLeverdatum, VroegsteLeverdatum)
+	Set ..OfferteHoofding.LeveringDetail.Datum = ..LeverdatumBepaler.GeefLeverdatum(..Aanvraag.Header.PersonalityID, ..Aanvraag.Order.GevraagdeLeverdatum, VroegsteLeverdatum)
 ]]></Implementation>
 </Method>
 </Class>