Index: vhUnitTest/AXimpl/Admin/VKP/SalesPriceService/Test.cls.xml =================================================================== diff -u -r49398 -r50904 --- vhUnitTest/AXimpl/Admin/VKP/SalesPriceService/Test.cls.xml (.../Test.cls.xml) (revision 49398) +++ vhUnitTest/AXimpl/Admin/VKP/SalesPriceService/Test.cls.xml (.../Test.cls.xml) (revision 50904) @@ -9,17 +9,24 @@ #dim RandomProductNummer As %String = "RandomProductNummer" #dim RandomPrice As %String = "RandomPrice" - #dim AxItemIdBepalerMock As vhTest.Mock.AXimpl.Admin.VKP.SalesPriceService.AxItemIdBepaler = ##class(vhTest.Mock.AXimpl.Admin.VKP.SalesPriceService.AxItemIdBepaler).%New() - Do AxItemIdBepalerMock.IndienMethodCall("GeefAxItemId", RandomProductNummer).DanReturn("AxProductNummer") - #dim SalesPriceServiceMock As vhTest.Mock.AXimpl.Dynamics.SalesPriceOut.SalesPriceService = ##class(vhTest.Mock.AXimpl.Dynamics.SalesPriceOut.SalesPriceService).%New() - Do SalesPriceServiceMock.IndienMethodCall("getPrice", $$$ElkeWaarde).DanReturn(..GeefSalesPriceResult(RandomPrice)) + Do SalesPriceServiceMock.VerwachtMethodCall("getPrice", $$$ElkeWaarde).DanReturn(..GeefSalesPriceResult(RandomPrice)) - #dim SalesPriceService As AXimpl.Admin.VKP.SalesPriceService = ##class(AXimpl.Admin.VKP.SalesPriceService).%New(SalesPriceServiceMock, "", AxItemIdBepalerMock) + #dim KlantIdConverterMock As vhTest.Mock.AXimpl.Utils.KlantIdConverter = ##class(vhTest.Mock.AXimpl.Utils.KlantIdConverter).%New() + Do KlantIdConverterMock.VerwachtMethodCall("ConvertToAx", RandomKlantNummer, ##class(DOM.common.enu.Personality).VanHoecke()).DanReturn("RandomAxKlantNummer") + + #dim AxItemIdBepalerMock As vhTest.Mock.AXimpl.Admin.VKP.SalesPriceService.AxItemIdBepaler = ##class(vhTest.Mock.AXimpl.Admin.VKP.SalesPriceService.AxItemIdBepaler).%New() + Do AxItemIdBepalerMock.VerwachtMethodCall("GeefAxItemId", RandomProductNummer).DanReturn("AxProductNummer") + + #dim SalesPriceService As AXimpl.Admin.VKP.SalesPriceService = ##class(AXimpl.Admin.VKP.SalesPriceService).%New(SalesPriceServiceMock, "", KlantIdConverterMock, AxItemIdBepalerMock) #dim Result As AXif.Dynamics.SalesPriceIn.MessageParts.ADUSalesPriceHeaderOutputDC = SalesPriceService.GeefPrijs(RandomKlantNummer, RandomProductNummer, "CifPPL") #dim ResultLine As AXif.Dynamics.SalesPriceIn.MessageParts.ADUSalesPriceLineOutputDC = Result.Lines.GetAt(1) Do $$$AssertEquals(ResultLine.Price, RandomPrice) + + Do SalesPriceServiceMock.Verifieer() + Do KlantIdConverterMock.Verifieer() + Do AxItemIdBepalerMock.Verifieer() ]]>