Subversion Repositories DevTools

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
119 ghuddy 1
<%@LANGUAGE="VBSCRIPT"%>
2
<%
3
'=====================================================
4
'|                                                   |
5
'|				        EDIT 					     |
6
'|					  DEPENDENCIES				     |
7
'|                   				                 |
8
'=====================================================
9
%>
10
<%
11
Option explicit
12
' Good idea to set when using redirect
13
Response.Expires = 0	' always load the page, dont store
14
%>
15
<!--#include file="common/conf.asp"-->
16
<!--#include file="common/globals.asp"-->
17
<!--#include file="common/formating.asp"-->
18
<!--#include file="common/qstr.asp"-->
19
<!--#include file="common/common_subs.asp"-->
20
 
21
<%
22
' Make sure rtag_id is always present
23
If Request("pv_id") = "" Then
24
	Response.Redirect("index.asp")
25
End If
26
%>
27
<%
28
'------------ ACCESS CONTROL ------------------
29
%>
30
<!--#include file="_access_control_login.asp"-->
31
<!--#include file="_access_control_general.asp"-->
32
<!--#include file="_access_control_project.asp"-->
33
<%
34
'------------ Variable Definition -------------
35
Dim parPv_id
36
Dim rsPkgs
37
Dim HTML_pkg_list
38
Dim JSrequirementsSTR
39
'------------ Constants Declaration -----------
40
'------------ Variable Init -------------------
41
parPv_id = Request("pv_id")
42
Set pkgInfoHash = CreateObject("Scripting.Dictionary")
43
'----------------------------------------------
44
%>
45
<%
46
Sub Generate_Dependencies_List ( NNpv_id, nRtag_id, SShtml_pkg_list, SSJSreq )
47
	Dim rsDeps, Query_String, LatestVisible, disabled
48
 
49
	Query_String = ReadFile( rootPath & "queries\edit_dependencies.sql" )
50
 
51
	OraDatabase.Parameters.Add "RTAG_ID", nRtag_id, ORAPARM_INPUT, ORATYPE_NUMBER
52
	OraDatabase.Parameters.Add "PV_ID", NNpv_id, ORAPARM_INPUT, ORATYPE_NUMBER
53
 
54
	Set rsDeps = OraDatabase.DbCreateDynaset( Query_String, cint(0))
55
	While ((NOT rsDeps.BOF) AND (NOT rsDeps.EOF))
56
		disabled = FALSE
57
		'If IsNull(rsDeps("lpv_id")) Then 
58
		'	disabled = TRUE
59
		'End If
60
 
61
		If NOT disabled Then 
62
			SShtml_pkg_list = SShtml_pkg_list &"<tr> "
63
			SShtml_pkg_list = SShtml_pkg_list &"  <td background='images/bg_form_lightgray.gif' nowrap class='form_item'>"& rsDeps("pkg_name") &"<input name='bt"& rsDeps("pv_id") &"' type='hidden' value='"& rsDeps("build_type") &"'></td>"
64
			SShtml_pkg_list = SShtml_pkg_list &"  <td background='images/bg_form_lightgray.gif'><input type='text' name='pkgn"& rsDeps("pv_id") &"' class='form_item' size='12' value='"& rsDeps("pkg_version") &"' onBlur='Compare_Version ( """& rsDeps("pv_id") &""" );' onFocus='Compare_Version ( """& rsDeps("pv_id") &""" );'> "
65
			SShtml_pkg_list = SShtml_pkg_list &"    <a href='javascript:;' onClick='MM_openBrWindow(""_wform_get_version.asp?rfield=editdep.pkgn"& rsDeps("pv_id") &"&pkg_id="& rsDeps("pkg_id") &"&pkg_name="& rsDeps("pkg_name") &"&pv_id="& rsDeps("pv_id") &""",""GetVersion"",""resizable=yes,width=350,height=150"")'><img src='images/i_get.gif' width='16' height='16' align='absmiddle' hspace='5' border='0' alt='Get package version from the list' title='Get package version from the list'></a> "
66
			SShtml_pkg_list = SShtml_pkg_list &"  </td>"
67
		Else
68
			SShtml_pkg_list = SShtml_pkg_list &"<tr> "
69
			SShtml_pkg_list = SShtml_pkg_list &"  <td background='images/bg_form_lightgray.gif' nowrap class='form_item'>"& rsDeps("pkg_name") &"<input name='bt"& rsDeps("pv_id") &"' type='hidden' value='"& rsDeps("build_type") &"'></td>"
70
			SShtml_pkg_list = SShtml_pkg_list &"  <td background='images/bg_form_lightgray.gif'><input disabled type='text' class='form_item' size='12' value='"& rsDeps("pkg_version") &"'>"
71
			SShtml_pkg_list = SShtml_pkg_list &"  </td>"
72
		End If
73
 
74
		' Latest Versions
75
		LatestVisible = "style='display:none;'"
76
		If ( rsDeps("pv_id") <> rsDeps("lpv_id") ) AND ( NOT disabled ) Then
77
			LatestVisible = ""
78
		End If
79
		SShtml_pkg_list = SShtml_pkg_list &"  <td background='images/bg_form_lightgray.gif' class='sublbox_hitem'><DIV id='divLPV"& rsDeps("pv_id") &"' name='divLPV"& rsDeps("pv_id") &"' "& LatestVisible &">"&_
80
								  		      "<a href='javascript:;' onClick='Merge_Version ( ""pkgn"& rsDeps("pv_id") &""", """& rsDeps("lpkg_version") &""", ""divLPV"& rsDeps("pv_id") &""" );'>"&_
81
											  "<img src='images/bt_move_left.gif' border='0' alt='Bring over this latest version' hspace='2' align='absmiddle'>"&_
82
											  "</a>"& rsDeps("lpkg_version") &"<input name='lp"& rsDeps("pv_id") &"' type='hidden' value='"& rsDeps("lpkg_version") &"'></DIV></td> "
83
 
84
		SShtml_pkg_list = SShtml_pkg_list &"</tr>"
85
 
86
		If disabled Then
87
			' Store not found dependency as hidden field. 
88
			' NOTE: This is not safe as the client can temper with hidden value but it will do for now.
89
			SShtml_pkg_list = SShtml_pkg_list &"<input type='hidden' name='pkgn"& rsDeps("pv_id") &"' value='"& rsDeps("pkg_version") &"'>"
90
		Else
91
			SSJSreq = SSJSreq & ",'pkgn"& rsDeps("pv_id") &"','"& rsDeps("pkg_name") &" Version','RisVersionStr'"
92
		End If
93
 
94
		rsDeps.MoveNext
95
	WEnd
96
	If SSJSreq <> "" Then SSJSreq = Right( SSJSreq, Len(SSJSreq)-1 )		' Remove first comma
97
 
98
	OraDatabase.Parameters.Remove "RTAG_ID"
99
	OraDatabase.Parameters.Remove "PV_ID"
100
End Sub
101
%>
102
<%
103
If parPv_id <> "" Then
104
	Call Get_Pkg_Info ( parPv_id, NULL )
105
End If
106
%>
107
 
108
<%
109
'=================== MAIN LINE =====================
110
Call Generate_Dependencies_List ( parPv_id, parRtag_id, HTML_pkg_list, JSrequirementsSTR )
111
 
112
If JSrequirementsSTR = "" Then 
113
	'Edit button clicked on empty dependency list. Redirect user to Add Dependencies
114
	Response.Redirect ("form_search_pkgs.asp?pv_id="& parPv_id &"&rtag_id="& parRtag_id &"&add_type="& enum_ADD_DEPENDENCIES)
115
End If
116
%>
117
<html>
118
<head>
119
<title>Release Manager</title>
120
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
121
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
122
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
123
<link rel="stylesheet" href="images/navigation.css" type="text/css">
124
<script language="JavaScript" src="images/common.js"></script>
125
<!-- DROPDOWN MENUS -->
126
<!--#include file="_menu_def.asp"-->
127
<script language="JavaScript1.2" src="images/popup_menu.js"></script>
128
<script language="JavaScript" type="text/JavaScript">
129
<!--
130
function Merge_Version ( pkgtxt_name, lpkg_version, lpkg_div ) {
131
	//alert("HELLO"+ pkgtxt_name + " " + lpkg_version + "  " + lpkg_div );
132
	MM_findObj( pkgtxt_name ).value = lpkg_version;
133
	MM_findObj( lpkg_div ).style.display = "none";
134
}
135
 
136
function Compare_Version ( pv_id ) {
137
	var cv, lv;
138
	cv = MM_findObj( "pkgn" + pv_id ).value;
139
	lv = MM_findObj( "lp" + pv_id ).value;
140
 
141
	if ( cv != lv ) {
142
		MM_findObj( "divLPV"+ pv_id ).style.display = "block";
143
	} else {
144
		MM_findObj( "divLPV"+ pv_id ).style.display = "none";
145
	}
146
 
147
}
148
//-->
149
</script>
150
 
151
</head>
152
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0">
153
<!-- MENU LAYERS -------------------------------------->
154
<div id="popmenu" class="menuskin" onMouseover="clearhidemenu();highlightmenu(event,'on')" onMouseout="highlightmenu(event,'off');dynamichide(event)"> 
155
</div>
156
<!-- TIPS LAYERS -------------------------------------->
157
<div id="formTipsLayer" style="position: absolute; z-index: 1000; visibility: hidden; left:0; top: 0; width: 10">&nbsp;</div>
158
<!----------------------------------------------------->
159
<!-- HEADER -->
160
<!--#include file="_header.asp"-->
161
<!-- BODY ---->
162
<table width="100%" height="80%" border="0" cellpadding="0" cellspacing="0">
163
  <tr>
164
    <td align="center" valign="top" background="images/bg_lght_gray.gif"> 
165
      <!-- MIDDLE ---------------------------------------->
166
      <table width="650" border="0" cellspacing="0" cellpadding="0">
167
        <tr> 
168
          <td> <table width="100%" border="0" cellspacing="0" cellpadding="0">
169
              <tr> 
170
                <td width="1%"></td>
171
                <td align="right"><img src="images/h_trsp_dot.gif" width="30" height="30"></td>
172
                <td width="1%"></td>
173
              </tr>
174
              <tr> 
175
                <td width="1%"></td>
176
                <td> <table width="100%" border="0" cellspacing="0" cellpadding="0">
177
                    <tr> 
178
                      <td nowrap class="form_ttl">EDIT dependencies</td>
179
                      <td align="right" valign="bottom"></td>
180
                    </tr>
181
                  </table></td>
182
                <td width="1%"></td>
183
              </tr>
184
              <tr> 
185
                <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>
186
                <td background="images/lbox_bg_blue.gif" align="right">
187
                  <!-- Heading -->
188
                  <img src="images/h_trsp_dot.gif" width="1" height="20">
189
                  <!-- END Heading -->
190
                </td>
191
                <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>
192
              </tr>
193
              <tr> 
194
                <td width="1%" bgcolor="#FFFFFF"><img src="images/h_trsp_dot.gif" width="10" height="100"></td>
195
                <td bgcolor="#FFFFFF" valign="top"> 
196
                  <!-- Body -->
197
                  <table width="100%" border="0" cellspacing="1" cellpadding="2">
198
				    <form name="editdep" method="post" action="_update_dependencies.asp" onSubmit="MM_validateForm(<%=JSrequirementsSTR%>);return document.MM_returnValue">
199
				      <tr> 
200
                        <td colspan="2" width="1%" nowrap class="form_field"><%=pkgInfoHash.Item ("pkg_name")%>&nbsp;<%=pkgInfoHash.Item ("pkg_version")%></td>
201
                      </tr>
202
                      <tr> 
203
                        <td colspan="2" width="1%" nowrap class="form_field"> 
204
                          <table width="100%" border="0" cellspacing="1" cellpadding="2">
205
                            <tr> 
206
                              <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field">Package Name<img src="images/h_trsp_dot.gif" width="1" height="20" align="absmiddle"></td>
207
                              <td background="images/bg_form_lightbluedark.gif" nowrap width="50%" class="form_field">Version</td>
208
							  <td background="images/bg_form_lightbluedark.gif" nowrap width="50%" class="form_field">Released</td>
209
                            </tr>
210
                      		<%=HTML_pkg_list%>
211
                            <tr> 
212
                              <td nowrap><img src="images/h_trsp_dot.gif" width="120" height="1"></td>
213
                              <td></td>
214
							  <td></td>
215
                            </tr>
216
                          </table></td>
217
                      </tr>
218
                      <tr> 
219
                        <td colspan="2" nowrap>
220
                          <input type="submit" name="btn" value="Update" class="form_btn"> 
221
						  <input type="reset" name="btn" value="Cancel" class="form_btn" onClick="history.back();"> 
222
                          <SPAN id="ProgressBar" name="ProgressBar" style="visibility:hidden;" class="body_scol"><img src="images/i_processing.gif" width="11" height="17" align="absmiddle" hspace="3">Processing...</SPAN> 
223
                          <br> <br> </td>
224
                      </tr>
225
					  <input type="hidden" name="update_type" value="edit_custom">
226
					  <input type="hidden" name="pv_id" value="<%=parPv_id%>">
227
                      <input type="hidden" name="rtag_id" value="<%=parRtag_id%>">
228
                    </form>
229
                  </table>
230
                  <!-- END Body-->
231
                </td>
232
                <td width="1%" background="images/lbox_bgside_white.gif">&nbsp;</td>
233
              </tr>
234
              <tr> 
235
                <td width="1%" background="images/lbox_bg_blue.gif" valign="bottom"><img src="images/lbox_bl_cnr_b.gif" width="13" height="13"></td>
236
                <td background="images/lbox_bg_blue.gif"></td>
237
                <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>
238
              </tr>
239
            </table></td>
240
        </tr>
241
      </table> 
242
      <!-------------------------------------------------->
243
    </td>
244
  </tr>
245
  <tr>
246
    <td valign="bottom" background="images/bg_lght_gray.gif">
247
	<!-- FOOTER -->
248
	<!--#include file="_footer.asp"-->
249
	</td>
250
  </tr>
251
</table>
252
</body>
253
</html>
254
<%
255
Call Destroy_All_Objects
256
%>