Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn/Test.cls.xml =================================================================== diff -u -r39600 -r44381 --- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn/Test.cls.xml (.../Test.cls.xml) (revision 39600) +++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn/Test.cls.xml (.../Test.cls.xml) (revision 44381) @@ -14,8 +14,12 @@ Set WinkelkarServiceMock = ##class(vhTest.Mock.APPS.EC.Winkelkar.WinkelkarService).%New() Do WinkelkarServiceMock.VerwachtMethodCall("VoegToeMaatwerk", "OfferteId", "MaatwerkLijn", EconMaatwerkLijn.IngegevenKenmerken, "", "", "LijnID").DanReturn(MaatwerkLijn) + Set OfferteMock = ##class(vhTest.Mock.APPS.VKP.Offerte).%New() + Do OfferteMock.VerwachtMethodCall("GeefPrijzenGeldigTotEnMetDatum").DanReturn($$$CurrentDate) + Set WinkelkarRepositoryMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New() Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefWinkelkarIDViaID","ExterneId").DanReturn("OfferteId") + Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteViaID","ExterneId").DanReturn(OfferteMock) Set WinkelkarLijnRepositoryMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarLijnRepository).%New() Do WinkelkarLijnRepositoryMock.VerwachtMethodCall("BestaatViaID", "LijnID").DanReturn($$$False) @@ -25,13 +29,14 @@ Do $$$AssertEquals(BewaarMaatwerkLijnResponse.EenheidPrijs, 10.00) Do $$$AssertEquals(BewaarMaatwerkLijnResponse.TotaalPrijs, 20.0) - Do $$$AssertEquals(BewaarMaatwerkLijnResponse.PrijzenGeldigTotEnMet, MaatwerkLijn.PrijzenGeldigTotEnMet) + Do $$$AssertEquals(BewaarMaatwerkLijnResponse.PrijzenGeldigTotEnMet, $$$CurrentDate) Do $$$AssertEquals(BewaarMaatwerkLijnResponse.UnishopKenmerken, MaatwerkLijn.IngegevenKenmerken) Do WinkelkarLijnRepositoryMock.Verifieer() Do EconConfiguratieConverterMock.Verifieer() Do WinkelkarRepositoryMock.Verifieer() Do WinkelkarServiceMock.Verifieer() + Do OfferteMock.Verifieer() ]]> Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn.cls.xml =================================================================== diff -u -r39654 -r44381 --- WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn.cls.xml (.../BewaarMaatwerkLijn.cls.xml) (revision 39654) +++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn.cls.xml (.../BewaarMaatwerkLijn.cls.xml) (revision 44381) @@ -46,6 +46,7 @@ Do ..ValideerInput(BewaarMaatwerkLijnRequest) #dim WinkelkarId As %String = ..WinkelkarRepository.GeefWinkelkarIDViaID(BewaarMaatwerkLijnRequest.WinkelkarID) + #dim Offerte As APPS.VKP.impl.Offerte = ..WinkelkarRepository.GeefOfferteViaID(BewaarMaatwerkLijnRequest.WinkelkarID) If ..WinkelkarLijnRepository.BestaatViaID(BewaarMaatwerkLijnRequest.LijnID) { #dim WinkelkarLijnId As %String = ..WinkelkarLijnRepository.GeefLijnIDViaID(BewaarMaatwerkLijnRequest.LijnID) @@ -59,7 +60,7 @@ Set Resultaat = ##class(WS.Vhisie4.Winkelkar.BewaarMaatwerkLijnResponse).%New() Set Resultaat.EenheidPrijs = MaatwerkLijn.EenheidPrijs Set Resultaat.TotaalPrijs = MaatwerkLijn.TotaalPrijs - Set Resultaat.PrijzenGeldigTotEnMet = MaatwerkLijn.PrijzenGeldigTotEnMet + Set Resultaat.PrijzenGeldigTotEnMet = Offerte.GeefPrijzenGeldigTotEnMetDatum() Set Resultaat.UnishopKenmerken = MaatwerkLijn.IngegevenKenmerken Quit Resultaat ]]>