Index: vhUnitTest/WSimpl/EC/Unishop/OrderConfirmation/Service/IntractoMelder/UpdateCartStatus/LoggerMock.cls.xml =================================================================== diff -u --- vhUnitTest/WSimpl/EC/Unishop/OrderConfirmation/Service/IntractoMelder/UpdateCartStatus/LoggerMock.cls.xml (revision 0) +++ vhUnitTest/WSimpl/EC/Unishop/OrderConfirmation/Service/IntractoMelder/UpdateCartStatus/LoggerMock.cls.xml (revision 51756) @@ -0,0 +1,17 @@ + + + +Tools.Mock.MockClassBase + + + +In de basisklasse vhLib.Logger is "LogEnMailExceptie" een CLASSmethod en kan dus niet overschreven worden om uitmockbaar te zijn. +Daarom aparte klasse, die zelfs niet alfeidt van vhLib.Logger (spijtig genoeg) +Exceptie:TECH.Exceptions.Exception,ExtraOmschrijving:TECH.String="" + + + + + + Index: vhUnitTest/WSimpl/EC/Unishop/OrderConfirmation/Service/IntractoMelder/UpdateCartStatus/Test.cls.xml =================================================================== diff -u -r51654 -r51756 --- vhUnitTest/WSimpl/EC/Unishop/OrderConfirmation/Service/IntractoMelder/UpdateCartStatus/Test.cls.xml (.../Test.cls.xml) (revision 51654) +++ vhUnitTest/WSimpl/EC/Unishop/OrderConfirmation/Service/IntractoMelder/UpdateCartStatus/Test.cls.xml (.../Test.cls.xml) (revision 51756) @@ -51,13 +51,18 @@ Set CartPortStub = ##class(vhTest.Mock.WSimpl.EC.Unishop.OrderConfirmation.Service.IntractoMelder.CartPort).%New() Do CartPortStub.IndienMethodCall("updateStatus",CartID,CartStatus).DanException(Exceptie) - + + Set LoggerStub = ##class(vhUnitTest.WSimpl.EC.Unishop.OrderConfirmation.Service.IntractoMelder.UpdateCartStatus.LoggerMock).%New() + Do LoggerStub.VerwachtMethodCall("LogEnMailExceptie",$$$ElkeWaarde).DanDoeNiks() + #dim DoorgaanNaFoutmelding As %Boolean = $$$True - Set IntractoMelder = ##class(WSimpl.EC.Unishop.OrderConfirmation.Service.IntractoMelder).%New(CartPortStub) + Set IntractoMelder = ##class(WSimpl.EC.Unishop.OrderConfirmation.Service.IntractoMelder).%New(CartPortStub, LoggerStub) #dim Result As WSimpl.EC.Unishop.OrderConfirmation.Service.IntractoMelder.UpdateStatusResponse = IntractoMelder.UpdateCartStatus(CartID, CartStatus, DoorgaanNaFoutmelding) Do $$$AssertEquals(Result.success, $$$False) Do $$$AssertEquals(Result.error, Foutmelding) + + Do LoggerStub.Verifieer() ]]>