Index: vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/ZoekAlleVhossLadesBijDnaCode/Test.cls.xml =================================================================== diff -u -r61053 -r61057 --- vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/ZoekAlleVhossLadesBijDnaCode/Test.cls.xml (.../Test.cls.xml) (revision 61053) +++ vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/ZoekAlleVhossLadesBijDnaCode/Test.cls.xml (.../Test.cls.xml) (revision 61057) @@ -10,7 +10,9 @@ Set Request.GuiVhossVolgnummer = "1" Set DnaCode1 = ##class(DOM.Halux.AAP.DnaCode).%New() + Set DnaCode1.DnaCode = "TAD16A1" Set DnaCode2 = ##class(DOM.Halux.AAP.DnaCode).%New() + Set DnaCode2.DnaCode = "TAD16A2" #dim DnaCodeIterator As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(DnaCode1, DnaCode2) Set DnaCodeRepositoryMock = ##class(vhTest.Mock.DOM.Halux.AAP.DnaCodeRepository).%New() Do DnaCodeRepositoryMock.VerwachtMethodCall("ZoekViaDnaCode",Request.DnaCode).DanReturn(DnaCodeIterator) @@ -27,6 +29,8 @@ Do $$$AssertEquals(Antwoord.Header.Status,"200") Do $$$AssertEquals(Antwoord.DnaCodes.Count(),2) + Do $$$AssertEquals(Antwoord.DnaCodes.GetAt(1).DnaCode,"TAD16A1") + Do $$$AssertEquals(Antwoord.DnaCodes.GetAt(2).DnaCode,"TAD16A2") Do DnaCodeRepositoryMock.Verifieer() ]]>