Index: APPS/VKP/OfferteService.cls.xml =================================================================== diff -u -r38785 -r38919 --- APPS/VKP/OfferteService.cls.xml (.../OfferteService.cls.xml) (revision 38785) +++ APPS/VKP/OfferteService.cls.xml (.../OfferteService.cls.xml) (revision 38919) @@ -131,7 +131,7 @@ %String - + 1 OfferteID:%String Index: APPS/EC/Verkoop/impl/Externe/VerkoopService.cls.xml =================================================================== diff -u -r38829 -r38919 --- APPS/EC/Verkoop/impl/Externe/VerkoopService.cls.xml (.../VerkoopService.cls.xml) (revision 38829) +++ APPS/EC/Verkoop/impl/Externe/VerkoopService.cls.xml (.../VerkoopService.cls.xml) (revision 38919) @@ -70,7 +70,7 @@ #dim OfferteBewaarder As APPS.VKP.OfferteBewaarder = ..OfferteService.GeefOfferteBewaarder() Do OfferteBewaarder.Bewaar(Offerte) - Do ..OfferteService.RaiseEventOfferte(Offerte.GeefID()) + Do ..OfferteService.RaiseOfferteEvent(Offerte.GeefID()) Set OfferteIDenWinkelkarID = ##class(APPS.EC.dto.OfferteIDEnWinkelkarID).%New() Set OfferteIDenWinkelkarID.OfferteID = Offerte.GeefID() Index: APPS/VKP/event/OfferteGemaaktEventRaiser.cls.xml =================================================================== diff -u --- APPS/VKP/event/OfferteGemaaktEventRaiser.cls.xml (revision 0) +++ APPS/VKP/event/OfferteGemaaktEventRaiser.cls.xml (revision 38919) @@ -0,0 +1,34 @@ + + + +TECH.RegisteredObject + + +TECH.PubSub.EventRaiser +1 + + + +EventRaiser:TECH.PubSub.EventRaiser +1 +1 +%Status +1 + + + + +OfferteID:%String + + + + + + Index: APPS/VKP/impl/OfferteService.cls.xml =================================================================== diff -u -r38793 -r38919 --- APPS/VKP/impl/OfferteService.cls.xml (.../OfferteService.cls.xml) (revision 38793) +++ APPS/VKP/impl/OfferteService.cls.xml (.../OfferteService.cls.xml) (revision 38919) @@ -18,6 +18,11 @@ 1 + +APPS.VKP.event.OfferteGemaaktEventRaiser +1 + + OfferteRepository:APPS.VKP.Offerte.OfferteRepository,WinkelkarService:APPS.EC.Winkelkar.WinkelkarService="",LijnRepository:DOM.EC.Winkelkar.impl.LijnRepository,TaalBepaler:APPS.EC.Winkelkar.impl.TaalBepaler="",VerpakkingConvertor:APPS.VKP.impl.OfferteService.VerpakkingConvertor="" 1 @@ -30,7 +35,8 @@ Set ..LijnRepository = $$$Inject(LijnRepository,##class(DOM.EC.Winkelkar.impl.LijnRepository).%New()) Set ..VerpakkingConvertor = $$$Inject(VerpakkingConvertor,##class(APPS.VKP.impl.OfferteService.VerpakkingConvertor).%New()) Set ..TaalBepaler = TaalBepaler - + Set ..OfferteGemaaktEventRaiser = ##class(APPS.VKP.event.OfferteGemaaktEventRaiser).%New() + Quit $$$OK ]]> @@ -298,12 +304,9 @@ ]]> - + OfferteID:%String - Index: vhUnitTest/APPS/EC/Verkoop/impl/Externe/VerkoopService/MaakOfferte/Test.cls.xml =================================================================== diff -u -r38908 -r38919 --- vhUnitTest/APPS/EC/Verkoop/impl/Externe/VerkoopService/MaakOfferte/Test.cls.xml (.../Test.cls.xml) (revision 38908) +++ vhUnitTest/APPS/EC/Verkoop/impl/Externe/VerkoopService/MaakOfferte/Test.cls.xml (.../Test.cls.xml) (revision 38919) @@ -34,7 +34,7 @@ #dim OfferteServiceMock As vhTest.Mock.APPS.VKP.OfferteService = ##class(vhTest.Mock.APPS.VKP.OfferteService).%New() Do OfferteServiceMock.VerwachtMethodCall("MaakNieuwOfferte", KlantIDDummy, PersonalityIDDummy).DanReturn(OfferteFake) Do OfferteServiceMock.VerwachtMethodCall("GeefOfferteBewaarder").DanReturn(OfferteBewaarderMock) - Do OfferteServiceMock.VerwachtMethodCall("RaiseEventOfferte",$$$ElkeWaarde).DanDoeNiks() + Do OfferteServiceMock.VerwachtMethodCall("RaiseOfferteEvent",$$$ElkeWaarde).DanDoeNiks() Do OfferteServiceMock.VerwachtMethodCall("ControleerOfferteViaExterneId", ExterneIdUnderTest).DanDoeNiks() #dim VerkoopService As APPS.EC.Verkoop.impl.Externe.VerkoopService = ##class(APPS.EC.Verkoop.impl.Externe.VerkoopService).%New(OfferteServiceMock, WinkelkarServiceMock) Index: vhTest/Mock/APPS/VKP/OfferteService.cls.xml =================================================================== diff -u -r38785 -r38919 --- vhTest/Mock/APPS/VKP/OfferteService.cls.xml (.../OfferteService.cls.xml) (revision 38785) +++ vhTest/Mock/APPS/VKP/OfferteService.cls.xml (.../OfferteService.cls.xml) (revision 38919) @@ -121,9 +121,9 @@ ]]> - + OfferteID:%String -