Index: vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Base.cls.xml =================================================================== diff -u -r50662 -r52732 --- vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Base.cls.xml (.../Base.cls.xml) (revision 50662) +++ vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Base.cls.xml (.../Base.cls.xml) (revision 52732) @@ -70,7 +70,8 @@ Do OrderMock.IndienMethodCall("ZetTekstVoorAfdrukDocumentType", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks() Do OrderMock.IndienMethodCall("HerlaadLijnen").DanDoeNiks() Do OrderMock.IndienMethodCall("GeefTypeOrderLijnIterator", $$$ElkeWaarde).DanReturn(..GeefDummyIterator($$$True)) - + Do OrderMock.IndienMethodCall("GeefAxSalesId").DanReturn("VO1600010000") + Quit OrderMock ]]> Index: vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestVerwijderOrderLijn.cls.xml =================================================================== diff -u -r48269 -r52732 --- vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestVerwijderOrderLijn.cls.xml (.../TestVerwijderOrderLijn.cls.xml) (revision 48269) +++ vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestVerwijderOrderLijn.cls.xml (.../TestVerwijderOrderLijn.cls.xml) (revision 52732) @@ -29,6 +29,7 @@ Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId", "000019541").ExactAantalKeer(1).DanReturn($$$True) Do OrderMock.VerwachtMethodCall("VerwijderOrderLijnViaAxInventTransId", "000019541").ExactAantalKeer(1).DanDoeNiks() + Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000") Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(..GeefOrderApi(OrderMock) ,,,,..GeefDocumentReferentie(), ..GeefOrderLijnenSorteerder(),, ..GeefToeleveringService(), ,,..GeefSalesOrderLineStatusRepository()) Do SalesOrderConverter.Convert(StandaardOrder) Index: vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestUpdate.cls.xml =================================================================== diff -u -r50024 -r52732 --- vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestUpdate.cls.xml (.../TestUpdate.cls.xml) (revision 50024) +++ vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestUpdate.cls.xml (.../TestUpdate.cls.xml) (revision 52732) @@ -25,6 +25,7 @@ Do OrderMock.VerwachtMethodCall("ZetAxSalesId", "VO1600010000").ExactAantalKeer(1) Do OrderMock.VerwachtMethodCall("ZetTekstVoorAfdrukDocumentType", "PackingSlipBody", ##class(DOM.VKP.enu.TekstAfdrukDocumentType).LeverBon()).DanDoeNiks() Do OrderMock.VerwachtMethodCall("HerlaadLijnen").ExactAantalKeer(3).DanDoeNiks() + Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000") Do OrderMock.IndienMethodCall("GeefTypeOrderLijnIterator", $$$ElkeWaarde).DanReturn(..GeefDummyIterator($$$False)) Do OrderMock.IndienMethodCall("GeefID").DanReturn("DummyOrderID") @@ -77,6 +78,7 @@ Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId","000019541").DanReturn($$$True) Do OrderMock.VerwachtMethodCall("GeefOrderLijnViaAxInventTransId","000019541").DanReturn(ProductOrderlijnMock) + Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000") #dim ToeleveringServiceMock As vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.ToeleveringService = ##class(vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.ToeleveringService).%New() Do ToeleveringServiceMock.VerwachtMethodCall("VerwijderToeleveringenViaOrder" , OrderMock).ExactAantalKeer(1).DanDoeNiks() @@ -115,6 +117,7 @@ Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId","000019541").DanReturn($$$True) Do OrderMock.VerwachtMethodCall("GeefOrderLijnViaAxInventTransId","000019541").DanReturn(ProductOrderlijnMock) Do OrderMock.VerwachtMethodCall("GeefKlantID").DanReturn(##class(DOM.VKP.enu.Klant).SFS()) + Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000") #dim ToeleveringServiceMock As vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.ToeleveringService = ##class(vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.ToeleveringService).%New() @@ -139,6 +142,7 @@ Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId", $$$ElkeWaarde).ExactAantalKeer(0) Do OrderMock.VerwachtMethodCall("GeefOrderLijnViaAxInventTransId", $$$ElkeWaarde).ExactAantalKeer(0) Do OrderMock.VerwachtMethodCall("VerwijderOrderLijnViaAxInventTransId", $$$ElkeWaarde).ExactAantalKeer(0) + Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000") Set SalesOrderLineStatusRepositoryMock = ##class(vhTest.Mock.AXdata.Dynamics.SalesLineStatus.SalesOrderLineStatusRepository).%New() Do SalesOrderLineStatusRepositoryMock.VerwachtMethodCall("IsVrijVoorUpdateViaAxInventTransId", "000019541").DanReturn($$$False) @@ -167,6 +171,7 @@ Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId", $$$ElkeWaarde).ExactAantalKeer(0) Do OrderMock.VerwachtMethodCall("GeefOrderLijnViaAxInventTransId", $$$ElkeWaarde).ExactAantalKeer(0) Do OrderMock.VerwachtMethodCall("VerwijderOrderLijnViaAxInventTransId", $$$ElkeWaarde).ExactAantalKeer(0) + Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000") Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(..GeefOrderApi(OrderMock),,,,..GeefDocumentReferentie(), ..GeefOrderLijnenSorteerder(), ,..GeefToeleveringService()) Do SalesOrderConverter.Convert(StandaardOrder) @@ -186,6 +191,7 @@ Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId", $$$ElkeWaarde).ExactAantalKeer(0) Do OrderMock.VerwachtMethodCall("GeefOrderLijnViaAxInventTransId", $$$ElkeWaarde).ExactAantalKeer(0) Do OrderMock.VerwachtMethodCall("VerwijderOrderLijnViaAxInventTransId", $$$ElkeWaarde).ExactAantalKeer(0) + Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000") Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(..GeefOrderApi(OrderMock),,,,..GeefDocumentReferentie(), ..GeefOrderLijnenSorteerder(), ,..GeefToeleveringService()) Do SalesOrderConverter.Convert(StandaardOrder) Index: AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml =================================================================== diff -u -r51851 -r52732 --- AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml (.../SalesOrderConverter.cls.xml) (revision 51851) +++ AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml (.../SalesOrderConverter.cls.xml) (revision 52732) @@ -440,6 +440,9 @@ If ..UpdateBestaandOrder { Do ..Logger.Debug("SalesOrderIn - Update bestaand order", "Bestaand order met OrderID '" _..OrderID _"' wordt geupdatet." ) #dim Order As DOM.VKP.Order = ..OrderAPI.GeefOrder(..OrderID) + + Do ..ValideerSalesId(OrderHeader.SalesId, Order.GeefAxSalesId()) + Do Order.HerlaadLijnen() Do ..Logger.Debug("SalesOrderIn - Toeleveringen verwijderen", "Toeleveringen voor order met OrderID '" _..OrderID _"' worden verwijderd." ) @@ -557,6 +560,17 @@ ]]> + +InkomendSalesId:%String,OrderSalesId:%String +1 + + + OrderID:%Integer 1 Index: vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Test.cls.xml =================================================================== diff -u -r50038 -r52732 --- vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Test.cls.xml (.../Test.cls.xml) (revision 50038) +++ vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Test.cls.xml (.../Test.cls.xml) (revision 52732) @@ -95,6 +95,7 @@ Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId","000019541").DanReturn($$$False) Do OrderMock.VerwachtMethodCall("GeefKlantID").DanReturn("DummyKlantID") + Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000") #dim ProductOrderlijnMock As vhTest.Mock.DOM.VKP.impl.DataM.DataMProductOrderlijn = ##class(vhTest.Utils.DOM.VKP.ProductOrderlijn).StandaardProductLijn() Do ProductOrderlijnMock.VerwachtMethodCall("ZetAxInventTransId",StandaardOrder.Body.MessageParts.ADUMsgSalesOrderOutQuery.OrderHeader.GetAt(1).OrderLine.GetAt(1).InventTransId).DanDoeNiks() @@ -135,6 +136,7 @@ Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId","000019541").DanReturn($$$False) Do OrderMock.VerwachtMethodCall("GeefKlantID").DanReturn("DummyKlantID") + Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000") #dim ProductOrderlijnMock As vhTest.Mock.DOM.VKP.impl.DataM.DataMProductOrderlijn = ##class(vhTest.Utils.DOM.VKP.ProductOrderlijn).StandaardProductLijn() Do ProductOrderlijnMock.IndienMethodCall("ZetAxInventTransId",StandaardOrder.Body.MessageParts.ADUMsgSalesOrderOutQuery.OrderHeader.GetAt(1).OrderLine.GetAt(1).InventTransId).DanDoeNiks() @@ -175,6 +177,7 @@ Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId","000019541").DanReturn($$$False) Do OrderMock.VerwachtMethodCall("GeefKlantID").DanReturn("DummyKlantID") + Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000") #dim ProductOrderlijnMock As vhTest.Mock.DOM.VKP.impl.DataM.DataMProductOrderlijn = ##class(vhTest.Utils.DOM.VKP.ProductOrderlijn).StandaardProductLijn() Do ProductOrderlijnMock.VerwachtMethodCall("ZetAxInventTransId",StandaardOrder.Body.MessageParts.ADUMsgSalesOrderOutQuery.OrderHeader.GetAt(1).OrderLine.GetAt(1).InventTransId).DanDoeNiks() @@ -220,6 +223,7 @@ Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId","000019541").DanReturn($$$False) Do OrderMock.VerwachtMethodCall("GeefKlantID").DanReturn(##class(DOM.VKP.enu.Klant).NewSobelwood()) + Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000") #dim ProductOrderlijnMock As vhTest.Mock.DOM.VKP.impl.DataM.DataMProductOrderlijn = ##class(vhTest.Utils.DOM.VKP.ProductOrderlijn).StandaardProductLijn() Do ProductOrderlijnMock.VerwachtMethodCall("ZetAxInventTransId",StandaardOrder.Body.MessageParts.ADUMsgSalesOrderOutQuery.OrderHeader.GetAt(1).OrderLine.GetAt(1).InventTransId).DanDoeNiks() @@ -269,6 +273,7 @@ Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId","000019541").DanReturn($$$False) Do OrderMock.VerwachtMethodCall("GeefKlantID").DanReturn("DummyKlantID") + Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000") #dim ProductOrderlijnMock As vhTest.Mock.DOM.VKP.impl.DataM.DataMProductOrderlijn = ##class(vhTest.Utils.DOM.VKP.ProductOrderlijn).StandaardProductLijn() Do ProductOrderlijnMock.VerwachtMethodCall("ZetAxInventTransId",StandaardOrder.Body.MessageParts.ADUMsgSalesOrderOutQuery.OrderHeader.GetAt(1).OrderLine.GetAt(1).InventTransId).DanDoeNiks()