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
+
+
+
+
+
+