Index: vhTest/Mock/WSimpl/EC/ExterneVerkoop/BerekeningFoutenRepository.cls.xml
===================================================================
diff -u -r36541 -r37401
--- vhTest/Mock/WSimpl/EC/ExterneVerkoop/BerekeningFoutenRepository.cls.xml	(.../BerekeningFoutenRepository.cls.xml)	(revision 36541)
+++ vhTest/Mock/WSimpl/EC/ExterneVerkoop/BerekeningFoutenRepository.cls.xml	(.../BerekeningFoutenRepository.cls.xml)	(revision 37401)
@@ -28,6 +28,12 @@
 <Implementation><![CDATA[	do ..VerwerkMethodCall("VerwijderViaOfferteID",OfferteID)
 ]]></Implementation>
 </Method>
+
+<Method name="Bewaar">
+<FormalSpec>Data:TECH.Persistent</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("Bewaar",Data)
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: WSimpl/EC/ExterneVerkoop/BerekeningFoutenRepository.cls.xml
===================================================================
diff -u -r36541 -r37401
--- WSimpl/EC/ExterneVerkoop/BerekeningFoutenRepository.cls.xml	(.../BerekeningFoutenRepository.cls.xml)	(revision 36541)
+++ WSimpl/EC/ExterneVerkoop/BerekeningFoutenRepository.cls.xml	(.../BerekeningFoutenRepository.cls.xml)	(revision 37401)
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="WSimpl.EC.ExterneVerkoop.BerekeningFoutenRepository">
-<Super>TECH.Persistentie.impl.Repository,TECH.Mockable</Super>
+<Super>TECH.Persistentie.impl.Repository</Super>
 
 <Parameter name="DataClassName">
 <Type>%String</Type>
Index: WSimpl/Unishop/dto/Sessie.cls.xml
===================================================================
diff -u
--- WSimpl/Unishop/dto/Sessie.cls.xml	(revision 0)
+++ WSimpl/Unishop/dto/Sessie.cls.xml	(revision 37401)
@@ -0,0 +1,41 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WSimpl.Unishop.dto.Sessie">
+<Super>TECH.RegisteredObject</Super>
+
+<Property name="PersonalityID">
+<Type>%String</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="KlantID">
+<Type>DOM.common.PartijID</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>PersonalityID:%String="",KlantID:DOM.common.PartijID=""</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..PersonalityID = PersonalityID
+	Set ..KlantID = KlantID
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GeefPersonalityID">
+<Implementation><![CDATA[	Quit ..PersonalityID
+]]></Implementation>
+</Method>
+
+<Method name="GeefKlantID">
+<Implementation><![CDATA[	Quit ..KlantID
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: WS/EC/Unishop/InternationaleZending/impl/TransportFirmaBepalerFactory.cls.xml
===================================================================
diff -u -r37238 -r37401
--- WS/EC/Unishop/InternationaleZending/impl/TransportFirmaBepalerFactory.cls.xml	(.../TransportFirmaBepalerFactory.cls.xml)	(revision 37238)
+++ WS/EC/Unishop/InternationaleZending/impl/TransportFirmaBepalerFactory.cls.xml	(.../TransportFirmaBepalerFactory.cls.xml)	(revision 37401)
@@ -4,10 +4,10 @@
 <Super>TECH.Mockable</Super>
 
 <Method name="GeefTransportFirmaBepaler">
-<FormalSpec>PersonalityID:%String,KlantID:DOM.common.PartijID</FormalSpec>
+<FormalSpec>Sessie:WSimpl.Unishop.dto.Sessie</FormalSpec>
 <ReturnType>WS.EC.Unishop.InternationaleZending.TransportFirmaBepaler</ReturnType>
 <Implementation><![CDATA[
-	If (..IsHeinPersonality(PersonalityID) || ..IsHeinKlant(KlantID)) {
+	If (..IsHeinPersonality(Sessie.GeefPersonalityID()) || ..IsHeinKlant(Sessie.GeefKlantID())) {
 		Quit ##class(WS.EC.Unishop.InternationaleZending.Hein.impl.TransportFirmaBepaler).%New()
 	} else {
 		Quit ##class(WS.EC.Unishop.InternationaleZending.VanHoecke.impl.TransportFirmaBepaler).%New()
Index: vhTest/Mock/WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml
===================================================================
diff -u -r37245 -r37401
--- vhTest/Mock/WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml	(.../ZendingDetails.cls.xml)	(revision 37245)
+++ vhTest/Mock/WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml	(.../ZendingDetails.cls.xml)	(revision 37401)
@@ -10,9 +10,9 @@
 <Inheritance>right</Inheritance>
 
 <Method name="GeefZendingDetails">
-<FormalSpec>BerekenInput:APPS.TRANSP.OfferteService.dto.BerekenInput,Taal:DOM.enu.Taal="N",PersonalityID:%String="",KlantID:DOM.common.PartijID=""</FormalSpec>
+<FormalSpec>BerekenInput:APPS.TRANSP.OfferteService.dto.BerekenInput,Taal:DOM.enu.Taal="N",Sessie:WSimpl.Unishop.dto.Sessie</FormalSpec>
 <ReturnType>WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefZendingDetails",BerekenInput,Taal,PersonalityID,KlantID)
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefZendingDetails",BerekenInput,Taal,Sessie)
 ]]></Implementation>
 </Method>
 </Class>
Index: vhTest/Mock/WS/EC/Unishop/InternationaleZending/impl/TransportFirmaBepalerFactory.cls.xml
===================================================================
diff -u -r37238 -r37401
--- vhTest/Mock/WS/EC/Unishop/InternationaleZending/impl/TransportFirmaBepalerFactory.cls.xml	(.../TransportFirmaBepalerFactory.cls.xml)	(revision 37238)
+++ vhTest/Mock/WS/EC/Unishop/InternationaleZending/impl/TransportFirmaBepalerFactory.cls.xml	(.../TransportFirmaBepalerFactory.cls.xml)	(revision 37401)
@@ -10,9 +10,9 @@
 <Inheritance>right</Inheritance>
 
 <Method name="GeefTransportFirmaBepaler">
-<FormalSpec>PersonalityID:%String,KlantID:DOM.common.PartijID</FormalSpec>
+<FormalSpec>Sessie:WSimpl.Unishop.dto.Sessie</FormalSpec>
 <ReturnType>WS.EC.Unishop.InternationaleZending.TransportFirmaBepaler</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefTransportFirmaBepaler",PersonalityID,KlantID)
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefTransportFirmaBepaler",Sessie)
 ]]></Implementation>
 </Method>
 </Class>
Index: vhTest/Fake/WSimpl/EC/ExterneVerkoop/BerekeningFoutenRepository.cls.xml
===================================================================
diff -u -r36541 -r37401
--- vhTest/Fake/WSimpl/EC/ExterneVerkoop/BerekeningFoutenRepository.cls.xml	(.../BerekeningFoutenRepository.cls.xml)	(revision 36541)
+++ vhTest/Fake/WSimpl/EC/ExterneVerkoop/BerekeningFoutenRepository.cls.xml	(.../BerekeningFoutenRepository.cls.xml)	(revision 37401)
@@ -23,8 +23,7 @@
 
 <Method name="VerwijderViaOfferteID">
 <FormalSpec>OfferteID:%String</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 </Class>
 
Index: vhUnitTest/WS/EC/Unishop/InternationaleZending/Service/Test.cls.xml
===================================================================
diff -u -r37328 -r37401
--- vhUnitTest/WS/EC/Unishop/InternationaleZending/Service/Test.cls.xml	(.../Test.cls.xml)	(revision 37328)
+++ vhUnitTest/WS/EC/Unishop/InternationaleZending/Service/Test.cls.xml	(.../Test.cls.xml)	(revision 37401)
@@ -3,6 +3,18 @@
 <Class name="vhUnitTest.WS.EC.Unishop.InternationaleZending.Service.Test">
 <Super>vhUnitTest.TestCase</Super>
 
+<Property name="SessieDummy">
+<Type>WSimpl.Unishop.dto.Sessie</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="OnBeforeAllTests">
+<Implementation><![CDATA[
+	Do ##super()
+	Set ..SessieDummy = ##class(WSimpl.Unishop.dto.Sessie).%New("DummyPersonality","DummyKlant")
+]]></Implementation>
+</Method>
+
 <Method name="Test: GeefMogelijkeZendingen wordt opgeroepen en geeft zendingdetails terug">
 <Implementation><![CDATA[
 	#dim OfferteID As %String = 999
@@ -35,11 +47,16 @@
 	Do ZendingDetails.VerzendingMogelijkheden.Insert(ZendingDetail)
 	
 	Set HaalZendingDetailsMock = ##class(vhTest.Mock.WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New()
-	Do HaalZendingDetailsMock.VerwachtMethodCall("GeefZendingDetails",DummyBerekenInput,"E","","").DanReturn(ZendingDetails)
+	Do HaalZendingDetailsMock.VerwachtMethodCall("GeefZendingDetails",DummyBerekenInput,"E",..SessieDummy).DanReturn(ZendingDetails)
 	
-	Set Service = ##class(WS.EC.Unishop.InternationaleZending.Service).%New(VerkoopOfferteServiceMock, NaarBerekenInputConverterMock, HaalZendingDetailsMock, , DummyWinkelKarService)
-	#dim Resultaat As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = Service.GeefMogelijkeZendingen(OfferteID)
+	#dim BerekeningFoutenRepositoryDummy As vhTest.Mock.WSimpl.EC.ExterneVerkoop.BerekeningFoutenRepository = ##class(vhTest.Mock.WSimpl.EC.ExterneVerkoop.BerekeningFoutenRepository).%New()
+	Do BerekeningFoutenRepositoryDummy.IndienMethodCall("VerwijderViaOfferteID",$$$ElkeWaarde).DanDoeNiks()
+	Do BerekeningFoutenRepositoryDummy.IndienMethodCall("BestaatViaOfferteID",$$$ElkeWaarde).DanDoeNiks()
+	Do BerekeningFoutenRepositoryDummy.IndienMethodCall("Bewaar",$$$ElkeWaarde).DanDoeNiks()
 	
+	Set Service = ##class(WS.EC.Unishop.InternationaleZending.Service).%New(VerkoopOfferteServiceMock, NaarBerekenInputConverterMock, HaalZendingDetailsMock, , DummyWinkelKarService,,BerekeningFoutenRepositoryDummy)
+	#dim Resultaat As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = Service.GeefMogelijkeZendingen(OfferteID, ,..SessieDummy)
+	
 	Do VerkoopOfferteServiceMock.Verifieer()
 	Do NaarBerekenInputConverterMock.Verifieer()
 	Do HaalZendingDetailsMock.Verifieer()
Index: WS/EC/ExterneVerkoopService.cls.xml
===================================================================
diff -u -r37277 -r37401
--- WS/EC/ExterneVerkoopService.cls.xml	(.../ExterneVerkoopService.cls.xml)	(revision 37277)
+++ WS/EC/ExterneVerkoopService.cls.xml	(.../ExterneVerkoopService.cls.xml)	(revision 37401)
@@ -149,7 +149,8 @@
 <WebMethod>1</WebMethod>
 <Implementation><![CDATA[
 	Do ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefAuthorisatieControleur().ControleerWerkenMetOfferte(OfferteID)	
-	Quit ##class(WS.EC.Unishop.InternationaleZending.Service).%New().GeefMogelijkeZendingen(OfferteID, ..GeefTaal(),..GeefPersonalityID() ,..GeefKlantID())
+	#dim Sessie As WSimpl.Unishop.dto.Sessie = ##class(WSimpl.Unishop.dto.Sessie).%New(..GeefPersonalityID() ,..GeefKlantID())
+	Quit ##class(WS.EC.Unishop.InternationaleZending.Service).%New().GeefMogelijkeZendingen(OfferteID, ..GeefTaal(),Sessie)
 ]]></Implementation>
 </Method>
 
Index: vhUnitTest/WS/EC/Unishop/InternationaleZending/impl/TransportFirmaBepalerFactory/GeefTransportFirmaBepaler/Test.cls.xml
===================================================================
diff -u -r37392 -r37401
--- vhUnitTest/WS/EC/Unishop/InternationaleZending/impl/TransportFirmaBepalerFactory/GeefTransportFirmaBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 37392)
+++ vhUnitTest/WS/EC/Unishop/InternationaleZending/impl/TransportFirmaBepalerFactory/GeefTransportFirmaBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 37401)
@@ -24,21 +24,24 @@
 <Method name="Test: geeft TransportFirmaBepaler hein als de context personality hein is">
 <Implementation><![CDATA[
 	Set TransportFirmaBepalerFactory = ##class(WS.EC.Unishop.InternationaleZending.impl.TransportFirmaBepalerFactory).%New()
-	Do $$$AssertEquals(TransportFirmaBepalerFactory.GeefTransportFirmaBepaler(##class(DOM.common.enu.Personality).Hein(),"").%ClassName(1),..HeinTransportFirmaBepalerClassName)
+	#dim Sessie As WSimpl.Unishop.dto.Sessie = ##class(WSimpl.Unishop.dto.Sessie).%New(##class(DOM.common.enu.Personality).Hein(), "")
+	Do $$$AssertEquals(TransportFirmaBepalerFactory.GeefTransportFirmaBepaler(Sessie).%ClassName(1),..HeinTransportFirmaBepalerClassName)
 ]]></Implementation>
 </Method>
 
 <Method name="Test: geeft TransportFirmaBepaler hein als de klant hein is">
 <Implementation><![CDATA[
 	Set TransportFirmaBepalerFactory = ##class(WS.EC.Unishop.InternationaleZending.impl.TransportFirmaBepalerFactory).%New()
-	Do $$$AssertEquals(TransportFirmaBepalerFactory.GeefTransportFirmaBepaler(##class(DOM.common.enu.Personality).VanHoecke(),##class(DOM.VKP.enu.Klant).Hein()).%ClassName(1),..HeinTransportFirmaBepalerClassName)
+	#dim Sessie As WSimpl.Unishop.dto.Sessie = ##class(WSimpl.Unishop.dto.Sessie).%New(##class(DOM.common.enu.Personality).VanHoecke(), ##class(DOM.VKP.enu.Klant).Hein())
+	Do $$$AssertEquals(TransportFirmaBepalerFactory.GeefTransportFirmaBepaler(Sessie).%ClassName(1),..HeinTransportFirmaBepalerClassName)
 ]]></Implementation>
 </Method>
 
 <Method name="Test: geeft TransportFirmaBepaler vanhoecke als het geen hein klant en geen hein personality is">
 <Implementation><![CDATA[
 	Set TransportFirmaBepalerFactory = ##class(WS.EC.Unishop.InternationaleZending.impl.TransportFirmaBepalerFactory).%New()
-	Do $$$AssertEquals(TransportFirmaBepalerFactory.GeefTransportFirmaBepaler(##class(DOM.common.enu.Personality).VanHoecke(),"").%ClassName(1),..VanHoeckeTransportFirmaBepalerClassName)
+	#dim Sessie As WSimpl.Unishop.dto.Sessie = ##class(WSimpl.Unishop.dto.Sessie).%New(##class(DOM.common.enu.Personality).VanHoecke(), "")
+	Do $$$AssertEquals(TransportFirmaBepalerFactory.GeefTransportFirmaBepaler(Sessie).%ClassName(1),..VanHoeckeTransportFirmaBepalerClassName)
 ]]></Implementation>
 </Method>
 
@@ -65,7 +68,8 @@
 	While PersonalityIterator.HasNext()
 	{
 		#dim PersonalityID As DOM.common.enu.Personality = PersonalityIterator.Next()
-		Do $$$AssertEquals(TransportFirmaBepalerFactory.GeefTransportFirmaBepaler(PersonalityID,"").%ClassName(1), VerwachteBepaler.GetAt(PersonalityID))
+		#dim Sessie As WSimpl.Unishop.dto.Sessie = ##class(WSimpl.Unishop.dto.Sessie).%New(PersonalityID, "")
+		Do $$$AssertEquals(TransportFirmaBepalerFactory.GeefTransportFirmaBepaler(Sessie).%ClassName(1), VerwachteBepaler.GetAt(PersonalityID))
 	}
 ]]></Implementation>
 </Method>
@@ -133,7 +137,8 @@
 	While KlantIterator.HasNext()
 	{
 		#dim KlantID As DOM.common.enu.Personality = KlantIterator.Next()
-		Do $$$AssertEquals(TransportFirmaBepalerFactory.GeefTransportFirmaBepaler("",KlantID).%ClassName(1), VerwachteBepaler.GetAt(KlantID))
+		#dim Sessie As WSimpl.Unishop.dto.Sessie = ##class(WSimpl.Unishop.dto.Sessie).%New("",KlantID)
+		Do $$$AssertEquals(TransportFirmaBepalerFactory.GeefTransportFirmaBepaler(Sessie).%ClassName(1), VerwachteBepaler.GetAt(KlantID))
 	}
 ]]></Implementation>
 </Method>
Index: WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml
===================================================================
diff -u -r37279 -r37401
--- WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml	(.../ZendingDetails.cls.xml)	(revision 37279)
+++ WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml	(.../ZendingDetails.cls.xml)	(revision 37401)
@@ -33,16 +33,11 @@
 <Private>1</Private>
 </Property>
 
-<Property name="PersonalityID">
-<Type>%String</Type>
+<Property name="Sessie">
+<Type>WSimpl.Unishop.dto.Sessie</Type>
 <Private>1</Private>
 </Property>
 
-<Property name="KlantID">
-<Type>DOM.common.PartijID</Type>
-<Private>1</Private>
-</Property>
-
 <Method name="%OnNew">
 <FormalSpec>TransportOfferteService:APPS.TRANSP.OfferteService,VerzendingMogelijkheidRepository:WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository,VertaalAPI:DOM.common.Transl.VertaalAPI,VerkoopprijsBerekenaarFactory:WS.EC.Unishop.InternationaleZending.impl.VerkoopprijsBerekenaarFactory,TransportFirmaBepalerFactory:WS.EC.Unishop.InternationaleZending.impl.TransportFirmaBepalerFactory</FormalSpec>
 <Private>1</Private>
@@ -69,11 +64,10 @@
 </Method>
 
 <Method name="GeefZendingDetails">
-<FormalSpec>BerekenInput:APPS.TRANSP.OfferteService.dto.BerekenInput,Taal:DOM.enu.Taal="N",PersonalityID:%String="",KlantID:DOM.common.PartijID=""</FormalSpec>
+<FormalSpec>BerekenInput:APPS.TRANSP.OfferteService.dto.BerekenInput,Taal:DOM.enu.Taal="N",Sessie:WSimpl.Unishop.dto.Sessie</FormalSpec>
 <ReturnType>WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden</ReturnType>
 <Implementation><![CDATA[
-	Set ..PersonalityID = PersonalityID
-	Set ..KlantID = KlantID
+	Set ..Sessie = Sessie
 	
 	Do ..ZetVertaler(Taal)
 
@@ -84,7 +78,7 @@
 	#dim Exceptions As List Of %String = ##class(%ListOfDataTypes).%New()
 	#dim OfferteDetails As List Of %String = ##class(%ListOfDataTypes).%New()
 	
-	#dim TransportFirmas As TECH.ListIterator = ..TransportFirmaBepalerFactory.GeefTransportFirmaBepaler(..PersonalityID,..KlantID).GeefTransportFirmas()
+	#dim TransportFirmas As TECH.ListIterator = ..TransportFirmaBepalerFactory.GeefTransportFirmaBepaler(..Sessie).GeefTransportFirmas()
 	While TransportFirmas.HasNext() {
 		#dim TransportFirma As %String = TransportFirmas.Next()
 		try {
@@ -240,7 +234,7 @@
 	Set VerzendingItem.Code = VerzendingMogelijkheid.Code
 	Set VerzendingItem.Duurtijd = VerzendingMogelijkheid.Duurtijd
 	Set VerzendingItem.AankoopPrijs = VerzendingMogelijkheid.TransportKost
-	Set VerzendingItem.VerkoopPrijs = ..VerkoopprijsBerekenaarFactory.GeefVerkoopprijsBerekenaar(..PersonalityID,..KlantID).BerekenVerkoopPrijs(OfferteItem)
+	Set VerzendingItem.VerkoopPrijs = ..VerkoopprijsBerekenaarFactory.GeefVerkoopprijsBerekenaar(..Sessie.GeefPersonalityID(),..Sessie.GeefKlantID()).BerekenVerkoopPrijs(OfferteItem)
 	Set VerzendingItem.LeverDag = VerzendingMogelijkheid.LeverDag
 	Set VerzendingItem.LeverDatum = VerzendingMogelijkheid.LeverDatum 
 	Set VerzendingItem.LeverTijd = VerzendingMogelijkheid.LeverTijd
Index: vhUnitTest/WS/EC/Unishop/InternationaleZending/impl/ZendingDetails/Test.cls.xml
===================================================================
diff -u -r37279 -r37401
--- vhUnitTest/WS/EC/Unishop/InternationaleZending/impl/ZendingDetails/Test.cls.xml	(.../Test.cls.xml)	(revision 37279)
+++ vhUnitTest/WS/EC/Unishop/InternationaleZending/impl/ZendingDetails/Test.cls.xml	(.../Test.cls.xml)	(revision 37401)
@@ -5,10 +5,22 @@
 
 <Property name="StandaardBerekenInput">
 <Type>APPS.TRANSP.OfferteService.dto.BerekenInput</Type>
-<InitialExpression>##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()</InitialExpression>
 <Private>1</Private>
 </Property>
 
+<Property name="SessieDummy">
+<Type>WSimpl.Unishop.dto.Sessie</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="OnBeforeAllTests">
+<Implementation><![CDATA[
+	Do ##super()
+	Set ..SessieDummy = ##class(WSimpl.Unishop.dto.Sessie).%New("DummyPersonality","DummyKlant")
+	Set ..StandaardBerekenInput = ##class(APPS.TRANSP.OfferteService.dto.BerekenInput).%New()
+]]></Implementation>
+</Method>
+
 <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()
@@ -18,7 +30,7 @@
 	Set VerzendingMogelijkheidRepositorySpy = ##class(vhTest.Spy.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New()
 	
 	Set VerzendingMogelijkhedenBepaler = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositorySpy)
-	#dim DummyVerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput)
+	#dim DummyVerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy)
 	
 	Do $$$AssertEquals(VerzendingMogelijkheidRepositorySpy.GeefVerwijderViaOfferteIDAangeroepen(),1)
 ]]></Implementation>
@@ -33,9 +45,8 @@
 	Set VerzendingMogelijkheidRepositorySpy = ##class(vhTest.Spy.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New()
 	
 	Set VerzendingMogelijkhedenBepaler = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositorySpy)
+	#dim DummyVerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput,,..SessieDummy)
 	
-	#dim DummyVerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput)
-	
 	Do $$$AssertEquals(VerzendingMogelijkheidRepositorySpy.GeefMaakAangeroepen(),1)
 	Do $$$AssertEquals(VerzendingMogelijkheidRepositorySpy.GeefBewaarAangeroepen(),1)
 ]]></Implementation>
@@ -52,7 +63,7 @@
 	Set VerzendingMogelijkheidRepositorySpy = ##class(vhTest.Spy.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New()
 	
 	Set VerzendingMogelijkhedenBepaler = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositorySpy)
-	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput)
+	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput,,..SessieDummy)
 	
 	Do $$$AssertEquals(VerzendingMogelijkheidRepositorySpy.GeefLaatsteBewaardeVerzendingMogelijkheid().Verzending.AantalPalletten,2)
 ]]></Implementation>
@@ -75,7 +86,7 @@
 	Do VerkoopprijsBerekenaarFactoryMock.IndienMethodCall("GeefVerkoopprijsBerekenaar", $$$ElkeWaarde,$$$ElkeWaarde).DanReturn(VerkoopprijsBerekenaarMock)
 	
 	Set VerzendingMogelijkhedenBepaler = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryStub,,VerkoopprijsBerekenaarFactoryMock)
-	#dim DummyVerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput)
+	#dim DummyVerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput,,..SessieDummy)
 	
 	Do VerkoopprijsBerekenaarMock.Verifieer()
 ]]></Implementation>
@@ -98,7 +109,7 @@
 	Do VerkoopprijsBerekenaarFactoryMock.VerwachtMethodCall("GeefVerkoopprijsBerekenaar", "DummyPersonality","DummyKlant").DanReturn(VerkoopprijsBerekenaarMock)
 	
 	Set VerzendingMogelijkhedenBepaler = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryStub,,VerkoopprijsBerekenaarFactoryMock)
-	#dim DummyVerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput,, "DummyPersonality","DummyKlant")
+	#dim DummyVerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput,, ..SessieDummy)
 	
 	Do VerkoopprijsBerekenaarFactoryMock.Verifieer()
 ]]></Implementation>
@@ -118,12 +129,11 @@
 	Do TransportFirmaBepalerMock.VerwachtMethodCall("GeefTransportFirmas").DanReturn(##class(APPS.TRANSP.enu.TransportFirma).ValueListIterator())
 	
 	Set TransportFirmaBepalerFactoryMock = ##class(vhTest.Mock.WS.EC.Unishop.InternationaleZending.impl.TransportFirmaBepalerFactory).%New()
-	Do TransportFirmaBepalerFactoryMock.IndienMethodCall("GeefTransportFirmaBepaler", $$$ElkeWaarde,$$$ElkeWaarde).DanReturn(TransportFirmaBepalerMock)
+	Do TransportFirmaBepalerFactoryMock.IndienMethodCall("GeefTransportFirmaBepaler", $$$ElkeWaarde).DanReturn(TransportFirmaBepalerMock)
 
 	Set VerzendingMogelijkhedenBepaler = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryStub,,,TransportFirmaBepalerFactoryMock)
+	#dim DummyVerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput,,..SessieDummy)
 	
-	#dim DummyVerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput)
-	
 	Do TransportFirmaBepalerMock.Verifieer()
 ]]></Implementation>
 </Method>
@@ -142,12 +152,11 @@
 	Do TransportFirmaBepalerMock.IndienMethodCall("GeefTransportFirmas").DanReturn(##class(APPS.TRANSP.enu.TransportFirma).ValueListIterator())
 	
 	Set TransportFirmaBepalerFactoryMock = ##class(vhTest.Mock.WS.EC.Unishop.InternationaleZending.impl.TransportFirmaBepalerFactory).%New()
-	Do TransportFirmaBepalerFactoryMock.VerwachtMethodCall("GeefTransportFirmaBepaler","DummyPersonality","DummyKlant").DanReturn(TransportFirmaBepalerMock)
+	Do TransportFirmaBepalerFactoryMock.VerwachtMethodCall("GeefTransportFirmaBepaler",..SessieDummy).DanReturn(TransportFirmaBepalerMock)
 
 	Set VerzendingMogelijkhedenBepaler = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryStub,,,TransportFirmaBepalerFactoryMock)
+	#dim DummyVerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput,,..SessieDummy)
 	
-	#dim DummyVerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput,,"DummyPersonality","DummyKlant")
-	
 	Do TransportFirmaBepalerFactoryMock.Verifieer()
 ]]></Implementation>
 </Method>
@@ -163,9 +172,8 @@
 	Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New()
 
 	Set VerzendingMogelijkhedenBepaler = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy)
+	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy)
 	
-	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput)
-	
 	If $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.Count(),1) {
 		Do $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.GetAt(1).Optie.Omschrijving ,"Wenst u de CO2-uitstoot van uw levering te compenseren ? ")
 		Do $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.GetAt(1).Optie.MogelijkeWaarden.Count() ,2)
@@ -190,9 +198,8 @@
 	Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New()
 
 	Set VerzendingMogelijkhedenBepaler = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy)
+	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy)
 	
-	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput)
-	
 	If $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.Count(),1) {
 		Do $$$AssertFalse($IsObject(VerzendingMogelijkheden.VerzendingMogelijkheden.GetAt(1).Optie))
 	}
@@ -214,7 +221,7 @@
 	Do VertaalAPIStub.IndienMethodCall("GeefVertaler",$$$ElkeWaarde,$$$ElkeWaarde,$$$ElkeWaarde).DanReturn(VertalerStub)
 
 	Set VerzendingMogelijkhedenBepaler = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy, VertaalAPIStub)
-	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput)
+	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy)
 	
 	Do $$$AssertEquals(VerzendingMogelijkheden.Titel,"[ZendingDetailsTitelVoorEenVerzendingMogelijkheid]")
 ]]></Implementation>
@@ -236,8 +243,7 @@
 	Do VertaalAPIStub.IndienMethodCall("GeefVertaler",$$$ElkeWaarde,$$$ElkeWaarde,$$$ElkeWaarde).DanReturn(VertalerStub)
 
 	Set VerzendingMogelijkhedenBepaler = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy, VertaalAPIStub)
-
-	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput)
+	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy)
 	
 	Do $$$AssertEquals(VerzendingMogelijkheden.Titel,"[ZendingDetailsTitel]")
 ]]></Implementation>
@@ -260,7 +266,7 @@
 	Do VertaalAPIStub.IndienMethodCall("GeefVertaler",$$$ElkeWaarde,$$$ElkeWaarde,$$$ElkeWaarde).DanReturn(VertalerStub)
 
 	Set VerzendingMogelijkhedenBepaler = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy, VertaalAPIStub)
-	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput)
+	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy)
 	
 	Do $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.GetAt(1).Opmerking ,"([AantalPalletten] 2)")
 ]]></Implementation>
@@ -283,7 +289,7 @@
 	Do VertaalAPIStub.IndienMethodCall("GeefVertaler",$$$ElkeWaarde,$$$ElkeWaarde,$$$ElkeWaarde).DanReturn(VertalerStub)
 
 	Set VerzendingMogelijkhedenBepaler = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy, VertaalAPIStub)
-	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput)
+	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy)
 	
 	Do $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.GetAt(1).Opmerking ,"")
 ]]></Implementation>
@@ -301,7 +307,7 @@
 	Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New()
 
 	Set VerzendingMogelijkhedenBepaler = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy)
-	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput)
+	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy)
 	
 	If $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.Count(),1) {
 		Do $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.GetAt(1).TransportKost, 44.5)
@@ -324,7 +330,7 @@
 	Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New()
 
 	Set VerzendingMogelijkhedenBepaler = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub,VerzendingMogelijkheidRepositoryDummy)
-	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput)
+	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy)
 	
 	#dim LeverDatumDummy As %Date = ##class(TECH.DateTime).DatumBereken(..GeefHuidigeDatum(),10,##class(TECH.enu.DatePart).Dag())
 	If $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.Count(),1) {
@@ -343,9 +349,8 @@
 	Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New()
 
 	Set VerzendingMogelijkhedenBepaler = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy)
+	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy)
 	
-	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput)
-	
 	If $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.Count(),2) {
 		Do $$$AssertContains(VerzendingMogelijkheden.VerzendingMogelijkheden.GetAt(1).Omschrijving,"UPS")
 		Do $$$AssertContains(VerzendingMogelijkheden.VerzendingMogelijkheden.GetAt(2).Omschrijving,"DHL")	
@@ -362,7 +367,7 @@
 	Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New()
 
 	Set VerzendingMogelijkhedenBepaler = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy)
-	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput)
+	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy)
 	
 	If $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.Count(),3) {
 		Do $$$AssertContains(VerzendingMogelijkheden.VerzendingMogelijkheden.GetAt(1).Omschrijving,"UPS")
@@ -382,7 +387,7 @@
 
 	Set VerzendingMogelijkhedenBepaler = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy)
 	
-	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput)
+	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy)
 	
 	If $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.Count(),3) {
 		Do $$$AssertContains(VerzendingMogelijkheden.VerzendingMogelijkheden.GetAt(1).Omschrijving,"UPS")
@@ -402,7 +407,7 @@
 
 	Set VerzendingMogelijkhedenBepaler = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy)
 	
-	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput)
+	#dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy)
 	
 	If $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.Count(),5) {
 		Do $$$AssertContains(VerzendingMogelijkheden.VerzendingMogelijkheden.GetAt(1).Omschrijving,"UPS")
@@ -426,7 +431,7 @@
 	Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New()
 
 	Set VerzendingMogelijkhedenBepaler = ##class(WS.EC.Unishop.InternationaleZending.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy)
-	#dim DummyVerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput)
+	#dim DummyVerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy)
 ]]></Implementation>
 </Method>
 
Index: WS/EC/Unishop/InternationaleZending/Service.cls.xml
===================================================================
diff -u -r37329 -r37401
--- WS/EC/Unishop/InternationaleZending/Service.cls.xml	(.../Service.cls.xml)	(revision 37329)
+++ WS/EC/Unishop/InternationaleZending/Service.cls.xml	(.../Service.cls.xml)	(revision 37401)
@@ -57,7 +57,7 @@
 </Method>
 
 <Method name="GeefMogelijkeZendingen">
-<FormalSpec>OfferteID:%String,Taal:DOM.enu.Taal="E",PersonalityID:%String="",KlantID:DOM.common.PartijID=""</FormalSpec>
+<FormalSpec>OfferteID:%String,Taal:DOM.enu.Taal="E",Sessie:WSimpl.Unishop.dto.Sessie</FormalSpec>
 <ReturnType>WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden</ReturnType>
 <Implementation><![CDATA[
 	Do ..VerwijderBerekeningFouten(OfferteID)
@@ -69,7 +69,7 @@
 		#dim VroegsteAfhaalDatum As %Date = ..GeefVroegsteAfhaalDatum(OfferteID)
 		
 		Set BerekenInput = ..NaarBerekenInputConverter.Convert(Verpakkingen, LeverAdres, OfferteID, VroegsteAfhaalDatum)
-		Set VerzendingMogelijkheden = ..ZendingDetails.GeefZendingDetails(BerekenInput, Taal, PersonalityID, KlantID)
+		Set VerzendingMogelijkheden = ..ZendingDetails.GeefZendingDetails(BerekenInput, Taal, Sessie)
 		
 	} catch {
 		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
Index: vhTest/Fake/WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml
===================================================================
diff -u -r37112 -r37401
--- vhTest/Fake/WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml	(.../ZendingDetails.cls.xml)	(revision 37112)
+++ vhTest/Fake/WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml	(.../ZendingDetails.cls.xml)	(revision 37401)
@@ -8,7 +8,7 @@
 <Super>WS.EC.Unishop.InternationaleZending.impl.ZendingDetails</Super>
 
 <Method name="GeefZendingDetails">
-<FormalSpec>BerekenInput:APPS.TRANSP.OfferteService.dto.BerekenInput,Taal:DOM.enu.Taal="N"</FormalSpec>
+<FormalSpec>BerekenInput:APPS.TRANSP.OfferteService.dto.BerekenInput,Taal:DOM.enu.Taal="N",Sessie:WSimpl.Unishop.dto.Sessie</FormalSpec>
 <ReturnType>WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden</ReturnType>
 <Implementation><![CDATA[	Quit ""
 ]]></Implementation>
Index: vhTest/Fake/WS/EC/Unishop/InternationaleZending/impl/TransportFirmaBepalerFactory.cls.xml
===================================================================
diff -u -r37237 -r37401
--- vhTest/Fake/WS/EC/Unishop/InternationaleZending/impl/TransportFirmaBepalerFactory.cls.xml	(.../TransportFirmaBepalerFactory.cls.xml)	(revision 37237)
+++ vhTest/Fake/WS/EC/Unishop/InternationaleZending/impl/TransportFirmaBepalerFactory.cls.xml	(.../TransportFirmaBepalerFactory.cls.xml)	(revision 37401)
@@ -8,6 +8,7 @@
 <Super>WS.EC.Unishop.InternationaleZending.impl.TransportFirmaBepalerFactory</Super>
 
 <Method name="GeefTransportFirmaBepaler">
+<FormalSpec>Sessie:WSimpl.Unishop.dto.Sessie</FormalSpec>
 <ReturnType>WS.EC.Unishop.InternationaleZending.TransportFirmaBepaler</ReturnType>
 <Implementation><![CDATA[	Quit ""
 ]]></Implementation>