Subversion Repositories DevTools

Rev

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

Rev 5506 Rev 5957
Line 103... Line 103...
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 mandatory 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
   Call Destroy_All_Objects
108
   Response.Redirect("fixed_issues.asp?pv_id="& Request("pv_id") &"&rtag_id="& Request("rtag_id") )
109
   Response.Redirect("fixed_issues.asp?pv_id="& Request("pv_id") &"&rtag_id="& Request("rtag_id") )
109
Else
110
Else
110
   Response.write "Some mandatory parameters are missing!" & "<br>" 'TODO
111
   Response.write "Some mandatory parameters are missing!" & "<br>" 'TODO
111
   Response.write QSTR_FullQuery
112
   Response.write QSTR_FullQuery
112
 
113
 
113
End If
114
End If
114
%>
115
%>
115
 
-
 
116
<!-- DESTRUCTOR ------->
116
<!-- DESTRUCTOR ------->
117
<!--#include file="common/destructor.asp"-->
117
<!--#include file="common/destructor.asp"-->