Subversion Repositories DevTools

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
119 ghuddy 1
<%@LANGUAGE="VBSCRIPT"%>
2
<%
3
'=====================================================
4
'|                                                   |
5
'|				      CONTENTS  					 |
6
'|                                                   |
7
'=====================================================
8
%>
9
<%
10
Option explicit
11
' Good idea to set when using redirect
12
Response.Expires = 0	' always load the page, dont store
13
%>
14
<!--#include file="common/conf.asp"-->
15
<!--#include file="common/globals.asp"-->
16
<!--#include file="common/formating.asp"-->
17
<!--#include file="common/qstr.asp"-->
18
<!--#include file="common/common_subs.asp"-->
19
<!--#include file="common/common_dbedit.asp"-->
20
<%
21
' Make sure rtag_id is always present
22
If Request("rtag_id") = "" Then
23
	Response.Redirect("index.asp")
24
End If
25
%>
26
<%
27
'------------ ACCESS CONTROL ------------------
28
%>
29
<!--#include file="_access_control_general.asp"-->
30
<%
31
'------------ Variable Definition -------------
32
Dim parMinEnv		' show/hide whole environment
33
'------------ Constants Declaration -----------
34
'------------ Variable Init -------------------
35
parMinEnv = Get_parMinEnv ( QStrPar("minenv") )
36
Set pkgInfoHash = CreateObject("Scripting.Dictionary")
37
'----------------------------------------------
38
%>
39
<%'Refresh parent window after the child window is closed
40
If QStrPar("refresh") = "true" Then
41
	Response.Redirect( scriptName &"?done=done"& QSTR)	' Note: "done" parameter is required as QSTR cannot stant on its own.
42
End If
43
%>
44
<%
45
Call Rebuild_Environment ( parRtag_id )
46
%>
47
<%
48
If Request("pv_id") <> "" Then
49
	Call Get_Pkg_Info ( Request("pv_id"), Request("rtag_id") )
50
Else
51
	Response.Redirect ("dependencies.asp?rtag_id="& Request("rtag_id"))
52
End If
53
%>
54
<html>
55
<head>
56
<title>Release Manager</title>
57
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
58
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
59
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
60
<link rel="stylesheet" href="images/navigation.css" type="text/css">
61
<script language="JavaScript" src="images/common.js"></script>
62
 
63
<!-- DROPDOWN MENUS -->
64
<!--#include file="_menu_def.asp"-->
65
<script language="JavaScript1.2" src="images/popup_menu.js"></script>
66
 
67
</head>
68
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" >
69
<!-- MENU LAYERS -------------------------------------->
70
<div id="popmenu" class="menuskin" onMouseover="clearhidemenu();highlightmenu(event,'on')" onMouseout="highlightmenu(event,'off');dynamichide(event)"></div>
71
<!-- TIPS LAYERS -------------------------------------->
72
<div id="formTipsLayer" style="position: absolute; z-index: 1000; visibility: hidden; left:0; top: 0; width: 10">&nbsp;</div>
73
<!----------------------------------------------------->
74
<!-- HEADER -->
75
<!--#include file="_header.asp"-->
76
<!-- BODY ---->
77
<table width="100%" border="0" cellspacing="0" cellpadding="0">
78
	<tr> 
79
		<td valign="top" width="1" background="images/bg_bage.gif">
80
		<!-- LEFT -->
81
		<!--#include file="_environment.asp"-->
82
		</td>
83
		<td width="1" bgcolor="#999999"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
84
		<td valign="top" width="100%">
85
		<!-- MIDDLE -->
86
		<!--#include file="_contents_page.asp"-->
87
		</td>
88
	</tr>
89
</table>
90
<!-- FOOTER -->
91
<!--#include file="_footer.asp"-->
92
</body>
93
</html>
94
<%
95
Call Destroy_All_Objects
96
%>