Subversion Repositories DevTools

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
29 jtweddle 1
<%@LANGUAGE="VBSCRIPT"%>
2
<%
3
'=====================================================
4
'|                                                   |
5
'|			          Product_History				 |
6
'|                                                   |
7
'=====================================================
8
%>
9
<%
10
Option explicit
11
Response.Expires = 0
12
%>
13
<!--#include file="common/globals.asp"-->
14
<!--#include file="common/config.asp"-->
15
<!--#include file="common/common_subs.asp"-->
16
<!--#include file="class/classRepeater.asp"-->
17
<!--#include file="common/_product_common.asp"-->
18
<%
19
'------------ ACCESS CONTROL ------------------
20
%>
21
<!--#include file="_access_control_general.asp"-->
22
<%
23
'------------ VARIABLE DEFINITION -------------
24
Dim rsQry
25
Dim objRepeater
26
'------------ CONSTANTS DECLARATION -----------
27
'------------ VARIABLE INIT -------------------
28
Set objRepeater = New Repeater
29
'------------ CONDITIONS ----------------------
30
'----------------------------------------------
31
%>
32
<%
33
'------------ RUN BEFORE PAGE RENDER ----------
34
'----------------------------------------------
35
%>
36
<html>
37
<head>
38
<title>Deployment Manager</title>
39
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
40
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
41
<link href="scripts/deployment_manager.css" rel="stylesheet" type="text/css">
42
<script language="JavaScript" src="scripts/common.js"></script>
43
</head>
44
 
45
<body leftmargin="0" topmargin="0">
46
<!-- HEADER ++++++++++++++++ -->
47
<!--#include file="_header.asp"-->
48
<!-- +++++++++++++++++++++++ -->
49
<!-- MAIN MENU  +  CRUMBS ++++++++++++++++ -->
50
<!--#include file="_main_menu.asp"-->
51
<!-- +++++++++++++++++++++++++++++++++++++ -->
52
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
53
  <tr>
54
    <td width="1%" valign="top" background="images/bg_bage_0.gif">
55
	<!-- NODE BROWSER ++++++++++++++++++++++ -->
56
	<!--#include file="_bom_browser2.asp"-->
57
	<!-- END OF NODE BROWSER +++++++++++++++ -->
58
	</td>
59
    <td width="1" background="images/bg_bage_1.gif"><img src="images/spacer.gif" width="1" height="600"></td>
60
    <td width="100%" valign="top" bgcolor="#FFFFFF">
61
	<table width="100%"  border="0" cellspacing="0" cellpadding="0">
62
	  <tr>
63
        <td valign="top" background="images/bg_blue.gif"></td>
64
        <td align="right" valign="bottom" background="images/bg_blue.gif" class="body_txtw"><%Call RenderTitle( objProdCollector )%></td>
65
        <td background="images/bg_blue.gif"><img src="images/spacer.gif" width="10" height="20"></td>
66
      </tr>
67
      <tr>
68
        <td width="1%" valign="top" background="images/bg_blue.gif"></td>
69
        <td width="100%" valign="bottom" background="images/bg_blue.gif">
70
		<!-- TAB CONTROLS ++++++++++++++++++++++ -->
71
		<!--#include file="_tabs_definition.asp"-->
72
		<%
73
		Set objTabControl = New TabControl
74
		objTabControl.TemplateDoc = ReadFile( Server.MapPath("controls/ERGTabStyleWinXP/tab_style.html") ) ' Supply tab style definition
75
		objTabControl.TabStyle = "StyleWinXP"
76
		objTabControl.AddTabDefnition ( arrProdTabDef )
77
		objTabControl.SelectByName("History")
78
		objTabControl.Render ()
79
		%>
80
		<!-- END OF TAB CONTROLS +++++++++++++++ -->
81
		</td>
82
        <td width="1%" background="images/bg_blue.gif"><img src="images/spacer.gif" width="10" height="35"></td>
83
        </tr>
84
      <tr>
85
        <td background="images/bg_bage_0.gif"><img src="images/spacer.gif" width="30" height="10"></td>
86
        <td background="images/bg_bage_0.gif">&nbsp;</td>
87
        <td background="images/bg_blue.gif"><img src="images/p_bar_corrner.gif" width="17" height="42"></td>
88
        </tr>
89
      <tr>
90
        <td>&nbsp;</td>
91
        <td>&nbsp;</td>
92
        <td valign="top"><%If Request.Cookies( enumCOOKIE_NAME )( "user_bar" ) = "hide" Then%><a href="<%=SCRIPT_NAME%>?user_bar=<%=enumDEFAULT%>&<%=objPMod.ComposeURL()%>"><img src="icons/b_left.gif" title="Maximize favourits" width="13" height="13" vspace="5" border="0"></a><%End If%></td>
93
        </tr>
94
    </table>
95
	<table width="100%"  border="0" cellspacing="10" cellpadding="0">
96
      <tr>
97
        <td>
98
		<!-- PAGE DETAILS +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
99
		<%
100
		OraDatabase.Parameters.Add "PROD_ID", 	Request("prod_id"),	ORAPARM_INPUT, ORATYPE_NUMBER
101
 
102
 
103
		Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ProductHistory.sql") , ORADYN_DEFAULT )
104
 
105
		'Pass record set to Repeater
106
		objRepeater.RecordSet = rsQry
107
 
108
		'Define Table Row with bound variables
109
		objRepeater.Row = _
110
			"<tr>"&_
111
			"  <td bgcolor='#FFFFFF' class='body_smltxtg' nowrap valign='top'>""& <#DATE_TIME_STAMP#> &""</td>"&_
112
			"  <td bgcolor='#FFFFFF' class='body_row' valign='top'>""& <#TRAIL_ACTION#> &""</td>"&_
113
			"  <td bgcolor='#FFFFFF' class='body_row' nowrap valign='top'><a href='mailto:""& <#USER_EMAIL#> &""' class='body_link'>"&_
114
			"    <img src='icons/i_email.gif' width='15' height='10' hspace='2' border='0' align='absmiddle' title='Send email to ""& <#USER_EMAIL#> &""'>""& <#FULL_NAME#> &""</a></td>"&_
115
			"</tr>"
116
		%>
117
		<%Call objRepeater.Navigator ( TRUE, TRUE )%>
118
		<!-- DATA TABLE ++++++++++++++++++++++++++++++++++++++++++++++ -->
119
		  <table width="100%"  border="0" cellspacing="0" cellpadding="0">
120
            <tr>
121
              <td background="images/bg_bage_0a.gif">
122
			   <table width="100%"  border="0" cellspacing="1" cellpadding="3">
123
                <tr>
124
                  <td width="1%" background="images/bg_bage_0.gif" class="body_col" nowrap>Date</td>
125
                  <td width="40%" background="images/bg_bage_0.gif" class="body_col" nowrap>Action</td>
126
				  <td width="1%" background="images/bg_bage_0.gif" class="body_col" nowrap>User</td>
127
                </tr>
128
				<%objRepeater.RenderDataGrid ()%>
129
              </table>
130
			 </td>
131
            </tr>
132
          </table>
133
		  <%
134
		  OraDatabase.Parameters.Remove "PROD_ID"
135
 
136
		  rsQry.Close()
137
		  Set rsQry = Nothing
138
		  %>
139
		  <%Call objRepeater.Navigator ( FALSE, TRUE )%>
140
		<br>
141
		<!-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
142
		</td>
143
      </tr>
144
    </table>
145
	</td>
146
    <td width="1%" valign="top" background="images/bg_favourits.gif">
147
	<%If Request.Cookies( enumCOOKIE_NAME )( "user_bar" ) <> "hide" Then%>
148
	<!-- PERSONAL PANE +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
149
      <table width="100%"  border="0" cellspacing="0" cellpadding="0">
150
      <tr>
151
        <td width="100%" valign="bottom" background="images/bg_node_icon.gif"><%=GetNodeImage ( dbPARnode_id )%></td>
152
        <td width="1" background="images/bg_node_icon.gif"><img src="images/spacer.gif" width="1" height="97"></td>
153
      </tr>
154
      </table>
155
      <a href="<%=SCRIPT_NAME%>?user_bar=hide&<%=objPMod.ComposeURL()%>"><img src="icons/b_right.gif" title="Minimize favourits" width="13" height="13" vspace="5" border="0"></a>      <table width="100%"  border="0" cellspacing="0" cellpadding="0">
156
      <tr>
157
        <td valign="top"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
158
          <tr>
159
            <td valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
160
            <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="10" height="3"></td>
161
            <td align="right" valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
162
          </tr>
163
          <tr>
164
            <td colspan="3" background="images/bg_favourits2.gif"><table width="100%"  border="0" cellspacing="5" cellpadding="0">
165
              <tr>
166
                <td valign="top" class="fav_txt"><span class="fav_head">Reason for release</span><br>
167
                      <br>
168
<!--         This version needs to be rebuild on new sysbase_types 1.5.0.mas<br> -->
169
                </td>
170
              </tr>
171
            </table></td>
172
            </tr>
173
          <tr>
174
            <td valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
175
            <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="190" height="3"></td>
176
            <td align="right" valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
177
          </tr>
178
        </table>
179
          <br>
180
          <table width="100%"  border="0" cellspacing="0" cellpadding="0">
181
            <tr>
182
              <td valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
183
              <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="10" height="3"></td>
184
              <td align="right" valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
185
            </tr>
186
            <tr background="images/bg_gray.gif">
187
              <td colspan="3" background="images/bg_favourits2.gif"><table width="100%"  border="0" cellspacing="5" cellpadding="0">
188
                <tr>
189
                  <td valign="top" class="fav_txt"><span class="fav_head">Fixed Issues</span><br>
190
                      <br>
191
                      <table width="100%"  border="0" cellspacing="0" cellpadding="2">
192
<!--                         <tr>
193
                          <td><img src="icons/i_bulet.gif" width="4" height="4" hspace="5"></td>
194
                          <td><a href="#" class="fav_link">DEVI-021532</a></td>
195
                        </tr>
196
                        <tr>
197
                          <td><img src="icons/i_bulet.gif" width="4" height="4" hspace="5"></td>
198
                          <td><a href="#" class="fav_link">DEVI-021534</a></td>
199
                        </tr>
200
                        <tr>
201
                          <td width="1%"><img src="icons/i_bulet.gif" width="4" height="4" hspace="5"></td>
202
                          <td width="100%"><a href="#" class="fav_link">DEVI-021536</a></td>
203
                        </tr> -->
204
                    </table></td>
205
                </tr>
206
              </table></td>
207
              </tr>
208
            <tr>
209
              <td valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
210
              <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="190" height="3"></td>
211
              <td align="right" valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
212
            </tr>
213
          </table></td>
214
        <td width="1%"><img src="images/spacer.gif" width="15" height="400"></td>
215
      </tr>
216
    </table>
217
	<!-- END OF PERSONAL BAR ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
218
	<%End If%>
219
   </td>
220
  </tr>
221
  <tr>
222
    <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="1" height="15"></td>
223
    <td background="images/bg_bage_1.gif"><img src="images/spacer.gif" width="1" height="1"></td>
224
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
225
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
226
  </tr>
227
  <tr>
228
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="20"></td>
229
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
230
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
231
    <td bgcolor="#FFFFFF">&nbsp;</td>
232
  </tr>
233
</table>
234
<!-- FOOTER ++++++++++++++++ -->
235
<!--#include file="_footer.asp"-->
236
<!-- +++++++++++++++++++++++ -->
237
</body>
238
</html>
239
<%
240
'------------ RUN AFTER PAGE RENDER -----------
241
Set objPMod = Nothing
242
Set objCrumbs = Nothing
243
Set objTabControl = Nothing
244
'----------------------------------------------
245
%><!--#include file="common/globals_destructor.asp"-->