Subversion Repositories DevTools

Rev

Rev 187 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 187 Rev 4653
Line 1... Line 1...
1 
<%@LANGUAGE="VBSCRIPT"%>
 1 
<%@LANGUAGE="VBSCRIPT"%>
2 
<%
 2 
<%
3 
'=====================================================
 3 
'=====================================================
4 
'|                                                   |
 4 
'|                                                   |
5 
'|		           Action Log  		             |
 5 
'|                 Action Log                    |
6 
'|                                                   |
 6 
'|                                                   |
7 
'=====================================================
 7 
'=====================================================
8 
%>
 8 
%>
9 
<%
 9 
<%
10 
Option explicit
 10 
Option explicit
11 
' Good idea to set when using redirect
 11 
' Good idea to set when using redirect
12 
Response.Expires = 0	' always load the page, dont store
 12 
Response.Expires = 0    ' always load the page, dont store
13 
%>
 13 
%>
14 
<!--#include file="common/conf.asp"-->
 14 
<!--#include file="common/conf.asp"-->
15 
<!--#include file="common/globals.asp"-->
 15 
<!--#include file="common/globals.asp"-->
16 
<!--#include file="common/formating.asp"-->
 16 
<!--#include file="common/formating.asp"-->
17 
<!--#include file="common/qstr.asp"-->
 17 
<!--#include file="common/qstr.asp"-->
Line 25... Line 25...
25 
%>
 25 
%>
26 
<!--#include file="_access_control_general.asp"-->
 26 
<!--#include file="_access_control_general.asp"-->
27 
<%
 27 
<%
28 
'------------ Variable Definition -------------
 28 
'------------ Variable Definition -------------
29 
Dim rsTemp
 29 
Dim rsTemp
30 
Dim	rsQry
 30 
Dim rsQry
31 
Dim retVal
 31 
Dim retVal
32 
Dim sActionDate, sUsername, sAction_type, sDescription
 32 
Dim sActionDate, sUsername, sAction_type, sDescription
33 
'------------ Constants Declaration -----------
 33 
'------------ Constants Declaration -----------
34 
'------------ Variable Init -------------------
 34 
'------------ Variable Init -------------------
35 
'----------------------------------------------
 35 
'----------------------------------------------
Line 54... Line 54...
54 
</div>
 54 
</div>
55 
<!-- HEADER -->
 55 
<!-- HEADER -->
56 
<!--#include file="_header.asp"-->
 56 
<!--#include file="_header.asp"-->
57 
<!-- BODY ---->
 57 
<!-- BODY ---->
58 
<table width="100%" border="0" cellspacing="0" cellpadding="0">
 58 
<table width="100%" border="0" cellspacing="0" cellpadding="0">
59 
	<tr>
59 
    <tr>
60 
		<td valign="top" width="1" background="images/bg_bage.gif">
 60 
        <td valign="top" width="1" background="images/bg_bage.gif">
61 
		<!-- LEFT -->
 61 
        <!-- LEFT -->
62 
		<!--#include file="_environment.asp"-->
 62 
        <!--#include file="_environment.asp"-->
63 
		</td>
 63 
        </td>
64 
		<td width="1" bgcolor="#999999"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
 64 
        <td width="1" bgcolor="#999999"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
65 
		<td valign="top" width="100%">
 65 
        <td valign="top" width="100%">
66 
		<!-- MIDDLE -->
 66 
        <!-- MIDDLE -->
67 
		<table width="100%" border="0" cellspacing="0" cellpadding="0">
 67 
        <table width="100%" border="0" cellspacing="0" cellpadding="0">
68 
		  <tr>
 68 
          <tr>
69 
		    <td width="1%" background="images/bg_action_norm.gif"><IMG height=35 src="images/spacer.gif" width=15></td>
 69 
            <td width="1%" background="images/bg_action_norm.gif"><IMG height=35 src="images/spacer.gif" width=15></td>
70 
		    <td width="100%" background="images/bg_action_norm.gif"><%Call RenderActionBar(parRtag_id,parPv_id)%></td>
 70 
            <td width="100%" background="images/bg_action_norm.gif"><%Call RenderActionBar(parRtag_id,parPv_id)%></td>
71 
		    <td width="1%" background="images/bg_action_norm.gif"><IMG height=1 src="images/spacer.gif" width=15></td>
 71 
            <td width="1%" background="images/bg_action_norm.gif"><IMG height=1 src="images/spacer.gif" width=15></td>
72 
		  </tr>
 72 
          </tr>
73 
          <tr>
 73 
          <tr>
74 
            <td background="images/bg_lght_gray.gif"><IMG height="45" src="images/spacer.gif" width=1></td>
 74 
            <td background="images/bg_lght_gray.gif"><IMG height="45" src="images/spacer.gif" width=1></td>
75 
            <td background="images/bg_lght_gray.gif"><%Call RenderStatus(parRtag_id,parPv_id)%></td>
 75 
            <td background="images/bg_lght_gray.gif"><%Call RenderStatus(parRtag_id,parPv_id)%></td>
76 
            <td background="images/bg_lght_gray.gif">&nbsp;</td>
 76 
            <td background="images/bg_lght_gray.gif">&nbsp;</td>
77 
          </tr>
 77 
          </tr>
78 
		  <tr>
 78 
          <tr>
79 
		    <td background="images/bg_lght_gray.gif">&nbsp;</td>
 79 
            <td background="images/bg_lght_gray.gif">&nbsp;</td>
80 
		    <td valign="bottom" background="images/bg_lght_gray.gif">
 80 
            <td valign="bottom" background="images/bg_lght_gray.gif">
81 
		      <table width="100" border="0" cellspacing="0" cellpadding="0">
 81 
              <table width="100" border="0" cellspacing="0" cellpadding="0">
82 
		        <tr>
 82 
                <tr>
83 
		          <td><IMG height=1 src="images/spacer.gif" width=50></td>
 83 
                  <td><IMG height=1 src="images/spacer.gif" width=50></td>
84 
		          <td>
 84 
                  <td>
85 
				  <!-- TABS ------------------------------------->
 85 
                  <!-- TABS ------------------------------------->
86 
				  <%Call Generate_Tab_Menu ( TABarray1, "Action Log", "orange" )%>
 86 
                  <%Call Generate_Tab_Menu ( TABarray1, "Action Log", "orange" )%>
87 
				  </td>
 87 
                  </td>
88 
		        </tr>
 88 
                </tr>
89 
		      </table>
 89 
              </table>
90 
		    </td>
 90 
            </td>
91 
		    <td background="images/bg_lght_gray.gif">&nbsp;</td>
 91 
            <td background="images/bg_lght_gray.gif">&nbsp;</td>
92 
		  </tr>
 92 
          </tr>
93 
		  <tr>
 93 
          <tr>
94 
		    <td background="images/lbox_bg_orange.gif"><IMG height=35 src="images/spacer.gif" width=1></td>
 94 
            <td background="images/lbox_bg_orange.gif"><IMG height=35 src="images/spacer.gif" width=1></td>
95 
		    <td background="images/lbox_bg_orange.gif">
 95 
            <td background="images/lbox_bg_orange.gif">
96 
			<!-- TAB ACTION BUTTONS ------------------------------------->
 96 
            <!-- TAB ACTION BUTTONS ------------------------------------->
97 
			</td>
 97 
            </td>
98 
		    <td background="images/lbox_bg_orange.gif">&nbsp;</td>
 98 
            <td background="images/lbox_bg_orange.gif">&nbsp;</td>
99 
		  </tr>
 99 
          </tr>
100 
		  <tr>
 100 
          <tr>
101 
		    <td></td>
 101 
            <td></td>
102 
		    <td valign="top">
 102 
            <td valign="top">
103 
			<!-- DETAILS ------------------------------------------------->
 103 
            <!-- DETAILS ------------------------------------------------->
104 
			<br>
104 
            <br>
105 
                        <span class="body_colb">Action Log</span><br>
 105 
                        <span class="body_colb">Action Log</span><br>
106 
                        <table width="100%" border="0" cellspacing="1" cellpadding="3">
 106 
                        <table width="100%" border="0" cellspacing="1" cellpadding="3">
107 
                          <tr>
107 
                          <tr class="form_field_hdr">
108 
							<td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field">&nbsp;Date&nbsp;</td>
 108 
                            <td nowrap width="1%"  >Date&nbsp;</td>
- 
 
 109 
                            <td nowrap width="1%"  >Who&nbsp;</td>
109 
                            <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field">Action&nbsp;&nbsp;</td>
 110 
                            <td nowrap width="1%"  >Action&nbsp;&nbsp;</td>
110 
							<td background="images/bg_form_lightbluedark.gif" nowrap width="100%" class="form_field">Description&nbsp;&nbsp;</td>
 111 
                            <td nowrap width="100%">Description&nbsp;&nbsp;</td>
111 
                          </tr>
 112 
                          </tr>
112 
                          <%
 113 
                          <%
113
114
114 
						  OraDatabase.Parameters.Add "PV_ID", parPv_id, 	ORAPARM_INPUT, ORATYPE_NUMBER
115 
                          OraDatabase.Parameters.Add "PV_ID", parPv_id,     ORAPARM_INPUT, ORATYPE_NUMBER
115
116
116 
						  Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("PackageActionLog.sql"), cint(0))
 117 
                          Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("PackageActionLog.sql"), cint(0))
117 
						  %>
 118 
                          %>
118 
                          <%If rsTemp.RecordCount < 1 Then%>
 119 
                          <%If rsTemp.RecordCount < 1 Then%>
- 
 
 120 
                          <tr class="form_item_grey" >
119 
                          <tr>
121 
                            <td nowrap>&nbsp;</td>
120 
                            <td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
 122 
                            <td nowrap>&nbsp;</td>
121 
                            <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
 123 
                            <td nowrap>&nbsp;</td>
122 
                            <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
 124 
                            <td nowrap>&nbsp;</td>
123 
                          </tr>
 125 
                          </tr>
124 
                          <%End If%>
 126 
                          <%End If%>
125 
                          <%While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))%>
 127 
                          <%While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))%>
126 
                          <tr>
 128 
                          <tr class="form_item_grey" >
- 
 
 129 
                            <td nowrap valign="top"><%=rsTemp("action_timestamp")%></td>
127 
							<td nowrap background="images/bg_form_lightgray.gif" class="form_item" valign="top"><%=EuroDateTime( rsTemp("action_datetime") )%> by <a href="mailto:<%=rsTemp("user_email")%>" title="<%=rsTemp("user_email")%>" class="txt_linked"><%=rsTemp("FULL_NAME")%></a></td>
 130 
                            <td nowrap valign="top">by <a href="mailto:<%=rsTemp("user_email")%>" title="<%=rsTemp("user_email")%>" class="txt_linked"><%=rsTemp("FULL_NAME")%></a></td>
128 
                            <td nowrap background="images/bg_form_lightgray.gif" class="form_item" valign="top"><%=rsTemp("acttype")%></td>
 131 
                            <td nowrap valign="top"><%=rsTemp("acttype")%></td>
129 
                            <td nowrap background="images/bg_form_lightgray.gif" class="form_item" valign="top"><%=NewLine_To_BR( To_HTML ( rsTemp("description") ) )%></td>
 132 
                            <td wrap   valign="top"><%=NewLine_To_BR( To_HTML ( rsTemp("description") ) )%></td>
130 
                          </tr>
 133 
                          </tr>
131 
                          <%rsTemp.MoveNext
 134 
                          <%rsTemp.MoveNext
132 
						  WEnd
 135 
                          WEnd
133 
						  rsTemp.Close
 136 
                          rsTemp.Close
134 
						  Set rsTemp = nothing
 137 
                          Set rsTemp = nothing
135
138
136 
						  OraDatabase.Parameters.Remove "PV_ID"
 139 
                          OraDatabase.Parameters.Remove "PV_ID"
137 
						  %>
 140 
                          %>
138 
                        </table>
 141 
                        </table>
139 
                        <!------------------------------------------------------------>
 142 
                        <!------------------------------------------------------------>
140 
           <br>
 143 
           <br>
141
144
142 
			<!-- END DETAILS ------------------------------------------------->
 145 
            <!-- END DETAILS ------------------------------------------------->
143 
			</td>
 146 
            </td>
144 
		    <td>&nbsp;</td>
 147 
            <td>&nbsp;</td>
145 
		  </tr>
 148 
          </tr>
146 
		</table>
 149 
        </table>
147 
		<!-- END MIDDLE -------->
 150 
        <!-- END MIDDLE -------->
148 
		</td>
 151 
        </td>
149 
	</tr>
 152 
    </tr>
150 
</table>
 153 
</table>
151 
 
 154 
 
152 
<!-- FOOTER -->
 155 
<!-- FOOTER -->
153 
<!--#include file="_footer.asp"-->
 156 
<!--#include file="_footer.asp"-->
154 
 
 157 
 
155 
</body>
 158 
</body>
156 
</html>
159 
</html>
157 
<%
 160 
<%
158 
Call Destroy_All_Objects
 161 
Call Destroy_All_Objects
159 
%>
 162 
%>