Index: csp/vhisie/TBX/Main/tmpDev.mac.rou
===================================================================
diff -u -r549 -r580
--- csp/vhisie/TBX/Main/tmpDev.mac.rou	(.../tmpDev.mac.rou)	(revision 549)
+++ csp/vhisie/TBX/Main/tmpDev.mac.rou	(.../tmpDev.mac.rou)	(revision 580)
@@ -27,6 +27,8 @@
 	Set sDomVERW=TBXContext.GeefDomeinVerwerker()
 	Set sDomKLNr=TBXContext.GeefDomeinKlantNummer()
 	
+	Set LadeDesignControleur=##class(APPS.TBXWeb.Utils.impl.LadeDesignControleur).%New(TBXContext)
+		
 	Set Taal="E"
 	Set DefaultTaal=TBXContext.GeefDefaultTaal()
 	Set blnNoAccess=TBXContext.IsOngeldigDomein()   ; ONBEKEND DOMEIN - NIET TOEGELATEN !!!
@@ -469,7 +471,7 @@
 	. Set blnDynaplugERR=0
 	
 	
-	Set IsDesignBeschikbaar=('$IsObject(WSOrd))||(WSOrd.IsLadeDesignBeschikbaar(.DS))
+	Set IsDesignBeschikbaar=('$IsObject(WSOrd))||(WSOrd.IsLadeDesignBeschikbaar(.DS,LadeDesignControleur))
 	Set blnOFFVervallen=($IsObject(WSOrd))&&(WSOrd.IsOfferteVervallen($H,.RedenVervallen))
 	If blnOFFVervallen Do  Quit:($G(blnQuit,0))
 	. // Als de "Recalc"-flag (via QueryString) op "1" staat, dan worden de prijzen van het WSOrd herberekend tijdens deze OnPreHTTP()
@@ -541,7 +543,7 @@
 	Quit:('$IsObject(WSOrd))
 	; Show Order Details
 	Set arShow("DisplayOrder","DTL")=$IsObject(WSOrd)
-	Set IsDesignBeschikbaar=(WSOrd.IsLadeDesignBeschikbaar(.DS))
+	Set IsDesignBeschikbaar=(WSOrd.IsLadeDesignBeschikbaar(.DS,LadeDesignControleur))
 	
 	Do MShowVervaldagOFFText(TBXOrdersDto,Taal)
 	; Positie van de tekst t.o.v. de buttons