| Line 18... |
Line 18... |
| 18 |
'------------ ACCESS CONTROL ------------------
|
18 |
'------------ ACCESS CONTROL ------------------
|
| 19 |
%>
|
19 |
%>
|
| 20 |
<!--#include file="_access_control_general.asp"-->
|
20 |
<!--#include file="_access_control_general.asp"-->
|
| 21 |
<%
|
21 |
<%
|
| 22 |
'------------ VARIABLE DEFINITION -------------
|
22 |
'------------ VARIABLE DEFINITION -------------
|
| 23 |
Dim rsQry
|
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
|
| 27 |
Dim ProdName
|
27 |
Dim ProdName
|
| - |
|
28 |
Dim ProdVersion
|
| 28 |
'------------ CONSTANTS DECLARATION -----------
|
29 |
'------------ CONSTANTS DECLARATION -----------
|
| 29 |
'------------ VARIABLE INIT -------------------
|
30 |
'------------ VARIABLE INIT -------------------
|
| 30 |
parHold_selection = Request("hold_selection")
|
31 |
parHold_selection = Request("hold_selection")
|
| 31 |
'------------ CONDITIONS ----------------------
|
32 |
'------------ CONDITIONS ----------------------
|
| 32 |
'----------------------------------------------
|
33 |
'----------------------------------------------
|
| Line 46... |
Line 47... |
| 46 |
Case "btnCopyProd"
|
47 |
Case "btnCopyProd"
|
| 47 |
Call OpenInWindow ( "_CopyItems.asp?copy_type=prod_id_list&prod_id_list="& Request("prod_id_list") &"&rfile="& SCRIPT_NAME &"&"& objPMod.ComposeURL() )
|
48 |
Call OpenInWindow ( "_CopyItems.asp?copy_type=prod_id_list&prod_id_list="& Request("prod_id_list") &"&rfile="& SCRIPT_NAME &"&"& objPMod.ComposeURL() )
|
| 48 |
Case "btnRemoveProdBulk"
|
49 |
Case "btnRemoveProdBulk"
|
| 49 |
Call OpenInWindow ( "_RemoveProductFromOs.asp?rfile="& SCRIPT_NAME &"&prod_id_list="& Request("prod_id_list") &"&"& objPMod.ComposeURL() )
|
50 |
Call OpenInWindow ( "_RemoveProductFromOs.asp?rfile="& SCRIPT_NAME &"&prod_id_list="& Request("prod_id_list") &"&"& objPMod.ComposeURL() )
|
| 50 |
Case "btnIsNodeSpec"
|
51 |
Case "btnIsNodeSpec"
|
| 51 |
Call OpenInWindow ( "_AddProductFromOs.asp?rfile="& SCRIPT_NAME &"&prod_id_list="& Request("prod_id_list") &"&"& objPMod.ComposeURL() )
|
52 |
Call OpenInWindow ( "_AddProductFromOs.asp?rfile="& SCRIPT_NAME &"&prod_id_list="& Request("node_spec_list") &"&"& objPMod.ComposeURL() )
|
| - |
|
53 |
Case "btnRemoveObsoletePatches"
|
| - |
|
54 |
Call OpenInWindow ( "_RemoveObsoletePatches.asp?rfile="& SCRIPT_NAME &"&"& objPMod.ComposeURL() )
|
| 52 |
|
55 |
|
| 53 |
End Select
|
56 |
End Select
|
| 54 |
|
57 |
|
| 55 |
End If
|
58 |
End If
|
| 56 |
'----------------------------------------------
|
59 |
'----------------------------------------------
|
| Line 114... |
Line 117... |
| 114 |
|
117 |
|
| 115 |
Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("run_patch.sql"), ORADYN_DEFAULT )
|
118 |
Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("run_patch.sql"), ORADYN_DEFAULT )
|
| 116 |
|
119 |
|
| 117 |
|
120 |
|
| 118 |
'-- Define Action buttons on this tab
|
121 |
'-- Define Action buttons on this tab
|
| 119 |
aTabBtnsDef = Array("btnAddProd", "btnIsNodeSpec", "btnRemoveProdBulk", "height=30", "btnSortProd", "height=30", "btnAcceptRejectProd", "height=30", "btnCopyProd", "btnPasteProd", "btnPatchGenerate")
|
122 |
aTabBtnsDef = Array("btnAddProd", "btnIsNodeSpec", "btnRemoveProdBulk", "height=30", "btnSortProd", "height=30", "btnAcceptRejectProd", "height=30", "btnCopyProd", "btnPasteProd", "btnPatchGenerate", "btnRemoveObsoletePatches")
|
| 120 |
|
123 |
|
| 121 |
Call LoadTabActionButtons ( aTabBtnsDef, objBtnControl )
|
124 |
Call LoadTabActionButtons ( aTabBtnsDef, objBtnControl )
|
| 122 |
|
125 |
|
| 123 |
' -- Tell control if buttons need to be readonly actions
|
126 |
' -- Tell control if buttons need to be readonly actions
|
| 124 |
objBtnControl.IsReadonlyAction = objBomCollector.Item("is_readonly")
|
127 |
objBtnControl.IsReadonlyAction = objBomCollector.Item("is_readonly")
|
| Line 198... |
Line 201... |
| 198 |
|
201 |
|
| 199 |
Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ProductsList.sql"), ORADYN_DEFAULT )
|
202 |
Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ProductsList.sql"), ORADYN_DEFAULT )
|
| 200 |
While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
|
203 |
While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
|
| 201 |
ProdId = rsQry("prod_id")
|
204 |
ProdId = rsQry("prod_id")
|
| 202 |
ProdName = rsQry("pkg_name").Value
|
205 |
ProdName = rsQry("pkg_name").Value
|
| - |
|
206 |
ProdVersion = rsQry("pkg_version").Value
|
| 203 |
selected = ""
|
207 |
selected = ""
|
| 204 |
nodeSpec = ""
|
208 |
nodeSpec = ""
|
| 205 |
If rsQry("is_node_spec") = "on" Then
|
209 |
If rsQry("is_node_spec") = "on" Then
|
| 206 |
nodeSpec = "checked"
|
210 |
nodeSpec = "checked"
|
| 207 |
End If
|
211 |
End If
|
| Line 215... |
Line 219... |
| 215 |
<tr>
|
219 |
<tr>
|
| 216 |
<td align="center" valign="top"><input type="checkbox" name="prod_id_list" value="<%=ProdId%>" <%=selected%>></td>
|
220 |
<td align="center" valign="top"><input type="checkbox" name="prod_id_list" value="<%=ProdId%>" <%=selected%>></td>
|
| 217 |
<td align="center" valign="top" class="body_txt"><%=rsQry("seq_num")%></td>
|
221 |
<td align="center" valign="top" class="body_txt"><%=rsQry("seq_num")%></td>
|
| 218 |
<td nowrap class="body_row" valign="top"><a href="ProdDefault.asp?prod_id=<%=ProdId%>&<%=objPMod.ComposeURL()%>" class="body_link"><%=GetProductIcon(rsQry) & ProdName%></a></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>
|
| 219 |
<td nowrap class="body_row" valign="top"><%=rsQry("pkg_version")%></td>
|
223 |
<td nowrap class="body_row" valign="top"><%=rsQry("pkg_version")%></td>
|
| 220 |
<td nowrap class="body_row" valign="top"><input type="checkbox" name="prod_id_list" value="<%=ProdId%>" <%=nodeSpec%>></td>
|
224 |
<td nowrap class="body_row" valign="top"><input type="checkbox" name="node_spec_list" value="<%=ProdId%>" <%=nodeSpec%>></td>
|
| 221 |
<td class="body_rowlite" valign="top">
|
225 |
<td class="body_rowlite" valign="top">
|
| 222 |
<DIV style="display:block;" id="SHORT_<%=ProdId%>" name="SHORT_<%=ProdId%>" >
|
226 |
<DIV style="display:block;" id="SHORT_<%=ProdId%>" name="SHORT_<%=ProdId%>" >
|
| 223 |
<a href="javascript:;" onclick="ToggleDisplay('SHORT_<%=ProdId%>','LONG_<%=ProdId%>');" class="body_rowlite" title="Click to see more...">Click to see more...</a>
|
227 |
<a href="javascript:;" onclick="ToggleDisplay('SHORT_<%=ProdId%>','LONG_<%=ProdId%>');" class="body_rowlite" title="Click to see more...">Click to see more...</a>
|
| 224 |
</DIV>
|
228 |
</DIV>
|
| 225 |
<DIV style="display:none;" id="LONG_<%=ProdId%>" name="LONG_<%=ProdId%> style="display:none;">
|
229 |
<DIV style="display:none;" id="LONG_<%=ProdId%>" name="LONG_<%=ProdId%> style="display:none;">
|
| 226 |
<a href="javascript:;" onclick="ToggleDisplay('SHORT_<%=ProdId%>','LONG_<%=ProdId%>');" class="body_row" title="Click to hide."><%=objFormater.TextToHtml( rsQry("product_comments") )%></a>
|
230 |
<a href="javascript:;" onclick="ToggleDisplay('SHORT_<%=ProdId%>','LONG_<%=ProdId%>');" class="body_row" title="Click to hide."><%=objFormater.TextToHtml( rsQry("product_comments") )%></a>
|
| 227 |
</DIV>
|
231 |
</DIV>
|
| 228 |
</td>
|
232 |
</td>
|
| - |
|
233 |
<%
|
| - |
|
234 |
|
| - |
|
235 |
OraDatabase.Parameters.Add "PV_ID", ProdId, ORAPARM_INPUT, ORATYPE_NUMBER
|
| - |
|
236 |
|
| - |
|
237 |
Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery ("Package_Patches.sql"), ORADYN_DEFAULT )
|
| - |
|
238 |
|
| - |
|
239 |
If rsTemp.RecordCount = 0 Then
|
| - |
|
240 |
|
| - |
|
241 |
|
| - |
|
242 |
%>
|
| 229 |
<td align="center" valign="top" bgcolor="#FAFAF6"><%Call objBtnControl.Render ( Array("btnEditProd", "btnRemoveProd") )%></td>
|
243 |
<td align="center" valign="top" bgcolor="#FAFAF6"><%Call objBtnControl.Render ( Array("btnEditProd", "btnRemoveProd") )%></td>
|
| 230 |
</tr>
|
244 |
</tr>
|
| - |
|
245 |
<%
|
| - |
|
246 |
Else
|
| - |
|
247 |
%>
|
| - |
|
248 |
|
| - |
|
249 |
<td align="center" valign="top" bgcolor="#FAFAF6"><%Call objBtnControl.Render ( Array("btnEditProd") )%></td>
|
| - |
|
250 |
</tr>
|
| - |
|
251 |
<%
|
| - |
|
252 |
End If
|
| - |
|
253 |
|
| - |
|
254 |
OraDatabase.Parameters.Remove "PV_ID"
|
| - |
|
255 |
rsTemp.Close()
|
| - |
|
256 |
Set rsTemp = nothing
|
| - |
|
257 |
%>
|
| 231 |
<%rsQry.MoveNext%>
|
258 |
<%rsQry.MoveNext%>
|
| 232 |
|
259 |
|
| 233 |
<%If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then%>
|
260 |
<%If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then%>
|
| 234 |
<tr>
|
261 |
<tr>
|
| 235 |
<td colspan="6" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
|
262 |
<td colspan="6" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
|