Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/UnishopBesteller/PlaatsBestelling/Test.cls.xml
===================================================================
diff -u -r40494 -r40581
--- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/UnishopBesteller/PlaatsBestelling/Test.cls.xml	(.../Test.cls.xml)	(revision 40494)
+++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/UnishopBesteller/PlaatsBestelling/Test.cls.xml	(.../Test.cls.xml)	(revision 40581)
@@ -70,7 +70,7 @@
 	Set DummyHoofdingDto = ##class(APPS.EC.dto.Hoofding).%New()
 	Set ExterneVerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
 	Do ExterneVerkoopServiceMock.VerwachtMethodCall("MaakOfferte",..#KlantID,..#PersonalityID, "").DanReturn(##class(APPS.EC.dto.OfferteIDEnWinkelkarID).%New("OfferteID","WinkelkarID"))
-	Do ExterneVerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","OfferteID",DummyHoofdingDto).ExactAantalKeer(1)
+	Do ExterneVerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","OfferteID",DummyHoofdingDto).ExactAantalKeer(0)
 	Do ExterneVerkoopServiceMock.VerwachtMethodCall("WisOfferte","OfferteID")
 		
 	Set Orderlijnen = ##class(%ListOfDataTypes).%New()
@@ -105,7 +105,7 @@
 	Set ExterneVerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
 	Do ExterneVerkoopServiceMock.VerwachtMethodCall("MaakOfferte",..#KlantID,..#PersonalityID, "").DanReturn(##class(APPS.EC.dto.OfferteIDEnWinkelkarID).%New("OfferteID","WinkelkarID"))
 	Do ExterneVerkoopServiceMock.VerwachtMethodCall("BestelOfferte","OfferteID",..#KlantID,..#PersonalityID).ExactAantalKeer(0)
-	Do ExterneVerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","OfferteID",DummyHoofdingDto).ExactAantalKeer(1)
+	Do ExterneVerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","OfferteID",DummyHoofdingDto).ExactAantalKeer(0)
 	Do ExterneVerkoopServiceMock.VerwachtMethodCall("WisOfferte","OfferteID")
 	
 	Set Orderlijnen = ##class(%ListOfDataTypes).%New()
@@ -583,7 +583,7 @@
 	Set ExterneVerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
 	Do ExterneVerkoopServiceMock.VerwachtMethodCall("MaakOfferte",..#KlantID,..#PersonalityID,"").DanReturn(##class(APPS.EC.dto.OfferteIDEnWinkelkarID).%New("OfferteID","WinkelkarID"))
 	Do ExterneVerkoopServiceMock.VerwachtMethodCall("WisOfferte","OfferteID")
-	Do ExterneVerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","OfferteID",DummyHoofdingDto).ExactAantalKeer(1)
+	Do ExterneVerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","OfferteID",DummyHoofdingDto).ExactAantalKeer(0)
 	
 	Set ProductConverterStub = ##class(vhTest.Mock.APPS.EDI.common.impl.ProductConverter).%New()
 	Do ProductConverterStub.IndienMethodCall("Convert",$$$ElkeWaarde,$$$ElkeWaarde).DanException($$$DummyException)
@@ -659,7 +659,7 @@
 	Set DummyHoofdingDto = ##class(APPS.EC.dto.Hoofding).%New()
 	Set ExterneVerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
 	Do ExterneVerkoopServiceMock.VerwachtMethodCall("MaakOfferte",..#KlantID,..#PersonalityID,"").DanReturn(##class(APPS.EC.dto.OfferteIDEnWinkelkarID).%New("OfferteID","WinkelkarID"))
-	Do ExterneVerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","OfferteID",DummyHoofdingDto).ExactAantalKeer(1)
+	Do ExterneVerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","OfferteID",DummyHoofdingDto).ExactAantalKeer(0)
 	Do ExterneVerkoopServiceMock.VerwachtMethodCall("WisOfferte","OfferteID").ExactAantalKeer(1)
 	Set OfferteStub = ##class(vhTest.Mock.APPS.VKP.Offerte).%New()
 	Do OfferteStub.IndienMethodCall("GeefID").DanReturn("OfferteID")
Index: APPS/EDI/Bestel/impl/BestelService/UnishopBesteller.cls.xml
===================================================================
diff -u -r40465 -r40581
--- APPS/EDI/Bestel/impl/BestelService/UnishopBesteller.cls.xml	(.../UnishopBesteller.cls.xml)	(revision 40465)
+++ APPS/EDI/Bestel/impl/BestelService/UnishopBesteller.cls.xml	(.../UnishopBesteller.cls.xml)	(revision 40581)
@@ -105,6 +105,7 @@
 			
 			Do ..ZetLeveringInformatie(Aanvraag, Offerte)
 	
+			Do ..ExterneVerkoopService.ZetOfferteHoofding(Offerte.GeefID(),..OfferteHoofding)
 			Do ..OfferteRepository.Bewaar(Offerte)
 			
 			Set Resultaat = ##class(APPS.EDI.Bestel.BestelService.PlaatsBestelling.Resultaat).%New(Offerte.GeefID())
@@ -146,7 +147,6 @@
 	Set ..OfferteHoofding.Referentie.KlantOrderNummer = Order.KlantOrderNummer
 	Set ..OfferteHoofding.Referentie.CommissieReferentie = Order.CommissieReferentie
 	Set ..OfferteHoofding.LeveringDetail.WensDatum = Order.GevraagdeLeverdatum
-	Do ..ExterneVerkoopService.ZetOfferteHoofding(Offerte.GeefID(),..OfferteHoofding)
 ]]></Implementation>
 </Method>
 
@@ -290,6 +290,8 @@
 <Implementation><![CDATA[
 	If Order.GevraagdeLeverdatum=""{
 		Set ..OfferteHoofding.LeveringDetail.Datum = ..VroegsteLeverdatumBepaler.GeefVroegsteLeverdatum(..WinkelkarRepository.GeefViaID(Offerte.GeefWinkelkarID()))
+		Do ##class(Tools.Wlip).%New(127).String("nu="_##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentDate())
+		Do ##class(Tools.Wlip).%New(127).String(..OfferteHoofding.LeveringDetail.Datum)
 	} Else {
 		#dim OmgezetteLeverdatum As %String = $$YYYYMMDD2EuropeanDate^vhLib.DateTime(Order.GevraagdeLeverdatum)
 		If $$IsValidEuropeanDate^vhLib.DateTime(OmgezetteLeverdatum) {