%@LANGUAGE="VBSCRIPT"%>
<%
'=====================================================
'| |
'| PRINT REPORT |
'| |
'=====================================================
%>
<%
Option explicit
Response.Expires = 0
%>
<%
'------------ VARIABLE DEFINITION -------------
Dim parRepNum
Dim parGroup
Dim parPrint
Dim Section
'------------ CONSTANTS DECLARATION -----------
Const img_Advanced_Search = "
"
Const img_Admin_Reports = "
"
Const img_Reports = "
"
'------------ VARIABLE INIT -------------------
parGroup = Request("group")
parRepNum = Request("repnum")
parPrint = Request("print")
'------------ CONDITIONS ----------------------
'----------------------------------------------
%>
<%
' Document Type Download
If Request("doctype") = "word" Then
Response.ContentType = "application/msword"
ElseIf Request("doctype") = "excel" Then
Response.ContentType = "application/vnd.ms-excel"
End If
%>
<%Section = "TITLE"%> |
|
| Generated on <%=ToLongDate ( Date )%> | |
| <%Section = "FORM"%> | |
| <%Section = "BODY"%> |