Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte/Test.cls.xml	(revision 0)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakOrderVanOfferte/Test.cls.xml	(revision 39763)
@@ -0,0 +1,58 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.WSimpl.Vhisie4.Winkelkar.WinkelkarService.MaakOrderVanOfferte.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test: Order wordt gemaakt van offerte">
+<Implementation><![CDATA[
+	Set VanHoeckeGebruikerBeheerderMock = ##class(vhTest.Mock.DOM.common.VanHoeckeGebruikerBeheerder).%New()
+	Do VanHoeckeGebruikerBeheerderMock.VerwachtMethodCall("GeefGebruikerViaEmail","GebruikerEmail@VanHoecke.be").DanReturn(..GeefVanHoeckeGebruiker())
+	
+	Set WinkelkarRepositoryMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
+	Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteIDViaID","1").DanReturn("310250")
+	
+	Set SystemInformationMock = ##class(vhTest.Mock.TECH.SystemInformation).%New()
+	Do SystemInformationMock.VerwachtMethodCall("GeefComputerNaamViaIP","127.0.0.1").DanReturn("ComputerNaam.VanHoecke.be")
+	
+	Set OrderIngaveServiceMock = ##class(vhTest.Mock.APPS.VKP.OrderIngaveService).%New()
+	Do OrderIngaveServiceMock.VerwachtMethodCall("MaakOrderVanOfferte","310250","").DanReturn("123456")
+
+	Set TerminalNavigatieServiceMock = ##class(vhTest.Mock.APPS.CHUI.TerminalNavigatieService).%New()
+	Do TerminalNavigatieServiceMock.VerwachtMethodCall("RaadpleegOrder","4682||42","ComputerNaam.VanHoecke.be","123456").DanDoeNiks()
+
+	Set MaakOrderVanOfferte = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.MaakOrderVanOfferte).%New(WinkelkarRepositoryMock, VanHoeckeGebruikerBeheerderMock, TerminalNavigatieServiceMock , OrderIngaveServiceMock, SystemInformationMock)
+	Do MaakOrderVanOfferte.MaakOrderVanOfferte(..GeefMaakOrderVanOfferteRequest())
+
+	Do WinkelkarRepositoryMock.Verifieer()
+	Do VanHoeckeGebruikerBeheerderMock.Verifieer()
+	Do TerminalNavigatieServiceMock.Verifieer()
+	Do OrderIngaveServiceMock.Verifieer()
+	Do SystemInformationMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="GeefMaakOrderVanOfferteRequest">
+<Private>1</Private>
+<ReturnType>WS.Vhisie4.Winkelkar.MaakOrderVanOfferteRequest</ReturnType>
+<Implementation><![CDATA[
+	Set MaakOrderVanOfferteRequest = ##class(WS.Vhisie4.Winkelkar.MaakOrderVanOfferteRequest).%New()
+	Set MaakOrderVanOfferteRequest.Header = ##class(WS.Vhisie4.RequestHeader).%New()
+	Set MaakOrderVanOfferteRequest.Header.GebruikerIp = "127.0.0.1"
+	Set MaakOrderVanOfferteRequest.GebruikerEmail = "GebruikerEmail@VanHoecke.be"
+	Set MaakOrderVanOfferteRequest.WinkelkarId = "1"
+	Quit MaakOrderVanOfferteRequest
+]]></Implementation>
+</Method>
+
+<Method name="GeefVanHoeckeGebruiker">
+<Private>1</Private>
+<ReturnType>DOM.common.VanHoeckeGebruiker</ReturnType>
+<Implementation><![CDATA[
+	Set VanHoeckeGebruiker = ##class(DOM.common.impl.VanHoeckeGebruikerImpl).%New("42","","","")
+	Quit VanHoeckeGebruiker
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>