Index: WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/OrderService.cls.xml =================================================================== diff -u -r58742 -r62499 --- WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/OrderService.cls.xml (.../OrderService.cls.xml) (revision 58742) +++ WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/OrderService.cls.xml (.../OrderService.cls.xml) (revision 62499) @@ -76,7 +76,7 @@ If IsOrderLijnAanTePassen { Do OrderLijn.ZetProductID(NieuwProductId, $$$True) - Do ..OrderApi.Bewaar(Order) + Do OrderLijn.Save() Do ..Logger.Info("ProductUpdater", "Aanpassing op Order '"_Order.GeefID()_"'. Op OrderLijn '"_OrderLijn.GeefID()_"' werd de ProductId aangepast van '"_OudProductId_"' naar '"_NieuwProductId_"'.") } Else { Do ..Logger.Warning("ProductUpdater", "GEEN aanpassing op Order '"_Order.GeefID()_"' op OrderLijn '"_OrderLijn.GeefID()_"', de Toelevering '"_ToeleveringId_"' is reeds klaargezet of in batch!") Index: vhTest/Mock/DOM/VKP/impl/DataM/DataMProductOrderlijn.cls.xml =================================================================== diff -u -r43672 -r62499 --- vhTest/Mock/DOM/VKP/impl/DataM/DataMProductOrderlijn.cls.xml (.../DataMProductOrderlijn.cls.xml) (revision 43672) +++ vhTest/Mock/DOM/VKP/impl/DataM/DataMProductOrderlijn.cls.xml (.../DataMProductOrderlijn.cls.xml) (revision 62499) @@ -2,6 +2,11 @@ vhTest.Mock.DOM.VKP.ProductOrderlijn,vhTest.Mock.DOM.VKP.PrijsOrderlijn + + + + Index: DOM/VKP/impl/DataM/DataMProductOrderlijn.cls.xml =================================================================== diff -u -r58604 -r62499 --- DOM/VKP/impl/DataM/DataMProductOrderlijn.cls.xml (.../DataMProductOrderlijn.cls.xml) (revision 58604) +++ DOM/VKP/impl/DataM/DataMProductOrderlijn.cls.xml (.../DataMProductOrderlijn.cls.xml) (revision 62499) @@ -18,6 +18,12 @@ 1 + +%Boolean +"0" +1 + + @@ -53,17 +60,14 @@ Set Exception = ##class(TECH.Exceptions.InvalidInputException).%New("Product met ID '"_ProductID_"' mag niet gewijzigd worden") Do ##class(TECH.ExceptionHandler).Throw(Exception) } Else { + Set ..ProductIdIsGewijzigd = $$$True Do ..VerwijderIndexenIndienNodig(OorspronkelijkeID) } } Do ..ZetPiece(2,ProductID) Do ..BerekenEnZetHoutCertificaat() - - If (IsVoorProductUpdate && IsProductIdInDataAfwijkendVanProductIDInput) { - Do ..BouwIndexenIndienNodig(OorspronkelijkeID) - } ]]> @@ -207,11 +211,16 @@ OorspronkelijkeID:%String 1 @@ -220,11 +229,14 @@ OorspronkelijkeID:%String 1 Index: vhUnitTest/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/OrderService/Test.cls.xml =================================================================== diff -u -r58742 -r62499 --- vhUnitTest/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/OrderService/Test.cls.xml (.../Test.cls.xml) (revision 58742) +++ vhUnitTest/WSimpl/AX/CalculatedProduct/ProductVolgensAxAttribuutBepaler/OrderService/Test.cls.xml (.../Test.cls.xml) (revision 62499) @@ -54,14 +54,13 @@ ]]> - + - + @@ -193,6 +189,7 @@ Do OrderLijnStub.IndienMethodCall("ZetProductID", ..#RandomNieuwProductId, $$$True).DanDoeNiks() Do OrderLijnStub.IndienMethodCall("GeefID").DanReturn(Aantal_"00") Do OrderLijnStub.IndienMethodCall("GeefToeleveringID").DanReturn("20000"_Aantal) + Do OrderLijnStub.IndienMethodCall("Save").DanDoeNiks() Do OrderLijnenLijst.Insert(OrderLijnStub) }