Subversion Repositories DevTools

Rev

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

Rev 1281 Rev 1337
Line 100... Line 100...
100 
<%
 100 
<%
101 
'-----------------------  MAIN LINE  ---------------------------
 101 
'-----------------------  MAIN LINE  ---------------------------
102 
 
 102 
 
103 
'--- Process submition ---
 103 
'--- Process submition ---
104 
If (Request("pv_id") <> "") AND (Request("test_id") <> "")  Then
 104 
If (Request("pv_id") <> "") AND (Request("test_id") <> "")  Then
105 
   ' All mendatory parameters FOUND
 105 
   ' All mandatory parameters FOUND
106 
   Call Get_Pkg_Info ( Request("pv_id"), Request("rtag_id") )
 106 
   Call Get_Pkg_Info ( Request("pv_id"), Request("rtag_id") )
107 
   Call Remove_Unit_Test ( Request("test_id"), Request("pv_id") )
 107 
   Call Remove_Unit_Test ( Request("test_id"), Request("pv_id") )
108 
   Response.Redirect("fixed_issues.asp?pv_id="& Request("pv_id") &"&rtag_id="& Request("rtag_id") )
 108 
   Response.Redirect("fixed_issues.asp?pv_id="& Request("pv_id") &"&rtag_id="& Request("rtag_id") )
109 
Else
 109 
Else
110 
   Response.write "Some mendatory parameters are missing!" & "<br>" 'TODO
 110 
   Response.write "Some mandatory parameters are missing!" & "<br>" 'TODO
111 
   Response.write QSTR_All
 111 
   Response.write QSTR_All
112 
 
 112 
 
113 
End If
 113 
End If
114 
%>
 114 
%>
115 
 
 115