Index: vhUnitTest/APPS/EC/Verkoop/impl/OfferteNaarDtoConverter/Converteer.cls.xml =================================================================== diff -u -r42420 -r42423 --- vhUnitTest/APPS/EC/Verkoop/impl/OfferteNaarDtoConverter/Converteer.cls.xml (.../Converteer.cls.xml) (revision 42420) +++ vhUnitTest/APPS/EC/Verkoop/impl/OfferteNaarDtoConverter/Converteer.cls.xml (.../Converteer.cls.xml) (revision 42423) @@ -16,7 +16,10 @@ Set WinkelkarServiceStub = ##class(vhTest.Mock.APPS.EC.Winkelkar.WinkelkarService).%New() Do WinkelkarServiceStub.IndienMethodCall("GeefWinkelkar", TeConverterenOfferte.GeefWinkelkarID()).DanReturn(StandaardWinkelkar) - Set Converter = ##class(APPS.EC.Verkoop.impl.OfferteNaarDtoConverter).%New(OfferteServiceStub, WinkelkarServiceStub) + Set GeldigheidVermeldingBepalerStub = ##class(vhTest.Mock.APPS.EC.Verkoop.impl.GeldigheidVermeldingBepaler).%New() + Do GeldigheidVermeldingBepalerStub.IndienMethodCall("BepaalVermelding",TeConverterenOfferte).DanReturn("Vermelding") + + Set Converter = ##class(APPS.EC.Verkoop.impl.OfferteNaarDtoConverter).%New(OfferteServiceStub, WinkelkarServiceStub, GeldigheidVermeldingBepalerStub) #dim Resultaat As APPS.EC.dto.Offerte = Converter.Converteer(OfferteId) Do $$$AssertEquals(Resultaat.OfferteID,"1000") @@ -27,7 +30,7 @@ Do $$$AssertEquals(Resultaat.Hoofding.Referentie.KlantOrderNummer,"") Do $$$AssertEquals(Resultaat.Hoofding.Referentie.OrderReferentie,"OrderReferentie") Do $$$AssertEquals(Resultaat.Winkelkar.Lijnen.Count(),1) - Do $$$AssertEquals(Resultaat.GeldigheidVermelding,"") + Do $$$AssertEquals(Resultaat.GeldigheidVermelding,"Vermelding") Do $$$AssertEquals(Resultaat.Melding,"") Do $$$AssertEquals(Resultaat.GekoppeldeOfferte,"") ]]>