Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/OrderVrijgaveBepaler/Test.cls.xml =================================================================== diff -u -r52691 -r52711 --- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/OrderVrijgaveBepaler/Test.cls.xml (.../Test.cls.xml) (revision 52691) +++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/OrderVrijgaveBepaler/Test.cls.xml (.../Test.cls.xml) (revision 52711) @@ -50,7 +50,7 @@ Set:(HerbestellingBijProbleem) WinkelkarDummy = ##class(vhTest.Utils.DOM.EC.Winkelkar.Winkelkar).WinkelkarMetHerbestellingBijProbleem() Set:($$$Not(HerbestellingBijProbleem)) WinkelkarDummy = ##class(vhTest.Utils.DOM.EC.Winkelkar.Winkelkar).StandaardWinkelkar() Set WinkelkarRepositoryMock = ##class(vhTest.Mock.DOM.EC.Winkelkar.WinkelkarRepository).%New() - Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefViaID","1234").DanReturn(WinkelkarDummy) + Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefViaExterneId","1234").DanReturn(WinkelkarDummy) #dim OrderVrijgaveBepaler As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar.OrderVrijgaveBepaler = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BestelWinkelkar.OrderVrijgaveBepaler).%New(PrijsValidatorStub, BestelOpmerkingValidatorStub,WinkelkarRepositoryMock) #dim MagOrderMaken As %Boolean = OrderVrijgaveBepaler.MagOrderMaken(BestelWinkelkarRequest, RandomOfferteId, RandomKlantId) Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/OrderVrijgaveBepaler.cls.xml =================================================================== diff -u -r52691 -r52711 --- WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/OrderVrijgaveBepaler.cls.xml (.../OrderVrijgaveBepaler.cls.xml) (revision 52691) +++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/OrderVrijgaveBepaler.cls.xml (.../OrderVrijgaveBepaler.cls.xml) (revision 52711) @@ -41,8 +41,8 @@ #dim HeeftGeldigeBestelOpmerking As %Boolean = $$$False #dim IsPersonalityVanHoecke As %Boolean = $$$False #dim IsHerbestellingBijProbleem as %Boolean = $$$False - - Set IsHerbestellingBijProbleem = ..WinkelkarRepository.GeefViaID(BestelWinkelkarRequest.Winkelkar.Id).HeeftHerbestellingBijProbleem() + Do ##class(Tools.Wlip).%New(207).String("winkelkar.id " _ BestelWinkelkarRequest.Winkelkar.Id) + Set IsHerbestellingBijProbleem = ..WinkelkarRepository.GeefViaExterneId(BestelWinkelkarRequest.Winkelkar.Id).HeeftHerbestellingBijProbleem() If (IsAutomatischeOrderSluiterActief) { Set HeeftGeldigePrijs = ..PrijsValidator.IsValid(OfferteId)