<%@LANGUAGE="VBSCRIPT"%> <% Option explicit Response.Expires = 0 ' always load the page, dont store %> <% '===================================================== ' Make Bulk Reject '===================================================== %> <% '------------ ACCESS CONTROL ------------------ %> <% '------------ Variable Definition ------------- Dim parPv_id Dim parPVIDList '------------ Constants Declaration ----------- '------------ Variable Init ------------------- parPv_id = QStrPar("pv_id") parRtag_id = QStrPar("rtag_id") parPVIDList = Request("pv_id_list") '---------------------------------------------- %> <% 'Process submition Call PUBLIC_MakeBulkReject (parRtag_id, parPVIDList) Call Destroy_All_Objects If parPv_id Then Response.Redirect ( "dependencies.asp?pv_id="& parPv_id &"&rtag_id="& parRtag_id ) Else Response.Redirect ( "dependencies.asp?rtag_id="& parRtag_id ) End If %>