Index: vhUnitTest/APPS/EC/impl/HaefeleDEVerzendwijzeBepaler/Test.cls.xml =================================================================== diff -u -r61240 -r61343 --- vhUnitTest/APPS/EC/impl/HaefeleDEVerzendwijzeBepaler/Test.cls.xml (.../Test.cls.xml) (revision 61240) +++ vhUnitTest/APPS/EC/impl/HaefeleDEVerzendwijzeBepaler/Test.cls.xml (.../Test.cls.xml) (revision 61343) @@ -28,10 +28,9 @@ do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidInputException",Substrings)) #dim LandCode as %String = "BE" - Set Bepaler = ##class(APPS.EC.impl.HaefeleDEVerzendwijzeBepaler).%New() + Set Bepaler = ##class(APPS.EC.impl.HaefeleDEVerzendwijzeBepaler).%New() - - Do $$$AssertEquals(Bepaler.GeefVerzendWijze(LandCode,0),"HD3") + #Dim vzw as %String = Bepaler.GeefVerzendWijze(LandCode,0) ]]> @@ -43,8 +42,7 @@ #dim LandCode as %String = "DE" Set Bepaler = ##class(APPS.EC.impl.HaefeleDEVerzendwijzeBepaler).%New() - - Do $$$AssertEquals(Bepaler.GeefVerzendWijze(LandCode,-1),"HD3") + #Dim vzw as %String = Bepaler.GeefVerzendWijze(LandCode,-1) ]]> @@ -56,8 +54,7 @@ #dim LandCode as %String = "DE" Set Bepaler = ##class(APPS.EC.impl.HaefeleDEVerzendwijzeBepaler).%New() - - Do $$$AssertEquals(Bepaler.GeefVerzendWijze(LandCode,200000),"HD3") + #Dim vzw as %String = Bepaler.GeefVerzendWijze(LandCode,200000) ]]> @@ -68,9 +65,8 @@ #dim LandCode as %String = "DE" Set Bepaler = ##class(APPS.EC.impl.HaefeleDEVerzendwijzeBepaler).%New() - - - Do $$$AssertEquals(Bepaler.GeefVerzendWijze(LandCode,"geen postcode"),"HD3") + + #Dim vzw as %String = Bepaler.GeefVerzendWijze(LandCode,"geen postcode") ]]> @@ -82,8 +78,7 @@ #dim LandCode as %String = "DE" Set Bepaler = ##class(APPS.EC.impl.HaefeleDEVerzendwijzeBepaler).%New() - - Do $$$AssertEquals(Bepaler.GeefVerzendWijze(LandCode,""),"HD3") + #Dim vzw as %String = Bepaler.GeefVerzendWijze(LandCode,"") ]]>