Subversion Repositories DevTools

Rev

Rev 3959 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3959 Rev 5172
Line 51... Line 51...
51 
 
 51 
 
52 
   OraDatabase.Parameters.Remove "PROJ_ID"
 52 
   OraDatabase.Parameters.Remove "PROJ_ID"
53 
   OraDatabase.Parameters.Remove "PKG_ID"
 53 
   OraDatabase.Parameters.Remove "PKG_ID"
54 
   OraDatabase.Parameters.Remove "USER_ID"
 54 
   OraDatabase.Parameters.Remove "USER_ID"
55 
 
 55 
 
56 
'Response.Write(objAccessControl.UserId)
 - 
 
57 
 
 - 
 
58 
End Sub
 56 
End Sub
59 
%>
 57 
%>
60 
<%
 58 
<%
61 
'---------------------------------- MAIN LINE ----------------------------------------
 59 
'---------------------------------- MAIN LINE ----------------------------------------
62 
 
 - 
 
63 
 
 - 
 
64 
Call Add_Package_Interest(parProj_id, parPkg_id)
 60 
Call Add_Package_Interest(parProj_id, parPkg_id)
65 
%>
 61 
%>
66 
   <script language="JavaScript" type="text/javascript">
 62 
   <script language="JavaScript" type="text/javascript">
67 
   window.opener.location='members_pkgs_followed.asp?proj_id=<%=parProj_id%>';
 63 
   window.opener.location='members_pkgs_followed.asp?proj_id=<%=parProj_id%>';
68 
   </script>
 64 
   </script>
69 
<%
 65 
<%
70 
Call CloseWindow()
 66 
Call CloseWindow()
71 
 
 - 
 
72 
'Return Page
 - 
 
73 
'If parRfile = "" Or parRfile = "_generate_release_notes.asp" Then
 - 
 
74 
'    Response.Redirect ( "fixed_issues.asp?pv_id="& parPv_id &"&rtag_id="& parRtag_id )
 - 
 
75 
'Else
 - 
 
76 
'    Response.Redirect ( parRfile &"?pv_id="& parPv_id &"&rtag_id="& parRtag_id )
 - 
 
77 
'End If
 - 
 
78 
 
 - 
 
79 
%>
 67 
%>
80 
 
 - 
 
81 
 
 - 
 
82 
<!-- DESTRUCTOR ------->
 68 
<!-- DESTRUCTOR ------->
83 
<!--#include file="common/destructor.asp"-->
 69 
<!--#include file="common/destructor.asp"-->