Index: csp/vhisie/TBX/Main/tmpDev.mac.rou
===================================================================
diff -u -r1573 -r1726
--- csp/vhisie/TBX/Main/tmpDev.mac.rou	(.../tmpDev.mac.rou)	(revision 1573)
+++ csp/vhisie/TBX/Main/tmpDev.mac.rou	(.../tmpDev.mac.rou)	(revision 1726)
@@ -440,7 +440,7 @@
 	Set arShow("NotRegUserInfoOPTIMA","INFO")=(TBXContext.KlantGegevensViaDataOpt())&&(KLNr="")   ; &&('$D(%session.Data("DA TAOPT"))))
 	Quit
 ophMMComplete
-	New WSOrd,blnDynaplugERR
+	New WSOrd,blnDynaplugERR,IsDesignBeschikbaar,DS
 	Set WSOrd=$S($L(wsID):##class(WS.TBX.Order).%OpenId(wsID), 1:0)
  
 	; Show Order Details
@@ -456,20 +456,20 @@
 	. Set blnDynaplugERR=(''$G(blnWSErrors,0))
 	Else  Do
 	. Set blnDynaplugERR=0
-	;Set blnOFFVervallen=($IsObject(WSOrd))&&(WSOrd.BonType="OFF")&&(WSOrd.DagenVervallen()>0)   ;Oude berekening
+	Set IsDesignBeschikbaar=('$IsObject(WSOrd))||(WSOrd.IsLadeDesignBeschikbaar(.DS))
 	Set blnOFFVervallen=($IsObject(WSOrd))&&(WSOrd.IsOfferteVervallen($H,.RedenVervallen))
-	 ;d WL^vhDBG("RedenVervallen : "_$G(RedenVervallen))
 	If blnOFFVervallen Do  Quit:($G(blnQuit,0))
 	. Set blnQuit=$$ophMMCompleteRecalcOFF()
  	; Else  Prepare buttons
 	Do MShowNotRegUser
-	Do MShowVervaldagOFFText
+	Do:(IsDesignBeschikbaar) MShowVervaldagOFFText
+ 
 	; Positie van de tekst t.o.v. de buttons
 	Set TextPos=$S($IsObject(WSOrd)&&(WSOrd.IsSubmitted()):"LEFT", KLNr=$$$KLNrListAll:"LEFT", 1:"RIGHT")
 	; Button RecalcOrder
 	Do MShowRecalcOrder(blnOFFVervallen,$G(RedenVervallen))
 	; Button PrintPage
-	Do MShowPrintPage(1,blnOFFVervallen||blnDynaplugERR)
+	Do MShowPrintPage(1,blnOFFVervallen||blnDynaplugERR||$$$Not(IsDesignBeschikbaar))
 	; Button BookmarkPage
 	Do MShowBookmarkPage('$IsValidNum(KLNr),WSOrd)
 	; Button Show XML
@@ -513,18 +513,19 @@
 	Quit 0
  
 ophMMProcess
-	New WSOrd,blnProcessVH,blnQuit,blnAllowBulk
+	New WSOrd,blnProcessVH,blnQuit,blnAllowBulk,IsDesignBeschikbaar,DS
 	Set blnProcessVH=(TBXContext.IsDomeinVHEPN())||(VERW="VHEPN")
 	If blnProcessVH Do  Quit:($G(blnQuit,0))
 	. Set blnQuit=$$ophMMProcessFlowVHEPN
 	;Else : prepare buttons/info 
 	Do MShowKnownCustomer(1)
-	  ;d WL^vhDBG("ophMMProcess")
 	Do ophBuildToggleHistAndOrder()
 	Set WSOrd=$S($L(wsID):##class(WS.TBX.Order).%OpenId(wsID), 1:0)
 	Quit:('$IsObject(WSOrd))
 	; Show Order Details
 	Set arShow("DisplayOrder","DTL")=$IsObject(WSOrd)
+	Set IsDesignBeschikbaar=(WSOrd.IsLadeDesignBeschikbaar(.DS))
+ 
 	Do MShowVervaldagOFFText
 	; Positie van de tekst t.o.v. de buttons
 	Set TextPos="RIGHT"   ; $S($IsObject(WSOrd)&&(WSOrd.IsSubmitted()):"LEFT", 1:"RIGHT")
@@ -533,7 +534,7 @@
 	; Button SwitchToViewMode
 	Do MShowSwitchToViewMode(('TBXContext.IsDomeinVHEPN())&& 1)   ; &&(WSOrd.BonType="INKP")
 	; Button PrintPage
-	Do MShowPrintPage(1)  ;VERW="VHEPN")
+	Do MShowPrintPage(1,$$$Not(IsDesignBeschikbaar))  ;VERW="VHEPN")
 	; Button Show XML
 	Do MShowExportXML(VERW="VHEPN")
 	; Button Calculate Order
@@ -770,6 +771,7 @@
 MShowRecalcOrder(Visible,RedenVervallen)
 	Quit:('Visible)
 	Quit:('$G(blnValidKlant,1))
+	Quit:(RedenVervallen=##class(APPS.TBXWeb.enu.RedenOfferteVervallen).DesignNietBeschikbaar())
 	New tmpAr
 	Merge tmpAr=tmpRq
 	Kill tmpAr("RECALC")
@@ -990,6 +992,7 @@
 	Set WSLn=WSOrd.Lijnen.GetNext("")
 	If WSLn Do
 	. Set dcID=##class(BL.PR.GA.TandemBox).DesignCodeFromDS(WSLn.ItemDS)
+	. Set:(dcID="") dcID="S"
 	. Set HeaderLogo = dcID
 	. //Set:(dcID="I") HeaderLogo="I"
 	. Set:($L(WSLn.ItemDS)) DCSuffix=$$$Replace($$$pg.WebTextValue("DC_Suffix_"_dcID,Taal,"L"),"~","")
Index: WS/TBX/Order.cls.xml
===================================================================
diff -u -r1573 -r1726
--- WS/TBX/Order.cls.xml	(.../Order.cls.xml)	(revision 1573)
+++ WS/TBX/Order.cls.xml	(.../Order.cls.xml)	(revision 1726)
@@ -629,6 +629,10 @@
 		Set IsVervallen = 0
 		Set VervalReden = ##class(APPS.TBXWeb.enu.RedenOfferteVervallen).IsGeenOfferte()
 	}
+	ElseIf $$$Not(..IsLadeDesignBeschikbaar()) {
+		Set IsVervallen = 1
+		Set VervalReden = ##class(APPS.TBXWeb.enu.RedenOfferteVervallen).DesignNietBeschikbaar()
+	}
 	ElseIf (..ZijnErNieuweActies(RefDatum))
 	{
 		// Er zijn nieuwe acties, het huidige order vervalt dus zeker omdat er een betere prijs mogelijk is
@@ -656,6 +660,27 @@
 ]]></Implementation>
 </Method>
 
+<Method name="IsLadeDesignBeschikbaar">
+<FormalSpec><![CDATA[&DS:%String]]></FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	Set IsBeschikbaar=1
+	If $G(DS)="" {
+		Set WSLn=..Lijnen.GetNext("")
+		If $IsObject(WSLn) {
+			Set DS=WSLn.ItemDS
+		}
+	}
+	If $L(DS) {
+		If $$$Not(##class(Prod.GAMeta.BT.TBDesign).%ExistsId(DS)) {
+			Set IsBeschikbaar=0
+		}
+		; Else  verdere verfijningen mogelijk 
+	}
+	Quit IsBeschikbaar
+]]></Implementation>
+</Method>
+
 <Method name="ZijnErNieuweActies">
 <FormalSpec>RefDatum:%String=$H</FormalSpec>
 <ReturnType>%Boolean</ReturnType>
Index: APPS/TBXWeb/enu/RedenOfferteVervallen.cls.xml
===================================================================
diff -u -r1073 -r1726
--- APPS/TBXWeb/enu/RedenOfferteVervallen.cls.xml	(.../RedenOfferteVervallen.cls.xml)	(revision 1073)
+++ APPS/TBXWeb/enu/RedenOfferteVervallen.cls.xml	(.../RedenOfferteVervallen.cls.xml)	(revision 1726)
@@ -7,7 +7,7 @@
 <ClassDefinitionError>0</ClassDefinitionError>
 
 <Parameter name="VALUELIST">
-<Default>,NieuweActie,ActieVervallen,DuurOfferteVerstreken,IsGeenOfferte</Default>
+<Default>,NieuweActie,ActieVervallen,DuurOfferteVerstreken,IsGeenOfferte,DesignNietBeschikbaar</Default>
 </Parameter>
 
 <Method name="NieuweActie">
@@ -37,5 +37,12 @@
 <Implementation><![CDATA[	Quit "DuurOfferteVerstreken"
 ]]></Implementation>
 </Method>
+
+<Method name="DesignNietBeschikbaar">
+<ClassMethod>1</ClassMethod>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit "DesignNietBeschikbaar"
+]]></Implementation>
+</Method>
 </Class>
 </Export>
Index: _vhisie/TBX/MainOrderDtl.csp
===================================================================
diff -u -r1626 -r1726
--- _vhisie/TBX/MainOrderDtl.csp	(.../MainOrderDtl.csp)	(revision 1626)
+++ _vhisie/TBX/MainOrderDtl.csp	(.../MainOrderDtl.csp)	(revision 1726)
@@ -28,6 +28,15 @@
 	. Set arShow("WSErrorsInfo","INFO")=1
 	. Set arShow("WSErrorsInfo","TEXT")=..WebTextValue("WSErrorsInfo",Taal,"O")
 	. Set UrlHowTo="Help/HowTo.csp?Taal="_Taal
+	
+	Set IsLadeDesignBeschikbaar=WSOrd.IsLadeDesignBeschikbaar(.DS)
+	Set msgLadeDesign=""
+	If $$$Not(IsLadeDesignBeschikbaar) {
+		Set msgLadeDesign=..WebTextValue("DesignNietBeschikbaar",Taal,"O")
+		Set DesignOms=""""_..WebTextValue("DS_"_DS,Taal,"L")_"""" _ $S(DS?1(1"IS",1"AS"):" (plus)", 1:"")
+		Set msgLadeDesign=$$$Replace(msgLadeDesign,"::LadeDesign::","<SPAN style=""color:red;"">"_DesignOms_"</SPAN>")
+	}
+	
 </SCRIPT>
 
 <TABLE width="740" class="clsOrderDtls" border="0" cellpadding="0" cellspacing="0" style="border-collapse:collapse; margin:4px;">   <!--  Kader rond Order Details -->
@@ -88,7 +97,7 @@
 --></CSP:COMMENT>
 					</TD>
 					<TD align="left" >
-						<div id="OVZ_Design"  class="clsOvzData">#($G(arWSVTL("KLR_DS")))#</div>
+						<div id="OVZ_Design"  class="clsOvzData" #($S($$$Not(IsLadeDesignBeschikbaar):" style=""color:red;""", 1:""))#>#($G(arWSVTL("KLR_DS")))#</div>
 <CSP:COMMENT><!--
 						<div id="OVZ_KlrLade" class="clsOvzData">#($G(arWSVTL("KLR_KL")))#</div>
 --></CSP:COMMENT>
@@ -112,7 +121,12 @@
 						</CSP:IF>
 					</TD>
 				</TR>
+		<CSP:IF condition="($L($G(msgLadeDesign)))">
 				<TR height="20">
+					<TD align="center" colspan="4"><P style="margin:10px 50px; padding:10px; font-weight:bold; color:black; border:solid red 1px;">#(msgLadeDesign)#</P></TD>
+				</TR>
+		</CSP:IF>
+				<TR height="20">
 					<TD align="left"  colspan="2"><div class="clsOvzHeading1">#(..WebTextValue("Maten",Taal,"L"))#</div></TD>
 					<TD align="right" colspan="2">&nbsp;</TD>
 				</TR>