Index: csp/vhisie/TBX/Wizard/tmpDev.mac.rou
===================================================================
diff -u -r790 -r891
--- csp/vhisie/TBX/Wizard/tmpDev.mac.rou	(.../tmpDev.mac.rou)	(revision 790)
+++ csp/vhisie/TBX/Wizard/tmpDev.mac.rou	(.../tmpDev.mac.rou)	(revision 891)
@@ -5,6 +5,15 @@
  http://cache02/VHISIE/TBX/DtestURL.csp?REF=\\277\A
  */
  
+RedirectTo400BadRequest(HttpRequestDomein)
+	Set IsUitgefaseerdeHandel = $$IsUitgefaseerdeHandel^csp.vhisie.TBX.Main.tmpDev(HttpRequestDomein)
+	If IsUitgefaseerdeHandel {
+		Do %response.Reset()
+		Set %response.Status="400 Bad Request"
+	}
+	Quit IsUitgefaseerdeHandel
+ 
+ 
 OnPreHTTP()
 	New name,tmpRq,RefArray,OutPage,Ref,luSafe,luTBX,lbDomLU
 	New blnSubmit,blnRedir,PSW,i
@@ -26,6 +35,9 @@
 	Kill %session.Data("QSDATA")
 	Set TBXContext=##class(APPS.TBXWeb.TBXContext).InitFromHttpRequest()
 	Set sDomVERW=TBXContext.GeefDomeinVerwerker()
+	
+	// Uitgefaseerde Handels worden geblokkeerd 
+	Quit:($$RedirectTo400BadRequest(TBXContext.GeefHttpRequestDomein())) 0
  
 	Set LadeDesignControleur=##class(APPS.TBXWeb.Utils.impl.LadeDesignControleur).%New(TBXContext)