Subversion Repositories DevTools

Rev

Rev 5506 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
119 ghuddy 1
<%
2
'=====================================================
3
'|                                                   |
4
'|				    	REPORTS					     |
5
'|                                                   |
6
'=====================================================
7
%>
8
<%
9
'------------ Variable Definition -------------
10
Dim reportGroup
11
Dim reportGroupsArr
12
'------------ Constants Declaration -----------
13
Const hlColor 	   = "#E3B62D"
14
'------------ Variable Init -------------------
15
'------------ Reports Menu --------------------
16
reportGroupsArr = Array("Advanced Search", _
17
						"Release Status", _
18
						"Release History", _
19
						"Admin Reports", _
20
						"Escrow")
21
'----------------------------------------------
22
%>
23
<table width="100%" border="0" cellspacing="0" cellpadding="0">
24
  	<tr> 
25
   		<td nowrap><img src="images/h_trsp_dot.gif" width="16" height="16" align="absmiddle" vspace="4"></td>
26
  	</tr>
27
  	<tr> 
6877 dpurdie 28
 	   	<td class='bg_dialog_line'></td>
119 ghuddy 29
  	</tr>
30
	<%
31
	Dim urlLink
32
	For Each reportGroup In reportGroupsArr
33
	urlLink = "reports.asp?group="& Replace( reportGroup, " ", "_")
34
	%>
35
	<%If NOT Replace(reportGroup, " ", "_") = parGroup Then%>
36
	<tr <%=Set_Row_Style( urlLink )%>> 
37
   		<td nowrap><img src="images/i_reports.gif" width="17" height="16" align="absmiddle" vspace="4" hspace="5"><a href="<%=urlLink%>" class="form_txt_link"><%=reportGroup%></a></td>
38
  	</tr>
39
	<%Else%>
40
	<tr> 
41
     	<td nowrap background="images/bg_lght_gray.gif"><img src="images/i_reports.gif" width="17" height="16" align="absmiddle" vspace="4" hspace="5"><a href="<%=urlLink%>" class="form_txt_link"><%=reportGroup%></a></td>
42
   	</tr>
43
	<%End If%>
44
  	<tr> 
6877 dpurdie 45
    	<td class='bg_dialog_line'></td>
119 ghuddy 46
  	</tr>
47
	<%Next%>
48
</table>
49