Index: WSimpl/EC/Unishop/OrderConfirmation/Service.cls.xml =================================================================== diff -u -r41327 -r50422 --- WSimpl/EC/Unishop/OrderConfirmation/Service.cls.xml (.../Service.cls.xml) (revision 41327) +++ WSimpl/EC/Unishop/OrderConfirmation/Service.cls.xml (.../Service.cls.xml) (revision 50422) @@ -23,8 +23,13 @@ 1 + +WSimpl.EC.Unishop.OrderConfirmation.Service.IntractoMelder.CartPort +1 + + -OfferteService:APPS.VKP.OfferteService="",ExterneVerkoopService:APPS.EC.Verkoop.ExterneVerkoopService +OfferteService:APPS.VKP.OfferteService="",ExterneVerkoopService:APPS.EC.Verkoop.ExterneVerkoopService,IntractoMelder:WSimpl.EC.Unishop.OrderConfirmation.Service.IntractoMelder.CartPort="" 1 1 %Status @@ -34,6 +39,7 @@ Set ..ExterneVerkoopService = $$$Inject(ExterneVerkoopService, ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefExterneVerkoopService()) Set ..AuthorisatieControleur = ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefAuthorisatieControleur() Set ..PersonalityVerwerkerLinker = ##class(APPS.EC.impl.WebshopSessionService.impl.PersonalityEnVerwerkerLinker).%New() + Set ..IntractoMelder = $$$Inject(IntractoMelder,##class(WSimpl.EC.Unishop.OrderConfirmation.Service.IntractoMelder.CartPort).%New()) Quit $$$OK ]]> @@ -63,7 +69,7 @@ Do ..VerwerkInputParameters(VanHoeckeOfferte,BestelReferentie,GevraagdeLeverdatum) Do ..ExterneVerkoopService.BestelOfferte(VanHoeckeOfferteID,KlantID,PersonalityID) - + Do ..IntractoMelder.updateStatus(EDInr,2) } Catch { #dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch() #dim Message As %String = "Unable to confirm order. (EDINr: "_EDInr_")"_$C(13,10) Index: vhUnitTest/WSimpl/EC/Unishop/OrderConfirmation/Service/ConfirmOrder/Test1.cls.xml =================================================================== diff -u -r41335 -r50422 --- vhUnitTest/WSimpl/EC/Unishop/OrderConfirmation/Service/ConfirmOrder/Test1.cls.xml (.../Test1.cls.xml) (revision 41335) +++ vhUnitTest/WSimpl/EC/Unishop/OrderConfirmation/Service/ConfirmOrder/Test1.cls.xml (.../Test1.cls.xml) (revision 50422) @@ -42,8 +42,11 @@ Do ..OfferteVanHandel.IndienMethodCall("IsBesteld").DanReturn(1) Do ..ZetMockBestelOfferteVerwacht() - #dim BestelOfferteResultaat As WS.EC.Unishop.OrderConfirmation.ConfirmOrderResult =..GeefOrderServiceInternal(OfferteServiceStub).ConfirmOrder(..EDInr,..Shop,..BestelReferentie,..GevraagdeLeverdatum) + Set IntractoInformeerderMock = ##class(vhTest.Mock.WSimpl.EC.Unishop.OrderConfirmation.Service.IntractoMelder.CartPort).%New() + Do IntractoInformeerderMock.VerwachtMethodCall("updateStatus",$$$ElkeWaarde,$$$ElkeWaarde).ExactAantalKeer(1) + #dim BestelOfferteResultaat As WS.EC.Unishop.OrderConfirmation.ConfirmOrderResult =..GeefOrderServiceInternal(OfferteServiceStub, IntractoInformeerderMock).ConfirmOrder(..EDInr,..Shop,..BestelReferentie,..GevraagdeLeverdatum) + If $$$AssertTrue($IsObject(BestelOfferteResultaat)) { Do $$$AssertEquals(BestelOfferteResultaat.EDINr,..EDInr) Do $$$AssertEquals(BestelOfferteResultaat.ProductionDays,99) @@ -52,6 +55,7 @@ Do $$$AssertEquals(..DocRefsVanHoeckeOfferte.KlantOrderNummer,..BestelReferentie) Do ..ExterneVerkoopService.Verifieer() + Do IntractoInformeerderMock.Verifieer() ]]> @@ -72,10 +76,10 @@ -OfferteService:APPS.VKP.OfferteService="" +OfferteService:APPS.VKP.OfferteService="",IntractoInformeerderMock:WSimpl.EC.Unishop.OrderConfirmation.Service.IntractoMelder.CartPort="" 1 WSimpl.EC.Unishop.OrderConfirmation.Service - FishEye: Tag 50419 refers to a dead (removed) revision in file `WSimpl/EC/Unishop/OrderConfirmation/Service/IntractoMelder/CartPort.cls.xml'. FishEye: No comparison available. Pass `N' to diff? Index: vhTest/Mock/WSimpl/EC/Unishop/OrderConfirmation/Service/IntractoMelder/CartPort.cls.xml =================================================================== diff -u --- vhTest/Mock/WSimpl/EC/Unishop/OrderConfirmation/Service/IntractoMelder/CartPort.cls.xml (revision 0) +++ vhTest/Mock/WSimpl/EC/Unishop/OrderConfirmation/Service/IntractoMelder/CartPort.cls.xml (revision 50422) @@ -0,0 +1,20 @@ + + + + +Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig. +Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt +1 +WSimpl.EC.Unishop.OrderConfirmation.Service.IntractoMelder.CartPort,Tools.Mock.MockClassBase +right + + +cartId:%xsd.int,status:%xsd.int +WSimpl.EC.Unishop.OrderConfirmation.Service.IntractoMelder.UpdateStatusResponse + + + + + +