Index: vhUnitTest/APPS/VKP/OfferteService/impl/NaarBerekenInputConverter/Test.cls.xml
===================================================================
diff -u -r33269 -r33484
--- vhUnitTest/APPS/VKP/OfferteService/impl/NaarBerekenInputConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 33269)
+++ vhUnitTest/APPS/VKP/OfferteService/impl/NaarBerekenInputConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 33484)
@@ -24,17 +24,17 @@
 
 <Method name="Test : Converteer">
 <Implementation><![CDATA[
-	#dim BerekenInputResult As APPS.TRANSP.OfferteService.dto.BerekenInput = ..NaarBerekenInputConverter.Convert(..GeefVerpakkingen(), ..GeefLeverAdres(), ..OfferteID)
+	#dim BerekenInputResult As APPS.TRANSP.OfferteService.dto.BerekenInput = ..NaarBerekenInputConverter.Convert(..GeefVerpakkingen(), ..GeefLeverAdres(), ..OfferteID, ..GeefHuidigeDatum())
 	#dim BerekenInputDummy As APPS.TRANSP.OfferteService.dto.BerekenInput = ..GeefBerekenInput()
 	
 	Do $$$AssertObject(BerekenInputResult.LeverAdres,BerekenInputDummy.LeverAdres)
 	Do $$$AssertEquals(BerekenInputResult.GewensteLeverDatum ,BerekenInputDummy.GewensteLeverDatum)
+	Do $$$AssertEquals(BerekenInputResult.VroegsteAfhaalDatum ,BerekenInputDummy.VroegsteAfhaalDatum)
 	Do $$$AssertEquals(BerekenInputResult.Referentie ,BerekenInputDummy.Referentie)
 	Do $$$AssertEquals(BerekenInputResult.TeVerzendenItems.Count(),BerekenInputDummy.TeVerzendenItems.Count())
 	Do $$$AssertObject(BerekenInputResult.TeVerzendenItems.GetAt(1).Afmeting,BerekenInputDummy.TeVerzendenItems.GetAt(1).Afmeting)
 	Do $$$AssertEquals(BerekenInputResult.TeVerzendenItems.GetAt(1).ProductID,BerekenInputDummy.TeVerzendenItems.GetAt(1).ProductID)
 	Do $$$AssertEquals(BerekenInputResult.TeVerzendenItems.GetAt(1).Gewicht,BerekenInputDummy.TeVerzendenItems.GetAt(1).Gewicht)
-	Do $$$AssertEquals(BerekenInputResult.TeVerzendenItems.GetAt(1).DatumBeschikbaar,BerekenInputDummy.TeVerzendenItems.GetAt(1).DatumBeschikbaar)
 	Do $$$AssertEquals(BerekenInputResult.TeVerzendenItems.GetAt(1).Aantal ,BerekenInputDummy.TeVerzendenItems.GetAt(1).Aantal)
 ]]></Implementation>
 </Method>
@@ -86,6 +86,7 @@
 	Set BerekenInput = ##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()
 	Set BerekenInput.Referentie = ..OfferteID
 	Set BerekenInput.LeverAdres = ..GeefInternationaalLeverAdres()
+	Set BerekenInput.VroegsteAfhaalDatum = ..GeefHuidigeDatum()
 
  	#dim TeVerzendItem As APPS.TRANSP.OfferteService.dto.TeverzendenItem = ##class(APPS.TRANSP.OfferteService.dto.TeverzendenItem).%New()
 	Set TeVerzendItem.Afmeting = ##class(APPS.TRANSP.OfferteService.dto.Afmeting).%New(40,50,60)
@@ -98,6 +99,13 @@
 	Quit BerekenInput
 ]]></Implementation>
 </Method>
+
+<Method name="GeefHuidigeDatum">
+<Private>1</Private>
+<ReturnType>%Date</ReturnType>
+<Implementation><![CDATA[	Quit ##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentDate()
+]]></Implementation>
+</Method>
 </Class>