Rev 121 | Blame | Compare with Previous | Last modification | View Log | RSS feed
<%@LANGUAGE="VBSCRIPT"%><%'====================================================='| |'| EXPORT ANT |'| DEPENDENCIES |'| |'=====================================================%><%Option explicit' Good idea to set when using redirectResponse.Expires = 0 ' always load the page, dont store%><!--#include file="common/conf.asp"--><!--#include file="common/globals.asp"--><!--#include file="common/formating.asp"--><!--#include file="common/qstr.asp"--><!--#include file="common/common_subs.asp"--><!--#include file="_tabs.asp"--><%' Make sure rtag_id is always presentIf Request("pv_id") = "" ThenResponse.Redirect("index.asp")End If%><%'------------ ACCESS CONTROL ------------------%><!--#include file="_access_control_general.asp"--><%'------------ Variable Definition -------------Dim parPv_id'------------ Constants Declaration -----------'------------ Variable Init -------------------Set pkgInfoHash = CreateObject("Scripting.Dictionary")parPv_id = QStrPar("pv_id")'----------------------------------------------%><%Function Dependency_List ( NNpv_id )On Error Resume NextDim rsTemp, Query_String, tempSTR, Query_Release, rsRelease, prjNametempSTR = ""Query_String = _" SELECT pkg.pkg_name, pv.pkg_version"&_" 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)"' DEVI-34837 - provide additional name properties for external tools to make use ofIf request("rtag_id") <> "" ThenQuery_Release = _" SELECT * FROM RELEASE_TAGS RT, PROJECTS PRJ WHERE PRJ.PROJ_ID = RT.PROJ_ID AND RT.RTAG_ID="&request("rtag_id")Set rsRelease = OraDatabase.DbCreateDynaset( Query_Release, cint(0))prjName = rsRelease("proj_name")Response.Write("<property name=""releasemanager.releasename"" value="""& rsRelease("rtag_name") &"""/>") & VBNewLineResponse.Write("<property name=""releasemanager.projectname"" value="""& prjName &"""/>") & VBNewLine & VBNewLinersRelease.Close()Set rsRelease = NothingEnd IfResponse.Write("<property name=""packagename"" value="""& pkgInfoHash.Item("pkg_name") &"""/>") & VBNewLineResponse.Write("<property name=""packageversion"" value="""& pkgInfoHash.Item("pkg_version") &"""/>")& VBNewLine & VBNewLineSet rsTemp = OraDatabase.DbCreateDynaset( Query_String, cint(0))While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))tempSTR = tempSTR & To_ANT ( rsTemp("pkg_name"), rsTemp("pkg_version") ) & VBNewLinersTemp.MoveNextWEndDependency_List = tempSTRrsTemp.CloseSet rsTemp = nothingEnd Function%><%Call Get_Pkg_Info ( parPv_id, NULL )%><%Response.Cookies("RELEASEMANAGER_MEMORY")("devl_environment") = "ant"%><html><head><title>Release Manager</title><meta HTTP-EQUIV="Pragma" CONTENT="no-cache"><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"><link rel="stylesheet" href="images/release_manager_style.css" type="text/css"><link rel="stylesheet" href="images/navigation.css" type="text/css"><script language="JavaScript" src="images/common.js"></script><!-- TIPS --><script language="JavaScript" src="images/tipster.js"></script><script language="JavaScript" src="images/_help_tips.js"></script><!-- DROPDOWN MENUS --><!--#include file="_menu_def.asp"--><script language="JavaScript1.2" src="images/popup_menu.js"></script></head><body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" ><!-- MENU LAYERS --------------------------------------><div id="popmenu" class="menuskin" onMouseover="clearhidemenu();highlightmenu(event,'on')" onMouseout="highlightmenu(event,'off');dynamichide(event)"></div><!-- TIPS LAYERS --------------------------------------><div id="formTipsLayer" style="position: absolute; z-index: 1000; visibility: hidden; left:0; top: 0; width: 10"> </div><!-----------------------------------------------------><!-- HEADER --><!--#include file="_header.asp"--><!-- BODY ----><table width="100%" height="80%" border="0" cellpadding="0" cellspacing="0"><tr><td align="center" valign="top" background="images/bg_lght_gray.gif"><!-- MIDDLE --><table width="650" border="0" cellspacing="0" cellpadding="0"><tr><td><table width="100%" border="0" cellspacing="0" cellpadding="0"><tr><td width="1%"> </td><td align="right"><img src="images/h_trsp_dot.gif" width="30" height="30"></td><td width="1%"> </td></tr><tr><td width="1%"> </td><td><table width="100%" border="0" cellspacing="0" cellpadding="0"><tr><td nowrap class="form_ttl">EXPORT dependencies</td><td align="right" valign="bottom"><%Call Generate_Tab_Menu ( TABarray3, "ANT-using style", "blue" )%></td></tr></table></td><td width="1%"> </td></tr><tr><td align="left" valign="top" width="1%" background="images/lbox_bg_blue.gif"><img src="images/lbox_tl_cnr_b.gif" width="13" height="13"></td><td background="images/lbox_bg_blue.gif"><!-- Heading --><table width="100%" border="0" cellspacing="0" cellpadding="0"><tr><td nowrap class="lbox_ttl_w"><%=pkgInfoHash.Item ("pkg_name")%> <%=pkgInfoHash.Item ("pkg_version")%></td><td width="1%"><img src="images/h_trsp_dot.gif" width="1" height="46"></td><td align="right"><!-- ACTION BUTTONS -------------------------------------------><!-------------------------------------------------------------></td></tr></table><!-- END Heading --></td><td align="right" valign="top" width="1%" background="images/lbox_bg_blue.gif"><img src="images/lbox_tr_cnr_b.gif" width="13" height="13"></td></tr><tr><td width="1%" bgcolor="#FFFFFF"><img src="images/h_trsp_dot.gif" width="10" height="100"></td><td bgcolor="#FFFFFF" valign="top"><!-- Body --><table width="100%" border="0" cellspacing="1" cellpadding="2"><form name="close" method="post" action="dependencies.asp"><tr><td nowrap width="100%"> </td></tr><tr><td nowrap width="100%"><span class="form_txt">Copy this dependency export list into your build file to build this package.</span><br><br><textarea name="FRdeps" rows="25" cols="100" wrap="OFF" class="form_item" onFocus="this.select()"><%=Dependency_List( parPv_id )%></textarea><br><br><input type="submit" name="btn" value=" Close " class="form_btn"><br><br></td></tr><input type="hidden" name="pv_id" value="<%=parPv_id%>"><input type="hidden" name="rtag_id" value="<%=parRtag_id%>"></form></table><!-- END Body--></td><td width="1%" background="images/lbox_bgside_white.gif"> </td></tr><tr><td width="1%" background="images/lbox_bg_blue.gif" valign="bottom"><img src="images/lbox_bl_cnr_b.gif" width="13" height="13"></td><td background="images/lbox_bg_blue.gif"></td><td width="1%" background="images/lbox_bg_blue.gif" valign="bottom" align="right"><img src="images/lbox_br_cnr_b.gif" width="13" height="13"></td></tr></table></td></tr></table></td></tr><tr><td valign="bottom" background="images/bg_lght_gray.gif"><!-- FOOTER --><!--#include file="_footer.asp"--></td></tr></table></body></html><%Call Destroy_All_Objects%>