Index: vhUnitTest/AXimpl/Admin/VKP/OrderLookup/Test.cls.xml =================================================================== diff -u -r44582 -r44600 --- vhUnitTest/AXimpl/Admin/VKP/OrderLookup/Test.cls.xml (.../Test.cls.xml) (revision 44582) +++ vhUnitTest/AXimpl/Admin/VKP/OrderLookup/Test.cls.xml (.../Test.cls.xml) (revision 44600) @@ -8,21 +8,21 @@ ]]> - + - + - + - - - - + + + + Index: AXimpl/Admin/VKP/OrderLookup.cls.xml =================================================================== diff -u -r44582 -r44600 --- AXimpl/Admin/VKP/OrderLookup.cls.xml (.../OrderLookup.cls.xml) (revision 44582) +++ AXimpl/Admin/VKP/OrderLookup.cls.xml (.../OrderLookup.cls.xml) (revision 44600) @@ -21,18 +21,18 @@ ]]> - + AxSalesId:%String %String 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 Exception.VoegToeExtraInfo("Minstens 2 bevestigde orders met dezelfde Ax SalesId gevonden") Do ##class(TECH.ExceptionHandler).Throw(Exception) } } else { @@ -42,18 +42,27 @@ ]]> - + AxSalesId:%String +%Boolean + + + + +AxSalesId:%String %String 100999 and AXSalesid = ?",$ListBuild(AxSalesId)) + Set Query = ##class(TECH.DynamicQuery).%New("SELECT ID FROM Flow_Order.Hoofding WHERE ID < 101000 and OrderType is null 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 Exception.VoegToeExtraInfo("Minstens 2 tijdelijke orders met dezelfde Ax SalesId gevonden") Do ##class(TECH.ExceptionHandler).Throw(Exception) } } else { Index: vhTest/Fake/AXimpl/Admin/CHUI/TerminalNavigationService.cls.xml =================================================================== diff -u -r44582 -r44600 --- vhTest/Fake/AXimpl/Admin/CHUI/TerminalNavigationService.cls.xml (.../TerminalNavigationService.cls.xml) (revision 44582) +++ vhTest/Fake/AXimpl/Admin/CHUI/TerminalNavigationService.cls.xml (.../TerminalNavigationService.cls.xml) (revision 44600) @@ -17,6 +17,12 @@ + + +AxSalesId:%String,AxGebruiker:%String,WorkstationName:%String + + Index: vhTest/Fake/AXimpl/Admin/VKP/OrderLookup.cls.xml =================================================================== diff -u -r44582 -r44600 --- vhTest/Fake/AXimpl/Admin/VKP/OrderLookup.cls.xml (.../OrderLookup.cls.xml) (revision 44582) +++ vhTest/Fake/AXimpl/Admin/VKP/OrderLookup.cls.xml (.../OrderLookup.cls.xml) (revision 44600) @@ -7,6 +7,13 @@ 1 AXimpl.Admin.VKP.OrderLookup + +AxSalesId:%String +%Boolean + + + AxSalesId:%String %String @@ -20,6 +27,20 @@ + + +AxSalesId:%String +%String + + + + +AxSalesId:%String +%String + + Index: vhTest/Mock/AXimpl/Admin/CHUI/TerminalNavigationService.cls.xml =================================================================== diff -u -r44582 -r44600 --- vhTest/Mock/AXimpl/Admin/CHUI/TerminalNavigationService.cls.xml (.../TerminalNavigationService.cls.xml) (revision 44582) +++ vhTest/Mock/AXimpl/Admin/CHUI/TerminalNavigationService.cls.xml (.../TerminalNavigationService.cls.xml) (revision 44600) @@ -14,9 +14,9 @@ ]]> - + AxSalesId:%String,AxGebruiker:%String,WorkstationName:%String - Index: vhUnitTest/AXimpl/Admin/CHUI/TerminalNavigationService/Test.cls.xml =================================================================== diff -u -r43692 -r44600 --- vhUnitTest/AXimpl/Admin/CHUI/TerminalNavigationService/Test.cls.xml (.../Test.cls.xml) (revision 43692) +++ vhUnitTest/AXimpl/Admin/CHUI/TerminalNavigationService/Test.cls.xml (.../Test.cls.xml) (revision 44600) @@ -3,25 +3,47 @@ vhUnitTest.TestCase - + + + + + Index: WS/AX/CHUI/TerminalNavigationService.cls.xml =================================================================== diff -u -r43943 -r44600 --- WS/AX/CHUI/TerminalNavigationService.cls.xml (.../TerminalNavigationService.cls.xml) (revision 43943) +++ WS/AX/CHUI/TerminalNavigationService.cls.xml (.../TerminalNavigationService.cls.xml) (revision 44600) @@ -21,15 +21,21 @@ 1 + +WSimpl.AX.CHUI.TerminalNavigationService.NavigateToConfirmedOrder +1 + + -CreateAndNavigateToTemporaryOrder:WSimpl.AX.CHUI.TerminalNavigationService.CreateAndNavigateToTemporaryOrder +CreateAndNavigateToTemporaryOrder:WSimpl.AX.CHUI.TerminalNavigationService.CreateAndNavigateToTemporaryOrder,NavigateToConfirmedOrder:WSimpl.AX.CHUI.TerminalNavigationService.NavigateToConfirmedOrder 1 1 %Status 1 @@ -46,19 +52,9 @@ NavigateToConfirmedOrderRequest:WS.AX.CHUI.dto.NavigateToConfirmedOrderRequest WS.AX.CHUI.dto.NavigateToConfirmedOrderResponse 1 - - - -KlasseNaam:%String -1 -TECH.RegisteredObject - - Index: vhTest/Mock/AXimpl/Admin/VKP/OrderLookup.cls.xml =================================================================== diff -u -r44582 -r44600 --- vhTest/Mock/AXimpl/Admin/VKP/OrderLookup.cls.xml (.../OrderLookup.cls.xml) (revision 44582) +++ vhTest/Mock/AXimpl/Admin/VKP/OrderLookup.cls.xml (.../OrderLookup.cls.xml) (revision 44600) @@ -8,10 +8,10 @@ AXimpl.Admin.VKP.OrderLookup,Tools.Mock.MockClassBase right - + AxSalesId:%String -%String -%Boolean + @@ -21,6 +21,13 @@ + + +AxSalesId:%String +%String + + Index: WSimpl/AX/CHUI/TerminalNavigationService/CreateAndNavigateToTemporaryOrder.cls.xml =================================================================== diff -u -r44013 -r44600 --- WSimpl/AX/CHUI/TerminalNavigationService/CreateAndNavigateToTemporaryOrder.cls.xml (.../CreateAndNavigateToTemporaryOrder.cls.xml) (revision 44013) +++ WSimpl/AX/CHUI/TerminalNavigationService/CreateAndNavigateToTemporaryOrder.cls.xml (.../CreateAndNavigateToTemporaryOrder.cls.xml) (revision 44600) @@ -13,15 +13,21 @@ 1 + +AXimpl.Admin.VKP.OrderLookup +1 + + -OrderLevenCyclus:AXimpl.Admin.VKP.OrderLevenCyclus,TerminalNavigationService:AXimpl.Admin.CHUI.TerminalNavigationService +OrderLevenCyclus:AXimpl.Admin.VKP.OrderLevenCyclus,TerminalNavigationService:AXimpl.Admin.CHUI.TerminalNavigationService,OrderLookup:AXimpl.Admin.VKP.OrderLookup 1 1 %Status 1 @@ -32,9 +38,11 @@ vhUnitTest.TestCase - + + + + + Index: AXimpl/Admin/CHUI/TerminalNavigationService.cls.xml =================================================================== diff -u -r44582 -r44600 --- AXimpl/Admin/CHUI/TerminalNavigationService.cls.xml (.../TerminalNavigationService.cls.xml) (revision 44582) +++ AXimpl/Admin/CHUI/TerminalNavigationService.cls.xml (.../TerminalNavigationService.cls.xml) (revision 44600) @@ -32,11 +32,11 @@ ]]> - + AxSalesId:%String,AxGebruiker:%String,WorkstationName:%String