Index: APPS/VKP/OfferteService/impl/NaarBerekenInputConverter.cls.xml
===================================================================
diff -u -r33270 -r33484
--- APPS/VKP/OfferteService/impl/NaarBerekenInputConverter.cls.xml	(.../NaarBerekenInputConverter.cls.xml)	(revision 33270)
+++ APPS/VKP/OfferteService/impl/NaarBerekenInputConverter.cls.xml	(.../NaarBerekenInputConverter.cls.xml)	(revision 33484)
@@ -4,15 +4,17 @@
 <Super>TECH.Mockable</Super>
 
 <Method name="Convert">
-<FormalSpec>Verpakkingen:APPS.VKP.Offerte.dto.VerpakkingList,LeverAdres:DOM.VKP.LeverAdres,OfferteId:%String</FormalSpec>
+<FormalSpec>Verpakkingen:APPS.VKP.Offerte.dto.VerpakkingList,LeverAdres:DOM.VKP.LeverAdres,OfferteId:%String,VroegsteAfhaalDatum:%Date</FormalSpec>
 <ReturnType>APPS.TRANSP.OfferteService.dto.BerekenInput</ReturnType>
 <Implementation><![CDATA[
 	Set BerekenInput = ##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()
 	
 	Set BerekenInput.LeverAdres = ..NaarInternationaalAdresConvert(LeverAdres)
 	
+	Set BerekenInput.VroegsteAfhaalDatum = VroegsteAfhaalDatum
+	
 	Set BerekenInput.Referentie = OfferteId
-	/// Set BerekenInput.GewensteLeverDatum = ???	
+
 	if ($IsObject(Verpakkingen) && Verpakkingen.Count() > 0)
 	{
 		set Iterator = ##class(TECH.ListIterator).%New(Verpakkingen)
@@ -56,7 +58,6 @@
 	Set TeVerzendItem.Afmeting = Verpakking.Afmeting.%ConstructClone()
 	Set TeVerzendItem.Aantal = Verpakking.Aantal
 	Set TeVerzendItem.ProductID = Verpakking.ProductID
-	///Set TeVerzendItem.DatumBeschikbaar = ???
 	Quit TeVerzendItem
 ]]></Implementation>
 </Method>