Index: vhUnitTest/WSimpl/AX/CHUI/TerminalNavigationService/NavigateToConfirmedOrder/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/WSimpl/AX/CHUI/TerminalNavigationService/NavigateToConfirmedOrder/Test.cls.xml	(revision 0)
+++ vhUnitTest/WSimpl/AX/CHUI/TerminalNavigationService/NavigateToConfirmedOrder/Test.cls.xml	(revision 44582)
@@ -0,0 +1,34 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.WSimpl.AX.CHUI.TerminalNavigationService.NavigateToConfirmedOrder.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test registratie van de navigatie opdracht">
+<Implementation><![CDATA[
+	Set TerminalNavigatieService = ##class(vhTest.Mock.AXimpl.Admin.CHUI.TerminalNavigationService).%New()
+	Do TerminalNavigatieService.VerwachtMethodCall("RaadpleegBevestigdOrder","AxSalesId","AxUser","AxWorkStation").DanDoeNiks()
+	
+	Set Service = ##class(WSimpl.AX.CHUI.TerminalNavigationService.NavigateToConfirmedOrder).%New(TerminalNavigatieService)
+	#dim Response as WS.AX.CHUI.dto.NavigateToConfirmedOrderResponse = Service.NavigateToConfirmedOrder(..GeefRequest())
+
+	do $$$AssertEquals(Response.Message,"")
+	Do TerminalNavigatieService.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="GeefRequest">
+<Private>1</Private>
+<ReturnType>WS.AX.CHUI.dto.NavigateToConfirmedOrderRequest</ReturnType>
+<Implementation><![CDATA[
+	set Request = ##class(WS.AX.CHUI.dto.NavigateToConfirmedOrderRequest).%New()
+	Set Request.CustomerNumber = "AxCustomerId"
+	Set Request.SalesIdAX = "AxSalesId"
+	Set Request.ActiveDirectoryUserName = "AxUser"
+	Set Request.WorkstationName = "AxWorkStation"
+	Quit Request
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Mock/AXimpl/Admin/CHUI/TerminalNavigationService.cls.xml
===================================================================
diff -u -r43691 -r44582
--- vhTest/Mock/AXimpl/Admin/CHUI/TerminalNavigationService.cls.xml	(.../TerminalNavigationService.cls.xml)	(revision 43691)
+++ vhTest/Mock/AXimpl/Admin/CHUI/TerminalNavigationService.cls.xml	(.../TerminalNavigationService.cls.xml)	(revision 44582)
@@ -8,6 +8,12 @@
 <Super>AXimpl.Admin.CHUI.TerminalNavigationService,Tools.Mock.MockClassBase</Super>
 <Inheritance>right</Inheritance>
 
+<Method name="RaadpleegBevestigdOrder">
+<FormalSpec>AxSalesId:%String,AxGebruiker:%String,WorkstationName:%String</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("RaadpleegBevestigdOrder",AxSalesId,AxGebruiker,WorkstationName)
+]]></Implementation>
+</Method>
+
 <Method name="RaadpleegOrder">
 <FormalSpec>AxSalesId:%String,AxGebruiker:%String,WorkstationName:%String</FormalSpec>
 <Implementation><![CDATA[	do ..VerwerkMethodCall("RaadpleegOrder",AxSalesId,AxGebruiker,WorkstationName)
Index: vhTest/Fake/AXimpl/Admin/VKP/OrderLookup.cls.xml
===================================================================
diff -u -r43236 -r44582
--- vhTest/Fake/AXimpl/Admin/VKP/OrderLookup.cls.xml	(.../OrderLookup.cls.xml)	(revision 43236)
+++ vhTest/Fake/AXimpl/Admin/VKP/OrderLookup.cls.xml	(.../OrderLookup.cls.xml)	(revision 44582)
@@ -13,6 +13,13 @@
 <Implementation><![CDATA[	Quit ""
 ]]></Implementation>
 </Method>
+
+<Method name="GeefOrderIdVanBevestigdOrder">
+<FormalSpec>AxSalesId:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: AXimpl/Admin/VKP/OrderLookup.cls.xml
===================================================================
diff -u -r43421 -r44582
--- AXimpl/Admin/VKP/OrderLookup.cls.xml	(.../OrderLookup.cls.xml)	(revision 43421)
+++ AXimpl/Admin/VKP/OrderLookup.cls.xml	(.../OrderLookup.cls.xml)	(revision 44582)
@@ -41,6 +41,27 @@
 	Quit OrderId
 ]]></Implementation>
 </Method>
+
+<Method name="GeefOrderIdVanBevestigdOrder">
+<FormalSpec>AxSalesId:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	Set Query = ##class(TECH.DynamicQuery).%New("SELECT ID FROM Flow_Order.Hoofding WHERE ID > 100999 and AXSalesid = ?",$ListBuild(AxSalesId))
+	#dim ResultSet As TECH.ResultSet = ..QueryAPI.GetResultSet(Query)
+	#dim OrderId as %String = ""
+	if ResultSet.Next() {
+		Set OrderId = ResultSet.GetDataByName("ID")
+		if ResultSet.Next() {
+			Set Exception  = ##class(AXimpl.Admin.DatabaseOutOfSyncException).%New(##class(AXimpl.Admin.EntiteitType).Order(),AxSalesId,OrderId _ "," _ ResultSet.GetDataByName("ID"))
+			Do Exception.VoegToeExtraInfo("Minstens 2 orders met dezelfde Ax SalesId gevonden")
+			Do ##class(TECH.ExceptionHandler).Throw(Exception)			
+		}		
+	} else {
+		Do ##class(TECH.ExceptionHandler).Throw(##class(AXimpl.Admin.DatabaseOutOfSyncException).%New(##class(AXimpl.Admin.EntiteitType).Order(),AxSalesId,""))		
+	}
+	Quit OrderId
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhTest/Mock/AXimpl/Admin/VKP/OrderLookup.cls.xml
===================================================================
diff -u -r43236 -r44582
--- vhTest/Mock/AXimpl/Admin/VKP/OrderLookup.cls.xml	(.../OrderLookup.cls.xml)	(revision 43236)
+++ vhTest/Mock/AXimpl/Admin/VKP/OrderLookup.cls.xml	(.../OrderLookup.cls.xml)	(revision 44582)
@@ -14,6 +14,13 @@
 <Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefOrderId",AxSalesId)
 ]]></Implementation>
 </Method>
+
+<Method name="GeefOrderIdVanBevestigdOrder">
+<FormalSpec>AxSalesId:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefOrderIdVanBevestigdOrder",AxSalesId)
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhUnitTest/AXimpl/Admin/VKP/OrderLookup/Test.cls.xml
===================================================================
diff -u -r43421 -r44582
--- vhUnitTest/AXimpl/Admin/VKP/OrderLookup/Test.cls.xml	(.../Test.cls.xml)	(revision 43421)
+++ vhUnitTest/AXimpl/Admin/VKP/OrderLookup/Test.cls.xml	(.../Test.cls.xml)	(revision 44582)
@@ -3,6 +3,11 @@
 <Class name="vhUnitTest.AXimpl.Admin.VKP.OrderLookup.Test">
 <Super>vhUnitTest.TestCase</Super>
 
+<UDLText name="T">
+<Content><![CDATA[/* testen tijdelijk order tobe */
+]]></Content>
+</UDLText>
+
 <Method name="Test prepare query statement en Order bestaat">
 <Implementation><![CDATA[
 	#dim Columns as %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("ID")
@@ -49,6 +54,58 @@
 	}
 ]]></Implementation>
 </Method>
+
+<UDLText name="T">
+<Content><![CDATA[/* testen confirmed order */
+]]></Content>
+</UDLText>
+
+<Method name="Test prepare query statement en Bevestigd Order bestaat">
+<Implementation><![CDATA[
+	#dim Columns as %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("ID")
+	#dim Values as %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes($ListBuild("1000"))
+	Set QueryAPIFake = ##class(vhTest.Fake.TECH.Query.PrepareOnlyQueryAPI).%New(Values,Columns)
+	
+	Set OrderLookup = ##class(AXimpl.Admin.VKP.OrderLookup).%New(QueryAPIFake)
+	
+	#dim OrderId as %String = OrderLookup.GeefOrderIdVanBevestigdOrder("AxSalesId")
+	
+	Do $$$AssertEquals(OrderId,1000)
+]]></Implementation>
+</Method>
+
+<Method name="Test prepare query statement en Bevestigd Order niet gevonden">
+<Implementation><![CDATA[
+	#dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("!!! Ernstig probleem : Order is niet meer in sync - AxId : 'AxSalesId' - AdminId : '' !!!!")
+	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New(##class(AXimpl.Admin.DatabaseOutOfSyncException).%ClassName($$$True),Substrings))
+	
+	#dim Columns as %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("ID")
+	Set QueryAPIFake = ##class(vhTest.Fake.TECH.Query.PrepareOnlyQueryAPI).%New("",Columns)
+	
+	Set OrderLookup = ##class(AXimpl.Admin.VKP.OrderLookup).%New(QueryAPIFake)
+		
+	#dim OrderId as %String = OrderLookup.GeefOrderIdVanBevestigdOrder("AxSalesId")
+]]></Implementation>
+</Method>
+
+<Method name="Test prepare query statement en meerdere bevestigde orders gevonden">
+<Implementation><![CDATA[
+	#dim Columns as %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("ID")
+	#dim Values as %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes($ListBuild("1000"),$ListBuild("1001"))
+	Set QueryAPIFake = ##class(vhTest.Fake.TECH.Query.PrepareOnlyQueryAPI).%New(Values,Columns)
+	
+	Set OrderLookup = ##class(AXimpl.Admin.VKP.OrderLookup).%New(QueryAPIFake)
+	Try {		
+		#dim OrderId as %String = OrderLookup.GeefOrderId("AxSalesId")
+		Do ..Fail("Er werd een exceptie verwacht")
+	} Catch {
+		#dim Exception as TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+		Do $$$AssertEquals(Exception.%ClassName($$$True),##class(AXimpl.Admin.DatabaseOutOfSyncException).%ClassName($$$True))
+		Do $$$AssertEquals(Exception.GeefOmschrijving(),"!!! Ernstig probleem : Order is niet meer in sync - AxId : 'AxSalesId' - AdminId : '1000,1001' !!!!")
+		Do $$$AssertContains(Exception.GeefExtraInfo(),"Minstens 2 orders met dezelfde Ax SalesId gevonden")
+	}
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhTest/Fake/AXimpl/Admin/CHUI/TerminalNavigationService.cls.xml
===================================================================
diff -u -r43592 -r44582
--- vhTest/Fake/AXimpl/Admin/CHUI/TerminalNavigationService.cls.xml	(.../TerminalNavigationService.cls.xml)	(revision 43592)
+++ vhTest/Fake/AXimpl/Admin/CHUI/TerminalNavigationService.cls.xml	(.../TerminalNavigationService.cls.xml)	(revision 44582)
@@ -11,6 +11,12 @@
 <FormalSpec>AxSalesId:%String,AxGebruiker:%String,WorkStationName:%String</FormalSpec>
 <Implementation><![CDATA[]]></Implementation>
 </Method>
+
+<Method name="RaadpleegBevestigdOrder">
+<FormalSpec>AxSalesId:%String,AxGebruiker:%String,WorkstationName:%String</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: AXimpl/Admin/CHUI/TerminalNavigationService.cls.xml
===================================================================
diff -u -r43691 -r44582
--- AXimpl/Admin/CHUI/TerminalNavigationService.cls.xml	(.../TerminalNavigationService.cls.xml)	(revision 43691)
+++ AXimpl/Admin/CHUI/TerminalNavigationService.cls.xml	(.../TerminalNavigationService.cls.xml)	(revision 44582)
@@ -39,6 +39,14 @@
 	Do ..TerminalNavigatieService.RaadpleegOrder(..GebruikerLookup.GeefGebruikerId(AxGebruiker),ComputerNaam,..OrderLookup.GeefOrderId(AxSalesId))
 ]]></Implementation>
 </Method>
+
+<Method name="RaadpleegBevestigdOrder">
+<FormalSpec>AxSalesId:%String,AxGebruiker:%String,WorkstationName:%String</FormalSpec>
+<Implementation><![CDATA[
+	#dim ComputerNaam as %String = WorkstationName _ ".vanhoecke.be"
+	Do ..TerminalNavigatieService.RaadpleegOrder(..GebruikerLookup.GeefGebruikerId(AxGebruiker),ComputerNaam,..OrderLookup.GeefOrderIdVanBevestigdOrder(AxSalesId))
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: WSimpl/AX/CHUI/TerminalNavigationService/NavigateToConfirmedOrder.cls.xml
===================================================================
diff -u
--- WSimpl/AX/CHUI/TerminalNavigationService/NavigateToConfirmedOrder.cls.xml	(revision 0)
+++ WSimpl/AX/CHUI/TerminalNavigationService/NavigateToConfirmedOrder.cls.xml	(revision 44582)
@@ -0,0 +1,42 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WSimpl.AX.CHUI.TerminalNavigationService.NavigateToConfirmedOrder">
+<Super>TECH.RegisteredObject</Super>
+
+<Property name="TerminalNavigationService">
+<Type>AXimpl.Admin.CHUI.TerminalNavigationService</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>TerminalNavigationService:AXimpl.Admin.CHUI.TerminalNavigationService</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..TerminalNavigationService = $$$Inject(TerminalNavigationService,##class(AXimpl.Admin.CHUI.TerminalNavigationService).%New())
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="NavigateToConfirmedOrder">
+<FormalSpec>NavigateToConfirmedOrderRequest:WS.AX.CHUI.dto.NavigateToConfirmedOrderRequest</FormalSpec>
+<ReturnType>WS.AX.CHUI.dto.NavigateToConfirmedOrderResponse</ReturnType>
+<Implementation><![CDATA[
+	Set Response = ##class(WS.AX.CHUI.dto.NavigateToConfirmedOrderResponse).%New()
+	Try{
+		Do ..TerminalNavigationService.RaadpleegBevestigdOrder(NavigateToConfirmedOrderRequest.SalesIdAX,NavigateToConfirmedOrderRequest.ActiveDirectoryUserName,NavigateToConfirmedOrderRequest.WorkstationName )
+	} catch {
+		#dim Exceptie As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+		do ##class(vhLib.Logger).LogExceptie(Exceptie)
+		Set Response.Message = "Er is iets fout gegaan met het registreren van de Admin navigatieopdracht naar order met AX Sales id '" _ NavigateToConfirmedOrderRequest.SalesIdAX _"'"
+	}		
+	Set Response.Message = $TRANSLATE(Response.Message,$CHAR(0),"")
+	Quit Response
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>