Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/Synchroniseer/Synchronisator.cls.xml =================================================================== diff -u -r40488 -r44876 --- WSimpl/Vhisie4/Winkelkar/WinkelkarService/Synchroniseer/Synchronisator.cls.xml (.../Synchronisator.cls.xml) (revision 40488) +++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/Synchroniseer/Synchronisator.cls.xml (.../Synchronisator.cls.xml) (revision 44876) @@ -18,6 +18,16 @@ 1 + +DOM.PM.impl.IngegevenKenmerkenAPIimpl +1 + + + +WSimpl.Vhisie4.Winkelkar.EconConfiguratieConverter +1 + + WinkelkarService:APPS.EC.Winkelkar.impl.WinkelkarService,LijnCacheBuilder:WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.LijnCacheBuilder 1 @@ -27,7 +37,10 @@ @@ -98,7 +111,14 @@ Set IsGewijzigd = IsGewijzigd || $$$Not(Vhisie4WinkelkarLijn.TotaalPrijs = Vhisie3WinkelkarLijn.TotaalPrijs) Set IsGewijzigd = IsGewijzigd || $$$Not(Vhisie4WinkelkarLijn.ProductId = Vhisie3WinkelkarLijn.ProductId) } ElseIf Vhisie4WinkelkarLijn.%Extends("WS.Vhisie4.Winkelkar.dto.MaatwerkLijn") { - /// Geef canonische waarde DOM.PM.impl.IngegevenKenmerkenAPIimpl + #dim Vhisie3CanonischeWaarde = ..IngegevenKenmerkenAPI.GeefCanonischeWaarde(Vhisie3WinkelkarLijn.IngegevenKenmerken) + + #dim EconMaatwerkLijn As APPS.EC.Winkelkar.dto.MaatwerkLijn = ..EconConfiguratieConverter.Convert(Vhisie4WinkelkarLijn.EconConfiguratie) + #dim Vhisie4CanonischeWaarde = ..IngegevenKenmerkenAPI.GeefCanonischeWaarde(EconMaatwerkLijn.IngegevenKenmerken) + + Set IsGewijzigd = IsGewijzigd || $$$Not(Vhisie4WinkelkarLijn.TotaalPrijs = Vhisie3WinkelkarLijn.TotaalPrijs) + Set IsGewijzigd = IsGewijzigd || $$$Not(Vhisie4WinkelkarLijn.ProductId = Vhisie3WinkelkarLijn.ProductId) + Set IsGewijzigd = IsGewijzigd || $$$Not(Vhisie3CanonischeWaarde = Vhisie4CanonischeWaarde) } Quit IsGewijzigd ]]> @@ -111,25 +131,41 @@ If WinkelkarLijn.%Extends("WS.Vhisie4.Winkelkar.dto.ProductLijn") { #dim Vhisie4ProductLijn As WS.Vhisie4.Winkelkar.dto.ProductLijn = WinkelkarLijn Do ..WinkelkarService.VoegToeProduct(WinkelkarId, Vhisie4ProductLijn.ProductId, Vhisie4ProductLijn.Aantal, "", "", Vhisie4ProductLijn.ID) - #dim Vhisie3WinkelkarLijn As WS.Vhisie4.Winkelkar.dto.ProductLijn = ..WinkelkarLijnRepository.GeefLijnViaID(Vhisie4ProductLijn.ID) - Set Vhisie3WinkelkarLijn.EenheidPrijs = Vhisie4ProductLijn.EenheidPrijs - Set Vhisie3WinkelkarLijn.TotaalPrijs = Vhisie4ProductLijn.TotaalPrijs - Do ..WinkelkarLijnRepository.Bewaar(Vhisie3WinkelkarLijn) } ElseIf WinkelkarLijn.%Extends("WS.Vhisie4.Winkelkar.dto.MaatwerkLijn") { #dim Vhisie4MaatwerkLijn As WS.Vhisie4.Winkelkar.dto.MaatwerkLijn = WinkelkarLijn #dim Vhisie3MaatwerkLijn As APPS.EC.Winkelkar.dto.MaatwerkLijn = ..WinkelkarService.VoegToeMaatwerk(WinkelkarId, "", Vhisie4MaatwerkLijn.EconConfiguratie, Vhisie4MaatwerkLijn.Aantal, "", Vhisie4MaatwerkLijn.ID) - Set Vhisie3MaatwerkLijn.EenheidPrijs = Vhisie4MaatwerkLijn.EenheidPrijs - Set Vhisie3MaatwerkLijn.TotaalPrijs = Vhisie4MaatwerkLijn.TotaalPrijs } + + Set Vhisie3MaatwerkLijn.EenheidPrijs = Vhisie4MaatwerkLijn.EenheidPrijs + Set Vhisie3MaatwerkLijn.TotaalPrijs = Vhisie4MaatwerkLijn.TotaalPrijs + Do ..WinkelkarLijnRepository.Bewaar(Vhisie3WinkelkarLijn) ]]> WinkelkarId:%String,WinkelkarLijn:WS.Vhisie4.Winkelkar.dto.WinkelkarLijn 1 - Index: vhTest/Mock/WSimpl/Vhisie4/Winkelkar/WinkelkarService/Synchroniseer/Synchronisator.cls.xml =================================================================== diff -u -r40488 -r44876 --- vhTest/Mock/WSimpl/Vhisie4/Winkelkar/WinkelkarService/Synchroniseer/Synchronisator.cls.xml (.../Synchronisator.cls.xml) (revision 40488) +++ vhTest/Mock/WSimpl/Vhisie4/Winkelkar/WinkelkarService/Synchroniseer/Synchronisator.cls.xml (.../Synchronisator.cls.xml) (revision 44876) @@ -3,8 +3,7 @@ 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 -Inheritance van meerdere TECH.Interface interfaces resulteert nog niet in een mockklasse met overeenkomstige inheritance-structuur. +Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt 1 WSimpl.Vhisie4.Winkelkar.WinkelkarService.Synchroniseer.Synchronisator,Tools.Mock.MockClassBase right