Index: WSimpl/Halux/AAP/DnaCodeService.cls.xml =================================================================== diff -u -r63184 -r63644 --- WSimpl/Halux/AAP/DnaCodeService.cls.xml (.../DnaCodeService.cls.xml) (revision 63184) +++ WSimpl/Halux/AAP/DnaCodeService.cls.xml (.../DnaCodeService.cls.xml) (revision 63644) @@ -440,13 +440,13 @@ Set Response = ##class(WS.Halux.AAP.ToeleveringBijwerkenResponse).%New() Try { #dim DnaCodeIterator As TECH.Iterator - Set DnaCodeIterator = ..DnaCodeRepository.ZoekViaToeleveringId(ToeleveringBijwerkenRequest.Toelevering) + Set DnaCodeIterator = ..DnaCodeRepository.ZoekViaToeleveringIdEnRecent(ToeleveringBijwerkenRequest.Toelevering) While DnaCodeIterator.HasNext() { Set DnaCode = DnaCodeIterator.Next() Set DnaCode.IsDirecteLevering = ToeleveringBijwerkenRequest.IsDirecteLevering Do ..DnaCodeRepository.Bewaar(DnaCode) } - Set DnaCodeIterator = ..DnaCodeRepository.ZoekViaToeleveringId(ToeleveringBijwerkenRequest.Toelevering) + Set DnaCodeIterator = ..DnaCodeRepository.ZoekViaToeleveringIdEnRecent(ToeleveringBijwerkenRequest.Toelevering) If DnaCodeIterator.HasNext() { Do ..BufferHelper.DnaCodesKlaarmakenVoorBuffer(DnaCodeIterator, ToeleveringBijwerkenRequest.Status, ToeleveringBijwerkenRequest.Toelevering, ,ToeleveringBijwerkenRequest.Header.Initialen) Set Response.Header.Status = "200" Index: vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/ToeleveringBijwerken/Test.cls.xml =================================================================== diff -u -r62905 -r63644 --- vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/ToeleveringBijwerken/Test.cls.xml (.../Test.cls.xml) (revision 62905) +++ vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/ToeleveringBijwerken/Test.cls.xml (.../Test.cls.xml) (revision 63644) @@ -19,7 +19,7 @@ #dim DnaCodeIteratorTweeStuks As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(DnaCode1, DnaCode2) Set DnaCodeRepositoryMock = ##class(vhTest.Mock.DOM.Halux.AAP.DnaCodeRepository).%New() - Do DnaCodeRepositoryMock.IndienMethodCall("ZoekViaToeleveringId",Request.Toelevering).DanReturn(DnaCodeIteratorTweeStuks) + Do DnaCodeRepositoryMock.IndienMethodCall("ZoekViaToeleveringIdEnRecent",Request.Toelevering).DanReturn(DnaCodeIteratorTweeStuks) Do DnaCodeRepositoryMock.VerwachtMethodCall("Bewaar",DnaCode1).ExactAantalKeer(1) Do DnaCodeRepositoryMock.VerwachtMethodCall("Bewaar",DnaCode2).ExactAantalKeer(1) @@ -39,7 +39,7 @@ Set Request.Status = ##class(DOM.Halux.AAP.enu.DnaCodeStatus).OnHold() Set DnaCodeRepositoryMock = ##class(vhTest.Mock.DOM.Halux.AAP.DnaCodeRepository).%New() - Do DnaCodeRepositoryMock.IndienMethodCall("ZoekViaToeleveringId",Request.Toelevering).DanReturn(..EmptyIterator()) + Do DnaCodeRepositoryMock.IndienMethodCall("ZoekViaToeleveringIdEnRecent",Request.Toelevering).DanReturn(..EmptyIterator()) Do DnaCodeRepositoryMock.VerwachtMethodCall("Bewaar",$$$ElkeWaarde).ExactAantalKeer(0) Set DnaCodeService = ##class(WSimpl.Halux.AAP.DnaCodeService).%New(DnaCodeRepositoryMock)