Index: vhTest/Utils/AXif/Dynamics/SalesOrderIn/Envelope.cls.xml =================================================================== diff -u -r43387 -r43396 --- vhTest/Utils/AXif/Dynamics/SalesOrderIn/Envelope.cls.xml (.../Envelope.cls.xml) (revision 43387) +++ vhTest/Utils/AXif/Dynamics/SalesOrderIn/Envelope.cls.xml (.../Envelope.cls.xml) (revision 43396) @@ -42,6 +42,7 @@ Set AxdEntityOrderLine.ItemId = "0.741.108.3" Set AxdEntityOrderLine.LineAmount = "10" Set AxdEntityOrderLine.InventTransId = "000019541" + Set AxdEntityOrderLine.CurrencyCode = "EUR" Do OrderHeader.OrderLine.Insert(AxdEntityOrderLine) Quit StandaardOrder Index: vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Test.cls.xml =================================================================== diff -u -r43387 -r43396 --- vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Test.cls.xml (.../Test.cls.xml) (revision 43387) +++ vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Test.cls.xml (.../Test.cls.xml) (revision 43396) @@ -61,12 +61,13 @@ Set OrderAPIMock = ##class(vhTest.Mock.DOM.VKP.OrderAPI).%New() Do OrderAPIMock.IndienMethodCall("Bewaar", OrderMock).DanDoeNiks() - #dim ProductOrderlijnStub As DOM.VKP.ProductOrderlijn = ##class(vhTest.Utils.DOM.VKP.ProductOrderlijn).StandaardProductLijn() - Do ProductOrderlijnStub.VerwachtMethodCall("ZetAxInventTransId",StandaardOrder.Body.MessageParts.ADUMsgSalesOrderOutQuery.OrderHeader.GetAt(1).OrderLine.GetAt(1).InventTransId).DanDoeNiks() + #dim ProductOrderlijnMock As DOM.VKP.ProductOrderlijn = ##class(vhTest.Utils.DOM.VKP.ProductOrderlijn).StandaardProductLijn() + Do ProductOrderlijnMock.VerwachtMethodCall("ZetAxInventTransId",StandaardOrder.Body.MessageParts.ADUMsgSalesOrderOutQuery.OrderHeader.GetAt(1).OrderLine.GetAt(1).InventTransId).DanDoeNiks() + Do ProductOrderlijnMock.VerwachtMethodCall("ZetMunt","EUR").DanDoeNiks() Set OrderLevenCyclusServiceMock = ##class(vhTest.Mock.APPS.VKP.OrderLevenCyclusService).%New() Do OrderLevenCyclusServiceMock.IndienMethodCall("MaakOrderMetKlantGegevens", $$$ElkeWaarde,"").DanReturn(OrderMock) - Do OrderLevenCyclusServiceMock.VerwachtMethodCall("VoegToeProductVoorKlant",OrderMock,"DummyKlantID","DummyProductID",10).DanReturn(ProductOrderlijnStub).ExactAantalKeer(1) + Do OrderLevenCyclusServiceMock.VerwachtMethodCall("VoegToeProductVoorKlant",OrderMock,"DummyKlantID","DummyProductID",10).DanReturn(ProductOrderlijnMock).ExactAantalKeer(1) Set ProductBepalerMock = ##class(vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.ProductBepaler).%New() Do ProductBepalerMock.VerwachtMethodCall("GeefProductNummer","0.741.108.3","DummyKlantID").DanReturn("DummyProductID") @@ -82,7 +83,7 @@ Do OrderMock.Verifieer() Do OrderLevenCyclusServiceMock.Verifieer() Do ProductBepalerMock.Verifieer() - Do ProductOrderlijnStub.Verifieer() + Do ProductOrderlijnMock.Verifieer() ]]> Index: AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml =================================================================== diff -u -r43387 -r43396 --- AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml (.../SalesOrderConverter.cls.xml) (revision 43387) +++ AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml (.../SalesOrderConverter.cls.xml) (revision 43396) @@ -70,6 +70,7 @@ #dim ProductID As %String = ..ProductBepaler.GeefProductNummer(OrderLine.ItemId, Order.GeefKlantID()) #dim ProductOrderLijn As DOM.VKP.ProductOrderlijn = ..OrderLevenCyclusService.VoegToeProductVoorKlant(Order, Order.GeefKlantID(), ProductID, OrderLine.LineAmount) Do ProductOrderLijn.ZetAxInventTransId(OrderLine.InventTransId) + Do ProductOrderLijn.ZetMunt(OrderLine.CurrencyCode) ;Do ProductOrderLijn.ZetProjectReferentie(ProductLijn.GeefProjectReferentie()) ; ;Do ProductOrderLijn.ZetPakketReferentie(ProductLijn.GeefPakketReferentie()) }