Index: vhUnitTest/APPS/TRANSP/UPS/impl/Rate/Service/RatePort/Test.cls.xml
===================================================================
diff -u -r32834 -r32876
--- vhUnitTest/APPS/TRANSP/UPS/impl/Rate/Service/RatePort/Test.cls.xml	(.../Test.cls.xml)	(revision 32834)
+++ vhUnitTest/APPS/TRANSP/UPS/impl/Rate/Service/RatePort/Test.cls.xml	(.../Test.cls.xml)	(revision 32876)
@@ -31,7 +31,7 @@
 	Set RateService.Transport = TransportSpy
 	
 	#dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("Kon geen gegevens ophalen van UPS Rate")
-	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.GeneralErrorException",Substrings))
+	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.CommunicationErrorException",Substrings))
 
 	#dim DummyResponse As APPS.TRANSP.UPS.impl.Rate.Service.rate.RateResponse = RateService.Process(..GeefRateRequest())
 ]]></Implementation>
@@ -42,7 +42,7 @@
 	Set RateServiceLeegResultaat = ##class(vhUnitTest.APPS.TRANSP.UPS.impl.Rate.Service.RatePort.WebmethodLeegResultaat).%New()
 	
 	#dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("Kon geen gegevens ophalen van UPS Rate")
-	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.GeneralErrorException",Substrings))
+	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.InvalidResponseException",Substrings))
 
 	#dim DummyResponse As APPS.TRANSP.UPS.impl.Rate.Service.rate.RateResponse = RateServiceLeegResultaat.Process(..GeefRateRequest())
 ]]></Implementation>
Index: APPS/TRANSP/UPS/impl/Rate/Service/RatePort.cls.xml
===================================================================
diff -u -r32834 -r32876
--- APPS/TRANSP/UPS/impl/Rate/Service/RatePort.cls.xml	(.../RatePort.cls.xml)	(revision 32834)
+++ APPS/TRANSP/UPS/impl/Rate/Service/RatePort.cls.xml	(.../RatePort.cls.xml)	(revision 32876)
@@ -66,11 +66,11 @@
 		Set Response = ..WebMethod("Process").Invoke($this,"http://onlinetools.ups.com/webservices/RateBinding/v1.1",Body)
 	} catch {
 		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
-		Do ##class(TECH.Exceptions.GeneralErrorException).Throw("Kon geen gegevens ophalen van UPS Rate : " _Exception.ToString())
+		Do ##class(TECH.Exceptions.CommunicationErrorException).Throw("Kon geen gegevens ophalen van UPS Rate : " _Exception.ToString())
 		}
 
 	If ($$$Not($IsObject(Response))){
-		Do ##class(TECH.Exceptions.GeneralErrorException).Throw("Kon geen gegevens ophalen van UPS Rate")
+		Do ##class(TECH.Exceptions.InvalidResponseException).Throw("Kon geen gegevens ophalen van UPS Rate")
 	}
 	
 	Quit Response