Subversion Repositories DevTools

Rev

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

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