Subversion Repositories DevTools

Rev

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

Rev 23 Rev 25
Line 21... Line 21...
21
<%
21
<%
22
'------------ VARIABLE DEFINITION -------------
22
'------------ VARIABLE DEFINITION -------------
23
Dim rsQry, rsTemp
23
Dim rsQry, rsTemp
24
Dim selected, nodeSpec
24
Dim selected, nodeSpec
25
Dim parHold_selection
25
Dim parHold_selection
26
Dim ProdId
26
Dim ProdId, pkgId 
27
Dim ProdName
27
Dim ProdName
28
Dim ProdVersion
28
Dim ProdVersion, objFormCollector
29
'------------ CONSTANTS DECLARATION -----------
29
'------------ CONSTANTS DECLARATION -----------
30
'------------ VARIABLE INIT -------------------
30
'------------ VARIABLE INIT -------------------
31
parHold_selection = Request("hold_selection")
31
parHold_selection = Request("hold_selection")
-
 
32
Set	objFormCollector=CreateObject("Scripting.Dictionary")
32
'------------ CONDITIONS ----------------------
33
'------------ CONDITIONS ----------------------
33
'----------------------------------------------
34
'----------------------------------------------
34
%>
35
%>
35
<%
36
<%
36
'------------ RUN BEFORE PAGE RENDER ----------
37
'------------ RUN BEFORE PAGE RENDER ----------
Line 54... Line 55...
54
			Call OpenInWindow ( "_RemoveObsoletePatches.asp?rfile="& SCRIPT_NAME &"&"& objPMod.ComposeURL() )
55
			Call OpenInWindow ( "_RemoveObsoletePatches.asp?rfile="& SCRIPT_NAME &"&"& objPMod.ComposeURL() )
55
		
56
		
56
	End Select
57
	End Select
57
	
58
	
58
End If
59
End If
-
 
60
 
-
 
61
Call GetProjDetails ( Request("bom_id"), objFormCollector )
59
'----------------------------------------------
62
'----------------------------------------------
60
%>
63
%>
61
<html>
64
<html>
62
<head>
65
<head>
63
<title>Deployment Manager</title>
66
<title>Deployment Manager</title>
Line 132... Line 135...
132
		End If
135
		End If
133
		
136
		
134
		' -- Render Buttons
137
		' -- Render Buttons
135
		Call objBtnControl.Render  ( aTabBtnsDef )
138
		Call objBtnControl.Render  ( aTabBtnsDef )
136
		
139
		
-
 
140
	Dim rsProj, projName, branchName, projId, rsOS, OSName
-
 
141
	Set rsProj = OraDatabase.DbCreateDynaset( "select br.branch_name, prj.proj_name, prj.proj_id from boms bm, branches br, dm_projects prj where bm.bom_id = "&Request("bom_id")&" and br.BRANCH_ID = bm.BRANCH_ID and prj.PROJ_ID = br.PROJ_ID", cint(0))
-
 
142
	
-
 
143
	projName = rsProj("proj_name")	
-
 
144
	branchName = rsProj("branch_name")
-
 
145
	projId = rsProj("proj_id")
-
 
146
	
-
 
147
	rsProj.Close()
-
 
148
	Set rsProj = nothing
-
 
149
	
-
 
150
	
-
 
151
	
-
 
152
	Set rsOS = OraDatabase.DbCreateDynaset( "select bt.bos_type from os_base_env obe, base_env be, bos_types bt where obe.OS_ID = "&Request("os_id")&" and be.BASE_ENV_ID = obe.BASE_ENV_ID and bt.BOS_ID = be.BOS_ID", cint(0))
-
 
153
	
-
 
154
	OSName = rsOS("bos_type")
-
 
155
	
-
 
156
	If OSName = "Windows" OR OSName = "MOS" Then
-
 
157
		OSName = "win32"
-
 
158
	Else
-
 
159
		OSName = "sparc"
-
 
160
	End If	
-
 
161
	
-
 
162
	rsOS.Close()
-
 
163
	Set rsOS = nothing		
-
 
164
		
137
		%>
165
		%>
138
		<%
166
		<%
139
 
167
 
140
			
168
			
141
 
169
 
Line 169... Line 197...
169
                <td align="center" nowrap background="images/bg_table_col.gif" class="body_col">&nbsp;Install Order</td>
197
                <td align="center" nowrap background="images/bg_table_col.gif" class="body_col">&nbsp;Install Order</td>
170
              </tr>
198
              </tr>
171
            </table></td>
199
            </table></td>
172
			<td width="10%" align="center" nowrap background="images/bg_table_col.gif" class="body_col">Product Name</td>
200
			<td width="10%" align="center" nowrap background="images/bg_table_col.gif" class="body_col">Product Name</td>
173
            <td width="10%" align="center" nowrap background="images/bg_table_col.gif" class="body_col">Version</td>
201
            <td width="10%" align="center" nowrap background="images/bg_table_col.gif" class="body_col">Version</td>
174
			<td width="2%" align="center" nowrap background="images/bg_table_col.gif" class="body_col">In Spec</td>
202
			<td width="2%" align="center" background="images/bg_table_col.gif" class="body_col">In Spec</td>
175
			<td width="78%" align="center" background="images/bg_table_col.gif" class="body_col">
203
			<td width="78%" align="center" background="images/bg_table_col.gif" class="body_col">
176
			<SPAN id="IMG_EXPAND_ALL" name="IMG_EXPAND_ALL" style="display:block;"><a href="javascript:;" onClick="ExpandAll(); ToggleDisplay('IMG_EXPAND_ALL','IMG_COLLAPSE_ALL');" title="Show All Installation Comments."><img src="icons/b_expand_all.gif" border="0" align="absmiddle" hspace="3"></a>Installation Comments</SPAN>
204
			<SPAN id="IMG_EXPAND_ALL" name="IMG_EXPAND_ALL" style="display:block;"><a href="javascript:;" onClick="ExpandAll(); ToggleDisplay('IMG_EXPAND_ALL','IMG_COLLAPSE_ALL');" title="Show All Installation Comments."><img src="icons/b_expand_all.gif" border="0" align="absmiddle" hspace="3"></a>Installation Comments</SPAN>
177
			<SPAN id="IMG_COLLAPSE_ALL" name="IMG_COLLAPSE_ALL" style="display:none;"><a href="javascript:;" onClick="CollapseAll(); ToggleDisplay('IMG_EXPAND_ALL','IMG_COLLAPSE_ALL');" title="Hide All Installation Comments."><img src="icons/b_collapse_all.gif" border="0" align="absmiddle" hspace="3"></a>Installation Comments</SPAN>
205
			<SPAN id="IMG_COLLAPSE_ALL" name="IMG_COLLAPSE_ALL" style="display:none;"><a href="javascript:;" onClick="CollapseAll(); ToggleDisplay('IMG_EXPAND_ALL','IMG_COLLAPSE_ALL');" title="Hide All Installation Comments."><img src="icons/b_collapse_all.gif" border="0" align="absmiddle" hspace="3"></a>Installation Comments</SPAN>
178
			</td>
206
			</td>
179
			<td width="1" background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
207
			<td width="1" background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
Line 202... Line 230...
202
		  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ProductsList.sql"), ORADYN_DEFAULT )
230
		  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ProductsList.sql"), ORADYN_DEFAULT )
203
		  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
231
		  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
204
		  	ProdId = rsQry("prod_id")
232
		  	ProdId = rsQry("prod_id")
205
			ProdName = rsQry("pkg_name").Value
233
			ProdName = rsQry("pkg_name").Value
206
			ProdVersion = rsQry("pkg_version").Value
234
			ProdVersion = rsQry("pkg_version").Value
-
 
235
			pkgId = rsQry("pkg_id").Value
207
		  	selected = ""
236
		  	selected = ""
208
			nodeSpec = ""
237
			nodeSpec = ""
209
			If rsQry("is_node_spec") = "on" Then 
238
			If rsQry("is_node_spec") = "on" Then 
210
				nodeSpec = "checked"
239
				nodeSpec = "checked"
211
			End If	
240
			End If	
Line 218... Line 247...
218
		  %>
247
		  %>
219
          <tr>
248
          <tr>
220
		  	<td align="center" valign="top"><input type="checkbox" name="prod_id_list" value="<%=ProdId%>" <%=selected%>></td>
249
		  	<td align="center" valign="top"><input type="checkbox" name="prod_id_list" value="<%=ProdId%>" <%=selected%>></td>
221
			<td align="center" valign="top" class="body_txt"><%=rsQry("seq_num")%></td>
250
			<td align="center" valign="top" class="body_txt"><%=rsQry("seq_num")%></td>
222
            <td nowrap class="body_row" valign="top"><a href="ProdDefault.asp?prod_id=<%=ProdId%>&<%=objPMod.ComposeURL()%>" class="body_link"><%=GetProductIcon(rsQry)  &  ProdName%></a></td>
251
            <td nowrap class="body_row" valign="top"><a href="ProdDefault.asp?prod_id=<%=ProdId%>&<%=objPMod.ComposeURL()%>" class="body_link"><%=GetProductIcon(rsQry)  &  ProdName%></a></td>
-
 
252
			<%If NOT IsNull(objFormCollector.Item("is_download")) Then%>
-
 
253
			<td valign="top" nowrap class="body_row"><%=rsQry("pkg_version")%><a href="javascript:;" onClick="popup = window.open('LogDownload.asp?url=http://auperaunx26/releases/<%=projName%>/<%=branchName%>/<%=ProdName%>/<%=OSName%>/<%=rsQry("pkg_version")%>/<%=ProdName%>-<%=rsQry("pkg_version")%>-<%=OSName%>.zip&pkg_id=<%=pkgId%>&pkg_version=<%=rsQry("pkg_version")%>', 'Download Version', 'height=440,width=600,scrollbars=yes,resizable=yes'); return false" class="body_link"><img src="icons\i_folder_open.gif" border='0' align="right"></a></td>
-
 
254
			<%Else%>
223
			<td nowrap class="body_row" valign="top"><%=rsQry("pkg_version")%></td>
255
			<td nowrap class="body_row" valign="top"><%=rsQry("pkg_version")%></td>
-
 
256
			<%End If%>
224
			<td nowrap class="body_row" valign="top"><input type="checkbox" name="node_spec_list" value="<%=ProdId%>" <%=nodeSpec%>></td>
257
			<td nowrap class="body_row" valign="top"><input type="checkbox" name="node_spec_list" value="<%=ProdId%>" <%=nodeSpec%>></td>
-
 
258
			
225
            <td class="body_rowlite" valign="top">
259
            <td class="body_rowlite" valign="top">
226
				<DIV style="display:block;" id="SHORT_<%=ProdId%>" name="SHORT_<%=ProdId%>" >
260
				<DIV style="display:block;" id="SHORT_<%=ProdId%>" name="SHORT_<%=ProdId%>" >
227
					<a href="javascript:;" onclick="ToggleDisplay('SHORT_<%=ProdId%>','LONG_<%=ProdId%>');" class="body_rowlite" title="Click to see more...">Click to see more...</a>
261
					<a href="javascript:;" onclick="ToggleDisplay('SHORT_<%=ProdId%>','LONG_<%=ProdId%>');" class="body_rowlite" title="Click to see more...">Click to see more...</a>
228
				</DIV>
262
				</DIV>
229
				<DIV style="display:none;" id="LONG_<%=ProdId%>" name="LONG_<%=ProdId%> style="display:none;">
263
				<DIV style="display:none;" id="LONG_<%=ProdId%>" name="LONG_<%=ProdId%> style="display:none;">