Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/Test.cls.xml
===================================================================
diff -u -r49897 -r49898
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/Test.cls.xml	(.../Test.cls.xml)	(revision 49897)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/Test.cls.xml	(.../Test.cls.xml)	(revision 49898)
@@ -219,132 +219,6 @@
 	Do LeverAdresRepositoryMock.Verifieer()
 ]]></Implementation>
 </Method>
-
-<Method name="Test: BestelWinkelkar verwerkt offerte automatisch tot een gesloten order als er geen bestelopmerking is">
-<Implementation><![CDATA[
-	#dim VerwachteHoofding As APPS.EC.dto.Hoofding = ##class(vhTest.Utils.APPS.EC.dto.Hoofding).StandaardHoofding()
-	#dim KlantPartijId As %String = "KlantPartijId"
-	
-	#dim BestelWinkelkarRequest As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).StandaardBestelWinkelkarRequest()
-	Set BestelWinkelkarRequest.Header.KlantId = "KlantId"
-	Set BestelWinkelkarRequest.Header.PersonalityId = "PersonalityId"
-	Set BestelWinkelkarRequest.BestelOpmerking = ""
-	Set BestelWinkelkarRequest.LeverAdres.Id = 9999
-
-	Do ..WinkelkarRepositoryMock.IndienMethodCall("GeefOfferteIDViaID", $$$ElkeWaarde).DanReturn("OfferteID")
-	Do ..VerkoopServiceMock.IndienMethodCall("ZetOfferteHoofding", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
-	Do ..VerkoopServiceMock.IndienMethodCall("BestelOfferte", $$$ElkeWaarde, $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
-	Do ..VerkoopServiceMock.IndienMethodCall("ZetTotaalBedragWebshop", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
-	
-	Do ..VerkoopServiceMock.VerwachtMethodCall("ZetAutomatischeVerwerking", "OfferteID", "1").DanDoeNiks()
-
-	Do ..CheckoutTypeBepalerMock.IndienMethodCall("Bepaal", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(##class(APPS.EC.Unishop.enu.CheckoutType).Standaard())
-	Do ..WinkelkarServiceHelperMock.IndienMethodCall("GeefKlantPartijID", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(KlantPartijId)
-	Do ..AsynchroneOrderSluiterMock.VerwachtMethodCall("MaakEnSluitOrderViaOfferteID","OfferteID").ExactAantalKeer(1).DanDoeNiks()
-		
-	#dim Service As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(..VerkoopServiceMock, ..WinkelkarRepositoryMock, ..TransportServiceMock, ..CheckoutTypeBepalerMock, ..WinkelkarServiceHelperMock,,..AsynchroneOrderSluiterMock)
-	#dim Response As WS.Vhisie4.Winkelkar.BestelWinkelkarResponse = Service.BestelWinkelkar(BestelWinkelkarRequest)
-	
-	Do $$$AssertTrue(Response.OrderIsVrijgegeven)
-
-	Do ..AsynchroneOrderSluiterMock.Verifieer()
-	Do ..VerkoopServiceMock.Verifieer()
-]]></Implementation>
-</Method>
-
-<Method name="Test: BestelWinkelkar verwerkt offerte niet automatisch tot een gesloten order als er een bestelopmerking is">
-<Implementation><![CDATA[
-	#dim VerwachteHoofding As APPS.EC.dto.Hoofding = ##class(vhTest.Utils.APPS.EC.dto.Hoofding).StandaardHoofding()
-	#dim KlantPartijId As %String = "KlantPartijId"
-	
-	#dim BestelWinkelkarRequest As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).StandaardBestelWinkelkarRequest()
-	Set BestelWinkelkarRequest.Header.KlantId = "KlantId"
-	Set BestelWinkelkarRequest.Header.PersonalityId = "PersonalityId"
-	Set BestelWinkelkarRequest.BestelOpmerking = "BestelOpmerking"
-	Set BestelWinkelkarRequest.LeverAdres.Id = 9999
-	
-	Do ..WinkelkarRepositoryMock.IndienMethodCall("GeefOfferteIDViaID", $$$ElkeWaarde).DanReturn("OfferteID")
-	Do ..VerkoopServiceMock.IndienMethodCall("ZetOfferteHoofding", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
-	Do ..VerkoopServiceMock.IndienMethodCall("BestelOfferte", $$$ElkeWaarde, $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
-	Do ..VerkoopServiceMock.IndienMethodCall("ZetTotaalBedragWebshop", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
-	Do ..CheckoutTypeBepalerMock.IndienMethodCall("Bepaal", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(##class(APPS.EC.Unishop.enu.CheckoutType).Standaard())
-	Do ..WinkelkarServiceHelperMock.IndienMethodCall("GeefKlantPartijID", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(KlantPartijId)
-	
-	Do ..AsynchroneOrderSluiterMock.VerwachtMethodCall("MaakEnSluitOrderViaOfferteID","OfferteID").Nooit()
-		
-	#dim Service As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(..VerkoopServiceMock, ..WinkelkarRepositoryMock, ..TransportServiceMock, ..CheckoutTypeBepalerMock, ..WinkelkarServiceHelperMock,,..AsynchroneOrderSluiterMock)
-	#dim Response As WS.Vhisie4.Winkelkar.BestelWinkelkarResponse = Service.BestelWinkelkar(BestelWinkelkarRequest)
-	
-	Do $$$AssertFalse(Response.OrderIsVrijgegeven)
-	
-	Do ..AsynchroneOrderSluiterMock.Verifieer()
-]]></Implementation>
-</Method>
-
-<UDLText name="T">
-<Content><![CDATA[
-/*
-Method "Test: BestelWinkelkar verwerkt offerte niet automatisch tot een gesloten order als het een manueel ingevoerd leveringsadres is"()
-{
-	#dim VerwachteHoofding As APPS.EC.dto.Hoofding = ##class(vhTest.Utils.APPS.EC.dto.Hoofding).StandaardHoofding()
-	#dim KlantPartijId As %String = "KlantPartijId"
-	
-	#dim BestelWinkelkarRequest As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).StandaardBestelWinkelkarRequest()
-	Set BestelWinkelkarRequest.Header.KlantId = "KlantId"
-	Set BestelWinkelkarRequest.Header.PersonalityId = "PersonalityId"
-	Set BestelWinkelkarRequest.BestelOpmerking = ""
-	Set BestelWinkelkarRequest.LeverAdres.Id = ""
-	
-	Do ..WinkelkarRepositoryMock.IndienMethodCall("GeefOfferteIDViaID", $$$ElkeWaarde).DanReturn("OfferteID")
-	Do ..VerkoopServiceMock.IndienMethodCall("ZetOfferteHoofding", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
-	Do ..VerkoopServiceMock.IndienMethodCall("BestelOfferte", $$$ElkeWaarde, $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
-	Do ..VerkoopServiceMock.IndienMethodCall("ZetTotaalBedragWebshop", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
-	Do ..CheckoutTypeBepalerMock.IndienMethodCall("Bepaal", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(##class(APPS.EC.Unishop.enu.CheckoutType).Standaard())
-	Do ..WinkelkarServiceHelperMock.IndienMethodCall("GeefKlantPartijID", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(KlantPartijId)
-	
-	Do ..AsynchroneOrderSluiterMock.VerwachtMethodCall("MaakEnSluitOrderViaOfferteID","OfferteID").Nooit()
-		
-	#dim Service As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(..VerkoopServiceMock, ..WinkelkarRepositoryMock, ..TransportServiceMock, ..CheckoutTypeBepalerMock, ..WinkelkarServiceHelperMock,,..AsynchroneOrderSluiterMock)
-	#dim Response As WS.Vhisie4.Winkelkar.BestelWinkelkarResponse = Service.BestelWinkelkar(BestelWinkelkarRequest)
-	
-	Do $$$AssertFalse(Response.OrderIsVrijgegeven)
-	
-	Do ..AsynchroneOrderSluiterMock.Verifieer()
-}
-*/
-]]></Content>
-</UDLText>
-
-<Method name="Test: BestelWinkelkar verwerkt offerte automatisch tot een gesloten order als het een haefele bestelling is met opmerking van 8 cijfers">
-<Implementation><![CDATA[
-	#dim VerwachteHoofding As APPS.EC.dto.Hoofding = ##class(vhTest.Utils.APPS.EC.dto.Hoofding).StandaardHoofding()
-	#dim KlantPartijId As %String = ##class(DOM.VKP.enu.Klant).HaefeleNederland()
-	
-	#dim BestelWinkelkarRequest As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).StandaardBestelWinkelkarRequest()
-	Set BestelWinkelkarRequest.Header.KlantId = "KlantId"
-	Set BestelWinkelkarRequest.Header.PersonalityId = "PersonalityId"
-	Set BestelWinkelkarRequest.BestelOpmerking = "12345678"
-	
-	Do ..WinkelkarRepositoryMock.IndienMethodCall("GeefOfferteIDViaID", $$$ElkeWaarde).DanReturn("OfferteID")
-	Do ..VerkoopServiceMock.IndienMethodCall("ZetOfferteHoofding", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
-	Do ..VerkoopServiceMock.IndienMethodCall("BestelOfferte", $$$ElkeWaarde, $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
-	Do ..VerkoopServiceMock.IndienMethodCall("ZetTotaalBedragWebshop", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
-	Do ..VerkoopServiceMock.VerwachtMethodCall("ZetAutomatischeVerwerking", "OfferteID", "1").DanDoeNiks()
-
-	Do ..CheckoutTypeBepalerMock.IndienMethodCall("Bepaal", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(##class(APPS.EC.Unishop.enu.CheckoutType).Standaard())
-	Do ..WinkelkarServiceHelperMock.IndienMethodCall("GeefKlantPartijID", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(KlantPartijId)
-
-	Do ..AsynchroneOrderSluiterMock.VerwachtMethodCall("MaakEnSluitOrderViaOfferteID","OfferteID").ExactAantalKeer(1).DanDoeNiks()
-		
-	#dim Service As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(..VerkoopServiceMock, ..WinkelkarRepositoryMock, ..TransportServiceMock, ..CheckoutTypeBepalerMock, ..WinkelkarServiceHelperMock,,..AsynchroneOrderSluiterMock)
-	#dim Response As WS.Vhisie4.Winkelkar.BestelWinkelkarResponse = Service.BestelWinkelkar(BestelWinkelkarRequest)
-	
-	Do $$$AssertTrue(Response.OrderIsVrijgegeven)
-	
-	Do ..AsynchroneOrderSluiterMock.Verifieer()
-	Do ..VerkoopServiceMock.Verifieer()
-]]></Implementation>
-</Method>
 </Class>
 
 
Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/OrderVrijgave/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/OrderVrijgave/Test.cls.xml	(revision 0)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/OrderVrijgave/Test.cls.xml	(revision 49898)
@@ -0,0 +1,206 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar.OrderVrijgave.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Property name="WinkelkarRepositoryMock">
+<Type>vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="VerkoopServiceMock">
+<Type>vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="CheckoutTypeBepalerMock">
+<Type>vhTest.Mock.APPS.EC.impl.ConfiguratorService.CheckoutTypeBepaler</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="TransportServiceMock">
+<Type>vhTest.Mock.APPS.EC.Transport.Service</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="WinkelkarServiceHelperMock">
+<Type>vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarService.Helper</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="AsynchroneOrderSluiterMock">
+<Type>vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar.AsynchroneOrderSluiter</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="OnBeforeOneTest">
+<FormalSpec>aTestName:%String</FormalSpec>
+<Implementation><![CDATA[
+	Do ##super(aTestName)
+	Set ..WinkelkarRepositoryMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
+	Set ..VerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
+	Set ..CheckoutTypeBepalerMock = ##class(vhTest.Mock.APPS.EC.impl.ConfiguratorService.CheckoutTypeBepaler).%New()
+	Set ..TransportServiceMock = ##class(vhTest.Mock.APPS.EC.Transport.Service).%New()
+	Set ..WinkelkarServiceHelperMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarService.Helper).%New()
+	Set ..AsynchroneOrderSluiterMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar.AsynchroneOrderSluiter).%New()
+]]></Implementation>
+</Method>
+
+<Method name="Test: BestelWinkelkar verwerkt offerte automatisch tot een gesloten order als er geen bestelopmerking is">
+<Implementation><![CDATA[
+	#dim VerwachteHoofding As APPS.EC.dto.Hoofding = ##class(vhTest.Utils.APPS.EC.dto.Hoofding).StandaardHoofding()
+	#dim KlantPartijId As %String = "KlantPartijId"
+	
+	#dim BestelWinkelkarRequest As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).StandaardBestelWinkelkarRequest()
+	Set BestelWinkelkarRequest.Header.KlantId = "KlantId"
+	Set BestelWinkelkarRequest.Header.PersonalityId = "PersonalityId"
+	Set BestelWinkelkarRequest.BestelOpmerking = ""
+	Set BestelWinkelkarRequest.LeverAdres.Id = 9999
+
+	Do ..WinkelkarRepositoryMock.IndienMethodCall("GeefOfferteIDViaID", $$$ElkeWaarde).DanReturn("OfferteID")
+	Do ..VerkoopServiceMock.IndienMethodCall("ZetOfferteHoofding", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
+	Do ..VerkoopServiceMock.IndienMethodCall("BestelOfferte", $$$ElkeWaarde, $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
+	Do ..VerkoopServiceMock.IndienMethodCall("ZetTotaalBedragWebshop", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
+	
+	Do ..VerkoopServiceMock.VerwachtMethodCall("ZetAutomatischeVerwerking", "OfferteID", "1").DanDoeNiks()
+
+	Do ..CheckoutTypeBepalerMock.IndienMethodCall("Bepaal", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(##class(APPS.EC.Unishop.enu.CheckoutType).Standaard())
+	Do ..WinkelkarServiceHelperMock.IndienMethodCall("GeefKlantPartijID", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(KlantPartijId)
+	Do ..AsynchroneOrderSluiterMock.VerwachtMethodCall("MaakEnSluitOrderViaOfferteID","OfferteID").ExactAantalKeer(1).DanDoeNiks()
+		
+	#dim Service As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(..VerkoopServiceMock, ..WinkelkarRepositoryMock, ..TransportServiceMock, ..CheckoutTypeBepalerMock, ..WinkelkarServiceHelperMock,,..AsynchroneOrderSluiterMock)
+	#dim Response As WS.Vhisie4.Winkelkar.BestelWinkelkarResponse = Service.BestelWinkelkar(BestelWinkelkarRequest)
+	
+	Do $$$AssertTrue(Response.OrderIsVrijgegeven)
+
+	Do ..AsynchroneOrderSluiterMock.Verifieer()
+	Do ..VerkoopServiceMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: BestelWinkelkar verwerkt offerte niet automatisch tot een gesloten order als er een bestelopmerking is">
+<Implementation><![CDATA[
+	#dim VerwachteHoofding As APPS.EC.dto.Hoofding = ##class(vhTest.Utils.APPS.EC.dto.Hoofding).StandaardHoofding()
+	#dim KlantPartijId As %String = "KlantPartijId"
+	
+	#dim BestelWinkelkarRequest As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).StandaardBestelWinkelkarRequest()
+	Set BestelWinkelkarRequest.Header.KlantId = "KlantId"
+	Set BestelWinkelkarRequest.Header.PersonalityId = "PersonalityId"
+	Set BestelWinkelkarRequest.BestelOpmerking = "BestelOpmerking"
+	Set BestelWinkelkarRequest.LeverAdres.Id = 9999
+	
+	Do ..WinkelkarRepositoryMock.IndienMethodCall("GeefOfferteIDViaID", $$$ElkeWaarde).DanReturn("OfferteID")
+	Do ..VerkoopServiceMock.IndienMethodCall("ZetOfferteHoofding", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
+	Do ..VerkoopServiceMock.IndienMethodCall("BestelOfferte", $$$ElkeWaarde, $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
+	Do ..VerkoopServiceMock.IndienMethodCall("ZetTotaalBedragWebshop", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
+	Do ..CheckoutTypeBepalerMock.IndienMethodCall("Bepaal", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(##class(APPS.EC.Unishop.enu.CheckoutType).Standaard())
+	Do ..WinkelkarServiceHelperMock.IndienMethodCall("GeefKlantPartijID", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(KlantPartijId)
+	
+	Do ..AsynchroneOrderSluiterMock.VerwachtMethodCall("MaakEnSluitOrderViaOfferteID","OfferteID").Nooit()
+		
+	#dim Service As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(..VerkoopServiceMock, ..WinkelkarRepositoryMock, ..TransportServiceMock, ..CheckoutTypeBepalerMock, ..WinkelkarServiceHelperMock,,..AsynchroneOrderSluiterMock)
+	#dim Response As WS.Vhisie4.Winkelkar.BestelWinkelkarResponse = Service.BestelWinkelkar(BestelWinkelkarRequest)
+	
+	Do $$$AssertFalse(Response.OrderIsVrijgegeven)
+	
+	Do ..AsynchroneOrderSluiterMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<UDLText name="T">
+<Content><![CDATA[
+/*
+Method "Test: BestelWinkelkar verwerkt offerte niet automatisch tot een gesloten order als het een manueel ingevoerd leveringsadres is"()
+{
+	#dim VerwachteHoofding As APPS.EC.dto.Hoofding = ##class(vhTest.Utils.APPS.EC.dto.Hoofding).StandaardHoofding()
+	#dim KlantPartijId As %String = "KlantPartijId"
+	
+	#dim BestelWinkelkarRequest As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).StandaardBestelWinkelkarRequest()
+	Set BestelWinkelkarRequest.Header.KlantId = "KlantId"
+	Set BestelWinkelkarRequest.Header.PersonalityId = "PersonalityId"
+	Set BestelWinkelkarRequest.BestelOpmerking = ""
+	Set BestelWinkelkarRequest.LeverAdres.Id = ""
+	
+	Do ..WinkelkarRepositoryMock.IndienMethodCall("GeefOfferteIDViaID", $$$ElkeWaarde).DanReturn("OfferteID")
+	Do ..VerkoopServiceMock.IndienMethodCall("ZetOfferteHoofding", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
+	Do ..VerkoopServiceMock.IndienMethodCall("BestelOfferte", $$$ElkeWaarde, $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
+	Do ..VerkoopServiceMock.IndienMethodCall("ZetTotaalBedragWebshop", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
+	Do ..CheckoutTypeBepalerMock.IndienMethodCall("Bepaal", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(##class(APPS.EC.Unishop.enu.CheckoutType).Standaard())
+	Do ..WinkelkarServiceHelperMock.IndienMethodCall("GeefKlantPartijID", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(KlantPartijId)
+	
+	Do ..AsynchroneOrderSluiterMock.VerwachtMethodCall("MaakEnSluitOrderViaOfferteID","OfferteID").Nooit()
+		
+	#dim Service As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(..VerkoopServiceMock, ..WinkelkarRepositoryMock, ..TransportServiceMock, ..CheckoutTypeBepalerMock, ..WinkelkarServiceHelperMock,,..AsynchroneOrderSluiterMock)
+	#dim Response As WS.Vhisie4.Winkelkar.BestelWinkelkarResponse = Service.BestelWinkelkar(BestelWinkelkarRequest)
+	
+	Do $$$AssertFalse(Response.OrderIsVrijgegeven)
+	
+	Do ..AsynchroneOrderSluiterMock.Verifieer()
+}
+*/
+]]></Content>
+</UDLText>
+
+<Method name="Test: BestelWinkelkar verwerkt haefele offerte automatisch tot een gesloten order als de opmerking 8 cijfers is">
+<Implementation><![CDATA[
+	#dim VerwachteHoofding As APPS.EC.dto.Hoofding = ##class(vhTest.Utils.APPS.EC.dto.Hoofding).StandaardHoofding()
+	#dim KlantPartijId As %String = ##class(DOM.VKP.enu.Klant).HaefeleNederland()
+	
+	#dim BestelWinkelkarRequest As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).StandaardBestelWinkelkarRequest()
+	Set BestelWinkelkarRequest.Header.KlantId = "KlantId"
+	Set BestelWinkelkarRequest.Header.PersonalityId = "PersonalityId"
+	Set BestelWinkelkarRequest.BestelOpmerking = "12345678"
+	
+	Do ..WinkelkarRepositoryMock.IndienMethodCall("GeefOfferteIDViaID", $$$ElkeWaarde).DanReturn("OfferteID")
+	Do ..VerkoopServiceMock.IndienMethodCall("ZetOfferteHoofding", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
+	Do ..VerkoopServiceMock.IndienMethodCall("BestelOfferte", $$$ElkeWaarde, $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
+	Do ..VerkoopServiceMock.IndienMethodCall("ZetTotaalBedragWebshop", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
+	Do ..VerkoopServiceMock.VerwachtMethodCall("ZetAutomatischeVerwerking", "OfferteID", "1").DanDoeNiks()
+
+	Do ..CheckoutTypeBepalerMock.IndienMethodCall("Bepaal", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(##class(APPS.EC.Unishop.enu.CheckoutType).Standaard())
+	Do ..WinkelkarServiceHelperMock.IndienMethodCall("GeefKlantPartijID", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(KlantPartijId)
+
+	Do ..AsynchroneOrderSluiterMock.VerwachtMethodCall("MaakEnSluitOrderViaOfferteID","OfferteID").ExactAantalKeer(1).DanDoeNiks()
+		
+	#dim Service As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(..VerkoopServiceMock, ..WinkelkarRepositoryMock, ..TransportServiceMock, ..CheckoutTypeBepalerMock, ..WinkelkarServiceHelperMock,,..AsynchroneOrderSluiterMock)
+	#dim Response As WS.Vhisie4.Winkelkar.BestelWinkelkarResponse = Service.BestelWinkelkar(BestelWinkelkarRequest)
+	
+	Do $$$AssertTrue(Response.OrderIsVrijgegeven)
+	
+	Do ..AsynchroneOrderSluiterMock.Verifieer()
+	Do ..VerkoopServiceMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: BestelWinkelkar verwerkt haefele offerte niet automatisch tot een gesloten order als de opmerking niet 8 cijfers is">
+<Implementation><![CDATA[
+	#dim VerwachteHoofding As APPS.EC.dto.Hoofding = ##class(vhTest.Utils.APPS.EC.dto.Hoofding).StandaardHoofding()
+	#dim KlantPartijId As %String = ##class(DOM.VKP.enu.Klant).HaefeleNederland()
+	
+	#dim BestelWinkelkarRequest As WS.Vhisie4.Winkelkar.BestelWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BestelWinkelkarRequest).StandaardBestelWinkelkarRequest()
+	Set BestelWinkelkarRequest.Header.KlantId = "KlantId"
+	Set BestelWinkelkarRequest.Header.PersonalityId = "PersonalityId"
+	Set BestelWinkelkarRequest.BestelOpmerking = "123456785 niet verwerken"
+	
+	Do ..WinkelkarRepositoryMock.IndienMethodCall("GeefOfferteIDViaID", $$$ElkeWaarde).DanReturn("OfferteID")
+	Do ..VerkoopServiceMock.IndienMethodCall("ZetOfferteHoofding", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
+	Do ..VerkoopServiceMock.IndienMethodCall("BestelOfferte", $$$ElkeWaarde, $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
+	Do ..VerkoopServiceMock.IndienMethodCall("ZetTotaalBedragWebshop", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
+
+	Do ..CheckoutTypeBepalerMock.IndienMethodCall("Bepaal", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(##class(APPS.EC.Unishop.enu.CheckoutType).Standaard())
+	Do ..WinkelkarServiceHelperMock.IndienMethodCall("GeefKlantPartijID", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(KlantPartijId)
+
+	Do ..AsynchroneOrderSluiterMock.VerwachtMethodCall("MaakEnSluitOrderViaOfferteID","OfferteID").Nooit()
+		
+	#dim Service As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar).%New(..VerkoopServiceMock, ..WinkelkarRepositoryMock, ..TransportServiceMock, ..CheckoutTypeBepalerMock, ..WinkelkarServiceHelperMock,,..AsynchroneOrderSluiterMock)
+	#dim Response As WS.Vhisie4.Winkelkar.BestelWinkelkarResponse = Service.BestelWinkelkar(BestelWinkelkarRequest)
+	
+	Do $$$AssertFalse(Response.OrderIsVrijgegeven)
+	
+	Do ..AsynchroneOrderSluiterMock.Verifieer()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>