Index: WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml
===================================================================
diff -u -r37071 -r37073
--- WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml	(.../ZendingDetails.cls.xml)	(revision 37071)
+++ WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml	(.../ZendingDetails.cls.xml)	(revision 37073)
@@ -81,8 +81,8 @@
 			Do ..VoegToeAanList(.OfferteDetails, OfferteData.Details)
 			#dim OfferteDataIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(OfferteData.Items)
 			While OfferteDataIterator.HasNext()	{
-				Set OfferteDataItem = OfferteDataIterator.Next()
-				Set ZendingDetail = ..GeefZendingDetail(TransportFirma, OfferteDataItem)
+				#dim OfferteDataItem As APPS.TRANSP.OfferteService.dto.OfferteItem = OfferteDataIterator.Next()
+				#dim ZendingDetail As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheid = ..GeefZendingDetail(TransportFirma, OfferteDataItem)
 				Do ZendingDetails.VerzendingMogelijkheidList.Insert(ZendingDetail)
 				Do ..VerzendingMogelijkheidRepository.Bewaar(..ConverteerZendingDetail(BerekenInput.Referentie, ZendingDetail, OfferteDataItem))
 			} 
@@ -202,16 +202,17 @@
 <Private>1</Private>
 <ReturnType>WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.VerzendingMogelijkheid</ReturnType>
 <Implementation><![CDATA[
+	#dim VerzendingMogelijkheid As WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.VerzendingMogelijkheid
 	Set VerzendingMogelijkheid = ..VerzendingMogelijkheidRepository.Maak()
 	Set VerzendingMogelijkheid.ID = ZendingDetail.Code
 	Set VerzendingMogelijkheid.OfferteID = OfferteID
 	Set VerzendingMogelijkheid.TransporteurID = ZendingDetail.TransportFirma
-	Set VerzendingMogelijkheid.Verzending = ..ConverteerVerzendMogelijkheid(ZendingDetail, OfferteItem)
+	Set VerzendingMogelijkheid.Verzending = ..ConverteerVerzendingMogelijkheid(ZendingDetail, OfferteItem)
 	Quit VerzendingMogelijkheid
 ]]></Implementation>
 </Method>
 
-<Method name="ConverteerVerzendMogelijkheid">
+<Method name="ConverteerVerzendingMogelijkheid">
 <FormalSpec>ZendingDetail:WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheid,OfferteItem:APPS.TRANSP.OfferteService.dto.OfferteItem</FormalSpec>
 <ReturnType>WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.VerzendingItem</ReturnType>
 <Implementation><![CDATA[
Index: vhTest/Mock/WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml
===================================================================
diff -u -r37041 -r37073
--- vhTest/Mock/WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml	(.../ZendingDetails.cls.xml)	(revision 37041)
+++ vhTest/Mock/WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml	(.../ZendingDetails.cls.xml)	(revision 37073)
@@ -23,10 +23,10 @@
 ]]></Implementation>
 </Method>
 
-<Method name="ConverteerVerzendMogelijkheid">
+<Method name="ConverteerVerzendingMogelijkheid">
 <FormalSpec>ZendingDetail:WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheid,OfferteItem:APPS.TRANSP.OfferteService.dto.OfferteItem</FormalSpec>
 <ReturnType>WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.VerzendingItem</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("ConverteerVerzendMogelijkheid",ZendingDetail,OfferteItem)
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("ConverteerVerzendingMogelijkheid",ZendingDetail,OfferteItem)
 ]]></Implementation>
 </Method>
 
Index: vhTest/Utils/APPS/TRANSP/OfferteService/dto/OfferteData.cls.xml
===================================================================
diff -u -r33887 -r37073
--- vhTest/Utils/APPS/TRANSP/OfferteService/dto/OfferteData.cls.xml	(.../OfferteData.cls.xml)	(revision 33887)
+++ vhTest/Utils/APPS/TRANSP/OfferteService/dto/OfferteData.cls.xml	(.../OfferteData.cls.xml)	(revision 37073)
@@ -74,7 +74,7 @@
 <ReturnType>APPS.TRANSP.OfferteService.dto.OfferteData</ReturnType>
 <Implementation><![CDATA[
 	#dim OfferteData As APPS.TRANSP.OfferteService.dto.OfferteData = ..GeefTransportOfferte()
-	
+	#dim i As Ïnteger
 	for i=1:1:OfferteData.Items.Count()
 	{
 		Set OfferteData.Items.GetAt(i).CarbonNeutralPrijs = 0
Index: vhUnitTest/WS/EC/Unishop/InternationaleZending/impl/ZendingDetails/Test.cls.xml
===================================================================
diff -u -r37071 -r37073
--- vhUnitTest/WS/EC/Unishop/InternationaleZending/impl/ZendingDetails/Test.cls.xml	(.../Test.cls.xml)	(revision 37071)
+++ vhUnitTest/WS/EC/Unishop/InternationaleZending/impl/ZendingDetails/Test.cls.xml	(.../Test.cls.xml)	(revision 37073)
@@ -3,9 +3,10 @@
 <Class name="vhUnitTest.WS.EC.Unishop.InternationaleZending.impl.ZendingDetails.Test">
 <Super>vhUnitTest.TestCase</Super>
 
-<Method name="Test : Oude offertegegevens worden verwijderd">
+<Method name="Test : Bij een offerte worden oude offertegegevens verwijderd voor het bepalen van nieuwe offertegegevens">
 <Implementation><![CDATA[
 	Set TransportOfferteServiceStub = ##class(vhTest.Mock.APPS.TRANSP.OfferteService).%New()
+	#dim OfferteData As APPS.TRANSP.OfferteService.dto.OfferteData
 	Set OfferteData = ##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteData).GeefOfferteDataTransporteur("UPS")
 	Set OfferteData.Items.GetAt(1).CarbonNeutralPrijs = 0.80
 	Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(OfferteData)
@@ -15,6 +16,7 @@
 	
 	Set HaalZendingDetails = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositorySpy)
 	Set BerekenInput = ##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()
+	#dim ZendingDetails As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden
 	Set ZendingDetails = HaalZendingDetails.GeefZendingDetails(BerekenInput)
 	
 	Do $$$AssertEquals(VerzendingMogelijkheidRepositorySpy.GeefVerwijderViaOfferteIDAangeroepen(),1)
@@ -24,6 +26,7 @@
 <Method name="Test : VerzendMogelijkheden worden bewaard">
 <Implementation><![CDATA[
 	Set TransportOfferteServiceStub = ##class(vhTest.Mock.APPS.TRANSP.OfferteService).%New()
+	#dim OfferteData As APPS.TRANSP.OfferteService.dto.OfferteData
 	Set OfferteData = ##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteData).GeefOfferteDataTransporteur("UPS")
 	Set OfferteData.Items.GetAt(1).CarbonNeutralPrijs = 0.80
 	Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(OfferteData)
@@ -33,6 +36,7 @@
 	
 	Set HaalZendingDetails = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositorySpy)
 	Set BerekenInput = ##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()
+	#dim ZendingDetails As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden
 	Set ZendingDetails = HaalZendingDetails.GeefZendingDetails(BerekenInput)
 	
 	Do $$$AssertEquals(VerzendingMogelijkheidRepositorySpy.GeefMaakAangeroepen(),1)
@@ -43,6 +47,7 @@
 <Method name="Test : AantalPalletten worden bewaard">
 <Implementation><![CDATA[
 	Set TransportOfferteServiceStub = ##class(vhTest.Mock.APPS.TRANSP.OfferteService).%New()
+	#dim OfferteData As APPS.TRANSP.OfferteService.dto.OfferteData
 	Set OfferteData = ##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteData).GeefOfferteDataTransporteur("DHL")
 	Set OfferteData.Items.GetAt(1).AantalPalletten = 2
 	Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).DHL(),$$$ElkeWaarde).DanReturn(OfferteData)
@@ -52,6 +57,7 @@
 	
 	Set HaalZendingDetails = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositorySpy)
 	Set BerekenInput = ##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()
+	#dim ZendingDetails As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden
 	Set ZendingDetails = HaalZendingDetails.GeefZendingDetails(BerekenInput)
 	
 	Do $$$AssertEquals(VerzendingMogelijkheidRepositorySpy.GeefLaatsteBewaardeVerzendingMogelijkheid().Verzending.AantalPalletten,2)
@@ -61,6 +67,7 @@
 <Method name="Test : VerkoopprijsBerekenaar geeft verkoopprijs weer ">
 <Implementation><![CDATA[
 	Set TransportOfferteServiceStub = ##class(vhTest.Mock.APPS.TRANSP.OfferteService).%New()
+	#dim OfferteData As APPS.TRANSP.OfferteService.dto.OfferteData
 	Set OfferteData = ##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteData).GeefOfferteDataTransporteur("DHL")
 	Set OfferteData.Items.GetAt(1).Code = ##class(APPS.TRANSP.enu.ServiceCode).DHLFreight()
 	Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).DHL(),$$$ElkeWaarde).DanReturn(OfferteData)
@@ -73,6 +80,7 @@
 	
 	Set HaalZendingDetails = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryStub,,VerkoopprijsBerekenaarMock)
 	Set BerekenInput = ##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()
+	#dim ZendingDetails As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden
 	Set ZendingDetails = HaalZendingDetails.GeefZendingDetails(BerekenInput)
 	
 	Do VerkoopprijsBerekenaarMock.Verifieer()
@@ -82,6 +90,7 @@
 <Method name="Test : TransportFirmaBepaler geeft transportfirmas weer ">
 <Implementation><![CDATA[
 	Set TransportOfferteServiceStub = ##class(vhTest.Mock.APPS.TRANSP.OfferteService).%New()
+	#dim OfferteData As APPS.TRANSP.OfferteService.dto.OfferteData
 	Set OfferteData = ##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteData).GeefOfferteDataTransporteur("DHL")
 	Set OfferteData.Items.GetAt(1).Code = ##class(APPS.TRANSP.enu.ServiceCode).DHLFreight()
 	Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).DHL(),$$$ElkeWaarde).DanReturn(OfferteData)
@@ -94,6 +103,7 @@
 	
 	Set HaalZendingDetails = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryStub,,,TransportFirmaBepalerMock)
 	Set BerekenInput = ##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()
+	#dim ZendingDetails As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden
 	Set ZendingDetails = HaalZendingDetails.GeefZendingDetails(BerekenInput)
 	
 	Do TransportFirmaBepalerMock.Verifieer()
@@ -103,6 +113,7 @@
 <Method name="Test : Carbon neutral wordt voorzien door transportfirma">
 <Implementation><![CDATA[
 	Set TransportOfferteServiceStub = ##class(vhTest.Mock.APPS.TRANSP.OfferteService).%New()
+	#dim OfferteData As APPS.TRANSP.OfferteService.dto.OfferteData
 	Set OfferteData = ##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteData).GeefOfferteDataTransporteur("UPS")
 	Set OfferteData.Items.GetAt(1).CarbonNeutralPrijs = 0.80
 	Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(OfferteData)
@@ -112,6 +123,7 @@
 
 	Set HaalZendingDetails = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy)
 	Set BerekenInput = ##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()
+	#dim ZendingDetails As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden
 	Set ZendingDetails = HaalZendingDetails.GeefZendingDetails(BerekenInput)
 	
 	If $$$AssertEquals(ZendingDetails.VerzendingMogelijkheidList.Count(),1) {
@@ -129,6 +141,7 @@
 <Method name="Test : Carbon neutral wordt niet voorzien door transportfirma">
 <Implementation><![CDATA[
 	Set TransportOfferteServiceStub = ##class(vhTest.Mock.APPS.TRANSP.OfferteService).%New()
+	#dim OfferteData As APPS.TRANSP.OfferteService.dto.OfferteData
 	Set OfferteData = ##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteData).GeefOfferteDataTransporteur("UPS")
 	Set OfferteData.Items.GetAt(1).CarbonNeutralPrijs = ""
 	Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(OfferteData)
@@ -138,6 +151,7 @@
 
 	Set HaalZendingDetails = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy)
 	Set BerekenInput = ##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()
+	#dim ZendingDetails As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden
 	Set ZendingDetails = HaalZendingDetails.GeefZendingDetails(BerekenInput)
 	
 	If $$$AssertEquals(ZendingDetails.VerzendingMogelijkheidList.Count(),1) {
@@ -149,6 +163,7 @@
 <Method name="Test : Titel wordt voorzien voor webshop transportmogelijkheid">
 <Implementation><![CDATA[
 	Set TransportOfferteServiceStub = ##class(vhTest.Mock.APPS.TRANSP.OfferteService).%New()
+	#dim OfferteData As APPS.TRANSP.OfferteService.dto.OfferteData
 	Set OfferteData = ##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteData).GeefOfferteDataTransporteur("UPS")
 	Set OfferteData.Items.GetAt(1).Kostprijs = 44.5
 	Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(OfferteData)
@@ -164,6 +179,7 @@
 
 	Set HaalZendingDetails = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy, VertaalAPIStub)
 	Set BerekenInput = ##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()
+	#dim ZendingDetails As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden
 	Set ZendingDetails = HaalZendingDetails.GeefZendingDetails(BerekenInput)
 	
 	Do $$$AssertEquals(ZendingDetails.Titel,"[ZendingDetailsTitel]")
@@ -173,6 +189,7 @@
 <Method name="Test : Als er palletten zijn, dan wordt het aantal meegegeven als opmerking">
 <Implementation><![CDATA[
 	Set TransportOfferteServiceStub = ##class(vhTest.Mock.APPS.TRANSP.OfferteService).%New()
+	#dim OfferteData As APPS.TRANSP.OfferteService.dto.OfferteData
 	Set OfferteData = ##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteData).GeefOfferteDataTransporteur("DHL")
 	Set OfferteData.Items.GetAt(1).AantalPalletten = 2
 	Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(..GeenOfferteData())
@@ -187,6 +204,7 @@
 
 	Set HaalZendingDetails = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy, VertaalAPIStub)
 	Set BerekenInput = ##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()
+	#dim ZendingDetails As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden
 	Set ZendingDetails = HaalZendingDetails.GeefZendingDetails(BerekenInput)
 	
 	Do $$$AssertEquals(ZendingDetails.VerzendingMogelijkheidList.GetAt(1).Opmerking ,"([AantalPalletten] 2)")
@@ -196,6 +214,7 @@
 <Method name="Test : Als er geen aantal palletten meegegeven wordt, dan is opmerking leeg ">
 <Implementation><![CDATA[
 	Set TransportOfferteServiceStub = ##class(vhTest.Mock.APPS.TRANSP.OfferteService).%New()
+	#dim OfferteData As APPS.TRANSP.OfferteService.dto.OfferteData
 	Set OfferteData = ##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteData).GeefOfferteDataTransporteur("UPS")
 	Set OfferteData.Items.GetAt(1).AantalPalletten = ""
 	Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(OfferteData)
@@ -210,6 +229,7 @@
 
 	Set HaalZendingDetails = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy, VertaalAPIStub)
 	Set BerekenInput = ##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()
+	#dim ZendingDetails As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden
 	Set ZendingDetails = HaalZendingDetails.GeefZendingDetails(BerekenInput)
 	
 	Do $$$AssertEquals(ZendingDetails.VerzendingMogelijkheidList.GetAt(1).Opmerking ,"")
@@ -219,6 +239,7 @@
 <Method name="Test : Verkoopprijs wordt voorzien door transportfirma">
 <Implementation><![CDATA[
 	Set TransportOfferteServiceStub = ##class(vhTest.Mock.APPS.TRANSP.OfferteService).%New()
+	#dim OfferteData As APPS.TRANSP.OfferteService.dto.OfferteData
 	Set OfferteData = ##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteData).GeefOfferteDataTransporteur("UPS")
 	Set OfferteData.Items.GetAt(1).Kostprijs = 44.5
 	Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(OfferteData)
@@ -228,6 +249,7 @@
 
 	Set HaalZendingDetails = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy)
 	Set BerekenInput = ##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()
+	#dim ZendingDetails As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden
 	Set ZendingDetails = HaalZendingDetails.GeefZendingDetails(BerekenInput)
 	
 	If $$$AssertEquals(ZendingDetails.VerzendingMogelijkheidList.Count(),1) {
@@ -239,6 +261,7 @@
 <Method name="Test : Leverdatum wordt voorzien door transportfirma">
 <Implementation><![CDATA[
 	Set TransportOfferteServiceStub = ##class(vhTest.Mock.APPS.TRANSP.OfferteService).%New()
+	#dim OfferteData As APPS.TRANSP.OfferteService.dto.OfferteData
 	Set OfferteData = ##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteData).GeefOfferteDataTransporteur("UPS")
 	Set OfferteData.Items.GetAt(1).Duurtijd = 10
 	Set OfferteData.Items.GetAt(1).OphaalDatum = ..GeefHuidigeDatum()
@@ -251,6 +274,7 @@
 
 	Set HaalZendingDetails = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub,VerzendingMogelijkheidRepositoryDummy)
 	Set BerekenInput = ##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()
+	#dim ZendingDetails As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden
 	Set ZendingDetails = HaalZendingDetails.GeefZendingDetails(BerekenInput)
 	
 	#dim LeverDatumDummy As %Date = ##class(TECH.DateTime).DatumBereken(..GeefHuidigeDatum(),10,##class(TECH.enu.DatePart).Dag())
@@ -278,6 +302,7 @@
 
 	Set HaalZendingDetails = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy)
 	Set BerekenInput = ##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()
+	#dim ZendingDetails As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden
 	Set ZendingDetails = HaalZendingDetails.GeefZendingDetails(BerekenInput)
 	
 	If $$$AssertEquals(ZendingDetails.VerzendingMogelijkheidList.Count(),2) {
@@ -297,6 +322,7 @@
 
 	Set HaalZendingDetails = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy)
 	Set BerekenInput = ##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()
+	#dim ZendingDetails As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden
  	Set ZendingDetails = HaalZendingDetails.GeefZendingDetails(BerekenInput)
 	
 	If $$$AssertEquals(ZendingDetails.VerzendingMogelijkheidList.Count(),3) {
@@ -317,7 +343,8 @@
 
 	Set HaalZendingDetails = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy)
 	Set BerekenInput = ##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()
-
+	
+	#dim ZendingDetails As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden
 	Set ZendingDetails = HaalZendingDetails.GeefZendingDetails(BerekenInput)
 	
 	If $$$AssertEquals(ZendingDetails.VerzendingMogelijkheidList.Count(),3) {
@@ -339,6 +366,7 @@
 	Set HaalZendingDetails = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy)
 	Set BerekenInput = ##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()
 
+	#dim ZendingDetails As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden
 	Set ZendingDetails = HaalZendingDetails.GeefZendingDetails(BerekenInput)
 	
 	If $$$AssertEquals(ZendingDetails.VerzendingMogelijkheidList.Count(),5) {
@@ -364,6 +392,7 @@
 
 	Set HaalZendingDetails = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy)
 	Set BerekenInput = ##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()
+	#dim ZendingDetailsResult As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden
 	Set ZendingDetailsResult = HaalZendingDetails.GeefZendingDetails(BerekenInput)
 ]]></Implementation>
 </Method>
Index: vhTest/Fake/WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml
===================================================================
diff -u -r37017 -r37073
--- vhTest/Fake/WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml	(.../ZendingDetails.cls.xml)	(revision 37017)
+++ vhTest/Fake/WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml	(.../ZendingDetails.cls.xml)	(revision 37073)
@@ -42,6 +42,48 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ConverteerVerzendingMogelijkheid">
+<FormalSpec>ZendingDetail:WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheid,OfferteItem:APPS.TRANSP.OfferteService.dto.OfferteItem</FormalSpec>
+<ReturnType>WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.VerzendingItem</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="MaakCarbonNeutral">
+<FormalSpec>CarbonNeutral:WS.EC.ExterneVerkoop.dto.Optie</FormalSpec>
+<ReturnType>WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.Optie</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="MaakMogelijkeWaarden">
+<FormalSpec>MogelijkeWaarden:%ListOfObjects(ELEMENTTYPE="WS.EC.ExterneVerkoop.dto.Selectie")</FormalSpec>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="MaakOptie">
+<FormalSpec>OptieDto:WS.EC.ExterneVerkoop.dto.Optie</FormalSpec>
+<ReturnType>WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.Optie</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="MaakSelecties">
+<FormalSpec>MogelijkeWaardenDto:%ListOfObjects(ELEMENTTYPE="WS.EC.ExterneVerkoop.dto.Selectie")</FormalSpec>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
+<Method name="MaakVerzendingItem">
+<FormalSpec>VerzendingMogelijkheidDto:WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheid,OfferteItem:APPS.TRANSP.OfferteService.dto.OfferteItem</FormalSpec>
+<ReturnType>WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.VerzendingItem</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
 <Method name="MogelijkeWaardenConverteer">
 <FormalSpec>MogelijkeWaarden:%ListOfObjects(ELEMENTTYPE="WS.EC.ExterneVerkoop.dto.Selectie")</FormalSpec>
 <ReturnType>%ListOfObjects</ReturnType>