Index: vhUnitTest/APPS/TRANSP/UPS/impl/OfferteBerekenaar/BerekenInputValidator/Test.cls.xml
===================================================================
diff -u -r33008 -r33023
--- vhUnitTest/APPS/TRANSP/UPS/impl/OfferteBerekenaar/BerekenInputValidator/Test.cls.xml	(.../Test.cls.xml)	(revision 33008)
+++ vhUnitTest/APPS/TRANSP/UPS/impl/OfferteBerekenaar/BerekenInputValidator/Test.cls.xml	(.../Test.cls.xml)	(revision 33023)
@@ -252,7 +252,7 @@
 <Implementation><![CDATA[
 	#dim BerekenInput As APPS.TRANSP.OfferteService.dto.BerekenInput = ##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()
 	Set BerekenInput.Referentie = "1"
-	Set BerekenInput.GewensteLeverDatum = ##class(TECH.DateTime).TextToDate("11/03/2016")
+	Set BerekenInput.GewensteLeverDatum = ..GeefGeldigeDatum()
 	Set BerekenInput.LeverAdres = LeverAdres
 	
 	Do ..VoegDetailLijnenToe(BerekenInput)
@@ -304,10 +304,8 @@
 	#dim BerekenInput As APPS.TRANSP.OfferteService.dto.BerekenInput = ##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()
 	Set BerekenInput.Referentie = "1"
 	
-	Set HuidigeDatum = ##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentDate()
-	Set GeldigeDatum = ##class(TECH.DateTime).DatumBereken(HuidigeDatum,10, ##class(TECH.enu.DatePart).Dag())
 
-	Set BerekenInput.GewensteLeverDatum = GeldigeDatum
+	Set BerekenInput.GewensteLeverDatum = ..GeefGeldigeDatum()
 	Set BerekenInput.LeverAdres = ##class(APPS.TRANSP.dto.InternationaalAdres).%New()
 	Set BerekenInput.LeverAdres.ProvincieCode = ""
 	Set BerekenInput.LeverAdres.LandCode = "BE"
@@ -319,6 +317,14 @@
 	Quit BerekenInput
 ]]></Implementation>
 </Method>
+
+<Method name="GeefGeldigeDatum">
+<ReturnType>%Date</ReturnType>
+<Implementation><![CDATA[
+	Set HuidigeDatum = ##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentDate()
+	Quit ##class(TECH.DateTime).DatumBereken(HuidigeDatum,10, ##class(TECH.enu.DatePart).Dag())
+]]></Implementation>
+</Method>
 </Class>