Index: MagazijnLocaties.csp
===================================================================
diff -u -r14 -r90
--- MagazijnLocaties.csp	(.../MagazijnLocaties.csp)	(revision 14)
+++ MagazijnLocaties.csp	(.../MagazijnLocaties.csp)	(revision 90)
@@ -188,20 +188,6 @@
 
 
 <SCRIPT method="CustomEHandlerInit" language="Cache" arguments="lbErrTypes" returntype="">
-	#Include ErrorVHCNTs
-	#Include vhLib.Macro
-
-	#define EmailTo "jbl@vanhoecke.be"
-	Do ##class(csp.errorvh).DefaultEHandlerInit(.lbErrTypes)
-	
-	If (##class(TECH.Config.ConfigMgr).Instance().GetOmgeving()["PROD"){
-		Set %cspEHandler($$$etPageLoadError,"ACTIONS")=$LB("Email","ErrPage")
-	 	Set %cspEHandler($$$etPageLoadError,"ACTIONS","Email")=$LB("""CSPserver "_$system.Server.HostName()_""" <ICT@vanhoecke.be>",$LB($$$EmailTo),"CSP - Error - "_$ZDT($H,4),"�DFL_HTML�",,1)
-	 	Set %cspEHandler($$$etPageLoadError,"ACTIONS","ErrPage")=$LB("csp.errorvh","OnPageMinimum")
-	}Else{
-		Set %cspEHandler($$$etPageLoadError,"ACTIONS")=$LB("ErrPage")
-	 	Set %cspEHandler($$$etPageLoadError,"ACTIONS","ErrPage")=$LB("%CSP.Error","OnPage")
-	}
-	
-	Quit
+Do ##class(BL.Magazijn.MagazijnErrorHandler).%New().ErrorHandle(.lbErrTypes)
+Quit
 </SCRIPT>