Index: vhUnitTest/WSimpl/AX/CHUI/TerminalNavigationService/CreateAndNavigateToTemporaryOrder/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/WSimpl/AX/CHUI/TerminalNavigationService/CreateAndNavigateToTemporaryOrder/Test.cls.xml	(revision 0)
+++ vhUnitTest/WSimpl/AX/CHUI/TerminalNavigationService/CreateAndNavigateToTemporaryOrder/Test.cls.xml	(revision 43287)
@@ -0,0 +1,39 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.WSimpl.AX.CHUI.TerminalNavigationService.CreateAndNavigateToTemporaryOrder.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test CANTO Laat een Order aanmaken en registreert de navigatie opdracht">
+<Implementation><![CDATA[
+	Set OrderLevenCyclusMock = ##class(vhTest.Mock.AXimpl.Admin.VKP.OrderLevenCyclus).%New()
+	Set TerminalNavigatieService = ##class(vhTest.Mock.AXimpl.Admin.CHUI.TerminalNavigationService).%New()
+	
+	Set CANTO = ##class(WSimpl.AX.CHUI.TerminalNavigationService.CreateAndNavigateToTemporaryOrder).%New(OrderLevenCyclusMock,TerminalNavigatieService)
+
+	Do OrderLevenCyclusMock.VerwachtMethodCall("GenereerOrder","01234","AxSalesId").DanDoeNiks()
+	Do TerminalNavigatieService.VerwachtMethodCall("RaadpleegOrder","AxSalesId","AxUser","AxWorkStation").DanDoeNiks()
+
+	#dim Response as WS.AX.CHUI.dto.CreateAndNavigateToTemporaryOrderResponse = CANTO.CreateAndNavigateToTemporaryOrder(..GeefRequest())
+
+	do $$$AssertEquals(Response.Message,"")
+
+	Do OrderLevenCyclusMock.Verifieer()
+	Do TerminalNavigatieService.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="GeefRequest">
+<ReturnType>WS.AX.CHUI.dto.CreateAndNavigateToTemporaryOrderRequest</ReturnType>
+<Implementation><![CDATA[
+	set request = ##class(WS.AX.CHUI.dto.CreateAndNavigateToTemporaryOrderRequest).%New()
+	Set request.CustomerNumber = "01234"
+	Set request.SalesIdAX = "AxSalesId"
+	Set request.ActiveDirectoryUserName = "AxUser"
+	Set request.WorkstationName = "AxWorkStation"
+	Quit request
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: WSimpl/AX/CHUI/TerminalNavigationService/CreateAndNavigateToTemporaryOrder.cls.xml
===================================================================
diff -u -r43250 -r43287
--- WSimpl/AX/CHUI/TerminalNavigationService/CreateAndNavigateToTemporaryOrder.cls.xml	(.../CreateAndNavigateToTemporaryOrder.cls.xml)	(revision 43250)
+++ WSimpl/AX/CHUI/TerminalNavigationService/CreateAndNavigateToTemporaryOrder.cls.xml	(.../CreateAndNavigateToTemporaryOrder.cls.xml)	(revision 43287)
@@ -3,10 +3,36 @@
 <Class name="WSimpl.AX.CHUI.TerminalNavigationService.CreateAndNavigateToTemporaryOrder">
 <Super>TECH.RegisteredObject</Super>
 
+<Property name="OrderLevenCyclus">
+<Type>AXimpl.Admin.VKP.OrderLevenCyclus</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="TerminalNavigationService">
+<Type>AXimpl.Admin.CHUI.TerminalNavigationService</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>OrderLevenCyclus:AXimpl.Admin.VKP.OrderLevenCyclus,TerminalNavigationService:AXimpl.Admin.CHUI.TerminalNavigationService</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..OrderLevenCyclus = $$$Inject(OrderLevenCyclus,##class(AXimpl.Admin.VKP.OrderLevenCyclus).%New())
+	Set ..TerminalNavigationService = $$$Inject(TerminalNavigationService,##class(AXimpl.Admin.CHUI.TerminalNavigationService).%New())
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="CreateAndNavigateToTemporaryOrder">
-<FormalSpec>CreateAndNavigateToTemporaryOrderRequest:WS.AX.CHUI.dto.CreateAndNavigateToTemporaryOrderRequest</FormalSpec>
+<FormalSpec>CANTORequest:WS.AX.CHUI.dto.CreateAndNavigateToTemporaryOrderRequest</FormalSpec>
 <ReturnType>WS.AX.CHUI.dto.CreateAndNavigateToTemporaryOrderResponse</ReturnType>
-<Implementation><![CDATA[	Quit ##class(WS.AX.CHUI.dto.CreateAndNavigateToTemporaryOrderResponse).%New()
+<Implementation><![CDATA[
+	#dim order as DOM.VKP.Order = ..OrderLevenCyclus.GenereerOrder(CANTORequest.CustomerNumber,CANTORequest.SalesIdAX)
+	Do ..TerminalNavigationService.RaadpleegOrder(CANTORequest.SalesIdAX,CANTORequest.ActiveDirectoryUserName,CANTORequest.WorkstationName )
+	Quit ##class(WS.AX.CHUI.dto.CreateAndNavigateToTemporaryOrderResponse).%New()
 ]]></Implementation>
 </Method>
 </Class>