Index: vhUnitTest/WSimpl/Unishop/Login/KortingVoorVariantBepaler/Test.cls.xml =================================================================== diff -u -r60934 -r60937 --- vhUnitTest/WSimpl/Unishop/Login/KortingVoorVariantBepaler/Test.cls.xml (.../Test.cls.xml) (revision 60934) +++ vhUnitTest/WSimpl/Unishop/Login/KortingVoorVariantBepaler/Test.cls.xml (.../Test.cls.xml) (revision 60937) @@ -70,7 +70,7 @@ #dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("Ladetype werd meegegeven maar korting werd als leeg meegegeven. Korting moet 1 numeriek veld zijn of in het formaat 'TBX=20;LBX=25.5;TAOR=15'") Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New(##class(TECH.Exceptions.InvalidInputException).%ClassName(1),Substrings)) - #dim TBXKorting As %String = ##class(WSimpl.Unishop.Login.KortingVoorVariantBepaler).%New().GeefKortingVoorVariant(KlantSessieDataKorting, TBXVariant) + Do ##class(WSimpl.Unishop.Login.KortingVoorVariantBepaler).%New().GeefKortingVoorVariant(KlantSessieDataKorting, TBXVariant) ]]> @@ -81,7 +81,7 @@ #dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("Geen kortingscode gevonden voor deze variant") Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New(##class(TECH.Exceptions.InvalidInputException).%ClassName(1),Substrings)) - #dim TBXKorting As %String = ##class(WSimpl.Unishop.Login.KortingVoorVariantBepaler).%New().GeefKortingVoorVariant(KlantSessieDataKorting, TBXVariant) + Do ##class(WSimpl.Unishop.Login.KortingVoorVariantBepaler).%New().GeefKortingVoorVariant(KlantSessieDataKorting, TBXVariant) ]]> @@ -92,7 +92,7 @@ #dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("Korting werd niet in het correcte formaat meegegeven. Dit moet 1 numeriek veld zijn of in het formaat 'TBX=20;LBX=25.5;TAOR=15'") Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New(##class(TECH.Exceptions.InvalidInputException).%ClassName(1),Substrings)) - #dim TBXKorting As %String = ##class(WSimpl.Unishop.Login.KortingVoorVariantBepaler).%New().GeefKortingVoorVariant(KlantSessieDataKorting, TBXVariant) + Do ##class(WSimpl.Unishop.Login.KortingVoorVariantBepaler).%New().GeefKortingVoorVariant(KlantSessieDataKorting, TBXVariant) ]]> @@ -103,7 +103,7 @@ #dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("Korting werd niet in het correcte formaat meegegeven. Dit moet 1 numeriek veld zijn of in het formaat 'TBX=20;LBX=25.5;TAOR=15'") Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New(##class(TECH.Exceptions.InvalidInputException).%ClassName(1),Substrings)) - #dim TBXKorting As %String = ##class(WSimpl.Unishop.Login.KortingVoorVariantBepaler).%New().GeefKortingVoorVariant(KlantSessieDataKorting, TBXVariant) + Do ##class(WSimpl.Unishop.Login.KortingVoorVariantBepaler).%New().GeefKortingVoorVariant(KlantSessieDataKorting, TBXVariant) ]]>