<%@LANGUAGE="VBSCRIPT"%> <% '===================================================== '| | '| REPORTS | '| | '===================================================== %> <% Option explicit ' Good idea to set when using redirect Response.Expires = 0 ' always load the page, dont store %> <% '------------ ACCESS CONTROL ------------------ %> <% '------------ Variable Definition ------------- Dim parGroup Dim parRepNum Dim parPrint '------------ Constants Declaration ----------- Const img_Advanced_Search = "" Const img_Admin_Reports = "" Const img_Reports = "" '------------ Variable Init ------------------- parGroup = Request("group") parRepNum = Request("repnum") parPrint = Request("print") parRtag_id = Request("rtag_id") '---------------------------------------------- %> <% Function Set_Row_Style ( SSLink ) Set_Row_Style = "onMouseOver=""this.bgColor = '"& hlColor &"'"" onMouseOut =""this.bgColor = ''"" onClick=""location.href='"& SSLink &"'""" End Function %> <% '------------------------- MAIN LINE --------------------------- %>

	Exit       <%Call Reports_List ( parGroup )%>