<%@LANGUAGE="VBSCRIPT"%>
<%
'=====================================================
'| |
'| SEARCH |
'| PACKAGES |
'| |
'=====================================================
%>
<%
Option explicit
' Good idea to set when using redirect
Response.Expires = 0 ' always load the page, dont store
%>
<%
' Make sure rtag_id is always present
If Request("pv_id") = "" AND Request("rtag_id") = "" Then
Response.Redirect("index.asp")
End If
objPMod.PersistInQryString ( aPersistList(enumPAR_ADD_TYPE) )
%>
<%
'------------ ACCESS CONTROL ------------------
%>
<%
'------------ Variable Definition -------------
Dim parPv_id
Dim parAdd_type
'------------ Constants Declaration -----------
'------------ Variable Init -------------------
parAdd_type = Request("add_type")
parPv_id = Request("pv_id")
'----------------------------------------------
%>
<%
Function Page_Title ( NNadd_type )
If NNadd_type = Cstr(enum_ADD_PACKAGES) Then
Page_Title = "ADD package"
ElseIf NNadd_type = Cstr(enum_ADD_DEPENDENCIES) Then
Page_Title = "ADD dependency"
ElseIf NNadd_type = Cstr(enum_ADD_RUNTIME_DEPENDENCIES) Then
Page_Title = "ADD Runtime Dependency"
Else
Page_Title = ""
End If
End Function
%>
Release Manager
