Index: _vhisie/TBX/Main.csp
===================================================================
diff -u -r1133 -r1571
--- _vhisie/TBX/Main.csp	(.../Main.csp)	(revision 1133)
+++ _vhisie/TBX/Main.csp	(.../Main.csp)	(revision 1571)
@@ -17,9 +17,10 @@
 	If $IsObject(WSOrd) Set HeaderLogo = WSOrd.GetDC()
 	Set:($G(sMode)="START") HeaderLogo=""
 	
-	Set BGImage = "BG_TBX.bmp"
-	If $$$NSpace="DEMO" Set BGImage="BG_TBX_DEMO.bmp"
-	If $$$Server="CACHE02" Set BGImage="BG_TBX_C02.bmp"
+	Set BGImage = ##class(TECH.Config.ConfigMgr).Instance().GetString("APPS.TBXWeb.BackgroudImageName")
+	;Set BGImage = "BG_TBX.bmp"
+	;If $$$NSpace="DEMO" Set BGImage="BG_TBX_DEMO.bmp"
+	;If $$$Server="CACHE02" Set BGImage="BG_TBX_C02.bmp"
 </SCRIPT>
 
 <HEAD>
@@ -142,10 +143,10 @@
 			<TD>&nbsp;</TD>
 			<TD>&nbsp;</TD>
 	</CSP:IF>
-	<CSP:IF condition='blnLMC||blnDUPO||blnHELMY||blnHFLE||blnMBHO'>
+	<CSP:IF condition='(TBXContext.MagAndereTaalKiezen()=0)'>
 			<TD>&nbsp;</TD>
 			<TD>&nbsp;</TD>
-	<CSP:ELSEIF condition='blnSFS'>
+	<CSP:ELSEIF condition='TBXContext.IsDomeinSFS()'>
 			<TD align="right"><SPAN style="color:#FF460A">#(..WebTextValue("Taal",Taal,"L"))#:&nbsp;</SPAN></TD>
 			<TD align="left">#(arUrl("SwitchTL","D")_$S(1:" - "_arUrl("SwitchTL","F"), 1:""))#</TD>
 	<CSP:ELSE>
@@ -214,7 +215,7 @@
 	Set arVerlof("MSG","DisplayMsg")=$CASE(Taal, "F":"Pour placer des commandes: cong�s annuels, nous sommes ferm�s de", "E":"For placing orders: the company is closed", "D":"For placing orders: the company is closed", :"Voor bestellingen: gesloten wegens jaarlijks verlof")
 	;Set arVerlof("MSG","DisplayMsg")=$CASE(Taal, "F":"Pour placer des commandes: nous sommes ferm�s de",                "E":"For placing orders: the company is closed", "D":"For placing orders: the company is closed", :"Voor bestellingen: gesloten wegens verlof")
 	</SCRIPT>
-	<CSP:IF condition='($G(arVerlof("MSG","ShowTime"))=1) && blnVHEPN'>
+	<CSP:IF condition='($G(arVerlof("MSG","ShowTime"))=1) && TBXContext.IsDomeinVHEPN()'>
 		<TR>
 			<TD colspan="5" align="center">
 				<BR>
@@ -275,9 +276,8 @@
 	</CSP:IF>
 	
 	
-	<CSP:IF condition='($G(KLNr)=999999)&&(sMode="START")&&(blnHist=0)'>
+	<CSP:IF condition='(TBXContext.ToonKnopHttpRequestTestpage($G(KLNr)))&&(sMode="START")&&(blnHist=0)'>
 		<CSP:COMMENT><!--  SPECIALE TEST-FORM  --></CSP:COMMENT>
-		<CSP:COMMENT><!--  KLNr=999999 / 14937 / 12848 / 14484 / 3524 / 8575 / 5977 / 10096 /10939 / 4137 / 10547 / 5872 / 8537 / 4874 / 1093 / 8537 / 2118 --></CSP:COMMENT>
 		<TR>
 			<TD colspan="5"><B>Klantspecifiek:<B> <SPAN style="color:blue; font-weight:bold;">TEST DE VERBINDING MET ONZE SERVER</SPAN><BR></TD>
 		</TR>
@@ -292,7 +292,7 @@
 	</CSP:IF>
 
 
-	<CSP:IF condition='(KLNr=$$$KLNrListAll)&&(blnLMC||blnSFS||blnMBHO)'>   
+	<CSP:IF condition='(KLNr=$$$KLNrListAll)&&(TBXContext.KlantGegevensViaDataOpt())'>
 		<CSP:COMMENT><!--   Nieuwe ingave niet mogelijk, want domein laat Anonymous niet toe   --></CSP:COMMENT>
 	<CSP:ELSEIF condition='($G(arShow("SwitchStartMode","BTN")))'>      <!--   TextPos="RIGHT"   -->
 		<TR>
@@ -324,15 +324,15 @@
 			<TD width="200" align="center" style="padding:5px;">
 				<A href="#($G(arShow("NewOrder","HREF")))#"><SPAN class="clsWizardBtn"><NOBR>TANDEMBOX plus</NOBR></SPAN></A>
 			</TD>
-		<CSP:IF condition='(blnHEIN=0)'>
+		<CSP:IF condition='(TBXContext.IsDomeinHEIN()=0)'>
 			<TD width="200" align="center" style="padding:5px;">
 			    <A href="#($G(arShow("NewOrder","HREF"))_"&DCM=A")#"><SPAN class="clsWizardBtn"><NOBR>TANDEMBOX antaro</NOBR></SPAN></A>
 			</TD>
 		</CSP:IF>
 			<TD width="200" align="center" style="padding:5px;">
 			    <A href="#($G(arShow("NewOrder","HREF"))_"&DCM=I")#"><SPAN class="clsWizardBtn"><NOBR>TANDEMBOX intivo</NOBR></SPAN></A>
 			</TD>
-		<CSP:IF condition='(blnHEIN=1)'>
+		<CSP:IF condition='(TBXContext.IsDomeinHEIN()=1)'>
 		     <TD width="200">&nbsp;</TD>
 		</CSP:IF>
 		     <TD width="20">&nbsp;</TD>
@@ -343,7 +343,7 @@
 				<A href="#($G(arShow("NewOrder","HREF")))#"><img src="media/tbxplus_50.gif" border="0"></A>
 				<BR><DIV style="point:help; cursor:help;" onClick="ShowInfo('DC_plus','');"><NOBR><A>info</A></NOBR></DIV>&nbsp;
 			</TD>
-		<CSP:IF condition='(blnHEIN=0)'>
+		<CSP:IF condition='(TBXContext.IsDomeinHEIN()=0)'>
 			<TD align="center" style="padding:5px;">
 			    <A href="#($G(arShow("NewOrder","HREF"))_"&DCM=A")#"><img src="media/tbxantaro_50.gif" border="0"></A>				
 				<BR><DIV style="point:help; cursor:help;" onClick="ShowInfo('DC_A','');"><NOBR><A>info</A></NOBR></DIV>&nbsp;
@@ -353,7 +353,7 @@
 			    <A href="#($G(arShow("NewOrder","HREF"))_"&DCM=I")#"><img src="media/tbxintivo_50.gif" border="0"></A>
 				<BR><DIV style="point:help; cursor:help;" onClick="ShowInfo('DC_I','');"><NOBR><A>info</A></NOBR></DIV>&nbsp;
 			</TD>
-		<CSP:IF condition='(blnHEIN=1)'>
+		<CSP:IF condition='(TBXContext.IsDomeinHEIN()=1)'>
 		     <TD>&nbsp;</TD>
 		</CSP:IF>
      		<TD>&nbsp;</TD>
@@ -362,7 +362,7 @@
 			<BR>			 
 			</TD>
 		</TR>
-			<CSP:IF condition='($G(KLNr)=4645)&&(blnVHEPN)'>
+			<CSP:IF condition='($G(KLNr)=4645)&&(TBXContext.IsDomeinVHEPN())'>
 		<TR>
 			<TD>&nbsp;</TD>
 			<TD colspan="2" align="left" style="padding:5px;">
@@ -399,69 +399,7 @@
 		</CSP:IF>
 	</CSP:IF>
 
-<CSP:COMMENT><!--
 
-		<TR>
-			<TD>&nbsp;</TD>
-			<CSP:IF condition='(TextPos="RIGHT")'>
-			<TD align="left" style="padding:5px;"><A href="#($G(arShow("NewFromOrder","HREF")))#"><SPAN class="clsWizardBtn"><NOBR>#(..WebTextValue("BtnNewFromOrder",Taal,"L"))#</NOBR></SPAN></A></TD>
-			<TD colspan="3">&nbsp;: #(..WebTextValue("NewFromOrder",Taal,"O"))#</TD>
-			<CSP:ELSE>		
-			<TD align="left" style="padding:5px;" colspan="2"><A href="#($G(arShow("NewFromOrder","HREF")))#"><SPAN class="clsWizardBtn"><NOBR>#(..WebTextValue("BtnNewFromOrder",Taal,"L"))#</NOBR></SPAN></A></TD>
-			<TD colspan="2">&nbsp;</TD>
-			</CSP:IF>
-		</TR>
-
---></CSP:COMMENT>
-
-
-
-<CSP:COMMENT><!--
-	<CSP:IF condition='$G(arShow("NewOrder","BTN"))'>
-		<CSP:IF condition='(TextPos="RIGHT")'>
-		<TR>
-			<TD colspan="5">&nbsp;<BR><BR></TD>
-		</TR>	
-		<CSP:ELSE>
-		<TR>
-			<TD colspan="5">#($S(sMode="COMPLETE":"<BR><BR><BR>", 1:"")_..WebTextValue($S((sMode="COMPLETE")&&(KLNr'=$$$KLNrListAll):"VolgendeIngave", 1:"NieuweIngave"),Taal,"O",$LB("F")))#<BR></TD>
-		</TR>	
-		</CSP:IF>
-		<TR>
-			<TD>&nbsp;</TD>
-			<CSP:IF condition='(TextPos="RIGHT")'>
-			<TD align="left" style="padding:5px;"><A href="#($G(arShow("NewOrder","HREF")))#"><SPAN class="clsWizardBtn"><NOBR>#(..WebTextValue("NieuweIngave",Taal,"L")_" - TANDEMBOX plus>")#</NOBR</SPAN></A></TD>
-			<TD colspan="3">&nbsp;: #($P(..WebTextValue("VolgendeIngave",Taal,"O"),",",1))#</TD>
-			<CSP:ELSE>		
-			<TD align="left" style="padding:5px;" colspan="2"><A href="#($G(arShow("NewOrder","HREF")))#"><SPAN class="clsWizardBtn"><NOBR>#(..WebTextValue("NieuweIngave",Taal,"L")_" - TANDEMBOX plus")#</NOBR></SPAN></A></TD>
-			<TD colspan="2">&nbsp;</TD>
-			</CSP:IF>
-		</TR>
-		<TR>
-			<TD>&nbsp;</TD>
-			<CSP:IF condition='(TextPos="RIGHT")'>
-			<TD align="left" style="padding:5px;"><A href="#($G(arShow("NewOrder","HREF"))_"&DCM=I")#"><SPAN class="clsWizardBtn"><NOBR>#(..WebTextValue("NieuweIngave",Taal,"L")_" - TANDEMBOX intivo")#</NOBR></SPAN></A></TD>
-			<TD colspan="3">&nbsp;: #($P(..WebTextValue("VolgendeIngave",Taal,"O"),",",1)_" intivo")#</TD>
-			<CSP:ELSE>		
-			<TD align="left" style="padding:5px;" colspan="2"><A href="#($G(arShow("NewOrder","HREF"))_"&DCM=I")#"><SPAN class="clsWizardBtn"><NOBR>#(..WebTextValue("NieuweIngave",Taal,"L")_" - TANDEMBOX intivo")#</NOBR></SPAN></A></TD>
-			<TD colspan="2">&nbsp;</TD>
-			</CSP:IF>
-		</TR>
-		
-			<CSP:IF condition='($G(KLNr)=4645)&&(blnVHEPN)'>
-		<TR>
-			<TD>&nbsp;</TD>
-			<TD align="left" style="padding:5px;"><A href="#($G(arShow("NewOrder","HREF"))_"&DCM=X")#"><SPAN class="clsWizardBtn"><NOBR>#(..WebTextValue("NieuweIngave",Taal,"L")_" - expert")#</NOBR></SPAN></A></TD>
-			<CSP:IF condition='(TextPos="RIGHT")'>
-			<TD colspan="3">&nbsp;: #($P(..WebTextValue("VolgendeIngave",Taal,"O"),",",1)_" expert")#</TD>
-			<CSP:ELSE>		
-			<TD colspan="3">&nbsp;</TD>
-			</CSP:IF>
-		</TR>
-			</CSP:IF>
-	</CSP:IF>
---></CSP:COMMENT>
-
 	<CSP:IF condition='($L($G(arUrl("ToggleHist"))))&&(blnHist=0)'>   <CSP:COMMENT><!-- &&(MainMode=$$$mmToggleHistOrd) --></CSP:COMMENT>
 		<CSP:IF condition='(TextPos="RIGHT")'>
 		<CSP:ELSE>
@@ -491,7 +429,7 @@
 	</TABLE>
 	<BR>			
 
-	<CSP:IF condition='(($$$Not(KLNr=$$$KLNrListAll))||(sMode="START"))&&($$$Not(sMode?1(1"PROCESS",1"VIEW",1"CONFIRM")))'>
+	<CSP:IF condition='(($$$Not(KLNr=$$$KLNrListAll))||(sMode="START"))&&($$$Not(sMode?1(1"PROCESS",1"VIEW",1"CONFIRM")))&&(TBXContext.ToonInfoAppTesterPagina())'>
 	<BR>
 	<TABLE width="730" border="0" cellpadding="1" style="margin:9px; border-collapse:collapse;">
 		<TR>
