Subversion Repositories DevTools

Rev

Rev 5020 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5020 Rev 5357
Line 1... Line 1...
1 
<%@LANGUAGE="VBSCRIPT"%>
 1 
<%@LANGUAGE="VBSCRIPT"%>
2 
<%
 2 
<%
3 
'=====================================================
 3 
'=====================================================
4 
'|                                                   |
 4 
'|                                                   |
5 
'|				      EXPORT ANT  					 |
 5 
'|				      EXPORT ANT  					 |
6 
'|					 DEPENDENCIES					 |
 6 
'|					 DEPENDENCIES					 |
7 
'|                                                   |
 7 
'|                                                   |
8 
'=====================================================
 8 
'=====================================================
9 
%>
 9 
%>
10 
<%
 10 
<%
11 
Option explicit
 11 
Option explicit
12 
' Good idea to set when using redirect
 12 
' Good idea to set when using redirect
13 
Response.Expires = 0	' always load the page, dont store
 13 
Response.Expires = 0	' always load the page, dont store
14 
%>
 14 
%>
15 
<!--#include file="common/conf.asp"-->
 15 
<!--#include file="common/conf.asp"-->
16 
<!--#include file="common/globals.asp"-->
 16 
<!--#include file="common/globals.asp"-->
17 
<!--#include file="common/formating.asp"-->
 17 
<!--#include file="common/formating.asp"-->
18 
<!--#include file="common/qstr.asp"-->
 18 
<!--#include file="common/qstr.asp"-->
19 
<!--#include file="common/common_subs.asp"-->
 19 
<!--#include file="common/common_subs.asp"-->
20 
<!--#include file="_tabs.asp"-->
 20 
<!--#include file="_tabs.asp"-->
21 
<%
 21 
<%
22 
' Make sure rtag_id is always present
 22 
' Make sure rtag_id is always present
23 
If Request("pv_id") = "" Then
 23 
If Request("pv_id") = "" Then
24 
	Response.Redirect("index.asp")
 24 
	Response.Redirect("index.asp")
25 
End If
 25 
End If
26 
%>
 26 
%>
27 
<%
 27 
<%
28 
'------------ ACCESS CONTROL ------------------
 28 
'------------ ACCESS CONTROL ------------------
29 
%>
 29 
%>
30 
<!--#include file="_access_control_general.asp"-->
 30 
<!--#include file="_access_control_general.asp"-->
31 
<%
 31 
<%
32 
'------------ Variable Definition -------------
 32 
'------------ Variable Definition -------------
33 
Dim parPv_id
 33 
Dim parPv_id
34 
'------------ Constants Declaration -----------
 34 
'------------ Constants Declaration -----------
35 
'------------ Variable Init -------------------
 35 
'------------ Variable Init -------------------
36 
Set pkgInfoHash = CreateObject("Scripting.Dictionary")
 36 
Set pkgInfoHash = CreateObject("Scripting.Dictionary")
37 
parPv_id = QStrPar("pv_id")
 37 
parPv_id = QStrPar("pv_id")
38 
'----------------------------------------------
 38 
'----------------------------------------------
39 
%>
 39 
%>
40 
<%
 40 
<%
41 
Function Dependency_List ( NNpv_id )
 41 
Function Dependency_List ( NNpv_id )
42 
	On Error Resume Next
 42 
	On Error Resume Next
43 
	Dim rsTemp, Query_String, tempSTR, Query_Release, rsRelease, prjName
 43 
	Dim rsTemp, Query_String, tempSTR, Query_Release, rsRelease, prjName
44 
	tempSTR = ""
 44 
	tempSTR = ""
45 
 
 45 
 
46 
	Query_String = _
 46 
	Query_String = _
47 
	" SELECT pkg.pkg_name, pv.pkg_version"&_
 47 
	" SELECT pkg.pkg_name, pv.pkg_version"&_
48 
	"	FROM packages pkg,"&_
 48 
	"	FROM packages pkg,"&_
49 
	"	     package_versions pv,"&_
 49 
	"	     package_versions pv,"&_
50 
	"	     package_dependencies dep"&_
 50 
	"	     package_dependencies dep"&_
51 
	"	WHERE pv.pkg_id = pkg.pkg_id"&_
 51 
	"	WHERE pv.pkg_id = pkg.pkg_id"&_
52 
	"	  AND dep.dpv_id = pv.pv_id"&_
 52 
	"	  AND dep.dpv_id = pv.pv_id"&_
53 
	"	  AND dep.pv_id = "& NNpv_id &_
 53 
	"	  AND dep.pv_id = "& NNpv_id &_
54 
	"	ORDER BY UPPER(pkg.pkg_name)"
 54 
	"	ORDER BY UPPER(pkg.pkg_name)"
55 
 
 55 
 
56 
	' DEVI-34837 - provide additional name properties for external tools to make use of
 56 
	' DEVI-34837 - provide additional name properties for external tools to make use of
57 
	If request("rtag_id")	<> "" Then
 57 
	If request("rtag_id")	<> "" Then
58 
		Query_Release = _
 58 
		Query_Release = _
59 
		" SELECT * FROM RELEASE_TAGS RT, PROJECTS PRJ WHERE PRJ.PROJ_ID = RT.PROJ_ID AND RT.RTAG_ID="&request("rtag_id")
 59 
		" SELECT * FROM RELEASE_TAGS RT, PROJECTS PRJ WHERE PRJ.PROJ_ID = RT.PROJ_ID AND RT.RTAG_ID="&request("rtag_id")
60 
 
 60 
 
61 
		Set rsRelease = OraDatabase.DbCreateDynaset( Query_Release, cint(0))
 61 
		Set rsRelease = OraDatabase.DbCreateDynaset( Query_Release, cint(0))
62 
		prjName = rsRelease("proj_name")
 62 
		prjName = rsRelease("proj_name")
63 
 
 63 
 
64 
		Response.Write("<property name=""releasemanager.releasename"" value="""& rsRelease("rtag_name") &"""/>") & VBNewLine
 64 
		Response.Write("<property name=""releasemanager.releasename"" value="""& rsRelease("rtag_name") &"""/>") & VBNewLine
65 
		Response.Write("<property name=""releasemanager.projectname"" value="""& prjName &"""/>") & VBNewLine & VBNewLine
 65 
		Response.Write("<property name=""releasemanager.projectname"" value="""& prjName &"""/>") & VBNewLine & VBNewLine
66 
		rsRelease.Close()
 66 
		rsRelease.Close()
67 
		Set rsRelease = Nothing
 67 
		Set rsRelease = Nothing
68 
	End If
 68 
	End If
69 
 
 69 
 
70 
	Response.Write("<property name=""packagename"" value="""& pkgInfoHash.Item("pkg_name") &"""/>") & VBNewLine
 70 
	Response.Write("<property name=""packagename"" value="""& pkgInfoHash.Item("pkg_name") &"""/>") & VBNewLine
71 
 
 71 
 
72 
	Response.Write("<property name=""packageversion"" value="""& pkgInfoHash.Item("pkg_version") &"""/>")& VBNewLine & VBNewLine
 72 
	Response.Write("<property name=""packageversion"" value="""& pkgInfoHash.Item("pkg_version") &"""/>")& VBNewLine & VBNewLine
73 
 
 73 
 
74 
 
 74 
 
75 
	Set rsTemp = OraDatabase.DbCreateDynaset( Query_String, cint(0))
 75 
	Set rsTemp = OraDatabase.DbCreateDynaset( Query_String, cint(0))
76 
 
 76 
 
77 
	While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
 77 
	While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
78 
		tempSTR = tempSTR & To_ANT ( rsTemp("pkg_name"), rsTemp("pkg_version") ) & VBNewLine
 78 
		tempSTR = tempSTR & To_ANT ( rsTemp("pkg_name"), rsTemp("pkg_version") ) & VBNewLine
79 
		rsTemp.MoveNext
 79 
		rsTemp.MoveNext
80 
	WEnd
 80 
	WEnd
81 
 
 81 
 
82 
	Dependency_List = tempSTR
 82 
	Dependency_List = tempSTR
83 
 
 83 
 
84 
	rsTemp.Close
 84 
	rsTemp.Close
85 
	Set rsTemp = nothing
 85 
	Set rsTemp = nothing
86 
End Function
 86 
End Function
87 
%>
 87 
%>
88 
<%
 88 
<%
89 
Call Get_Pkg_Info ( parPv_id, NULL )
 89 
Call Get_Pkg_Info ( parPv_id, NULL )
90 
%>
 90 
%>
91 
<%Response.Cookies(COOKIE_RELEASEMANAGER_MEMORY)("devl_environment") = "ant"%>
 91 
<%Response.Cookies(COOKIE_RELEASEMANAGER_MEMORY)("devl_environment") = "ant"%>
92 
<html>
 92 
<html>
93 
<head>
 93 
<head>
94 
<title>Release Manager</title>
 94 
<title>Release Manager</title>
95 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
 95 
<link rel="shortcut icon" href="<%=FavIcon%>"/>
96 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
 96 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
97 
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
 97 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
98 
<link rel="stylesheet" href="images/navigation.css" type="text/css">
 98 
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
99 
<script language="JavaScript" src="images/common.js"></script>
 99 
<link rel="stylesheet" href="images/navigation.css" type="text/css">
100 
<!-- TIPS -->
 100 
<script language="JavaScript" src="images/common.js"></script>
101 
<script language="JavaScript" src="images/tipster.js"></script>
 101 
<!-- TIPS -->
102 
<script language="JavaScript" src="images/_help_tips.js"></script>
 102 
<script language="JavaScript" src="images/tipster.js"></script>
103 
 
 103 
<script language="JavaScript" src="images/_help_tips.js"></script>
104 
<!-- DROPDOWN MENUS -->
 104 
 
105 
<!--#include file="_menu_def.asp"-->
 105 
<!-- DROPDOWN MENUS -->
106 
<script language="JavaScript1.2" src="images/popup_menu.js"></script>
 106 
<!--#include file="_menu_def.asp"-->
107 
 
 107 
<script language="JavaScript1.2" src="images/popup_menu.js"></script>
108 
</head>
 108 
 
109 
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" >
 109 
</head>
110 
<!-- MENU LAYERS -------------------------------------->
 110 
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" >
111 
<div id="popmenu" class="menuskin" onMouseover="clearhidemenu();highlightmenu(event,'on')" onMouseout="highlightmenu(event,'off');dynamichide(event)">
 111 
<!-- MENU LAYERS -------------------------------------->
112 
</div>
 112 
<div id="popmenu" class="menuskin" onMouseover="clearhidemenu();highlightmenu(event,'on')" onMouseout="highlightmenu(event,'off');dynamichide(event)">
113 
<!-- TIPS LAYERS -------------------------------------->
 113 
</div>
114 
<div id="formTipsLayer" style="position: absolute; z-index: 1000; visibility: hidden; left:0; top: 0; width: 10">&nbsp;</div>
 114 
<!-- TIPS LAYERS -------------------------------------->
115 
<!----------------------------------------------------->
 115 
<div id="formTipsLayer" style="position: absolute; z-index: 1000; visibility: hidden; left:0; top: 0; width: 10">&nbsp;</div>
116 
 
 116 
<!----------------------------------------------------->
117 
<!-- HEADER -->
 117 
 
118 
<!--#include file="_header.asp"-->
 118 
<!-- HEADER -->
119 
<!-- BODY ---->
 119 
<!--#include file="_header.asp"-->
120 
<table width="100%" height="80%" border="0" cellpadding="0" cellspacing="0">
 120 
<!-- BODY ---->
121 
  <tr>
 121 
<table width="100%" height="80%" border="0" cellpadding="0" cellspacing="0">
122 
    <td align="center" valign="top" background="images/bg_lght_gray.gif">
 122 
  <tr>
123 
		  <!-- MIDDLE -->
 123 
    <td align="center" valign="top" background="images/bg_lght_gray.gif">
124 
		    <table width="650" border="0" cellspacing="0" cellpadding="0">
 124 
		  <!-- MIDDLE -->
125 
			  <tr>
 125 
		    <table width="650" border="0" cellspacing="0" cellpadding="0">
126 
			    <td>
 126 
			  <tr>
127 
			      <table width="100%" border="0" cellspacing="0" cellpadding="0">
 127 
			    <td>
128 
			        <tr>
 128 
			      <table width="100%" border="0" cellspacing="0" cellpadding="0">
129 
			          <td width="1%">&nbsp;</td>
 129 
			        <tr>
130 
			          <td align="right"><img src="images/h_trsp_dot.gif" width="30" height="30"></td>
 130 
			          <td width="1%">&nbsp;</td>
131 
			          <td width="1%">&nbsp;</td>
 131 
			          <td align="right"><img src="images/h_trsp_dot.gif" width="30" height="30"></td>
132 
			        </tr>
 132 
			          <td width="1%">&nbsp;</td>
133 
			        <tr>
 133 
			        </tr>
134 
			          <td width="1%">&nbsp;</td>
 134 
			        <tr>
135 
			          <td>
 135 
			          <td width="1%">&nbsp;</td>
136 
			            <table width="100%" border="0" cellspacing="0" cellpadding="0">
 136 
			          <td>
137 
			              <tr>
 137 
			            <table width="100%" border="0" cellspacing="0" cellpadding="0">
138 
			                <td nowrap class="form_ttl">EXPORT dependencies</td>
 138 
			              <tr>
139 
			                <td align="right" valign="bottom">
 139 
			                <td nowrap class="form_ttl">EXPORT dependencies</td>
140 
			                  <%Call Generate_Tab_Menu ( TABarray3, "ANT-using style", "blue" )%>
 140 
			                <td align="right" valign="bottom">
141 
			                </td>
 141 
			                  <%Call Generate_Tab_Menu ( TABarray3, "ANT-using style", "blue" )%>
142 
			              </tr>
 142 
			                </td>
143 
			            </table>
 143 
			              </tr>
144 
			          </td>
 144 
			            </table>
145 
			          <td width="1%">&nbsp;</td>
 145 
			          </td>
146 
			        </tr>
 146 
			          <td width="1%">&nbsp;</td>
147 
			        <tr>
 147 
			        </tr>
148 
			          <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>
 148 
			        <tr>
149 
			          <td background="images/lbox_bg_blue.gif">
 149 
			          <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>
150 
					    <!-- Heading -->
 150 
			          <td background="images/lbox_bg_blue.gif">
151 
					  	<table width="100%" border="0" cellspacing="0" cellpadding="0">
 151 
					    <!-- Heading -->
152 
			              <tr>
 152 
					  	<table width="100%" border="0" cellspacing="0" cellpadding="0">
153 
			                <td nowrap class="lbox_ttl_w"><%=pkgInfoHash.Item ("pkg_name")%>&nbsp;<%=pkgInfoHash.Item ("pkg_version")%></td>
 153 
			              <tr>
154 
							<td width="1%"><img src="images/h_trsp_dot.gif" width="1" height="46"></td>
 154 
			                <td nowrap class="lbox_ttl_w"><%=pkgInfoHash.Item ("pkg_name")%>&nbsp;<%=pkgInfoHash.Item ("pkg_version")%></td>
155 
			                <td align="right">
 155 
							<td width="1%"><img src="images/h_trsp_dot.gif" width="1" height="46"></td>
156 
							<!-- ACTION BUTTONS ------------------------------------------->
 156 
			                <td align="right">
157 
							<!------------------------------------------------------------->
 157 
							<!-- ACTION BUTTONS ------------------------------------------->
158 
			                </td>
 158 
							<!------------------------------------------------------------->
159 
			              </tr>
 159 
			                </td>
160 
			            </table>
 160 
			              </tr>
161 
			            <!-- END Heading -->
 161 
			            </table>
162 
			          </td>
 162 
			            <!-- END Heading -->
163 
			          <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>
 163 
			          </td>
164 
			        </tr>
 164 
			          <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>
165 
			        <tr>
 165 
			        </tr>
166 
			          <td width="1%" bgcolor="#FFFFFF"><img src="images/h_trsp_dot.gif" width="10" height="100"></td>
 166 
			        <tr>
167 
			          <td bgcolor="#FFFFFF" valign="top">
 167 
			          <td width="1%" bgcolor="#FFFFFF"><img src="images/h_trsp_dot.gif" width="10" height="100"></td>
168 
			            <!-- Body -->
 168 
			          <td bgcolor="#FFFFFF" valign="top">
169 
			            <table width="100%" border="0" cellspacing="1" cellpadding="2">
 169 
			            <!-- Body -->
170 
						<form name="close" method="post" action="dependencies.asp">
 170 
			            <table width="100%" border="0" cellspacing="1" cellpadding="2">
171 
			                <tr>
 171 
						<form name="close" method="post" action="dependencies.asp">
172 
			                  <td nowrap width="100%">&nbsp; </td>
 172 
			                <tr>
173 
			                </tr>
 173 
			                  <td nowrap width="100%">&nbsp; </td>
174 
			                <tr>
 174 
			                </tr>
175 
			                  <td nowrap width="100%"><span class="form_txt">Copy this dependency export list into your build file to build this package.</span><br><br>
 175 
			                <tr>
176 
			                    <textarea name="FRdeps" rows="25" cols="100" wrap="OFF" class="form_item" onFocus="this.select()"><%=Dependency_List( parPv_id )%></textarea>
 176 
			                  <td nowrap width="100%"><span class="form_txt">Copy this dependency export list into your build file to build this package.</span><br><br>
177 
								<br><br>
 177 
			                    <textarea name="FRdeps" rows="25" cols="100" wrap="OFF" class="form_item" onFocus="this.select()"><%=Dependency_List( parPv_id )%></textarea>
178 
								<input type="submit" name="btn" value="  Close  " class="form_btn">
 178 
								<br><br>
179 
								<br><br>
 179 
								<input type="submit" name="btn" value="  Close  " class="form_btn">
180 
			                  </td>
 180 
								<br><br>
181 
			                </tr>
 181 
			                  </td>
182 
							<input type="hidden" name="pv_id" value="<%=parPv_id%>">
 182 
			                </tr>
183 
					  		<input type="hidden" name="rtag_id" value="<%=parRtag_id%>">
 183 
							<input type="hidden" name="pv_id" value="<%=parPv_id%>">
184 
						</form>
 184 
					  		<input type="hidden" name="rtag_id" value="<%=parRtag_id%>">
185 
			            </table>
 185 
						</form>
186 
			            <!-- END Body-->
 186 
			            </table>
187 
						    </td>
 187 
			            <!-- END Body-->
188 
			          <td width="1%" background="images/lbox_bgside_white.gif">&nbsp;</td>
 188 
						    </td>
189 
			        </tr>
 189 
			          <td width="1%" background="images/lbox_bgside_white.gif">&nbsp;</td>
190 
			        <tr>
 190 
			        </tr>
191 
			          <td width="1%" background="images/lbox_bg_blue.gif" valign="bottom"><img src="images/lbox_bl_cnr_b.gif" width="13" height="13"></td>
 191 
			        <tr>
192 
			          <td background="images/lbox_bg_blue.gif"></td>
 192 
			          <td width="1%" background="images/lbox_bg_blue.gif" valign="bottom"><img src="images/lbox_bl_cnr_b.gif" width="13" height="13"></td>
193 
			          <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>
 193 
			          <td background="images/lbox_bg_blue.gif"></td>
194 
			        </tr>
 194 
			          <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>
195 
			      </table>
 195 
			        </tr>
196 
			    </td>
 196 
			      </table>
197 
			  </tr>
 197 
			    </td>
198 
			</table>
 198 
			  </tr>
199
199 
			</table>
200 
	</td>
 200
201 
  </tr>
 201 
	</td>
202 
  <tr>
 202 
  </tr>
203 
    <td valign="bottom" background="images/bg_lght_gray.gif">
 203 
  <tr>
204 
	<!-- FOOTER -->
 204 
    <td valign="bottom" background="images/bg_lght_gray.gif">
205 
	<!--#include file="_footer.asp"-->
 205 
	<!-- FOOTER -->
206 
	</td>
 206 
	<!--#include file="_footer.asp"-->
207 
  </tr>
 207 
	</td>
208 
</table>
 208 
  </tr>
209 
</body>
 209 
</table>
210 
</html>
 210 
</body>
211 
<%
 211 
</html>
212 
Call Destroy_All_Objects
 212 
<%
- 
 
 213 
Call Destroy_All_Objects
213 
%>
 214 
%>
214 

            215