Index: vhTest/Utils/APPS/PM/Maatwerk/dto/TBXKenmerkenLegacy.cls.xml =================================================================== diff -u -r41443 -r51797 --- vhTest/Utils/APPS/PM/Maatwerk/dto/TBXKenmerkenLegacy.cls.xml (.../TBXKenmerkenLegacy.cls.xml) (revision 41443) +++ vhTest/Utils/APPS/PM/Maatwerk/dto/TBXKenmerkenLegacy.cls.xml (.../TBXKenmerkenLegacy.cls.xml) (revision 51797) @@ -122,7 +122,7 @@ Set Kenmerken.ItemKVOms = "" Set Kenmerken.ItemKX = "" Set Kenmerken.ItemKXOms = "" - Set Kenmerken.ItemLD = 400 + Set Kenmerken.ItemLD = 500 Set Kenmerken.ItemLT = "MS2" Set Kenmerken.ItemOLP = "" Set Kenmerken.ItemOPVL = "" @@ -167,7 +167,7 @@ Set Kenmerken.ItemKVOms = "" Set Kenmerken.ItemKX = "" Set Kenmerken.ItemKXOms = "" - Set Kenmerken.ItemLD = 400 + Set Kenmerken.ItemLD = 500 Set Kenmerken.ItemLT = "MY2" Set Kenmerken.ItemOLP = "" Set Kenmerken.ItemOPVL = "" @@ -212,7 +212,7 @@ Set Kenmerken.ItemKVOms = "" Set Kenmerken.ItemKX = "" Set Kenmerken.ItemKXOms = "" - Set Kenmerken.ItemLD = 400 + Set Kenmerken.ItemLD = 500 Set Kenmerken.ItemLT = "MY2" Set Kenmerken.ItemOLP = "" Set Kenmerken.ItemOPVL = "" Index: vhUnitTest/DOM/PM/impl/VerkoopPrijsBepaler/BepaalVerkoopPrijs/Test.cls.xml =================================================================== diff -u -r51493 -r51797 --- vhUnitTest/DOM/PM/impl/VerkoopPrijsBepaler/BepaalVerkoopPrijs/Test.cls.xml (.../Test.cls.xml) (revision 51493) +++ vhUnitTest/DOM/PM/impl/VerkoopPrijsBepaler/BepaalVerkoopPrijs/Test.cls.xml (.../Test.cls.xml) (revision 51797) @@ -73,7 +73,7 @@ Set VerkoopPrijsBepaler = ##class(DOM.PM.impl.VerkoopPrijsBepaler).%New() #dim VerkoopPrijs As %Numeric = VerkoopPrijsBepaler.BepaalVerkoopPrijs(TbxKenmerken, Aantal, ##class(DOM.common.enu.Personality).VanHoecke(), KlantID).GeefVerkoopPrijs() - Do $$$AssertEquals(VerkoopPrijs,104.02) + Do $$$AssertEquals(VerkoopPrijs,107.79) ]]> @@ -90,7 +90,7 @@ Set VerkoopPrijsBepaler = ##class(DOM.PM.impl.VerkoopPrijsBepaler).%New() #dim VerkoopPrijs As %Numeric = VerkoopPrijsBepaler.BepaalVerkoopPrijs(TbxKenmerken, Aantal, ##class(DOM.common.enu.Personality).VanHoecke(), KlantID).GeefVerkoopPrijs() - Do $$$AssertEquals(VerkoopPrijs,"107.50") + Do $$$AssertEquals(VerkoopPrijs,"111.26") ]]> @@ -107,7 +107,7 @@ Set VerkoopPrijsBepaler = ##class(DOM.PM.impl.VerkoopPrijsBepaler).%New() #dim VerkoopPrijs As %Numeric = VerkoopPrijsBepaler.BepaalVerkoopPrijs(TbxKenmerken, Aantal, ##class(DOM.common.enu.Personality).VanHoecke(), KlantID).GeefVerkoopPrijs() - Do $$$AssertEquals(VerkoopPrijs,"153.30") + Do $$$AssertEquals(VerkoopPrijs,"160.08") ]]>