Index: vhUnitTest/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/OrderService/Test.cls.xml =================================================================== diff -u -r58476 -r58491 --- vhUnitTest/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/OrderService/Test.cls.xml (.../Test.cls.xml) (revision 58476) +++ vhUnitTest/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/OrderService/Test.cls.xml (.../Test.cls.xml) (revision 58491) @@ -54,34 +54,39 @@ ]]> - + - + @@ -184,6 +190,7 @@ Set OrderLijnStub = ##class(vhTest.Utils.DOM.VKP.ProductOrderlijn).StandaardProductLijn() Do OrderLijnStub.IndienMethodCall("GeefAxInventTransId").DanReturn(..#RandomAxInventTransId) Do OrderLijnStub.IndienMethodCall("GeefProductID").DanReturn(..#RandomOudProductId) + Do OrderLijnStub.IndienMethodCall("ZetProductID", ..#RandomNieuwProductId, $$$False).DanDoeNiks() Do OrderLijnStub.IndienMethodCall("GeefID").DanReturn(Aantal_"00") Do OrderLijnStub.IndienMethodCall("GeefToeleveringID").DanReturn("20000"_Aantal) Do OrderLijnenLijst.Insert(OrderLijnStub) Index: WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/OrderService.cls.xml =================================================================== diff -u -r58476 -r58491 --- WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/OrderService.cls.xml (.../OrderService.cls.xml) (revision 58476) +++ WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/OrderService.cls.xml (.../OrderService.cls.xml) (revision 58491) @@ -74,7 +74,8 @@ Set ToeleveringId = OrderLijn.GeefToeleveringID() Set IsOrderLijnAanTePassen = ..ToeleveringService.IsToeleveringAangepast(ToeleveringId, OudProductId, NieuwProductId) If IsOrderLijnAanTePassen { - // OrderLijn aanpassen + Order saven + Do OrderLijn.ZetProductID(NieuwProductId, $$$False) + Do ..OrderApi.Bewaar(Order) Do ..Logger.Info("ProductUpdater", "Aanpassing op Order '"_Order.GeefID()_"'. Op OrderLijn '"_OrderLijn.GeefID()_"' werd de ProductId aangepast van '"_OudProductId_"' naar '"_NieuwProductId_"'.") } Else { Do ..Logger.Info("ProductUpdater", "GEEN aanpassing op Order '"_Order.GeefID()_"'. Op OrderLijn '"_OrderLijn.GeefID()_"' werd de ProductId NIET aangepast van '"_OudProductId_"' naar '"_NieuwProductId_"'. Op Toelevering '"_ToeleveringId_"' konden de aanpassingen niet doorgevoerd worden.")