<%@LANGUAGE="VBSCRIPT"%> <% '===================================================== '| | '| EXPORT JATS | '| DEPENDENCIES | '| | '===================================================== %> <% 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") = "" Then Response.Redirect("index.asp") End If %> <% '------------ ACCESS CONTROL ------------------ %> <% '------------ Variable Definition ------------- Dim parPv_id '------------ Constants Declaration ----------- '------------ Variable Init ------------------- Set pkgInfoHash = CreateObject("Scripting.Dictionary") parPv_id = QStrPar("pv_id") '---------------------------------------------- %> <% Function Dependency_List ( NNpv_id ) Dim rsTemp, Query_String, tempSTR tempSTR = "" Query_String = _ " SELECT pkg.pkg_name, pv.pkg_version, dep.build_type"&_ " FROM packages pkg,"&_ " package_versions pv,"&_ " package_dependencies dep"&_ " WHERE pv.pkg_id = pkg.pkg_id"&_ " AND dep.dpv_id = pv.pv_id"&_ " AND dep.pv_id = "& NNpv_id &_ " ORDER BY UPPER(pkg.pkg_name)" Set rsTemp = OraDatabase.DbCreateDynaset( Query_String, cint(0)) While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF)) tempSTR = tempSTR & To_JATS( rsTemp("build_type"), rsTemp("pkg_name"), rsTemp("pkg_version") ) & VBNewLine rsTemp.MoveNext WEnd Dependency_List = tempSTR rsTemp.Close Set rsTemp = nothing End Function %> <% Call Get_Pkg_Info ( parPv_id, NULL ) %> <%Response.Cookies("RELEASEMANAGER_MEMORY")("devl_environment") = "jats"%> Release Manager
   
 
EXPORT dependencies <%Call Generate_Tab_Menu ( TABarray3, "JATS style", "blue" )%>
 
<%=pkgInfoHash.Item ("pkg_name")%> <%=pkgInfoHash.Item ("pkg_version")%>
 
Copy this dependency export list into your build file to build this package.
 
<% Call Destroy_All_Objects %>