Subversion Repositories DevTools

Rev

Details | 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"-->
16 
<!--#include file="common/_product_common.asp"-->
17 
<%
18 
'------------ ACCESS CONTROL ------------------
19 
%>
20 
<!--#include file="_access_control_general.asp"-->
21 
<%
22 
'------------ VARIABLE DEFINITION -------------
23 
Dim nOldProdID
24 
Dim rsQry
25 
Dim sMessage
26 
'Dim objOldProdCollector
27 
'------------ CONSTANTS DECLARATION -----------
28 
Const LIMG_NOTE_NEW = "<img src='icons/i_note_new.gif' width='18' height='18' border='0' align='absmiddle'>"
29 
Const LIMG_NOTE_EDIT = "<img src='icons/i_note_edit.gif' width='18' height='18' border='0' align='absmiddle'>"
30 
'------------ VARIABLE INIT -------------------
31 
'Set objOldProdCollector = CreateObject("Scripting.Dictionary")
32 
'------------ CONDITIONS ----------------------
33 
'----------------------------------------------
34 
%>
35 
<%
36 
'-----------------------------------------------------------------------------------------------------------------
37 
Sub GetOldProdDetails ( nProd_id, ByRef outobjDetails )
38 
	Dim rsQry, query
39 
	OraDatabase.Parameters.Add "PROD_ID", nProd_id,	ORAPARM_INPUT, ORATYPE_NUMBER
40 
 
41 
	query = _
42 
		"   SELECT pkg.pkg_name, cpv.pkg_version, ppv.pkg_version AS previous_version, cpv.last_pv_id AS old_prod_id"&_
43 
		"	  FROM PACKAGE_VERSIONS cpv,"&_
44 
		"	  	   PACKAGE_VERSIONS ppv,"&_
45 
		"	       PACKAGES pkg"&_
46 
		"	 WHERE cpv.LAST_PV_ID = ppv.pv_id"&_
47 
		"	   AND cpv.pkg_id = pkg.pkg_id"&_
48 
		"	   AND cpv.pv_id = :PROD_ID"
49 
 
50 
	Set rsQry = OraDatabase.DbCreateDynaset( query , ORADYN_DEFAULT )
51 
 
52 
	If ((NOT rsQry.BOF) AND (NOT rsQry.EOF)) Then
53 
		outobjDetails.Item ("old_prod_id")   = rsQry("old_prod_id")
54 
		outobjDetails.Item ("pkg_name") = rsQry("pkg_name").Value
55 
		outobjDetails.Item ("pkg_version") = rsQry("pkg_version").Value
56 
		outobjDetails.Item ("previous_version") = rsQry("previous_version").Value
57 
 
58 
	End If
59 
 
60 
	OraDatabase.Parameters.Remove "PROD_ID"
61 
	rsQry.Close
62 
	Set rsQry = Nothing
63 
End Sub
64 
'-----------------------------------------------------------------------------------------------------------------
65 
Sub RowStyle ( nStatus, ByRef outIcon, ByRef outStyle )
66 
 
67 
	Select Case CInt( nStatus )
68 
		Case enumDB_DIFF_NO_CHANGE
69 
			outStyle = "body_rowg"
70 
			outIcon = NULL
71 
 
72 
		Case enumDB_DIFF_UPDATED
73 
			outStyle = "body_rowbold"
74 
			outIcon = LIMG_UPDATED
75 
 
76 
		Case enumDB_DIFF_NEW
77 
			outStyle = "body_rowbold"
78 
			outIcon = LIMG_ADDED
79 
 
80 
		Case enumDB_DIFF_REMOVED
81 
			outStyle = "body_rowthru"
82 
			outIcon = LIMG_REMOVED
83 
 
84 
	End Select
85 
 
86 
End Sub
87 
'-----------------------------------------------------------------------------------------------------------------
88 
%>
89 
<%
90 
'------------ RUN BEFORE PAGE RENDER ----------
91 
'----------------------------------------------
92 
%>
93 
<html>
94 
<head>
95 
<title>Deployment Manager</title>
96 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
97 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
98 
<link href="scripts/deployment_manager.css" rel="stylesheet" type="text/css">
99 
<script language="JavaScript" src="scripts/common.js"></script>
100 
</head>
101 
 
102 
<body leftmargin="0" topmargin="0">
103 
<!-- HEADER ++++++++++++++++ -->
104 
<!--#include file="_header.asp"-->
105 
<!-- +++++++++++++++++++++++ -->
106 
<!-- MAIN MENU  +  CRUMBS ++++++++++++++++ -->
107 
<!--#include file="_main_menu.asp"-->
108 
<!-- +++++++++++++++++++++++++++++++++++++ -->
109 
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
110 
  <tr>
111 
    <td width="1%" valign="top" background="images/bg_bage_0.gif">
112 
	<!-- NODE BROWSER ++++++++++++++++++++++ -->
113 
	<!--#include file="_bom_browser.asp"-->
114 
	<!-- END OF NODE BROWSER +++++++++++++++ -->
115 
	</td>
116 
    <td width="1" background="images/bg_bage_1.gif"><img src="images/spacer.gif" width="1" height="600"></td>
117 
    <td width="100%" valign="top" bgcolor="#FFFFFF">
118 
	<table width="100%"  border="0" cellspacing="0" cellpadding="0">
119 
	  <tr>
120 
        <td valign="top" background="images/bg_blue.gif"></td>
121 
        <td align="right" valign="bottom" background="images/bg_blue.gif" class="body_txtw"><%Call RenderTitle( objProdCollector )%></td>
122 
        <td background="images/bg_blue.gif"><img src="images/spacer.gif" width="10" height="20"></td>
123 
      </tr>
124 
      <tr>
125 
        <td width="1%" valign="top" background="images/bg_blue.gif"></td>
126 
        <td width="100%" valign="bottom" background="images/bg_blue.gif">
127 
		<!-- TAB CONTROLS ++++++++++++++++++++++ -->
128 
		<!--#include file="_tabs_definition.asp"-->
129 
		<%
130 
		Set objTabControl = New TabControl
131 
		objTabControl.TemplateDoc = ReadFile( Server.MapPath("controls/ERGTabStyleWinXP/tab_style.html") ) ' Supply tab style definition
132 
		objTabControl.TabStyle = "StyleWinXP"
133 
		objTabControl.AddTabDefnition ( arrProdTabDef )
134 
		objTabControl.Render ()
135 
		%>
136 
		<!-- END OF TAB CONTROLS +++++++++++++++ -->
137 
		</td>
138 
        <td width="1%" background="images/bg_blue.gif"><img src="images/spacer.gif" width="10" height="35"></td>
139 
        </tr>
140 
      <tr>
141 
        <td background="images/bg_bage_0.gif"><img src="images/spacer.gif" width="30" height="10"></td>
142 
        <td background="images/bg_bage_0.gif">
143 
		<!-- BUTTONS CONTROL +++++++++++++++++++ -->
144 
		<!-- +++++++++++++++++++++++++++++++++++ -->
145 
		</td>
146 
        <td background="images/bg_blue.gif"><img src="images/p_bar_corrner.gif" width="17" height="42"></td>
147 
        </tr>
148 
      <tr>
149 
        <td>&nbsp;</td>
150 
        <td>&nbsp;</td>
151 
        <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>
152 
        </tr>
153 
    </table>
154 
	<table width="100%"  border="0" cellspacing="10" cellpadding="0">
155 
      <tr>
156 
        <td>
157 
		<!-- PAGE DETAILS +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
158 
		<%
159 
		OraDatabase.Parameters.Add "PROD_ID", 		dbPARprod_id,		ORAPARM_INPUT, ORATYPE_NUMBER
160 
		%>
161 
		<form name="OldVersion" method="get" action="<%=SCRIPT_NAME%>">
162 
			<SPAN class="body_txt">Changes since version&nbsp;</SPAN>
163 
			<select name="old_prod_id" class="form_ivalue">
164 
			   <option value=""></option>
165 
			  <%
166 
			  nOldProdID = Request("old_prod_id")
167 
			  If nOldProdID = "" Then nOldProdID = objProdCollector.Item ("last_pv_id")
168 
 
169 
 
170 
			  OraDatabase.Parameters.Add "PKG_ID", 		objProdCollector.Item ("pkg_id"),	ORAPARM_INPUT, ORATYPE_NUMBER
171 
			  OraDatabase.Parameters.Add "V_EXT", 		objProdCollector.Item ("v_ext"),	ORAPARM_INPUT, ORATYPE_NUMBER
172 
			  OraDatabase.Parameters.Add "OLD_PROD_ID", nOldProdID,	ORAPARM_INPUT, ORATYPE_NUMBER
173 
 
174 
			  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ProductVersionsCombo.sql"), ORADYN_DEFAULT )
175 
			  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
176 
			  %>
177 
				<option value="<%=rsQry("pv_id")%>" <%=rsQry("selected")%>><%=rsQry("pkg_version")%></option>
178 
			  <%
179 
			  	rsQry.MoveNext
180 
			  WEnd
181 
			  rsQry.Close
182 
 
183 
			  %>
184 
			</select>
185 
			<%=objPMod.ComposeHiddenTags()%>
186 
			<input type="submit" name="btn" value="Compare" class="form_btn">
187 
		<hr width="100%" size="1px" noshade color="Black">
188 
		</form>
189 
		<!-- PRODUCT REJECTED ------------------------------------------------------------------------------------------ -->
190 
		<%
191 
		If objProdCollector.Item ("is_rejected") = enumDB_YES Then
192 
 
193 
			OraDatabase.Parameters.Add "ENTITY_ID", 		dbPARprod_id,	ORAPARM_INPUT, ORATYPE_NUMBER
194 
			OraDatabase.Parameters.Add "ENUM_ENTITY_TYPE", 	"enumENTITY_TYPE_PRODUCT",	ORAPARM_INPUT, ORATYPE_VARCHAR2
195 
 
196 
 
197 
			Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("RejectionTrail.sql"), ORADYN_DEFAULT )
198 
 
199 
			sMessage = "<table width='100%'  border='0' cellspacing='3' cellpadding='0'>"
200 
			sMessage = sMessage &"<tr>"
201 
			sMessage = sMessage &"<td width='100%' class='body_txt'><b>Product is REJECTED!</b><br><br><br></td>"
202 
			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>"
203 
			sMessage = sMessage &"</tr>"
204 
 
205 
			While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
206 
				sMessage = sMessage & "<tr><td colspan='2' background='images/bg_table_border.gif'><img src='images/spacer.gif' width='1' height='1'></td></tr>"
207 
				sMessage = sMessage &"<tr>"
208 
				sMessage = sMessage &"<td class='body_txt'>"
209 
				If rsQry("is_rejected") = enumDB_YES Then
210 
					sMessage = sMessage &"Product is REJECTED!<br>"
211 
				Else
212 
					sMessage = sMessage &"Product is Accepted!<br>"
213 
				End If
214 
				sMessage = sMessage & objFormater.TextToHTML( rsQry("comments") ) &"<br><SPAN class='body_smltxtg'>"& rsQry("creator") &"</SPAN></td>"
215 
				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>"
216 
				sMessage = sMessage &"</tr>"
217 
 
218 
				rsQry.MoveNext
219 
			WEnd
220 
			rsQry.Close
221 
 
222 
			sMessage = sMessage &"</table>"
223 
 
224 
			Call Messenger ( sMessage, "i_product_rejected.gif", "100%" )
225 
 
226 
			Response.write "<br>"
227 
 
228 
			OraDatabase.Parameters.Remove "ENTITY_ID"
229 
			OraDatabase.Parameters.Remove "ENUM_ENTITY_TYPE"
230 
		End If
231 
		%>
232 
		<!-- Module Changes -------------------------------------------------------------------------------------------- -->
233 
		<SPAN class="body_colb">Module Changes</SPAN>
234 
		<table width="100%"  border="0" cellspacing="3" cellpadding="0">
235 
          <tr>
236 
		  	<td width="1" background="images/bg_table_col.gif"><img src="images/spacer.gif" width="16" height="16" hspace="2"></td>
237 
            <td width="20%" background="images/bg_table_border.gif"><table width="100%"  border="0" cellspacing="1" cellpadding="2">
238 
              <tr>
239 
                <td align="right" nowrap background="images/bg_table_col.gif" class="body_col">Module Name</td>
240 
              </tr>
241 
            </table></td>
242 
			<td width="20%" align="right" nowrap background="images/bg_table_col.gif" class="body_col">Current Version</td>
243 
            <td width="20%" align="right" nowrap background="images/bg_table_col.gif" class="body_col">Previous Version</td>
244 
			<td width="70%" background="images/bg_table_col.gif"></td>
245 
			<td width="1%" align="right" background="images/bg_table_col.gif" class="body_col">Owner</td>
246 
			<td width="1" background="images/bg_table_col.gif"><img src="images/spacer.gif" width="16" height="16" hspace="2"></td>
247 
          </tr>
248 
		  <%
249 
		  Dim style, icon
250 
 
251 
		  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ProductsDiff.sql"), ORADYN_DEFAULT )
252 
		  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
253 
		  	Call RowStyle ( rsQry("status"), icon, style )
254 
		  %>
255 
          <tr>
256 
            <td align="center"><%=icon%></td>
257 
			<td nowrap class="<%=style%>"><%=rsQry("pkg_name").Value%></td>
258 
            <td nowrap class="<%=style%>"><%=rsQry("pkg_version").Value%></td>
259 
			<td nowrap class="<%=style%>"><%=rsQry("previous_version").Value%></td>
260 
			<td nowrap class="<%=style%>"></td>
261 
			<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>
262 
			<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>
263 
          </tr>
264 
		  <%rsQry.MoveNext%>
265 
 
266 
		  <%If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then%>
267 
          <tr>
268 
            <td colspan="7" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
269 
          </tr>
270 
		  <%End If%>
271 
 
272 
		  <%
273 
		  WEnd
274 
		  %>
275 
          <tr>
276 
            <td colspan="7" background="images/bg_table_border.gif">
277 
			 <table width="100%"  border="0" cellspacing="1" cellpadding="2">
278 
              <tr>
279 
                <td nowrap background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
280 
              </tr>
281 
             </table>
282 
			</td>
283 
          </tr>
284 
         </table>
285 
		 <SPAN class="body_smltxtg">
286 
		 NOTE: <%=LIMG_UPDATED%>&nbsp;Updated, <%=LIMG_ADDED%>&nbsp;Added, <%=LIMG_REMOVED%>&nbsp;Removed, [Blank]&nbsp;No change
287 
		 </span>
288 
		 <br><br><br>
289 
		<!-- Reasons For This Version -------------------------------------------------------------------------------------------- -->
290 
		<SPAN class="body_colb">Reasons For This Version</SPAN>
291 
		<table width="100%"  border="0" cellspacing="3" cellpadding="0">
292 
		  <tr>
293 
            <td background="images/bg_table_border.gif">
294 
			 <table width="100%"  border="0" cellspacing="1" cellpadding="2">
295 
              <tr>
296 
                <td nowrap background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
297 
              </tr>
298 
             </table>
299 
			</td>
300 
          </tr>
301 
		  <%
302 
		  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ReasonsForVersionList.sql"), ORADYN_DEFAULT )
303 
		  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
304 
		  %>
305 
          <tr>
306 
            <td class="body_rowlite">
307 
			<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>
308 
			<%
309 
			If IsNull(rsQry("comments")) OR rsQry("comments") = "" Then
310 
				Response.write "Not specified. Check Issues list."
311 
			Else
312 
				Response.write objFormater.TextToHtml( rsQry("comments") )
313 
			End If
314 
 
315 
			%>
316 
			</td>
317 
          </tr>
318 
		  <%rsQry.MoveNext%>
319 
 
320 
		  <%If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then%>
321 
          <tr>
322 
            <td background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
323 
          </tr>
324 
		  <%End If%>
325 
 
326 
		  <%
327 
		  WEnd
328 
		  %>
329 
          <tr>
330 
            <td background="images/bg_table_border.gif">
331 
			 <table width="100%"  border="0" cellspacing="1" cellpadding="2">
332 
              <tr>
333 
                <td nowrap background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
334 
              </tr>
335 
             </table>
336 
			</td>
337 
          </tr>
338 
         </table>
339 
		<%
340 
		OraDatabase.Parameters.Remove "PROD_ID"
341 
		OraDatabase.Parameters.Remove "OLD_PROD_ID"
342 
		OraDatabase.Parameters.Remove "PKG_ID"
343 
		OraDatabase.Parameters.Remove "V_EXT"
344 
		%>
345 
		<!-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
346 
		</td>
347 
      </tr>
348 
    </table>
349 
	</td>
350 
    <td width="1%" valign="top" background="images/bg_favourits.gif">
351 
	<%If Request.Cookies( enumCOOKIE_NAME )( "user_bar" ) <> "hide" Then%>
352 
	<!-- PERSONAL PANE +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
353 
      <table width="100%"  border="0" cellspacing="0" cellpadding="0">
354 
      <tr>
355 
        <td width="100%" valign="bottom" background="images/bg_node_icon.gif"><%=GetNodeImage ( dbPARnode_id )%></td>
356 
        <td width="1" background="images/bg_node_icon.gif"><img src="images/spacer.gif" width="1" height="97"></td>
357 
      </tr>
358 
      </table>
359 
      <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">
360 
      <tr>
361 
        <td valign="top"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
362 
          <tr>
363 
            <td valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
364 
            <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="10" height="3"></td>
365 
            <td align="right" valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
366 
          </tr>
367 
          <tr>
368 
            <td colspan="3" background="images/bg_favourits2.gif"><table width="100%"  border="0" cellspacing="5" cellpadding="0">
369 
              <tr>
370 
                <td valign="top" class="fav_txt"><span class="fav_head">Reason for release</span><br>
371 
                      <br>
23 rsolanki 372 
    <!--     This version needs to be rebuild on new sysbase_types 1.5.0.mas<br> -->
13 rsolanki 373 
                </td>
374 
              </tr>
375 
            </table></td>
376 
            </tr>
377 
          <tr>
378 
            <td valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
379 
            <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="190" height="3"></td>
380 
            <td align="right" valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
381 
          </tr>
382 
        </table>
383 
          <br>
384 
          <table width="100%"  border="0" cellspacing="0" cellpadding="0">
385 
            <tr>
386 
              <td valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
387 
              <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="10" height="3"></td>
388 
              <td align="right" valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
389 
            </tr>
390 
            <tr background="images/bg_gray.gif">
391 
              <td colspan="3" background="images/bg_favourits2.gif"><table width="100%"  border="0" cellspacing="5" cellpadding="0">
392 
                <tr>
393 
                  <td valign="top" class="fav_txt"><span class="fav_head">Fixed Issues</span><br>
394 
                      <br>
395 
                      <table width="100%"  border="0" cellspacing="0" cellpadding="2">
23 rsolanki 396 
<!--                         <tr>
13 rsolanki 397 
                          <td><img src="icons/i_bulet.gif" width="4" height="4" hspace="5"></td>
398 
                          <td><a href="#" class="fav_link">DEVI-021532</a></td>
399 
                        </tr>
400 
                        <tr>
401 
                          <td><img src="icons/i_bulet.gif" width="4" height="4" hspace="5"></td>
402 
                          <td><a href="#" class="fav_link">DEVI-021534</a></td>
403 
                        </tr>
404 
                        <tr>
405 
                          <td width="1%"><img src="icons/i_bulet.gif" width="4" height="4" hspace="5"></td>
406 
                          <td width="100%"><a href="#" class="fav_link">DEVI-021536</a></td>
23 rsolanki 407 
                        </tr> -->
13 rsolanki 408 
                    </table></td>
409 
                </tr>
410 
              </table></td>
411 
              </tr>
412 
            <tr>
413 
              <td valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
414 
              <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="190" height="3"></td>
415 
              <td align="right" valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
416 
            </tr>
417 
          </table></td>
418 
        <td width="1%"><img src="images/spacer.gif" width="15" height="400"></td>
419 
      </tr>
420 
    </table>
421 
	<!-- END OF PERSONAL BAR ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
422 
	<%End If%>
423 
   </td>
424 
  </tr>
425 
  <tr>
426 
    <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="1" height="15"></td>
427 
    <td background="images/bg_bage_1.gif"><img src="images/spacer.gif" width="1" height="1"></td>
428 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
429 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
430 
  </tr>
431 
  <tr>
432 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="20"></td>
433 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
434 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
435 
    <td bgcolor="#FFFFFF">&nbsp;</td>
436 
  </tr>
437 
</table>
438 
<!-- FOOTER ++++++++++++++++ -->
439 
<!--#include file="_footer.asp"-->
440 
<!-- +++++++++++++++++++++++ -->
441 
</body>
442 
</html>
443 
<%
444 
'------------ RUN AFTER PAGE RENDER -----------
445 
Set objPMod = Nothing
446 
Set objCrumbs = Nothing
447 
Set objTabControl = Nothing
448 
Set objBtnControl = Nothing
449 
'----------------------------------------------
450 
%><!--#include file="common/globals_destructor.asp"-->