Index: vhUnitTest/APPS/TRANSP/Offerte/impl/DHL/TariefBepaler/Test.cls.xml =================================================================== diff -u -r36388 -r61836 --- vhUnitTest/APPS/TRANSP/Offerte/impl/DHL/TariefBepaler/Test.cls.xml (.../Test.cls.xml) (revision 36388) +++ vhUnitTest/APPS/TRANSP/Offerte/impl/DHL/TariefBepaler/Test.cls.xml (.../Test.cls.xml) (revision 61836) @@ -99,15 +99,13 @@ ]]> - + @@ -156,13 +154,11 @@ #dim TariefRepository As vhTest.Fake.APPS.TRANSP.Offerte.impl.DHL.TariefRepository = ##class(vhTest.Fake.APPS.TRANSP.Offerte.impl.DHL.TariefRepository).%New() #dim TariefBepaler As APPS.TRANSP.Offerte.impl.DHL.TariefBepaler = ##class(APPS.TRANSP.Offerte.impl.DHL.TariefBepaler).%New(TariefRepository) - #dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("Voor gewichten groter dan 2500 Kg zijn de tarieven op aanvraag.") - do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidInputException",Substrings)) - #dim Afmeting As APPS.TRANSP.dto.Afmeting = ##class(APPS.TRANSP.dto.Afmeting).%New(10000, 10000, 10000) #dim FactureerbaarGewichtInKg As %Decimal = TariefBepaler.BepaalFactureerbaarGewichtInKg(Afmeting,0) #dim Tarief As %Decimal = TariefBepaler.GeefTarief("DE","54122",FactureerbaarGewichtInKg) + Do $$$AssertEquals(Tarief, 197.20) ]]>