Index: WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml
===================================================================
diff -u -r34522 -r34834
--- WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml	(.../ZendingDetails.cls.xml)	(revision 34522)
+++ WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml	(.../ZendingDetails.cls.xml)	(revision 34834)
@@ -28,7 +28,9 @@
 <Method name="ZetVertaler">
 <FormalSpec>Taal:DOM.enu.Taal</FormalSpec>
 <Private>1</Private>
-<Implementation><![CDATA[	Set ..Vertaler = ##class(DOM.DomeinContext).Instance().GeefVertaalAPI().GeefVertaler(Taal, ##class(DOM.common.Transl.enu.VertaalGroep).Unishop(), ##class(DOM.common.Transl.enu.VertaalGroep).Algemeen())
+<Implementation><![CDATA[
+	if Taal = "" { Set Taal = "E"}
+	Set ..Vertaler = ##class(DOM.DomeinContext).Instance().GeefVertaalAPI().GeefVertaler(Taal, ##class(DOM.common.Transl.enu.VertaalGroep).Unishop(), ##class(DOM.common.Transl.enu.VertaalGroep).Algemeen())
 ]]></Implementation>
 </Method>
 
@@ -44,7 +46,6 @@
 	While TransportFirmas.HasNext() {
 		#dim TransportFirma As %String = TransportFirmas.Next()
 		#dim OfferteData As APPS.TRANSP.OfferteService.dto.OfferteData = ..TransportOfferteService.BerekenOfferte(TransportFirma, BerekenInput)
-		
 		#dim OfferteDataIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(OfferteData.Items)
 		While OfferteDataIterator.HasNext()	{
 			Do ZendingDetails.Insert(..GeefZendingDetail(TransportFirma, OfferteDataIterator.Next()))
@@ -65,6 +66,7 @@
 	Set ZendingDetail.LeverDatum = OfferteItem.LeverDatum
 	Set ZendingDetail.LeverTijd = OfferteItem.LeverTijd
 	Set ZendingDetail.LeverDag = ..ConverteerLeverDag(OfferteItem.LeverDag)
+	Set ZendingDetail.Duurtijd = OfferteItem.Duurtijd 
 	Set ZendingDetail.Omschrijving = OfferteItem.Omschrijving
 	Set ZendingDetail.ExtraInfo = ..Vertaler.GeefVertaling(OfferteItem.Omschrijving)
 	Set ZendingDetail.KostPrijs = OfferteItem.Kostprijs
@@ -104,13 +106,14 @@
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	Quit:OfferteLeverDag="Mon" ..Vertaler.GeefVertaling("Maandag_Kort")
-	Quit:OfferteLeverDag="Tue" ..Vertaler.GeefVertaling("Dinsdag_Kort")
-	Quit:OfferteLeverDag="Wed" ..Vertaler.GeefVertaling("Woensdag_Kort")
-	Quit:OfferteLeverDag="Thu" ..Vertaler.GeefVertaling("Donderdag_Kort")
-	Quit:OfferteLeverDag="Fri" ..Vertaler.GeefVertaling("Vrijdag_Kort")
-	Quit:OfferteLeverDag="Sat" ..Vertaler.GeefVertaling("Zaterdag_Kort")
-	Quit:OfferteLeverDag="Sun" ..Vertaler.GeefVertaling("Zondag_Kort")
+	Set OfferteLeverDag = ##class(TECH.StringUtils).ToUpper(OfferteLeverDag)
+	Quit:OfferteLeverDag="MON" ..Vertaler.GeefVertaling("Maandag_Kort")
+	Quit:OfferteLeverDag="TUE" ..Vertaler.GeefVertaling("Dinsdag_Kort")
+	Quit:OfferteLeverDag="WED" ..Vertaler.GeefVertaling("Woensdag_Kort")
+	Quit:OfferteLeverDag="THU" ..Vertaler.GeefVertaling("Donderdag_Kort")
+	Quit:OfferteLeverDag="FRI" ..Vertaler.GeefVertaling("Vrijdag_Kort")
+	Quit:OfferteLeverDag="SAT" ..Vertaler.GeefVertaling("Zaterdag_Kort")
+	Quit:OfferteLeverDag="SUN" ..Vertaler.GeefVertaling("Zondag_Kort")
 	Quit ""
 ]]></Implementation>
 </Method>
Index: APPS/EC/impl/VroegsteLeverdatumBepaler.cls.xml
===================================================================
diff -u -r33580 -r34834
--- APPS/EC/impl/VroegsteLeverdatumBepaler.cls.xml	(.../VroegsteLeverdatumBepaler.cls.xml)	(revision 33580)
+++ APPS/EC/impl/VroegsteLeverdatumBepaler.cls.xml	(.../VroegsteLeverdatumBepaler.cls.xml)	(revision 34834)
@@ -22,7 +22,7 @@
 		Set VerzendWijze = ##class(APPS.EC.impl.VerzendWijzeBepaler).%New().GeefVerzendWijze(Winkelkar)	
 	}
 	Set ..LeveringTermijn = ##class(APPS.VKP.LeveringsTermijn).%New(##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog(),VerzendWijze)
-	
+
 	#dim Datum As %Date = ..LeveringTermijn.GetVroegsteDatumFromTermijn($LB(1,"A"))
 	Set Datum = ..LeveringTermijn.GetPickDatumMagazijnGesloten(Datum)
 	Set ..VroegsteLeverdatum = ..LeveringTermijn.GetVroegsteLevering(Datum)
@@ -32,7 +32,6 @@
 		#dim Lijn As DOM.EC.Winkelkar.Lijn = Iterator.Next()
 		Do Lijn.Accept(##this)
 	}
-
 	Quit ..LeveringTermijn.AfrondenLeverDag(..VroegsteLeverdatum)
 ]]></Implementation>
 </Method>
Index: WS/EC/Unishop/InternationaleZending/Service.cls.xml
===================================================================
diff -u -r34620 -r34834
--- WS/EC/Unishop/InternationaleZending/Service.cls.xml	(.../Service.cls.xml)	(revision 34620)
+++ WS/EC/Unishop/InternationaleZending/Service.cls.xml	(.../Service.cls.xml)	(revision 34834)
@@ -51,9 +51,8 @@
 	#dim Verpakkingen As APPS.VKP.Offerte.dto.VerpakkingList = ..OfferteService.GeefProductVerpakkingDetails(OfferteID)
 	#dim LeverAdres As DOM.VKP.LeverAdres = ..OfferteService.GeefLeverAdres(OfferteID)
 	#dim VroegsteAfhaalDatum As %Date = ..GeefVroegsteAfhaalDatum(OfferteID)
-	 
-	#dim BerekenInput As APPS.TRANSP.OfferteService.dto.BerekenInput = ..NaarBerekenInputConverter.Convert(Verpakkingen, LeverAdres, OfferteID, VroegsteAfhaalDatum)
 	
+	#dim BerekenInput As APPS.TRANSP.OfferteService.dto.BerekenInput = ..NaarBerekenInputConverter.Convert(Verpakkingen, LeverAdres, OfferteID, VroegsteAfhaalDatum)
 	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = ..ZendingDetails.GeefZendingDetails(BerekenInput, Taal)
 
 	Do ..BewaarVerzendingMogelijkheden(OfferteID, VerzendingMogelijkheden)
@@ -106,8 +105,9 @@
 <FormalSpec>OfferteID:%String,VerzendingMogelijkheden:WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
+	Do ..VerzendingMogelijkheidRepository.VerwijderViaOfferteID(OfferteID)
+	
 	#dim VerzendingMogelijkhedenIterator AS TECH.ListIterator = ##class(TECH.ListIterator).%New(VerzendingMogelijkheden)
-	 
 	while VerzendingMogelijkhedenIterator.HasNext() {
 		#dim VerzendingMogelijkheid As WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid = ..VerzendingConverteer(OfferteID, VerzendingMogelijkhedenIterator.Next())
 		Do ..VerzendingMogelijkheidRepository.Bewaar(VerzendingMogelijkheid)
@@ -139,7 +139,7 @@
 	Set VerzendingItem.KostPrijs = Verzending.KostPrijs
 	Set VerzendingItem.LeverDag = Verzending.LeverDag
 	Set VerzendingItem.LeverDatum = Verzending.LeverDatum 
-	Set VerzendingItem.LeverTijd = $ZTIMEH(Verzending.LeverTijd ,2) 
+	Set VerzendingItem.LeverTijd = Verzending.LeverTijd
 	Set VerzendingItem.Omschrijving = Verzending.Omschrijving
 	Set VerzendingItem.TransportFirma = Verzending.TransportFirma
 	Set VerzendingItem.Optie = ..CarbonNeutralConverteerder(Verzending.Optie)