Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/UnishopBesteller/PlaatsBestelling/Test.cls.xml
===================================================================
diff -u -r40115 -r40428
--- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/UnishopBesteller/PlaatsBestelling/Test.cls.xml	(.../Test.cls.xml)	(revision 40115)
+++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/UnishopBesteller/PlaatsBestelling/Test.cls.xml	(.../Test.cls.xml)	(revision 40428)
@@ -8,7 +8,7 @@
 <Default>1000</Default>
 </Parameter>
 
-<Method name="Test: Indien geen problemen wordt de offerte gemaakt">
+<Method name="Test:Indien geen problemen wordt de offerte gemaakt">
 <Implementation><![CDATA[
 	Set DummyHoofdingDto = ##class(APPS.EC.dto.Hoofding).%New()
 	Set ExterneVerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
@@ -17,6 +17,7 @@
 	Do ExterneVerkoopServiceMock.VerwachtMethodCall("WisOfferte","OfferteID").ExactAantalKeer(0)
 	Set OfferteMock = ##class(vhTest.Mock.APPS.VKP.Offerte).%New()
 	Do OfferteMock.IndienMethodCall("GeefID").DanReturn("OfferteID")
+	Do OfferteMock.IndienMethodCall("ZetLeverAdres",$$$ElkeWaarde).DanDoeNiks()
 	Set OfferteServiceMock = ##class(vhTest.Mock.APPS.VKP.OfferteService).%New()
 	Do OfferteServiceMock.IndienMethodCall("GeefOfferte","OfferteID").DanReturn(OfferteMock)
 	Do OfferteServiceMock.IndienMethodCall("VoegToeProduct").DanDoeNiks()
@@ -30,7 +31,10 @@
 	#dim Aanvraag As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Aanvraag = ..GeefAanvraag()
 	Set Aanvraag.Order.Lijnen = Orderlijnen	
 
-	Set UnishopBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New(ExterneVerkoopServiceMock,ProductConverterStub,OfferteServiceMock,,DummyHoofdingDto)
+	Set OfferteRepositoryMock = ##class(vhTest.Mock.TECH.Persistentie.Repository).%New()
+	Do OfferteRepositoryMock.VerwachtMethodCall("Bewaar",OfferteMock)
+
+	Set UnishopBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New(ExterneVerkoopServiceMock,ProductConverterStub,OfferteServiceMock,,DummyHoofdingDto,,,,OfferteRepositoryMock)
 	#dim Resultaat As APPS.EDI.Bestel.BestelService.UnishopBesteller.PlaatsBestelling.Resultaat = UnishopBesteller.MaakOfferte(Aanvraag)
 	
 	If ($IsObject(Resultaat.Exceptie)) {
@@ -42,14 +46,15 @@
 	Do $$$AssertEquals(Resultaat.Exceptie,"")
 	
 	Do ExterneVerkoopServiceMock.Verifieer()
+	Do OfferteRepositoryMock.Verifieer()
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Indien geen lijnen, wordt er geen offerte gemaakt">
+<Method name="Test:Indien geen lijnen, wordt er geen offerte gemaakt">
 <Implementation><![CDATA[
 	Set ExterneVerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
 	Do ExterneVerkoopServiceMock.VerwachtMethodCall("MaakOfferte",..#KlantID,..#PersonalityID, "").ExactAantalKeer(0)
-
+	
 	Set UnishopBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New(ExterneVerkoopServiceMock,,,,)
 	#dim Resultaat As APPS.EDI.Bestel.BestelService.UnishopBesteller.PlaatsBestelling.Resultaat = UnishopBesteller.MaakOfferte(..GeefAanvraag())
 	
@@ -60,7 +65,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Indien er een probleem is bij de verwerking wordt verwijder offerte opgeroepen en bevat het resultaat een exceptie, natuurlijk wordt de offerte dan niet besteld">
+<Method name="Test:Indien er een probleem is bij de verwerking wordt verwijder offerte opgeroepen en bevat het resultaat een exceptie, natuurlijk wordt de offerte dan niet besteld">
 <Implementation><![CDATA[
 	Set DummyHoofdingDto = ##class(APPS.EC.dto.Hoofding).%New()
 	Set ExterneVerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
@@ -90,7 +95,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Bij ongeldige Leverdatum wordt verwijder offerte opgeroepen en bevat het resultaat een exceptie, natuurlijk wordt de offerte dan niet besteld">
+<Method name="Test:Bij ongeldige Leverdatum wordt verwijder offerte opgeroepen en bevat het resultaat een exceptie, natuurlijk wordt de offerte dan niet besteld">
 <Implementation><![CDATA[
 	Set DummyHoofdingDto = ##class(APPS.EC.dto.Hoofding).%New()
 	Set ExterneVerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
@@ -112,10 +117,14 @@
 	Set OfferteServiceMock = ##class(vhTest.Mock.APPS.VKP.OfferteService).%New()
 	Set OfferteMock = ##class(vhTest.Mock.APPS.VKP.Offerte).%New()
 	Do OfferteMock.IndienMethodCall("GeefID").DanReturn("OfferteID")
+	Do OfferteMock.IndienMethodCall("ZetLeverAdres",$$$ElkeWaarde).DanDoeNiks()
 	Do OfferteServiceMock.VerwachtMethodCall("GeefOfferte","OfferteID").DanReturn(OfferteMock)
 	Do OfferteServiceMock.VerwachtMethodCall("VoegToeMaatwerk",OfferteMock,"","","","").ExactAantalKeer(1)
+
+	Set OfferteRepositoryMock = ##class(vhTest.Mock.TECH.Persistentie.Repository).%New()
+	Do OfferteRepositoryMock.VerwachtMethodCall("Bewaar",OfferteMock)
 	
-	Set UnishopBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New(ExterneVerkoopServiceMock, ProductConverterStub, OfferteServiceMock,,DummyHoofdingDto)
+	Set UnishopBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New(ExterneVerkoopServiceMock, ProductConverterStub, OfferteServiceMock,,DummyHoofdingDto,,,,OfferteRepositoryMock)
 	#dim Resultaat As APPS.EDI.Bestel.BestelService.UnishopBesteller.PlaatsBestelling.Resultaat = UnishopBesteller.MaakOfferte(Aanvraag)
 	
 	If $$$AssertTrue($IsObject(Resultaat.Exceptie)) {
@@ -124,10 +133,11 @@
 	
 	Do ExterneVerkoopServiceMock.Verifieer()
 	Do OfferteServiceMock.Verifieer()
+	Do OfferteRepositoryMock.Verifieer()
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Indien 1 LBX in Aanvraag: 1x VoegToeMaatwerk oproepen">
+<Method name="Test:Indien 1 LBX in Aanvraag: 1x VoegToeMaatwerk oproepen">
 <Implementation><![CDATA[
 	Set DummyHoofdingDto = ##class(APPS.EC.dto.Hoofding).%New()
 	Set ExterneVerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
@@ -146,18 +156,24 @@
 	Set OfferteServiceMock = ##class(vhTest.Mock.APPS.VKP.OfferteService).%New()
 	Set OfferteMock = ##class(vhTest.Mock.APPS.VKP.Offerte).%New()
 	Do OfferteMock.IndienMethodCall("GeefID").DanReturn("OfferteID")
+	Do OfferteMock.IndienMethodCall("ZetLeverAdres",$$$ElkeWaarde).DanDoeNiks()
 	Do OfferteServiceMock.VerwachtMethodCall("GeefOfferte","OfferteID").DanReturn(OfferteMock)
 	Do OfferteServiceMock.VerwachtMethodCall("VoegToeMaatwerk",OfferteMock,"","","","").ExactAantalKeer(1)
-	Set UnishopBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New(ExterneVerkoopServiceMock, ProductConverterStub, OfferteServiceMock,,DummyHoofdingDto)
+
+	Set OfferteRepositoryMock = ##class(vhTest.Mock.TECH.Persistentie.Repository).%New()
+	Do OfferteRepositoryMock.VerwachtMethodCall("Bewaar",OfferteMock)
 	
+	Set UnishopBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New(ExterneVerkoopServiceMock, ProductConverterStub, OfferteServiceMock,,DummyHoofdingDto,,,,OfferteRepositoryMock)
+	
 	#dim Resultaat As APPS.EDI.Bestel.BestelService.UnishopBesteller.PlaatsBestelling.Resultaat = UnishopBesteller.MaakOfferte(Aanvraag)
 	
 	Do ExterneVerkoopServiceMock.Verifieer()
 	Do OfferteServiceMock.Verifieer()
+	Do OfferteRepositoryMock.Verifieer()
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Bij lege Leverdatum loopt alles normaal, geen errors, er wordt een Leverdatum bepaald">
+<Method name="Test:Bij lege Leverdatum loopt alles normaal, geen errors, er wordt een Leverdatum bepaald">
 <Implementation><![CDATA[
 	Set DummyHoofdingDto = ##class(APPS.EC.dto.Hoofding).%New()
 	Set ExterneVerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
@@ -178,8 +194,12 @@
 	Set OfferteMock = ##class(vhTest.Mock.APPS.VKP.Offerte).%New()
 	Do OfferteMock.IndienMethodCall("GeefID").DanReturn("OfferteID")
 	Do OfferteMock.IndienMethodCall("GeefWinkelkarID").DanReturn("WinkelkarID")
+	Do OfferteMock.IndienMethodCall("ZetLeverAdres",$$$ElkeWaarde).DanDoeNiks()
 	Do OfferteServiceMock.VerwachtMethodCall("GeefOfferte","OfferteID").DanReturn(OfferteMock)
 	Do OfferteServiceMock.VerwachtMethodCall("VoegToeMaatwerk",OfferteMock,"","","","").ExactAantalKeer(1)
+
+	Set OfferteRepositoryMock = ##class(vhTest.Mock.TECH.Persistentie.Repository).%New()
+	Do OfferteRepositoryMock.VerwachtMethodCall("Bewaar",OfferteMock)
 	
 	Set WinkelkarStub = ##class(DOM.EC.Winkelkar.Winkelkar).%New("WinkelkarID")
 	Set VroegsteLeverdatumBepalerMock = ##class(vhTest.Mock.APPS.EC.impl.VroegsteLeverdatumBepaler).%New()
@@ -188,16 +208,17 @@
 	Set WinkelkarRepositoryMock = ##class(vhTest.Mock.DOM.EC.Winkelkar.impl.WinkelkarRepository).%New()
 	Do WinkelkarRepositoryMock.IndienMethodCall("GeefViaID",$$$ElkeWaarde).DanReturn(WinkelkarStub)
 	
-	Set UnishopBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New(ExterneVerkoopServiceMock, ProductConverterStub, OfferteServiceMock,,DummyHoofdingDto,,VroegsteLeverdatumBepalerMock, WinkelkarRepositoryMock)
+	Set UnishopBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New(ExterneVerkoopServiceMock, ProductConverterStub, OfferteServiceMock,,DummyHoofdingDto,,VroegsteLeverdatumBepalerMock, WinkelkarRepositoryMock,OfferteRepositoryMock)
 	#dim Resultaat As APPS.EDI.Bestel.BestelService.UnishopBesteller.PlaatsBestelling.Resultaat = UnishopBesteller.MaakOfferte(Aanvraag)
 	
 	Do ExterneVerkoopServiceMock.Verifieer()
 	Do OfferteServiceMock.Verifieer()
 	Do VroegsteLeverdatumBepalerMock.Verifieer()
+	Do OfferteRepositoryMock.Verifieer()
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Indien 1 LBX en 1 TAX in Aanvraag: 2x VoegToeMaatwerk oproepen">
+<Method name="Test:Indien 1 LBX en 1 TAX in Aanvraag: 2x VoegToeMaatwerk oproepen">
 <Implementation><![CDATA[
 	Set DummyHoofdingDto = ##class(APPS.EC.dto.Hoofding).%New()
 	Set ExterneVerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
@@ -217,17 +238,23 @@
 	Set OfferteServiceMock = ##class(vhTest.Mock.APPS.VKP.OfferteService).%New()
 	Set OfferteMock = ##class(vhTest.Mock.APPS.VKP.Offerte).%New()
 	Do OfferteMock.IndienMethodCall("GeefID").DanReturn("OfferteID")
+	Do OfferteMock.IndienMethodCall("ZetLeverAdres",$$$ElkeWaarde).DanDoeNiks()
 	Do OfferteServiceMock.VerwachtMethodCall("GeefOfferte","OfferteID").DanReturn(OfferteMock)
 	Do OfferteServiceMock.VerwachtMethodCall("VoegToeMaatwerk",OfferteMock,"","","","").ExactAantalKeer(2)
-	Set UnishopBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New(ExterneVerkoopServiceMock, ProductConverterStub, OfferteServiceMock,,DummyHoofdingDto)
+
+	Set OfferteRepositoryMock = ##class(vhTest.Mock.TECH.Persistentie.Repository).%New()
+	Do OfferteRepositoryMock.VerwachtMethodCall("Bewaar",OfferteMock)
+	
+	Set UnishopBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New(ExterneVerkoopServiceMock, ProductConverterStub, OfferteServiceMock,,DummyHoofdingDto,,,,OfferteRepositoryMock)
 	#dim Resultaat As APPS.EDI.Bestel.BestelService.UnishopBesteller.PlaatsBestelling.Resultaat = UnishopBesteller.MaakOfferte(Aanvraag)
 	
 	Do ExterneVerkoopServiceMock.Verifieer()
 	Do OfferteServiceMock.Verifieer()
+	Do OfferteRepositoryMock.Verifieer()
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Indien 1 TBX in Aanvraag: 0x VoegToeMaatwerk oproepen, 0x de functies van de ExterneVerkoopService oproepen">
+<Method name="Test:Indien 1 TBX in Aanvraag: 0x VoegToeMaatwerk oproepen, 0x de functies van de ExterneVerkoopService oproepen">
 <Implementation><![CDATA[
 	Set DummyHoofdingDto = ##class(APPS.EC.dto.Hoofding).%New()
 	Set ExterneVerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
@@ -255,7 +282,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Indien 2 TBX in Aanvraag: 0x VoegToeMaatwerk oproepen, 0x de functies van de ExterneVerkoopService oproepen">
+<Method name="Test:Indien 2 TBX in Aanvraag: 0x VoegToeMaatwerk oproepen, 0x de functies van de ExterneVerkoopService oproepen">
 <Implementation><![CDATA[
 	Set DummyHoofdingDto = ##class(APPS.EC.dto.Hoofding).%New()
 	Set ExterneVerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
@@ -284,7 +311,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Indien 2 TBX en 1 LBX  in Aanvraag: 1x VoegToeMaatwerk oproepen">
+<Method name="Test:Indien 2 TBX en 1 LBX  in Aanvraag: 1x VoegToeMaatwerk oproepen">
 <Implementation><![CDATA[
 	Set DummyHoofdingDto = ##class(APPS.EC.dto.Hoofding).%New()
 	Set ExterneVerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
@@ -305,17 +332,23 @@
 	Set OfferteServiceMock = ##class(vhTest.Mock.APPS.VKP.OfferteService).%New()
 	Set OfferteMock = ##class(vhTest.Mock.APPS.VKP.Offerte).%New()
 	Do OfferteMock.IndienMethodCall("GeefID").DanReturn("OfferteID")
+	Do OfferteMock.IndienMethodCall("ZetLeverAdres",$$$ElkeWaarde).DanDoeNiks()
 	Do OfferteServiceMock.VerwachtMethodCall("GeefOfferte","OfferteID").DanReturn(OfferteMock)
 	Do OfferteServiceMock.VerwachtMethodCall("VoegToeMaatwerk",OfferteMock,"","","","").ExactAantalKeer(1)
-	Set UnishopBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New(ExterneVerkoopServiceMock, ProductConverterStub, OfferteServiceMock,,DummyHoofdingDto)
+
+	Set OfferteRepositoryMock = ##class(vhTest.Mock.TECH.Persistentie.Repository).%New()
+	Do OfferteRepositoryMock.VerwachtMethodCall("Bewaar",OfferteMock)
+	
+	Set UnishopBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New(ExterneVerkoopServiceMock, ProductConverterStub, OfferteServiceMock,,DummyHoofdingDto,,,,OfferteRepositoryMock)
 	#dim Resultaat As APPS.EDI.Bestel.BestelService.UnishopBesteller.PlaatsBestelling.Resultaat = UnishopBesteller.MaakOfferte(Aanvraag)
 	
 	Do ExterneVerkoopServiceMock.Verifieer()
 	Do OfferteServiceMock.Verifieer()
+	Do OfferteRepositoryMock.Verifieer()
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Indien 2 TBX en 2 LBX en 1 TAX in Aanvraag: 3x VoegToeMaatwerk oproepen">
+<Method name="Test:Indien 2 TBX en 2 LBX en 1 TAX in Aanvraag: 3x VoegToeMaatwerk oproepen">
 <Implementation><![CDATA[
 	Set DummyHoofdingDto = ##class(APPS.EC.dto.Hoofding).%New()
 	Set ExterneVerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
@@ -338,17 +371,23 @@
 	Set OfferteServiceMock = ##class(vhTest.Mock.APPS.VKP.OfferteService).%New()
 	Set OfferteMock = ##class(vhTest.Mock.APPS.VKP.Offerte).%New()
 	Do OfferteMock.IndienMethodCall("GeefID").DanReturn("OfferteID")
+	Do OfferteMock.IndienMethodCall("ZetLeverAdres",$$$ElkeWaarde).DanDoeNiks()
 	Do OfferteServiceMock.VerwachtMethodCall("GeefOfferte","OfferteID").DanReturn(OfferteMock)
 	Do OfferteServiceMock.VerwachtMethodCall("VoegToeMaatwerk",OfferteMock,"","","","").ExactAantalKeer(3)
-	Set UnishopBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New(ExterneVerkoopServiceMock, ProductConverterStub, OfferteServiceMock,,DummyHoofdingDto)
+
+	Set OfferteRepositoryMock = ##class(vhTest.Mock.TECH.Persistentie.Repository).%New()
+	Do OfferteRepositoryMock.VerwachtMethodCall("Bewaar",OfferteMock)
+	
+	Set UnishopBesteller = ##class(APPS.EDI.Bestel.impl.BestelService.UnishopBesteller).%New(ExterneVerkoopServiceMock, ProductConverterStub, OfferteServiceMock,,DummyHoofdingDto,,,,OfferteRepositoryMock)
 	#dim Resultaat As APPS.EDI.Bestel.BestelService.UnishopBesteller.PlaatsBestelling.Resultaat = UnishopBesteller.MaakOfferte(Aanvraag)
 	
 	Do ExterneVerkoopServiceMock.Verifieer()
 	Do OfferteServiceMock.Verifieer()
+	Do OfferteRepositoryMock.Verifieer()
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Bestelofferte met enkel maatwerk -&gt; via VHintra">
+<Method name="Test:Bestelofferte met enkel maatwerk -&gt; via VHintra">
 <Implementation><![CDATA[
 	#dim DummyOfferteId = "DummyOfferteId"
 	
@@ -376,7 +415,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Bestelofferte met maatwerk en standaardproducten -&gt; via VHintra">
+<Method name="Test:Bestelofferte met maatwerk en standaardproducten -&gt; via VHintra">
 <Implementation><![CDATA[
 	#dim DummyOfferteId = "DummyOfferteId"
 	
@@ -401,7 +440,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Bestelofferte met enkel standaardproducten -&gt; niet via VHintra">
+<Method name="Test:Bestelofferte met enkel standaardproducten -&gt; niet via VHintra">
 <Implementation><![CDATA[
 	#dim DummyOfferteId = "DummyOfferteId"
 	
@@ -426,7 +465,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: 1 LBX en 1 TBX en 1 TAX lijn">
+<Method name="Test:1 LBX en 1 TBX en 1 TAX lijn">
 <Implementation><![CDATA[
 	Set Orderlijnen = ##class(%ListOfDataTypes).%New()
 	Do ..VoegToeLade("LBX", Orderlijnen)
@@ -444,7 +483,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: geen lijnen">
+<Method name="Test:geen lijnen">
 <Implementation><![CDATA[
 	Set Orderlijnen = ##class(%ListOfDataTypes).%New()
 	
@@ -458,7 +497,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: 1 LBX lijn">
+<Method name="Test:1 LBX lijn">
 <Implementation><![CDATA[
 	Set Orderlijnen = ##class(%ListOfDataTypes).%New()
 	Do ..VoegToeLade("LBX", Orderlijnen)
@@ -473,7 +512,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: 2 LBX lijnen">
+<Method name="Test:2 LBX lijnen">
 <Implementation><![CDATA[
 	Set Orderlijnen = ##class(%ListOfDataTypes).%New()
 	Do ..VoegToeLade("LBX", Orderlijnen)
@@ -490,7 +529,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: 1 LBX en 1 TAX lijn">
+<Method name="Test:1 LBX en 1 TAX lijn">
 <Implementation><![CDATA[
 	Set Orderlijnen = ##class(%ListOfDataTypes).%New()
 	Do ..VoegToeLade("LBX", Orderlijnen)
@@ -507,7 +546,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: 3 TBX lijnen">
+<Method name="Test:3 TBX lijnen">
 <Implementation><![CDATA[
 	Set Orderlijnen = ##class(%ListOfDataTypes).%New()
 	Do ..VoegToeLade("TBX", Orderlijnen)
@@ -525,7 +564,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: 2 LBX lijnen met fouten">
+<Method name="Test:2 LBX lijnen met fouten">
 <Implementation><![CDATA[
 	Set Orderlijnen = ##class(%ListOfDataTypes).%New()
 	Do ..VoegToeLade("TBX", Orderlijnen)
@@ -560,7 +599,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: 1 Voorgedefinieerd product">
+<Method name="Test:1 Voorgedefinieerd product">
 <Implementation><![CDATA[
 	Set Orderlijnen = ##class(%ListOfDataTypes).%New()
 	Do ..VoegToeVoorgedefinieerdProduct(Orderlijnen)
@@ -576,7 +615,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: 2 Voorgedefinieerde producten">
+<Method name="Test:2 Voorgedefinieerde producten">
 <Implementation><![CDATA[
 	Set Orderlijnen = ##class(%ListOfDataTypes).%New()
 	Do ..VoegToeVoorgedefinieerdProduct(Orderlijnen)
@@ -593,7 +632,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: 2 Voorgedefinieerde producten en 1 lade (niet-TBX natuurlijk)">
+<Method name="Test:2 Voorgedefinieerde producten en 1 lade (niet-TBX natuurlijk)">
 <Implementation><![CDATA[
 	Set Orderlijnen = ##class(%ListOfDataTypes).%New()
 	Do ..VoegToeVoorgedefinieerdProduct(Orderlijnen)
@@ -611,7 +650,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: een niet-validerende lijn mag niet geconverteerd worden">
+<Method name="Test:een niet-validerende lijn mag niet geconverteerd worden">
 <Implementation><![CDATA[
 	Set DummyHoofdingDto = ##class(APPS.EC.dto.Hoofding).%New()
 	Set ExterneVerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
@@ -681,6 +720,16 @@
 	Set Aanvraag.Header.KlantID = ..#KlantID
 	Set Aanvraag.Header.PersonalityID = ..#PersonalityID
 	Set Aanvraag.Order.GevraagdeLeverdatum = "2011.01.01"
+	
+	Set Aankoper = ##class(APPS.EDI.Bestel.BestelService.PlaatsBestelling.Aankoper).%New()
+	Set Aankoper.Naam = "AankoperNaam"
+	Set Aankoper.LeveringNaam = "LeveringNaam"
+	Set Aankoper.LeveringStraatNrBus = "StraatNrBus"
+	Set Aankoper.LeveringPostcode = "9100"
+	Set Aankoper.LeveringWoonplaats = "Woonplaats"
+	Set Aankoper.LeveringLand = "1019"
+	Set Aankoper.LeveringLandISO3 = "BEL"
+	Set Aanvraag.Order.Aankoper = Aankoper
 	Quit Aanvraag
 ]]></Implementation>
 </Method>
Index: APPS/EDI/Bestel/impl/BestelService/UnishopBesteller.cls.xml
===================================================================
diff -u -r40116 -r40428
--- APPS/EDI/Bestel/impl/BestelService/UnishopBesteller.cls.xml	(.../UnishopBesteller.cls.xml)	(revision 40116)
+++ APPS/EDI/Bestel/impl/BestelService/UnishopBesteller.cls.xml	(.../UnishopBesteller.cls.xml)	(revision 40428)
@@ -64,7 +64,7 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>ExterneVerkoopService:APPS.EC.Verkoop.ExterneVerkoopService,ProductConverter:APPS.EDI.common.impl.ProductConverter,OfferteService:APPS.VKP.OfferteService,OrderIngaveService:APPS.VKP.OrderIngaveService,OfferteHoofding:APPS.EC.dto.Hoofding,ProductValidator:APPS.EDI.common.impl.ProductValidator,VroegsteLeverdatumBepaler:APPS.EC.impl.VroegsteLeverdatumBepaler,WinkelkarRepository:DOM.EC.Winkelkar.impl.WinkelkarRepository</FormalSpec>
+<FormalSpec>ExterneVerkoopService:APPS.EC.Verkoop.ExterneVerkoopService,ProductConverter:APPS.EDI.common.impl.ProductConverter,OfferteService:APPS.VKP.OfferteService,OrderIngaveService:APPS.VKP.OrderIngaveService,OfferteHoofding:APPS.EC.dto.Hoofding,ProductValidator:APPS.EDI.common.impl.ProductValidator,VroegsteLeverdatumBepaler:APPS.EC.impl.VroegsteLeverdatumBepaler,WinkelkarRepository:DOM.EC.Winkelkar.impl.WinkelkarRepository,OfferteRepository:APPS.VKP.Offerte.impl.OfferteRepository</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -77,7 +77,7 @@
 	Set ..OrderIngaveService = $$$Inject(OrderIngaveService,##class(APPS.VKP.OrderIngaveService).%New())
 	Set ..OfferteHoofding = $$$Inject(OfferteHoofding,##class(APPS.EC.dto.Hoofding).%New())
 	Set ..ProductValidator = $$$Inject(ProductValidator,##class(APPS.EDI.common.impl.ProductValidator).%New())
-	Set ..OfferteRepository = ##class(APPS.VKP.Offerte.impl.OfferteRepository).%New()
+	Set ..OfferteRepository = $$$Inject(OfferteRepository,##class(APPS.VKP.Offerte.impl.OfferteRepository).%New())
 	Set ..VroegsteLeverdatumBepaler = $$$Inject(VroegsteLeverdatumBepaler, ##class(APPS.EC.impl.VroegsteLeverdatumBepaler).%New())
 	Set ..WinkelkarRepository = $$$Inject(WinkelkarRepository,##class(DOM.EC.Winkelkar.impl.WinkelkarRepository).%New())
 	Quit $$$OK
@@ -280,6 +280,7 @@
 	Do Leveradres.ZetLandNr(Aanvraag.Order.Aankoper.LeveringLand)
 	
 	Do Offerte.ZetLeverAdres(Leveradres)
+	Do ..OfferteRepository.Bewaar(Offerte)
 ]]></Implementation>
 </Method>