Index: vhLibLogging.csp
===================================================================
diff -u -r230 -r239
--- vhLibLogging.csp	(.../vhLibLogging.csp)	(revision 230)
+++ vhLibLogging.csp	(.../vhLibLogging.csp)	(revision 239)
@@ -1,5 +1,4 @@
 <CSP:CLASS description="CSP page for viewing the FOP Queue items via SQL" includes="vhLib.Macro,vhLib.cspError">
-
 <html>
 
 <head>
@@ -102,14 +101,18 @@
 			<table id="log-table" class="stripe">
 				<thead>
 					<script language="Cache" runat="server">Set ColumnCount = queryA.GetColumnCount()</script>
+					<th></th>
+					<th></th>
+					<th></th>
+					
 					<csp:while counter="col" condition="(col < ColumnCount)">
-						<th>
-							<script language="Cache" runat="server">Set ColumnName = queryA.GetColumnName(col)</script>
-							<csp:if condition='$$$Not(ColumnName = "ID")'>
+						<script language="Cache" runat="server">Set ColumnName = queryA.GetColumnName(col)</script>
+						<csp:if condition='$$$Not(ColumnName = "ID")'>
+							<th>
 								<div>#(ColumnName)#</div>
 								<div class="data-table-search"/>
-							</csp:if>				
-						</th>
+							</th>
+						</csp:if>
 					</csp:while>
 				</thead>
 
@@ -122,62 +125,61 @@
 						<script language="Cache" runat="server">Set RowClass = $Select(row#2:"odd", 1:"even")</script>
 						<script language="Cache" runat="server">Set ErrorClass = $Select((ErrorLevel = "E"):"error", (ErrorLevel = "W"):"warning", 1:"")</script>
 						
-						<tr class="#(RowClass)# #(ErrorClass)#">
-						<CSP:WHILE COUNTER=col CONDITION=(col<ColumnCount)>
-							<SCRIPT language="Cache" runat="server">
-								#define HTML2(%v)                      $ZCVT(%v,"O","HTML")
+						<tr class="row #(RowClass)# #(ErrorClass)#" id="row_#(row)#">
+							<td class="row-count">#(row)#</td>
+							<td style="padding-left:8px;"><input class="checkbox" type="checkbox" id="row_#(row)#"/></td>
+							<td>
+								<div class="detail ui-button ui-widget ui-corner-all" id="#(queryA.GetDataByName("ID"))#">
+									Detail
+									<input type="hidden" class="action" value="#(queryA.GetDataByName("Actie"))#"/>
+								</div>
+							</td>
+							
+							<csp:while COUNTER=col CONDITION="(col<ColumnCount)">
+								<script language="Cache" runat="server">Set ColumnName = queryA.GetColumnName(col)</script>
+								<script language="Cache" runat="server">
+									#define HTML2(%v)                      $ZCVT(%v,"O","HTML")
 
-								Set tmpVal=queryA.GetData(col)
-								Set DataIsSimpleValue=1
-								Set UsePreFormattedHtml=0
-								Set UseCollapsedSection=1
-								If $$$UCase(queryA.GetColumnName(col))?1(1"LESSDETAIL")&&(tmpVal'="") {
-									Set UsePreFormattedHtml=1
-									Set DataIsSimpleValue=0
-									Set tmpVal=$$$HTML2(tmpVal)
-								} ElseIf $$$UCase(queryA.GetColumnName(col))?1(1"DETAIL",1"DETAILTRUNC",1"DETAILEXPAND")&&(tmpVal'="") {
-									Set UseCollapsedSection=1
-									Set UsePreFormattedHtml=1
-									Set DataIsSimpleValue=0
-									Set tmpDataSummary=$$$HTML2($TR($E(tmpVal,1,100),$C(13,10),"  "))
-									Set tmpVal=$$$HTML2(tmpVal)
-								} ElseIf  $$$UCase(queryA.GetColumnName(col))?1(1"ID")&&(tmpVal'="") {
-									set DataIsSimpleValue=0
-								}
-								Set PrevDatum = Datum
+									Set tmpVal = queryA.GetData(col)
+									Set DataIsSimpleValue = 1
+									Set UsePreFormattedHtml = 0
+									Set UseCollapsedSection = 1
+									
+									If $$$UCase(queryA.GetColumnName(col))?1(1"LESSDETAIL")&&(tmpVal'="") {
+										Set UsePreFormattedHtml = 1
+										Set DataIsSimpleValue = 0
+										Set tmpVal = $$$HTML2(tmpVal)
+									} ElseIf $$$UCase(queryA.GetColumnName(col))?1(1"DETAIL",1"DETAILTRUNC",1"DETAILEXPAND")&&(tmpVal'="") {
+										Set UsePreFormattedHtml = 1
+										Set DataIsSimpleValue = 0
+										Set tmpDataSummary = $$$HTML2($TR($E(tmpVal,1,100),$C(13,10),"  "))
+										Set tmpVal = $$$HTML2(tmpVal)
+									}
+									
+									Set PrevDatum = Datum
 								
-								#Dim FilterVeldInQuery As %String = queryA.GetColumnName(col)
-								Set:("Story"=FilterVeldInQuery) FilterVeldInQuery = "GekendeExceptie->StoryID"
-								Set HyperlinkFilterQuery = "fld" _ $$$UCase(FilterVeldInQuery) _"="_ tmpVal
-							</SCRIPT>
-
-							<csp:if condition='queryA.GetColumnName(col)="ID"'>
-								<td>
-									<div class="detail ui-button ui-widget ui-corner-all" id="#(queryA.GetDataByName("ID"))#">
-										Detail
-										<input type="hidden" class="action" value="#(queryA.GetDataByName("Actie"))#"/>
-									</div>
-								</td>	
-							<csp:elseif condition='(DataIsSimpleValue)'>
-								<td>
-									<a class="#(ErrorClass)#" href="#($Get(arUrl("ToggleQED")))#&#(HyperlinkFilterQuery)#">#($Select($Length(tmpVal):tmpVal, 1:"&nbsp;"))#</a>
-								</td>
-							<csp:elseif condition='(UseCollapsedSection)'>
-								<td>
-									<div class="clsDetailDataCol">
-										<p onclick="ToggleDetailsSummary(this.parentNode,this);">
-											<span name="DetailLabel" class="clsDetailDataHdr">Summary:</span>
-											<span name="DetailInfo" class="clsDetailInfo">#($Select($Length(tmpDataSummary):tmpDataSummary, 1:"&nbsp;"))#</span>
-										</p>
-										<div><pre>#($Select($Length(tmpVal):tmpVal,1:"&nbsp;"))#</pre></div>
-									</div>
-								</td>
-							<csp:else>
-								<td>
-									<div><pre>#($Extract(tmpVal, 1, 32000))#</pre></div>
-								</td>
-							</csp:if>
-						</csp:while>
+									#dim FilterVeldInQuery As %String = queryA.GetColumnName(col)
+									Set:("Story"=FilterVeldInQuery) FilterVeldInQuery = "GekendeExceptie->StoryID"
+									Set HyperlinkFilterQuery = "fld" _ $$$UCase(FilterVeldInQuery) _"="_ tmpVal
+								</script>
+								<csp:if condition='$$$Not(ColumnName = "ID")'>
+									<td>
+										<csp:if condition='(DataIsSimpleValue)'>
+											<a class="#(ErrorClass)#" href="#($Get(arUrl("ToggleQED")))#&#(HyperlinkFilterQuery)#">#($Select($Length(tmpVal):tmpVal, 1:"&nbsp;"))#</a>
+										<csp:elseif condition='(UseCollapsedSection)'>
+											<div class="clsDetailDataCol">
+												<p onclick="ToggleDetailsSummary(this.parentNode,this);">
+													<span name="DetailLabel" class="clsDetailDataHdr">Summary:</span>
+													<span name="DetailInfo" class="clsDetailInfo">#($Select($Length(tmpDataSummary):tmpDataSummary, 1:"&nbsp;"))#</span>
+												</p>
+												<div><pre>#($Select($Length(tmpVal):tmpVal,1:"&nbsp;"))#</pre></div>
+											</div>
+										<csp:else>
+											<div><pre>#($Extract(tmpVal, 1, 32000))#</pre></div>
+										</csp:if>
+									</td>
+								</csp:if>
+							</csp:while>
 						</tr>
 					</csp:while>
 					
