Index: vhLibLogging.csp
===================================================================
diff -u -r178 -r179
--- vhLibLogging.csp	(.../vhLibLogging.csp)	(revision 178)
+++ vhLibLogging.csp	(.../vhLibLogging.csp)	(revision 179)
@@ -22,90 +22,76 @@
 </div>
 
 <div class="content">
-	<CSP:IF condition='(blnSQED)'>
-	<BR>
-	<PRE>#(sqlLOGAllFields)#</PRE>
-	<PRE>#(" ... WHERE (Datum = '"_($$FormatDateTime^vhLib("MM/DD/YYYY",$H))_"' AND Detail [ 'zoekterm')")#</PRE>
-	<PRE>#(" ... WHERE (Actie IN ('DOM.AKP.event.ProductToelevLijnGemaakt','DOM.VKP.event.ProductOrderLijnGemaakt','DOM.PM.event.AdministratiefProductGemaaktEvent','ProductToelevLijnEventData'))  AND (Detail [ '...ID')")#</PRE>
-	<form name="theForm" method="post">
-		<table cellspacing="5">
-			<tr valign="top">
-				<td align="left">
-					<P class="clsSubHeader">SQL Query:</P>
-					<textarea name=QUERY rows=6 cols=100>#(sqlActive)#</textarea>
-				</td>
-				<td>
-					&nbsp;
-				</td>
-			</tr>
-		</table>
-		&nbsp;
-		<BR>
-		<BR>Aantal rijen : <INPUT type="text" name="MAXROWS" value="#(MaxRows)#">
-		<BR>
-		<input type="submit" name="btnSubmit" style="width:60; font-weight:bold;" value="Go">
-	</form>
-<CSP:ELSE>
-	<BR>
-	<A href="#($G(arUrl("ToggleQED")))#">Show Query Editor</A>
-	<BR>
-	<BR>
-	<form name="theForm" method="post" action="vhLibLogging.csp">
-		<DIV id="divGroepenCheckboxes">
-			<SCRIPT language="Cache" runat="server">
-				Set GroepenIt=##class(TECH.ListIterator).%New(LogViewerHelper.GeefGroepen())
-			</SCRIPT>
-			<CSP:WHILE CONDITION="GroepenIt.HasNext()" COUNTER=GroepIndex>  
+	<csp:if condition="(blnSQED)">
+		<pre>#(sqlLOGAllFields)#</pre>
+		<pre>#(" ... WHERE (Datum = '"_($$FormatDateTime^vhLib("MM/DD/YYYY",$H))_"' AND Detail [ 'zoekterm')")#</pre>
+		<pre>#(" ... WHERE (Actie IN ('DOM.AKP.event.ProductToelevLijnGemaakt','DOM.VKP.event.ProductOrderLijnGemaakt','DOM.PM.event.AdministratiefProductGemaaktEvent','ProductToelevLijnEventData'))  AND (Detail [ '...ID')")#</pre>
+		
+		<br/>
+		
+		<form name="theForm" method="post">
+			<h3>SQL Query:</h3>
+			<textarea name="QUERY" class="ui-vh-input ui-vh-textarea" rows="0" cols="0">#(sqlActive)#</textarea>
+			<br/><br/>
+			Aantal rijen: <input type="text" class="ui-vh-input" name="MAXROWS" value="#(MaxRows)#">&nbsp;<input type="submit" name="btnSubmit" class="ui-button ui-widget ui-corner-all" value="Go">
+		</form>
+	<csp:else>
+		<a class="ui-button ui-widget ui-corner-all" href="#($Get(arUrl("ToggleQED")))#">Show Query Editor</a>
+		
+		<br/><br/>
+
+		<form name="theForm" method="post" action="vhLibLogging.csp">
+			<DIV id="divGroepenCheckboxes">
 				<SCRIPT language="Cache" runat="server">
-					Set GroepNaam=GroepenIt.Next()
-					Set GroepControlID="chkFilterGroep"_GroepIndex
-					Set ValueChecked=$S(##class(TECH.ListUtils).IsValueInIterator(GroepNaam,##class(TECH.ArrayOneDimIterator).%New(.arFilterGroepen)):"checked", 1:"")
-					Set VisueleGroepNaam = GroepNaam
-					If $Length(VisueleGroepNaam) > 24 {
-						Set VisueleGroepNaam = $E(VisueleGroepNaam,1,24)_".."
-					}
+					Set GroepenIt=##class(TECH.ListIterator).%New(LogViewerHelper.GeefGroepen())
 				</SCRIPT>
-				<DIV class="clsFilterGroepDiv"><NOBR><LABEL for="#(GroepControlID)#"><INPUT type="checkbox" ID="#(GroepControlID)#" name="chkFilterGroep" value="#(GroepNaam)#" #(ValueChecked)#>#(VisueleGroepNaam)#</INPUT></LABEL></NOBR></DIV>
-			</CSP:WHILE>
-			<DIV style="clear:both;"></DIV>
-		</DIV>
-		<BR>
-		<DIV>
-			<DIV class="clsToonAlleNiveausDiv"><NOBR><LABEL for="chkToonAlleNiveaus"><INPUT type="checkbox" ID="chkToonAlleNiveaus" name="chkToonAlleNiveaus" onclick="chkToonAlleNiveausClick();" value="1" #($S('ToonAlleNiveaus:"", 1:"checked"))#>Toon alle niveaus</INPUT></LABEL> &nbsp;&nbsp; OF &nbsp;&nbsp;</NOBR></DIV>
-			<SCRIPT language="Cache" runat="server">
-				Set NiveauIt=##class(vhLib.enu.LogNiveau).ValueListIterator()
-			</SCRIPT>
-			<CSP:WHILE CONDITION="NiveauIt.HasNext()" COUNTER=NiveauIndex>  
+				<CSP:WHILE CONDITION="GroepenIt.HasNext()" COUNTER=GroepIndex>  
+					<SCRIPT language="Cache" runat="server">
+						Set GroepNaam=GroepenIt.Next()
+						Set GroepControlID="chkFilterGroep"_GroepIndex
+						Set ValueChecked=$S(##class(TECH.ListUtils).IsValueInIterator(GroepNaam,##class(TECH.ArrayOneDimIterator).%New(.arFilterGroepen)):"checked", 1:"")
+						Set VisueleGroepNaam = GroepNaam
+						If $Length(VisueleGroepNaam) > 24 {
+							Set VisueleGroepNaam = $E(VisueleGroepNaam,1,24)_".."
+						}
+					</SCRIPT>
+					<DIV class="clsFilterGroepDiv"><NOBR><LABEL for="#(GroepControlID)#"><INPUT type="checkbox" ID="#(GroepControlID)#" name="chkFilterGroep" value="#(GroepNaam)#" #(ValueChecked)#>#(VisueleGroepNaam)#</INPUT></LABEL></NOBR></DIV>
+				</CSP:WHILE>
+				<DIV style="clear:both;"></DIV>
+			</DIV>
+			<BR>
+			<DIV>
+				<DIV class="clsToonAlleNiveausDiv"><NOBR><LABEL for="chkToonAlleNiveaus"><INPUT type="checkbox" ID="chkToonAlleNiveaus" name="chkToonAlleNiveaus" onclick="chkToonAlleNiveausClick();" value="1" #($S('ToonAlleNiveaus:"", 1:"checked"))#>Toon alle niveaus</INPUT></LABEL> &nbsp;&nbsp; OF &nbsp;&nbsp;</NOBR></DIV>
 				<SCRIPT language="Cache" runat="server">
-					Set NiveauID=NiveauIt.Next()
-					Set NiveauNaam=##class(vhLib.enu.LogNiveau).LogicalToDisplay(NiveauID)
-					Set NiveauControlID="chkFilterNiveau_"_NiveauIndex
-					Set ValueChecked=$S(##class(TECH.ListUtils).IsValueInIterator(NiveauID,##class(TECH.ArrayOneDimIterator).%New(.arFilterNiveaus)):"checked", 1:"")
-					Set VisueleNiveauNaam = NiveauNaam
+					Set NiveauIt=##class(vhLib.enu.LogNiveau).ValueListIterator()
 				</SCRIPT>
-				<DIV class="clsFilterNiveauDiv"><NOBR><LABEL input for="#(NiveauControlID)#"><INPUT type="checkbox" ID="#(NiveauControlID)#" name="chkFilterNiveau" onclick="chkFilterNiveauClick(this);" value="#(NiveauID)#" #(ValueChecked)#>#(VisueleNiveauNaam)#</INPUT></LABEL></NOBR></DIV>
-			</CSP:WHILE>
-			<DIV style="clear:both;"></DIV>
-		</DIV>
-		<DIV>
-			<LABEL><INPUT type="checkbox" ID="chkEnkelTeTrierenOfBehandelen" name="chkEnkelTeTrierenOfBehandelen" value="1" #($S('EnkelTeTrierenOfBehandelen:"", 1:"checked"))# >Toon enkel de te tri�ren of behandelen errors.</INPUT></LABEL>
-		</DIV>
-		<BR>
-		<DIV>
-			<BR>Aantal rijen : <INPUT type="text" name="MAXROWS" value="#(MaxRows)#">
+				<CSP:WHILE CONDITION="NiveauIt.HasNext()" COUNTER=NiveauIndex>  
+					<SCRIPT language="Cache" runat="server">
+						Set NiveauID=NiveauIt.Next()
+						Set NiveauNaam=##class(vhLib.enu.LogNiveau).LogicalToDisplay(NiveauID)
+						Set NiveauControlID="chkFilterNiveau_"_NiveauIndex
+						Set ValueChecked=$S(##class(TECH.ListUtils).IsValueInIterator(NiveauID,##class(TECH.ArrayOneDimIterator).%New(.arFilterNiveaus)):"checked", 1:"")
+						Set VisueleNiveauNaam = NiveauNaam
+					</SCRIPT>
+					<DIV class="clsFilterNiveauDiv"><NOBR><LABEL input for="#(NiveauControlID)#"><INPUT type="checkbox" ID="#(NiveauControlID)#" name="chkFilterNiveau" onclick="chkFilterNiveauClick(this);" value="#(NiveauID)#" #(ValueChecked)#>#(VisueleNiveauNaam)#</INPUT></LABEL></NOBR></DIV>
+				</CSP:WHILE>
+				<DIV style="clear:both;"></DIV>
+			</DIV>
+			<DIV>
+				<LABEL><INPUT type="checkbox" ID="chkEnkelTeTrierenOfBehandelen" name="chkEnkelTeTrierenOfBehandelen" value="1" #($S('EnkelTeTrierenOfBehandelen:"", 1:"checked"))# >Toon enkel de te tri�ren of behandelen errors.</INPUT></LABEL>
+			</DIV>
 			<BR>
-			<INPUT type="hidden" name="SQED" value="#($G(blnSQED))#">
-			<input type="submit" name="btnSubmit" style="width:60; font-weight:bold;" value="Go">
-		</DIV>
-		
-	</form>
+			
+			<div>
+				Aantal rijen : <input type="text" class="ui-vh-input" name="MAXROWS" value="#(MaxRows)#"/>&nbsp;<input type="submit" name="btnSubmit" class="ui-button ui-widget ui-corner-all" value="Go"/>
+				<input type="hidden" name="SQED" value="#($G(blnSQED))#"/>
+			</div>	
+		</form>
+	</csp:if>
 
-
-</CSP:IF>
-
-	<BR>
-	<BR>
-<HR>
+	<br/>
+	
+	
 <CSP:IF condition="($L(sqlActive))">
 	<SCRIPT LANGUAGE="SQL" NAME="queryA" P1=#($G(%request.Data("P1",1),"A"))#>#(sqlActive)#</SCRIPT>
 	<SCRIPT language="Cache" runat="server">Set qryAColCount=queryA.GetColumnCount()</SCRIPT>
Index: css/vhLibLogging.css
===================================================================
diff -u -r178 -r179
--- css/vhLibLogging.css	(.../vhLibLogging.css)	(revision 178)
+++ css/vhLibLogging.css	(.../vhLibLogging.css)	(revision 179)
@@ -1,14 +1,21 @@
+* {padding:0px; margin:0px;}
+
 html, body {height:100%}
-html, body, div, h1, table, thead, th, tr, td {padding:0px; margin:0px;}
 
 body {color:#000000; background:#eeeeee; font-family:Verdana,Sans-serif,Arial,Helvetica,sans-serif; font-size:12pt;}
 h1 {font-size:15pt; font-weight:bold; padding:5px;}
+h3 {font-size:12pt; font-weight:bold;}
 
 .header {position:fixed; z-index:10; left:0px; right:0px; top:0px; padding:5px; background-color:#eeeeee;}
 .header-title-bar {background-color:#999999; border-radius:3px; }
+
 .content {display:inline-block; min-width:100%; padding:5px; margin-top:45px;}
 
+.ui-vh-input {padding:5px; position:relative; top:2px; border-collapse:collapse; border-style:solid; border-width:1px; border-color:#c5c5c5; border-radius:3px;}
+.ui-vh-textarea {width:1400px; height:140px;}
+.ui-button {font-size:10pt;}
 
+
 /* ------------------------------------------------------ */
 A                  { font-size:10pt; color:darkblue; }
 TABLE              { font-size:12pt; }