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
'|				     NEW VERSION                     |
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
<%
22
' Make sure rtag_id is always present
23
If Request("rtag_id") = "" Then
24
	Response.Redirect("index.asp")
25
End If
26
%>
27
<%
28
' Set rfile parameter. This is a return page after Login
3959 dpurdie 29
Call objPMod.StoreParameter ( "rfile", "form_new_version.asp" )
119 ghuddy 30
'------------ ACCESS CONTROL ------------------
31
%>
32
<!--#include file="_access_control_login.asp"-->
33
<!--#include file="_access_control_general.asp"-->
34
<!--#include file="_access_control_project.asp"-->
35
<%
36
'------------ Variable Definition -------------
37
'------------ Constants Declaration -----------
38
'------------ Variable Init -------------------
39
'----------------------------------------------
5146 dpurdie 40
   If NOT canAddToRelease(Request("rtag_id"),Request("pv_id") ) Then
41
        Call RaiseMsg ( enum_MSG_ERROR, "<h3>Cannot create a new version of a package that is a part of an SDK.</h3>" )
42
   End If
43
 
119 ghuddy 44
%>
45
<html>
46
<head>
47
<title>Release Manager</title>
48
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
49
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
50
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
51
<link rel="stylesheet" href="images/navigation.css" type="text/css">
52
<script language="JavaScript" src="images/common.js"></script>
53
<!-- DROPDOWN MENUS -->
54
<!--#include file="_menu_def.asp"-->
55
<script language="JavaScript1.2" src="images/popup_menu.js"></script>
56
</head>
151 ghuddy 57
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0">
119 ghuddy 58
<!-- MENU LAYERS -------------------------------------->
151 ghuddy 59
<div id="popmenu" class="menuskin" onMouseover="clearhidemenu();highlightmenu(event,'on')" onMouseout="highlightmenu(event,'off');dynamichide(event)">
119 ghuddy 60
</div>
61
<!-- TIPS LAYERS -------------------------------------->
62
<div id="formTipsLayer" style="position: absolute; z-index: 1000; visibility: hidden; left:0; top: 0; width: 10">&nbsp;</div>
63
<!----------------------------------------------------->
64
<!-- HEADER -->
65
<!--#include file="_header.asp"-->
66
<!-- BODY ---->
67
<table width="100%" height="80%" border="0" cellpadding="0" cellspacing="0">
68
  <tr>
69
    <td align="center" valign="top" background="images/bg_lght_gray.gif">
70
	<!-- MIDDLE -->
71
	<!--#include file="_form_new_version_page.asp"-->
72
	</td>
73
  </tr>
74
  <tr>
75
    <td valign="bottom" background="images/bg_lght_gray.gif">
76
	<!-- FOOTER -->
77
	<!--#include file="_footer.asp"-->
78
	</td>
79
  </tr>
80
</table>
81
</body>
82
</html>
83
<%
84
Call Destroy_All_Objects
85
%>