Index: AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml =================================================================== diff -u -r45588 -r45599 --- AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml (.../SalesOrderConverter.cls.xml) (revision 45588) +++ AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml (.../SalesOrderConverter.cls.xml) (revision 45599) @@ -60,19 +60,20 @@ Set OrderLineIterator = ##class(TECH.ListIterator).%New(OrderHeader.OrderLine) While OrderLineIterator.HasNext() { #dim OrderLine As AXif.Dynamics.SalesOrderIn.MessageParts.AxdEntityOrderLine = OrderLineIterator.Next() - #dim ProductOrderLijn As DOM.VKP.PrijsOrderlijn + #dim PrijsOrderLijn As DOM.VKP.PrijsOrderlijn If ..IsProductLijn(OrderLine) { - Set ProductOrderLijn = ..VoegToeProductLijn(Order, OrderLine) + Set PrijsOrderLijn = ..VoegToeProductLijn(Order, OrderLine) } Else { - Set ProductOrderLijn = ..VoegToeMaatwerkLijn(Order, OrderLine) + Set PrijsOrderLijn = ..VoegToeMaatwerkLijn(Order, OrderLine) } - Do ProductOrderLijn.ZetAxInventTransId(OrderLine.InventTransId) - Do ProductOrderLijn.ZetMunt(OrderLine.CurrencyCode) - Do ProductOrderLijn.ZetEenheidPrijsExclBTW(OrderLine.LineAmount / OrderLine.QtyOrdered) - Do ProductOrderLijn.ZetTotaalNettoExclBTW(OrderLine.LineAmount) - Do ProductOrderLijn.ZetLeverdag(..GeefLeverDatum(OrderLine)) + Do PrijsOrderLijn.ZetAxInventTransId(OrderLine.InventTransId) + Do PrijsOrderLijn.ZetMunt(OrderLine.CurrencyCode) + Do PrijsOrderLijn.ZetEenheidPrijsExclBTW(OrderLine.LineAmount / OrderLine.QtyOrdered) + Do PrijsOrderLijn.ZetTotaalNettoExclBTW(OrderLine.LineAmount) + Do PrijsOrderLijn.ZetLeverdag(..GeefLeverDatum(OrderLine)) + Do PrijsOrderLijn.ZetAxConfigId(OrderLine.ConfigId) ;Do ProductOrderLijn.ZetProjectReferentie(OrderLine. ) ;Do ProductOrderLijn.ZetPakketReferentie(OrderLine. ) @@ -163,7 +164,6 @@ Do ..ProductBepaler.ValideerProductNummer(ProductNummer) #dim MaatwerkLijn As DOM.VKP.ProductOrderlijn = ..OrderLevenCyclusService.VoegToeProductVoorKlant(Order, Order.GeefKlantID(), ProductNummer, OrderLine.QtyOrdered) - Do MaatwerkLijn.ZetAxConfigId(OrderLine.ConfigId) Do MaatwerkLijn.ZetAxMaatwerkGenerischItemId(OrderLine.ItemId) Quit MaatwerkLijn Index: vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Test.cls.xml =================================================================== diff -u -r45586 -r45599 --- vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Test.cls.xml (.../Test.cls.xml) (revision 45586) +++ vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Test.cls.xml (.../Test.cls.xml) (revision 45599) @@ -77,6 +77,7 @@ Do ProductOrderlijnMock.VerwachtMethodCall("ZetLeverdag", $$INTDATE^vhLib.DataTypes("19-07-2017")).DanDoeNiks() Do ProductOrderlijnMock.VerwachtMethodCall("ZetEenheidPrijsExclBTW", 25).DanDoeNiks() Do ProductOrderlijnMock.VerwachtMethodCall("ZetTotaalNettoExclBTW", 250).DanDoeNiks() + Do ProductOrderlijnMock.VerwachtMethodCall("ZetAxConfigId", "").DanDoeNiks() Set OrderLevenCyclusServiceMock = ##class(vhTest.Mock.APPS.VKP.OrderLevenCyclusService).%New() Do OrderLevenCyclusServiceMock.IndienMethodCall("MaakOrderMetKlantGegevens", $$$ElkeWaarde,$$$ElkeWaarde).DanReturn(OrderMock)