Index: WS/EC/Unishop/InternationaleZending/Service.cls.xml
===================================================================
diff -u -r36529 -r36534
--- WS/EC/Unishop/InternationaleZending/Service.cls.xml	(.../Service.cls.xml)	(revision 36529)
+++ WS/EC/Unishop/InternationaleZending/Service.cls.xml	(.../Service.cls.xml)	(revision 36534)
@@ -288,14 +288,12 @@
 	If ..BerekeningFoutenRepository.BestaatViaOfferteID(BerekenInput.Referentie)
 	{
 		Set BerekeningFouten = ..BerekeningFoutenRepository.GeefViaOfferteID(BerekenInput.Referentie)
-		Set BerekeningFouten.Foutmeldingen = ..VoegToeBerekenInputAanContent(Content,BerekenInput)
-		Do BerekeningFouten.Save()
 	} else {
 		Set BerekeningFouten = ..BerekeningFoutenRepository.Maak()
 		Set BerekeningFouten.OfferteID = BerekenInput.Referentie
-		Set BerekeningFouten.Foutmeldingen = Content
-		Do BerekeningFouten.Save()
 	}
+	Set BerekeningFouten.Foutmeldingen = ..VoegToeBerekenInputAanContent(Content,BerekenInput)
+	Do BerekeningFouten.Save()
 ]]></Implementation>
 </Method>
 
@@ -304,25 +302,8 @@
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	#Dim BerekenInputString As %String = BerekenInput.Referentie _$C(13,10)
-	Set BerekenInputString = BerekenInputString _BerekenInput.LeverAdres.Naam _$C(13,10)
-	Set BerekenInputString = BerekenInputString _BerekenInput.LeverAdres.Taal _$C(13,10)
-	Set BerekenInputString = BerekenInputString _BerekenInput.LeverAdres.Straat _$C(13,10)
-	Set BerekenInputString = BerekenInputString _BerekenInput.LeverAdres.Postcode _" " _BerekenInput.LeverAdres.Woonplaats _$C(13,10)
-	Set BerekenInputString = BerekenInputString _BerekenInput.LeverAdres.LandCode _$C(13,10)
-	Set BerekenInputString = BerekenInputString _##class(TECH.DateTime).GeefDatumInPuntNotatie(BerekenInput.VroegsteAfhaalDatum) _$C(13,10) _$C(13,10)
-	Set BerekenInputString = BerekenInputString _"vhintra:vkp-externeofferteverwerking-presentation-mainview?offerteId=" _BerekenInput.Referentie _$C(13,10) _$C(13,10)
-	#Dim BerekenInputIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(BerekenInput)
-	While BerekenInputIterator.HasNext()
-	{
-		#Dim TeVerzendItem As APPS.TRANSP.OfferteService.dto.TeverzendenItem = BerekenInputIterator.Next()
-		Set BerekenInputString = BerekenInputString _TeVerzendItem.ProductID _$C(13,10)	
-		Set BerekenInputString = BerekenInputString _TeVerzendItem.Gewicht _$C(13,10)	
-		Set BerekenInputString = BerekenInputString _TeVerzendItem.Afmeting.Breedte _TeVerzendItem.Afmeting.Hoogte _TeVerzendItem.Afmeting.Lengte _$C(13,10)	
-		Set BerekenInputString = BerekenInputString _TeVerzendItem.Aantal _$C(13,10)	
-		Set BerekenInputString = BerekenInputString _TeVerzendItem.WaardeGoederen _$C(13,10)	
-	}
-	Quit BerekenInputString _$C(13,10) _Content
+	#Dim VhintraLink As %String = "vhintra:vkp-externeofferteverwerking-presentation-mainview?offerteId=" _BerekenInput.Referentie _$C(13,10) _$C(13,10)
+	Quit VhintraLink _BerekenInput.ToDisplayStream() _$C(13,10) _Content
 ]]></Implementation>
 </Method>
 
Index: WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml
===================================================================
diff -u -r36515 -r36534
--- WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml	(.../ZendingDetails.cls.xml)	(revision 36515)
+++ WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml	(.../ZendingDetails.cls.xml)	(revision 36534)
@@ -91,7 +91,7 @@
 	{
 		Set ExceptionString = ExceptionString _$C(13,10) _DetailsIterator.Next()
 	}
-	Set ExceptionString = ExceptionString _$C(13,10) _"-----------------------------------------------------------------------"
+	Set ExceptionString = ExceptionString _$C(13,10) _$C(13,10)
 	#Dim ExceptionsIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(Exceptions)
 	While ExceptionsIterator.HasNext()
 	{