Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn.cls.xml =================================================================== diff -u -r39057 -r39066 --- WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn.cls.xml (.../BewaarMaatwerkLijn.cls.xml) (revision 39057) +++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn.cls.xml (.../BewaarMaatwerkLijn.cls.xml) (revision 39066) @@ -65,10 +65,16 @@ Set IngegevenKenmerken = ##class(APPS.PM.Maatwerk.dto.TBXKenmerken).%New() Set IngegevenKenmerken.LegacyKenmerken = ..LegacyConverter.ConverteerEdiNaarLegacy(EdiKenmerken) - Do ..WinkelkarService.VoegToeMaatwerk(WinkelkarId,"",IngegevenKenmerken, BewaarMaatwerkLijnRequest.Aantal, BewaarMaatwerkLijnRequest.ProjectReferentie, BewaarMaatwerkLijnRequest.LijnID) - + #dim WinkelkarLijnId As %String = ..WinkelkarService.VoegToeMaatwerk(WinkelkarId,"",IngegevenKenmerken, BewaarMaatwerkLijnRequest.Aantal, BewaarMaatwerkLijnRequest.ProjectReferentie, BewaarMaatwerkLijnRequest.LijnID) + + #dim MaatwerkLijn As APPS.EC.Winkelkar.dto.MaatwerkLijn = ..WinkelkarService.GeefLijn(WinkelkarId, WinkelkarLijnId) + #dim Resultaat As WS.Vhisie4.Winkelkar.BewaarMaatwerkLijnResponse Set Resultaat = ##class(WS.Vhisie4.Winkelkar.BewaarMaatwerkLijnResponse).%New() + Set Resultaat.EenheidPrijs = MaatwerkLijn.EenheidPrijs + Set Resultaat.TotaalPrijs = MaatwerkLijn.TotaalPrijs + Set Resultaat.PrijzenGeldigTotEnMet = "" + Set Resultaat.UnishopKenmerken = IngegevenKenmerken Quit Resultaat Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn/Test.cls.xml =================================================================== diff -u -r39028 -r39066 --- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn/Test.cls.xml (.../Test.cls.xml) (revision 39028) +++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn/Test.cls.xml (.../Test.cls.xml) (revision 39066) @@ -14,8 +14,9 @@ #dim WinkelkarServiceMock As vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService = ##class(vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService).%New() Do WinkelkarServiceMock.VerwachtMethodCall("VerwijderLijn", "OfferteId", "DummyLijnID").DanDoeNiks() - Do WinkelkarServiceMock.VerwachtMethodCall("VoegToeMaatwerk", "OfferteId", "", LegacyKenmerkenMatcher, "1", "ProjectReferentie", "LijnID").DanDoeNiks() - + Do WinkelkarServiceMock.VerwachtMethodCall("VoegToeMaatwerk", "OfferteId", "", LegacyKenmerkenMatcher, "1", "ProjectReferentie", "LijnID").DanReturn("WinkelkarLijnId") + Do WinkelkarServiceMock.VerwachtMethodCall("GeefLijn", "OfferteId", "WinkelkarLijnId").DanReturn(..GeefMaatwerkLijn()) + #dim WinkelkarRepositoryMock As vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New() Do WinkelkarRepositoryMock.VerwachtMethodCall("BestaatViaExterneId","ExterneId").DanReturn($$$True) Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefWinkelkarIDViaExterneId","ExterneId").DanReturn("OfferteId") @@ -55,7 +56,8 @@ #dim LegacyKenmerkenMatcher = ##class(Tools.Mock.ArgumentMatchers.DataTransferObjectMatcher).%New(IngegevenKenmerken) #dim WinkelkarServiceMock As vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService = ##class(vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService).%New() - Do WinkelkarServiceMock.VerwachtMethodCall("VoegToeMaatwerk", "OfferteId", "", LegacyKenmerkenMatcher, "1", "ProjectReferentie", "LijnID").DanDoeNiks() + Do WinkelkarServiceMock.VerwachtMethodCall("VoegToeMaatwerk", "OfferteId", "", LegacyKenmerkenMatcher, "1", "ProjectReferentie", "LijnID").DanReturn("WinkelkarLijnId") + Do WinkelkarServiceMock.VerwachtMethodCall("GeefLijn", "OfferteId", "WinkelkarLijnId").DanReturn(..GeefMaatwerkLijn()) #dim WinkelkarRepositoryMock As vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New() Do WinkelkarRepositoryMock.VerwachtMethodCall("BestaatViaExterneId","ExterneId").DanReturn($$$True) @@ -123,6 +125,11 @@ + + + +