Index: vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/AantalGescandeVhossSequentieItemsBepaler/BepaalAantalGescandeVhossSequentieItems.cls.xml =================================================================== diff -u -r60943 -r60944 --- vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/AantalGescandeVhossSequentieItemsBepaler/BepaalAantalGescandeVhossSequentieItems.cls.xml (.../BepaalAantalGescandeVhossSequentieItems.cls.xml) (revision 60943) +++ vhUnitTest/WSimpl/Halux/AAP/DnaCodeService/AantalGescandeVhossSequentieItemsBepaler/BepaalAantalGescandeVhossSequentieItems.cls.xml (.../BepaalAantalGescandeVhossSequentieItems.cls.xml) (revision 60944) @@ -8,12 +8,31 @@ Set DnaCode = ##class(DOM.Halux.AAP.DnaCode).%New() Set DnaCode.DnaCode = "LABCDE0" Set DnaCode.BatchId = 12345 + + Set SequentieService = ##class(vhTest.Mock.APPS.Halux.common.impl.SequentieService).%New() + Do SequentieService.IndienMethodCall("HeeftSequentie",DnaCode.BatchId).DanReturn($$$False) + Set Bepaler = ##class(WSimpl.Halux.AAP.DnaCodeService.AantalGescandeVhossSequentieItemsBepaler).%New() #dim Aantal = Bepaler.BepaalAantalGescandeVhossSequentieItems(DnaCode) Do $$$AssertEquals(Aantal,0) ]]> + + + +