Index: csp/errorvhtest.cls.xml =================================================================== diff -u -r2588 -r3104 --- csp/errorvhtest.cls.xml (.../errorvhtest.cls.xml) (revision 2588) +++ csp/errorvhtest.cls.xml (.../errorvhtest.cls.xml) (revision 3104) @@ -431,12 +431,13 @@ . Set Body="" Else Do ; Nothing. Use values as passed by lbArgs -#If (##class(TECH.Config.ConfigMgr).Instance().GetOmgeving()="DEV") - Do ; Send to SoapSysOp only on WWW; else reply by "WV" - . New i - . Set i=$LF(lbTo,"ICT_SOAPSysOp@vanhoecke.be") - . Set:(i>0) $LI(lbTo,i)="wv@vanhoecke.be" -#EndIf + Set RerouteTo = $$$Trim(##class(TECH.Config.ConfigMgr).Instance().GetString("csp.errorvh_RerouteMailTo")) + If $L(RerouteTo) { + // Send to "WV" instead of "ICT_SoapSysOp" + New i + Set i=$LF(lbTo,"ICT_SOAPSysOp@vanhoecke.be") + Set:(i>0) $LI(lbTo,i)=$S($G(%RemoteIP)="192.168.1.195":"jcl@vanhoecke.be", 1:RerouteTo) + } ; Send E-mail If $IsObject($G(tmpStream)) Do . Set sc=$$SendMiniMail^vhLib(From,lbTo,Subject,tmpStream,1,blnHTML)