Subversion Repositories DevTools

Rev

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

Rev Author Line No. Line
5355 dpurdie 1 
<%@LANGUAGE="VBSCRIPT"%>
2 
<%
3 
'=====================================================
4 
'|                                                   |
5 
'|			          ProdDefault				 	 |
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="common/common_dbedit.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 nOldProdID
25 
Dim rsQry
26 
Dim sMessage
27 
Dim QueryString
28 
Dim CreatorModifier
29 
'Dim objOldProdCollector
30 
'------------ CONSTANTS DECLARATION -----------
31 
Const LIMG_NOTE_NEW = "<img src='icons/i_note_new.gif' width='18' height='18' border='0' align='absmiddle'>"
32 
Const LIMG_NOTE_EDIT = "<img src='icons/i_note_edit.gif' width='18' height='18' border='0' align='absmiddle'>"
33 
'------------ VARIABLE INIT -------------------
34 
'Set objOldProdCollector = CreateObject("Scripting.Dictionary")
35 
'------------ CONDITIONS ----------------------
36 
'----------------------------------------------
37 
%>
38 
<%
39 
'-----------------------------------------------------------------------------------------------------------------
40 
Sub GetOldProdDetails ( nProd_id, ByRef outobjDetails )
41 
	Dim rsQry, query
42 
	OraDatabase.Parameters.Add "PROD_ID", nProd_id,	ORAPARM_INPUT, ORATYPE_NUMBER
43 
 
44 
	query = _
45 
		"   SELECT pkg.pkg_name, cpv.pkg_version, ppv.pkg_version AS previous_version, cpv.last_pv_id AS old_prod_id"&_
46 
		"	  FROM PACKAGE_VERSIONS cpv,"&_
47 
		"	  	   PACKAGE_VERSIONS ppv,"&_
48 
		"	       PACKAGES pkg"&_
49 
		"	 WHERE cpv.LAST_PV_ID = ppv.pv_id"&_
50 
		"	   AND cpv.pkg_id = pkg.pkg_id"&_
51 
		"	   AND cpv.pv_id = :PROD_ID"
52 
 
53 
	Set rsQry = OraDatabase.DbCreateDynaset( query , ORADYN_DEFAULT )
54 
 
55 
	If ((NOT rsQry.BOF) AND (NOT rsQry.EOF)) Then
56 
		outobjDetails.Item ("old_prod_id")   = rsQry("old_prod_id")
57 
		outobjDetails.Item ("pkg_name") = rsQry("pkg_name").Value
58 
		outobjDetails.Item ("pkg_version") = rsQry("pkg_version").Value
59 
		outobjDetails.Item ("previous_version") = rsQry("previous_version").Value
60 
 
61 
	End If
62 
 
63 
	OraDatabase.Parameters.Remove "PROD_ID"
64 
	rsQry.Close
65 
	Set rsQry = Nothing
66 
End Sub
67 
'-----------------------------------------------------------------------------------------------------------------
68 
Sub RowStyle ( nStatus, ByRef outIcon, ByRef outStyle )
69 
 
70 
	Select Case CInt( nStatus )
71 
		Case enumDB_DIFF_NO_CHANGE
72 
			outStyle = "body_rowg"
73 
			outIcon = NULL
74 
 
75 
		Case enumDB_DIFF_UPDATED
76 
			outStyle = "body_rowbold"
77 
			outIcon = LIMG_UPDATED
78 
 
79 
		Case enumDB_DIFF_NEW
80 
			outStyle = "body_rowbold"
81 
			outIcon = LIMG_ADDED
82 
 
83 
		Case enumDB_DIFF_REMOVED
84 
			outStyle = "body_rowthru"
85 
			outIcon = LIMG_REMOVED
86 
 
87 
	End Select
88 
 
89 
End Sub
90 
'-----------------------------------------------------------------------------------------------------------------
91 
Function UserName (nUserId)
92 
 
93 
If nUserId <> "" Then
94 
 
95 
	Dim rsTemp, user_name
96 
 
97 
	Set rsTemp = OraDatabase.DbCreateDynaset( "select * from users where user_id ="&nUserId , ORADYN_DEFAULT )
98 
 
99 
	user_name = rsTemp("full_name")
100 
 
101 
	rsTemp.Close()
102 
	Set rsTemp = Nothing
103 
 
104 
UserName = user_name
105 
 
106 
Else
107 
 
108 
UserName = NULL
109 
 
110 
End If
111 
 
112 
 
113 
End Function
114 
'-----------------------------------------------------------------------------------------------------------------
115 
%>
116 
<%
117 
'------------ RUN BEFORE PAGE RENDER ----------
118 
'----------------------------------------------
119 
%>
120 
<html>
121 
<head>
122 
<title>Deployment Manager</title>
123 
<link rel="shortcut icon" href="<%=FavIcon%>"/>
124 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
125 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
6663 dpurdie 126 
<link href="scripts/deployment_manager.css?ver=<%=VixVerNum%>" rel="stylesheet" type="text/css">
127 
<script language="JavaScript" src="scripts/common.js?ver=<%=VixVerNum%>"></script>
5355 dpurdie 128 
</head>
129 
 
130 
<body leftmargin="0" topmargin="0">
131 
<!-- HEADER ++++++++++++++++ -->
132 
<!--#include file="_header.asp"-->
133 
<!-- +++++++++++++++++++++++ -->
134 
<!-- MAIN MENU  +  CRUMBS ++++++++++++++++ -->
135 
<!--#include file="_main_menu.asp"-->
136 
<!-- +++++++++++++++++++++++++++++++++++++ -->
137 
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
138 
  <tr>
139 
    <td width="1%" valign="top" background="images/bg_bage_0.gif">
140 
	<!-- NODE BROWSER ++++++++++++++++++++++ -->
141 
	<!--#include file="_bom_browser.asp"-->
142 
	<!-- END OF NODE BROWSER +++++++++++++++ -->
143 
	</td>
144 
    <td width="1" background="images/bg_bage_1.gif"><img src="images/spacer.gif" width="1" height="600"></td>
145 
    <td width="100%" valign="top" bgcolor="#FFFFFF">
146 
	<table width="100%"  border="0" cellspacing="0" cellpadding="0">
147 
	  <tr>
148 
        <td valign="top" background="images/bg_blue.gif"></td>
149 
        <td align="right" valign="bottom" background="images/bg_blue.gif" class="body_txtw"><%Call RenderTitle( objProdCollector )%></td>
150 
        <td background="images/bg_blue.gif"><img src="images/spacer.gif" width="10" height="20"></td>
151 
      </tr>
152 
      <tr>
153 
        <td width="1%" valign="top" background="images/bg_blue.gif"></td>
154 
        <td width="100%" valign="bottom" background="images/bg_blue.gif">
155 
		<!-- TAB CONTROLS ++++++++++++++++++++++ -->
156 
		<!--#include file="_tabs_definition.asp"-->
157 
		<%
158 
		Set objTabControl = New TabControl
159 
		objTabControl.TemplateDoc = ReadFile( Server.MapPath("controls/ERGTabStyleWinXP/tab_style.html") ) ' Supply tab style definition
160 
		objTabControl.TabStyle = "StyleWinXP"
161 
		objTabControl.AddTabDefnition ( arrProdTabDef )
162 
		objTabControl.Render ()
163 
		%>
164 
		<!-- END OF TAB CONTROLS +++++++++++++++ -->
165 
		</td>
166 
        <td width="1%" background="images/bg_blue.gif"><img src="images/spacer.gif" width="10" height="35"></td>
167 
        </tr>
168 
      <tr>
169 
        <td background="images/bg_bage_0.gif"><img src="images/spacer.gif" width="30" height="10"></td>
170 
        <td background="images/bg_bage_0.gif">
171 
		<!-- BUTTONS CONTROL +++++++++++++++++++ -->
172 
		<!-- +++++++++++++++++++++++++++++++++++ -->
173 
		</td>
174 
        <td background="images/bg_blue.gif"><img src="images/p_bar_corrner.gif" width="17" height="42"></td>
175 
        </tr>
176 
      <tr>
177 
        <td>&nbsp;</td>
178 
        <td>&nbsp;</td>
179 
        <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>
180 
        </tr>
181 
    </table>
182 
	<!-- PRODUCTION NOTES +++++++++++++++++++ -->
183 
	<table width="100%"  border="0" cellspacing="10" cellpadding="0">
184 
      <tr>
185 
        <td>
186 
		<%
187 
			QueryString = "select * from product_notes pn, product_trail pt"&_
188 
						  "	where pn.prod_id = "&dbPARprod_id&_
189 
						  "	and pt.prod_id = pn.prod_id"&_
190 
						  "	order by date_time_stamp desc"
191 
 
192 
			Set rsQry = OraDatabase.DbCreateDynaset( QueryString, ORADYN_DEFAULT )
193 
			If rsQry.RecordCount > 0 Then
194 
				If rsQry.RecordCount = 1 Then
195 
					CreatorModifier = "Created by "&GetUsername(rsQry("user_id"))&" on "&rsQry("date_time_stamp")
196 
				Else
197 
					CreatorModifier = "Last Modified by "&GetUsername(rsQry("user_id"))&" on "&rsQry("date_time_stamp")
198 
				End If
199 
 
200 
			End If
201 
 
202 
			sMessage = "<table width='100%'  border='0' cellspacing='3' cellpadding='0'>"
203 
			sMessage = sMessage &"<tr>"
204 
			sMessage = sMessage &"<td width='100%' class='body_txt'><b>PRODUCT NOTES</b><br><br>"&objFormater.TextToHTML( rsQry("notes") ) &"<br><br><SPAN class='body_smltxtg'>"& CreatorModifier &"</SPAN></td>"
205 
			If rsQry.RecordCount = 0 Then
206 
				sMessage = sMessage &"<td width='1%' nowrap valign='bottom' align='right'><a href='javascript:;' onClick=""MM_openBrWindow('wProductNote.asp?type=add&rfile="& SCRIPT_NAME &"&"& objPMod.ComposeURL() &"','BomRejectNote','scrollbars=yes,resizable=yes,width=600,height=350');""  class='body_smllink' title='Create new note'>Create Product Note"& LIMG_NOTE_NEW &"</a></td>"
207 
			Else
208 
				sMessage = sMessage &"<td width='1%' nowrap valign='bottom' align='right'><a href='javascript:;' onClick=""MM_openBrWindow('wProductNote.asp?type=edit&rfile="& SCRIPT_NAME &"&"& objPMod.ComposeURL() &"','BomRejectNote','scrollbars=yes,resizable=yes,width=600,height=350');""  class='body_smllink' title='Edit note'>Edit Product Note"& LIMG_NOTE_NEW &"</a></td>"
209 
			End If
210 
			sMessage = sMessage &"</tr>"
211 
			sMessage = sMessage &"</table>"
212 
 
213 
			Call Messenger ( sMessage, "bi_accepted.gif", "100%" )
214 
 
215 
			Response.write "<br>"
216 
 
217 
			rsQry.Close()
218 
			Set rsQry = Nothing
219 
		%>
220 
 
221 
		</td>
222 
        </tr>
223 
    </table>
224 
	<!-- PRODUCTION NOTES+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
225 
	<table width="100%"  border="0" cellspacing="10" cellpadding="0">
226 
      <tr>
227 
        <td>
228 
		<!-- PAGE DETAILS +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
229 
		<%
230 
		OraDatabase.Parameters.Add "PROD_ID", 		dbPARprod_id,		ORAPARM_INPUT, ORATYPE_NUMBER
231 
		%>
232 
		<form name="OldVersion" method="get" action="<%=SCRIPT_NAME%>">
233 
			<SPAN class="body_txt">Changes since version&nbsp;</SPAN>
234 
			<select name="old_prod_id" class="form_ivalue">
235 
			   <option value=""></option>
236 
			  <%
237 
			  nOldProdID = Request("old_prod_id")
238 
			  If nOldProdID = "" Then nOldProdID = objProdCollector.Item ("last_pv_id")
239 
 
240 
 
241 
			  OraDatabase.Parameters.Add "PKG_ID", 		objProdCollector.Item ("pkg_id"),	ORAPARM_INPUT, ORATYPE_NUMBER
242 
			  OraDatabase.Parameters.Add "V_EXT", 		objProdCollector.Item ("v_ext"),	ORAPARM_INPUT, ORATYPE_NUMBER
243 
			  OraDatabase.Parameters.Add "OLD_PROD_ID", nOldProdID,	ORAPARM_INPUT, ORATYPE_NUMBER
244 
 
245 
			  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ProductVersionsCombo.sql"), ORADYN_DEFAULT )
246 
			  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
247 
			  %>
248 
				<option value="<%=rsQry("pv_id")%>" <%=rsQry("selected")%>><%=rsQry("pkg_version")%></option>
249 
			  <%
250 
			  	rsQry.MoveNext
251 
			  WEnd
252 
			  rsQry.Close
253 
 
254 
			  %>
255 
			</select>
256 
			<%=objPMod.ComposeHiddenTags()%>
257 
			<input type="submit" name="btn" value="Compare" class="form_btn">
258 
		<hr width="100%" size="1px" noshade color="Black">
259 
		</form>
260 
		<!-- PRODUCT REJECTED ------------------------------------------------------------------------------------------ -->
261 
		<%
262 
		If objProdCollector.Item ("is_rejected") = enumDB_YES Then
263 
 
264 
			OraDatabase.Parameters.Add "ENTITY_ID", 		dbPARprod_id,	ORAPARM_INPUT, ORATYPE_NUMBER
265 
			OraDatabase.Parameters.Add "ENUM_ENTITY_TYPE", 	"enumENTITY_TYPE_PRODUCT",	ORAPARM_INPUT, ORATYPE_VARCHAR2
266 
 
267 
 
268 
			Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("RejectionTrail.sql"), ORADYN_DEFAULT )
269 
 
270 
			sMessage = "<table width='100%'  border='0' cellspacing='3' cellpadding='0'>"
271 
			sMessage = sMessage &"<tr>"
272 
			sMessage = sMessage &"<td width='100%' class='body_txt'><b>Product is REJECTED!</b><br><br><br></td>"
273 
			sMessage = sMessage &"<td width='1%' nowrap valign='bottom' align='right'><a href='javascript:;' onClick=""MM_openBrWindow('wProdRejectNote.asp?rfile="& SCRIPT_NAME &"&"& objPMod.ComposeURL() &"','ProdRejectNote','scrollbars=yes,resizable=yes,width=600,height=350');""  class='body_smllink' title='Create new note'>Create Note"& LIMG_NOTE_NEW &"</a></td>"
274 
			sMessage = sMessage &"</tr>"
275 
 
276 
			While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
277 
				sMessage = sMessage & "<tr><td colspan='2' background='images/bg_table_border.gif'><img src='images/spacer.gif' width='1' height='1'></td></tr>"
278 
				sMessage = sMessage &"<tr>"
279 
				sMessage = sMessage &"<td class='body_txt'>"
280 
				If rsQry("is_rejected") = enumDB_YES Then
281 
					sMessage = sMessage &"Product is REJECTED!<br>"
282 
				Else
283 
					sMessage = sMessage &"Product is Accepted!<br>"
284 
				End If
285 
				sMessage = sMessage & objFormater.TextToHTML( rsQry("comments") ) &"<br><SPAN class='body_smltxtg'>"& rsQry("creator") &"</SPAN></td>"
286 
				sMessage = sMessage &"<td nowrap valign='bottom' align='right'><a href='javascript:;' onClick=""MM_openBrWindow('wProdRejectNote.asp?reject_seq="& rsQry("reject_seq") &"&rfile="& SCRIPT_NAME &"&"& objPMod.ComposeURL() &"','ProdRejectNote','scrollbars=yes,resizable=yes,width=600,height=350');"" class='body_smllink' title='Edit note'>Edit Note"& LIMG_NOTE_EDIT &"</a></td>"
287 
				sMessage = sMessage &"</tr>"
288 
 
289 
				rsQry.MoveNext
290 
			WEnd
291 
			rsQry.Close
292 
 
293 
			sMessage = sMessage &"</table>"
294 
 
295 
			Call Messenger ( sMessage, "i_product_rejected.gif", "100%" )
296 
 
297 
			Response.write "<br>"
298 
 
299 
			OraDatabase.Parameters.Remove "ENTITY_ID"
300 
			OraDatabase.Parameters.Remove "ENUM_ENTITY_TYPE"
301 
		End If
302 
		%>
303 
		<!-- Module Changes -------------------------------------------------------------------------------------------- -->
304 
		<SPAN class="body_colb">Module Changes</SPAN>
305 
		<table width="100%"  border="0" cellspacing="3" cellpadding="0">
306 
          <tr>
307 
		  	<td width="1" background="images/bg_table_col.gif"><img src="images/spacer.gif" width="16" height="16" hspace="2"></td>
308 
            <td width="20%" background="images/bg_table_border.gif"><table width="100%"  border="0" cellspacing="1" cellpadding="2">
309 
              <tr>
310 
                <td align="right" nowrap background="images/bg_table_col.gif" class="body_col">Module Name</td>
311 
              </tr>
312 
            </table></td>
313 
			<td width="20%" align="right" nowrap background="images/bg_table_col.gif" class="body_col">Current Version</td>
314 
            <td width="20%" align="right" nowrap background="images/bg_table_col.gif" class="body_col">Previous Version</td>
315 
			<td width="70%" background="images/bg_table_col.gif"></td>
316 
			<td width="1%" align="right" background="images/bg_table_col.gif" class="body_col">Owner</td>
317 
			<td width="1" background="images/bg_table_col.gif"><img src="images/spacer.gif" width="16" height="16" hspace="2"></td>
318 
          </tr>
319 
		  <%
320 
		  Dim style, icon
321 
 
322 
		  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ProductsDiff.sql"), ORADYN_DEFAULT )
323 
		  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
324 
		  	Call RowStyle ( rsQry("status"), icon, style )
325 
		  %>
326 
          <tr>
327 
            <td align="center"><%=icon%></td>
328 
			<td nowrap class="<%=style%>"><%=rsQry("pkg_name").Value%></td>
329 
            <td nowrap class="<%=style%>"><%=rsQry("pkg_version").Value%></td>
330 
			<td nowrap class="<%=style%>"><%=rsQry("previous_version").Value%></td>
331 
			<td nowrap class="<%=style%>"></td>
332 
			<td nowrap><a href="mailto:<%=rsQry("user_email")%>" class="body_link" title="Send Email to <%=rsQry("user_email")%>"><%=LIMG_EMAIL  &  rsQry("full_name").Value%></a></td>
333 
			<td align="center"><a href="<%=RELEASE_MANAGER_URL%>/fixed_issues.asp?rtag_id=<%=objProdCollector.Item ("rtag_id")%>&pv_id=<%=rsQry("pv_id")%>" class="body_link" target="_blank" title="Open in Release Manager..."><img src="icons/b_rm_link.gif" width="20" height="19" hspace="2" border="0"></a></td>
334 
          </tr>
335 
		  <%rsQry.MoveNext%>
336 
 
337 
		  <%If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then%>
338 
          <tr>
339 
            <td colspan="7" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
340 
          </tr>
341 
		  <%End If%>
342 
 
343 
		  <%
344 
		  WEnd
345 
		  %>
346 
          <tr>
347 
            <td colspan="7" background="images/bg_table_border.gif">
348 
			 <table width="100%"  border="0" cellspacing="1" cellpadding="2">
349 
              <tr>
350 
                <td nowrap background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
351 
              </tr>
352 
             </table>
353 
			</td>
354 
          </tr>
355 
         </table>
356 
		 <SPAN class="body_smltxtg">
357 
		 NOTE: <%=LIMG_UPDATED%>&nbsp;Updated, <%=LIMG_ADDED%>&nbsp;Added, <%=LIMG_REMOVED%>&nbsp;Removed, [Blank]&nbsp;No change
358 
		 </span>
359 
		 <br><br><br>
360 
		<!-- Reasons For This Version -------------------------------------------------------------------------------------------- -->
361 
		<SPAN class="body_colb">Reasons For This Version</SPAN>
362 
		<table width="100%"  border="0" cellspacing="3" cellpadding="0">
363 
		  <tr>
364 
            <td background="images/bg_table_border.gif">
365 
			 <table width="100%"  border="0" cellspacing="1" cellpadding="2">
366 
              <tr>
367 
                <td nowrap background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
368 
              </tr>
369 
             </table>
370 
			</td>
371 
          </tr>
372 
		  <%
373 
		  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ReasonsForVersionList.sql"), ORADYN_DEFAULT )
374 
		  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
375 
		  %>
376 
          <tr>
377 
            <td class="body_rowlite">
378 
			<a href="<%=RELEASE_MANAGER_URL%>/fixed_issues.asp?rtag_id=<%=objProdCollector.Item ("rtag_id")%>&pv_id=<%=rsQry("pv_id")%>" class="body_link" target="_blank" title="Open in Release Manager..."><%=rsQry("pkg_name").Value &" "& rsQry("pkg_version").Value%><img src="icons/i_popup_link.gif" hspace="2" border="0" align="absmiddle"></a><br>
379 
			<%
380 
			If IsNull(rsQry("comments")) OR rsQry("comments") = "" Then
381 
				Response.write "Not specified. Check Issues list."
382 
			Else
383 
				Response.write objFormater.TextToHtml( rsQry("comments") )
384 
			End If
385 
 
386 
			%>
387 
			</td>
388 
          </tr>
389 
		  <%rsQry.MoveNext%>
390 
 
391 
		  <%If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then%>
392 
          <tr>
393 
            <td background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
394 
          </tr>
395 
		  <%End If%>
396 
 
397 
		  <%
398 
		  WEnd
399 
		  %>
400 
          <tr>
401 
            <td background="images/bg_table_border.gif">
402 
			 <table width="100%"  border="0" cellspacing="1" cellpadding="2">
403 
              <tr>
404 
                <td nowrap background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
405 
              </tr>
406 
             </table>
407 
			</td>
408 
          </tr>
409 
         </table>
410 
		<%
411 
		OraDatabase.Parameters.Remove "PROD_ID"
412 
		OraDatabase.Parameters.Remove "OLD_PROD_ID"
413 
		OraDatabase.Parameters.Remove "PKG_ID"
414 
		OraDatabase.Parameters.Remove "V_EXT"
415 
		%>
416 
</p>
417 
<!-- Realease Authorisation -------------------------------------------------------------------------------------------- -->
418 
		<SPAN class="body_colb">Release Authorisation </SPAN>
419 
<%
420 
Set rsQry = OraDatabase.DbCreateDynaset( "select * from release_authorisation where pv_id="&dbPARprod_id, ORADYN_DEFAULT )
421 
If rsQry.RecordCount > 0 Then
422 
%>
423 
		<table width="100%"  border="0" cellspacing="3" cellpadding="0">
424 
 
425 
              <tr>
426 
              <td background="images/bg_bage_0a.gif">
427 
			   <table width="100%"  border="0" cellspacing="1" cellpadding="3">
428 
                <tr>
429 
                  <td width="10%" background="images/bg_bage_0.gif" class="body_col">Date</td>
430 
                  <td width="20%" background="images/bg_bage_0.gif" class="body_col">Regional Tester</td>
431 
				  <td width="70%" background="images/bg_bage_0.gif" class="body_col">Tester Comments</td>
432 
 
433 
                </tr>
434 
                <tr>
435 
                  <td width="10%" background="images/bg_lght_gray.gif" class="body_rowlite"><%=rsQry("tester_datestamp")%></td>
436 
                  <td width="20%" background="images/bg_lght_gray.gif" class="body_rowlite"><%=UserName(rsQry("tester_id"))%></td>
437 
				  <td width="70%" background="images/bg_lght_gray.gif" class="body_rowlite"><%=rsQry("tester_comments")%></td>
438 
 
439 
                </tr>
440 
				<%'objRepeater.RenderDataGrid ()%>
441 
              </table>
442 
 
443 
			   <table width="100%"  border="0" cellspacing="1" cellpadding="3">
444 
                <tr>
445 
				  <td width="10%" background="images/bg_bage_0.gif" class="body_col">Date</td>
446 
				  <td width="20%" background="images/bg_bage_0.gif" class="body_col">Regional Manager</td>
447 
				  <td width="70%" background="images/bg_bage_0.gif" class="body_col">Manager Comments</td>
448 
                </tr>
449 
                <tr>
450 
				  <td width="10%" background="images/bg_lght_gray.gif" class="body_rowlite"><%=rsQry("manager_datestamp")%></td>
451 
				  <td width="20%" background="images/bg_lght_gray.gif" class="body_rowlite"><%=UserName(rsQry("manager_id"))%></td>
452 
				  <td width="70%" background="images/bg_lght_gray.gif" class="body_rowlite"><%=rsQry("manager_comments")%></td>
453 
                </tr>
454 
				<%'objRepeater.RenderDataGrid ()%>
455 
              </table>
456 
			 </td>
457 
            </tr>
458 
        </table>
459 
<%
460 
Else
461 
%>
462 
<SPAN class="body_col">No Information </SPAN>
463 
 
464 
 
465 
<%
466 
End If
467 
rsQry.Close()
468 
Set rsQry = Nothing
469 
 
470 
%>
471 
 
472 
			<p>
473 
		  <!-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
474 
	      </p></td>
475 
      </tr>
476 
    </table>
477 
	</td>
478 
    <td width="1%" valign="top" background="images/bg_favourits.gif">
479 
	<%If Request.Cookies( enumCOOKIE_NAME )( "user_bar" ) <> "hide" Then%>
480 
	<!-- PERSONAL PANE +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
481 
      <table width="100%"  border="0" cellspacing="0" cellpadding="0">
482 
      <tr>
483 
        <td width="100%" valign="bottom" background="images/bg_node_icon.gif"><%=GetNodeImage ( dbPARnode_id )%></td>
484 
        <td width="1" background="images/bg_node_icon.gif"><img src="images/spacer.gif" width="1" height="97"></td>
485 
      </tr>
486 
      </table>
487 
      <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">
488 
      <tr>
489 
        <td valign="top"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
490 
          <tr>
491 
            <td valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
492 
            <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="10" height="3"></td>
493 
            <td align="right" valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
494 
          </tr>
495 
          <tr>
496 
            <td colspan="3" background="images/bg_favourits2.gif"><table width="100%"  border="0" cellspacing="5" cellpadding="0">
497 
              <tr>
498 
                <td valign="top" class="fav_txt"><span class="fav_head">Reason for release</span><br>
499 
                      <br>
500 
    <!--     This version needs to be rebuild on new sysbase_types 1.5.0.mas<br> -->
501 
                </td>
502 
              </tr>
503 
            </table></td>
504 
            </tr>
505 
          <tr>
506 
            <td valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
507 
            <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="190" height="3"></td>
508 
            <td align="right" valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
509 
          </tr>
510 
        </table>
511 
          <br>
512 
          <table width="100%"  border="0" cellspacing="0" cellpadding="0">
513 
            <tr>
514 
              <td valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
515 
              <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="10" height="3"></td>
516 
              <td align="right" valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
517 
            </tr>
518 
            <tr background="images/bg_gray.gif">
519 
              <td colspan="3" background="images/bg_favourits2.gif"><table width="100%"  border="0" cellspacing="5" cellpadding="0">
520 
                <tr>
521 
                  <td valign="top" class="fav_txt"><span class="fav_head">Fixed Issues</span><br>
522 
                      <br>
523 
                      <table width="100%"  border="0" cellspacing="0" cellpadding="2">
524 
<!--                         <tr>
525 
                          <td><img src="icons/i_bulet.gif" width="4" height="4" hspace="5"></td>
526 
                          <td><a href="#" class="fav_link">DEVI-021532</a></td>
527 
                        </tr>
528 
                        <tr>
529 
                          <td><img src="icons/i_bulet.gif" width="4" height="4" hspace="5"></td>
530 
                          <td><a href="#" class="fav_link">DEVI-021534</a></td>
531 
                        </tr>
532 
                        <tr>
533 
                          <td width="1%"><img src="icons/i_bulet.gif" width="4" height="4" hspace="5"></td>
534 
                          <td width="100%"><a href="#" class="fav_link">DEVI-021536</a></td>
535 
                        </tr> -->
536 
                    </table></td>
537 
                </tr>
538 
              </table></td>
539 
              </tr>
540 
            <tr>
541 
              <td valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
542 
              <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="190" height="3"></td>
543 
              <td align="right" valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
544 
            </tr>
545 
          </table></td>
546 
        <td width="1%"><img src="images/spacer.gif" width="15" height="400"></td>
547 
      </tr>
548 
    </table>
549 
	<!-- END OF PERSONAL BAR ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
550 
	<%End If%>
551 
   </td>
552 
  </tr>
553 
  <tr>
554 
    <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="1" height="15"></td>
555 
    <td background="images/bg_bage_1.gif"><img src="images/spacer.gif" width="1" height="1"></td>
556 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
557 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
558 
  </tr>
559 
  <tr>
560 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="20"></td>
561 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
562 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
563 
    <td bgcolor="#FFFFFF">&nbsp;</td>
564 
  </tr>
565 
</table>
566 
<!-- FOOTER ++++++++++++++++ -->
567 
<!--#include file="_footer.asp"-->
568 
<!-- +++++++++++++++++++++++ -->
569 
</body>
570 
</html>