Index: APPS/TBXWeb/OrderService.cls.xml
===================================================================
diff -u -r409 -r413
--- APPS/TBXWeb/OrderService.cls.xml	(.../OrderService.cls.xml)	(revision 409)
+++ APPS/TBXWeb/OrderService.cls.xml	(.../OrderService.cls.xml)	(revision 413)
@@ -151,9 +151,11 @@
 onError
 	set $zt=""
 	set Exception = ##class(TECH.ExceptionHandler).Catch()
-	Set SoapClientLocation=$S($IsObject($G(SoapClient)):SoapClient.Location, 1:"")
-	do WebOrder.AddToTransferLog(0,SoapClientLocation,Exception.GeefOmschrijving())
-	do ##class(vhLib.Logger).%New("TBXWeb").ErrorMail("onErrorSoap: "_WebOrder.mID_" ("_SoapClientLocation_ ")",Exception.ToString())
+	If Exception.GeefExceptionCode()'=##class(TECH.enu.ExceptionCode).InvalidInput() {
+		Set SoapClientLocation=$S($IsObject($G(SoapClient)):SoapClient.Location, 1:"")
+		do WebOrder.AddToTransferLog(0,SoapClientLocation,Exception.GeefOmschrijving())
+		do ##class(vhLib.Logger).%New("TBXWeb").ErrorMail("onErrorSoap: "_WebOrder.mID_" ("_SoapClientLocation_ ")",Exception.ToString())
+	}
 	do ##class(TECH.ExceptionHandler).Rethrow(Exception)
 	quit
 ]]></Implementation>