<%@LANGUAGE="VBSCRIPT"%> <% '===================================================== ' form_export_jats_dependencies.asp '===================================================== %> <% 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 Call Destroy_All_Objects 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(COOKIE_RELEASEMANAGER_MEMORY)("devl_environment") = "jats"%>

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. <%=Dependency_List( parPv_id )%>