Subversion Repositories DevTools

Rev

Rev 3898 | Rev 3901 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3898 Rev 3899
Line 15... Line 15...
15 
<!--#include file="common/conf.asp"-->
 15 
<!--#include file="common/conf.asp"-->
16 
<!--#include file="common/globals.asp"-->
 16 
<!--#include file="common/globals.asp"-->
17 
<!--#include file="common/formating.asp"-->
 17 
<!--#include file="common/formating.asp"-->
18 
<!--#include file="common/qstr.asp"-->
 18 
<!--#include file="common/qstr.asp"-->
19 
<!--#include file="common/common_subs.asp"-->
 19 
<!--#include file="common/common_subs.asp"-->
20 
<script language="JavaScript" src="scripts/remote_scripting.js"></script>
 - 
 
21 
<script type="text/javascript" src="scripts/json2.js"></script>
 - 
 
22 
 
 - 
 
23 
<%
 20 
<%
24 
' Make sure rtag_id is always present
 21 
' Make sure rtag_id is always present
25 
If Request("pv_id") = "" Then
 22 
If Request("pv_id") = "" Then
26 
	Response.Redirect("index.asp")
 23 
	Response.Redirect("index.asp")
27 
End If
 24 
End If
Line 30... Line 27...
30 
'------------ ACCESS CONTROL ------------------
 27 
'------------ ACCESS CONTROL ------------------
31 
%>
 28 
%>
32 
<!--#include file="_access_control_login.asp"-->
 29 
<!--#include file="_access_control_login.asp"-->
33 
<!--#include file="_access_control_general.asp"-->
 30 
<!--#include file="_access_control_general.asp"-->
34 
<!--#include file="_access_control_project.asp"-->
 31 
<!--#include file="_access_control_project.asp"-->
- 
 
 32 
<% '------------ Scripts -------------------------- %>
- 
 
 33 
<script language="JavaScript" src="scripts/remote_scripting.js"></script>
- 
 
 34 
<script type="text/javascript" src="scripts/json2.js"></script>
35 
<%
 35 
<%
36 
'------------ Variable Definition -------------
 36 
'------------ Variable Definition -------------
37 
Dim parPv_id
 37 
Dim parPv_id
38 
Dim rsPkgs
 38 
Dim rsPkgs
39 
Dim HTML_pkg_list
 39 
Dim HTML_pkg_list
Line 238... Line 238...
238 
        MM_hideProgressBar();
 238 
        MM_hideProgressBar();
239 
 
 239 
 
240 
        //Gather the results from the callback
 240 
        //Gather the results from the callback
241 
        var str = xmlHttp.responseText;
 241 
        var str = xmlHttp.responseText;
242 
//alert("JSON:" + str);
 242 
//alert("JSON:" + str);
- 
 
 243 
        if ( !str ) {
- 
 
 244 
            alert("Empty responce from Release Manager. May have been logged ");
- 
 
 245 
            return;
- 
 
 246 
        }
243 
        var myJson = JSON.parse(str);
 247 
        var myJson = JSON.parse(str);
244 
        if(myJson.error || !str)
 248 
        if(myJson.error)
245 
        {
 249 
        {
246 
            alert("Invalid responce from Release Manager");
 250 
            alert("Invalid responce from Release Manager");
247 
            return;
 251 
            return;
248 
        }
 252 
        }
249 
 
 253