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