Index: vhTest/Utils/WS/Vhisie4/Winkelkar/dto/ProductLijn.cls.xml =================================================================== diff -u -r39665 -r45078 --- vhTest/Utils/WS/Vhisie4/Winkelkar/dto/ProductLijn.cls.xml (.../ProductLijn.cls.xml) (revision 39665) +++ vhTest/Utils/WS/Vhisie4/Winkelkar/dto/ProductLijn.cls.xml (.../ProductLijn.cls.xml) (revision 45078) @@ -11,6 +11,7 @@ set ProductLijn.Aantal = 1 set ProductLijn.Id = 1001 set ProductLijn.EenheidPrijs = 10 + set ProductLijn.TotaalPrijs = 10 quit ProductLijn ]]> Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar.cls.xml =================================================================== diff -u -r44842 -r45078 --- WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar.cls.xml (.../BestelWinkelkar.cls.xml) (revision 44842) +++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar.cls.xml (.../BestelWinkelkar.cls.xml) (revision 45078) @@ -53,6 +53,7 @@ #dim OfferteID As %String = ..WinkelkarRepository.GeefOfferteIDViaID(BestelWinkelkarRequest.Winkelkar.Id) + Do ..VerkoopService.ZetTotaalPrijs(OfferteID, ..BerekenTotaalPrijs(BestelWinkelkarRequest)) Do ..VerkoopService.ZetOfferteHoofding(OfferteID, ..MaakHoofding(BestelWinkelkarRequest)) Do ..VerkoopService.BestelOfferte(OfferteID, KlantPartijID, BestelWinkelkarRequest.Header.PersonalityId) @@ -101,6 +102,22 @@ Quit Hoofding ]]> + + +BestelWinkelkarRequest:WS.Vhisie4.Winkelkar.BestelWinkelkarRequest +1 +%Decimal + + Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/Test.cls.xml =================================================================== diff -u -r44842 -r45078 --- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/Test.cls.xml (.../Test.cls.xml) (revision 44842) +++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/Test.cls.xml (.../Test.cls.xml) (revision 45078) @@ -47,6 +47,7 @@ Do ..WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteIDViaID", "WinkelkarId").DanReturn("DummyID") Do ..VerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding", "DummyID", ..Matches.DataTransferObject(VerwachteHoofding)).DanDoeNiks() Do ..VerkoopServiceMock.VerwachtMethodCall("BestelOfferte", "DummyID", "KlantId", "PersonalityId").DanDoeNiks() + Do ..VerkoopServiceMock.VerwachtMethodCall("ZetTotaalPrijs", "DummyID", 10).ExactAantalKeer(1).DanDoeNiks() Do ..CheckoutTypeBepalerMock.VerwachtMethodCall("Bepaal", "PersonalityId","KlantId").DanReturn(##class(APPS.EC.Unishop.enu.CheckoutType).MetTransportKeuze()) Do ..TransportServiceMock.VerwachtMethodCall("ZetGekozenVerzendingMogelijkheid","DummyID","VerzendingMogelijkheidID","OptieKeuze").ExactAantalKeer(1).DanDoeNiks() Do ..WinkelkarServiceHelperMock.VerwachtMethodCall("GeefKlantPartijID","KlantId","").DanReturn("KlantId") @@ -72,6 +73,7 @@