| Line 28... |
Line 28... |
| 28 |
Dim sLink
|
28 |
Dim sLink
|
| 29 |
Dim parPkgId
|
29 |
Dim parPkgId
|
| 30 |
Dim PackageName
|
30 |
Dim PackageName
|
| 31 |
Dim imgLock
|
31 |
Dim imgLock
|
| 32 |
Dim DestroyPackage
|
32 |
Dim DestroyPackage
|
| 33 |
Dim CanDestroyPackage
|
33 |
Dim CanDestroyPackage
|
| - |
|
34 |
Dim hideRipple
|
| - |
|
35 |
Dim rippleFilter
|
| 34 |
'------------ Constants Declaration -----------
|
36 |
'------------ Constants Declaration -----------
|
| 35 |
Const IMG_OFFICIAL = "<img src='images/i_locked.gif' width='7' height='10' hspace='5' vspace='2' alt='Package is official'>"
|
37 |
Const IMG_OFFICIAL = "<img src='images/i_locked.gif' width='7' height='10' hspace='5' vspace='2' alt='Package is official'>"
|
| 36 |
Const IMG_NOT_OFFICIAL = "<img src='images/spacer.gif' width='7' height='10' hspace='5' vspace='2'>"
|
38 |
Const IMG_NOT_OFFICIAL = "<img src='images/spacer.gif' width='7' height='10' hspace='5' vspace='2'>"
|
| 37 |
'------------ Variable Init -------------------
|
39 |
'------------ Variable Init -------------------
|
| 38 |
parFPkgVersion = Request("fpkgversion")
|
40 |
parFPkgVersion = Request("fpkgversion")
|
| 39 |
If parFPkgVersion = "" Then parFPkgVersion = "*"
|
41 |
If parFPkgVersion = "" Then parFPkgVersion = "*"
|
| 40 |
|
42 |
|
| 41 |
parPkgId = Request("pkg_id")
|
43 |
parPkgId = Request("pkg_id")
|
| - |
|
44 |
If Request("hideRipple") = "True" Then
|
| - |
|
45 |
hideRipple = True
|
| - |
|
46 |
rippleFilter = " AND PV.BUILD_TYPE != 'Y'"
|
| - |
|
47 |
Else
|
| - |
|
48 |
hideRipple = False
|
| - |
|
49 |
rippleFilter = ""
|
| - |
|
50 |
End If
|
| - |
|
51 |
|
| 42 |
|
52 |
|
| 43 |
'----------------------------------------------
|
53 |
'----------------------------------------------
|
| 44 |
%>
|
54 |
%>
|
| 45 |
<%
|
55 |
<%
|
| 46 |
'-----------------------------------------------------------------------------------------------------------------------
|
56 |
'-----------------------------------------------------------------------------------------------------------------------
|
| Line 117... |
Line 127... |
| 117 |
Dim i
|
127 |
Dim i
|
| 118 |
|
128 |
|
| 119 |
OraDatabase.Parameters.Add "PKG_VERSION", Replace( parFPkgVersion, "*", "%" ), ORAPARM_INPUT, ORATYPE_VARCHAR2
|
129 |
OraDatabase.Parameters.Add "PKG_VERSION", Replace( parFPkgVersion, "*", "%" ), ORAPARM_INPUT, ORATYPE_VARCHAR2
|
| 120 |
OraDatabase.Parameters.Add "PKG_ID", parPkgId, ORAPARM_INPUT, ORATYPE_NUMBER
|
130 |
OraDatabase.Parameters.Add "PKG_ID", parPkgId, ORAPARM_INPUT, ORATYPE_NUMBER
|
| 121 |
|
131 |
|
| 122 |
Set rsRep = OraDatabase.DbCreateDynaset( GetQuery("FindPackageVersion.sql"), 0 )
|
132 |
Set rsRep = OraDatabase.DbCreateDynaset( GetQuery("FindPackageVersion.sql") & rippleFilter, 0 )
|
| 123 |
|
133 |
|
| 124 |
OraDatabase.Parameters.Remove "PKG_ID"
|
134 |
OraDatabase.Parameters.Remove "PKG_ID"
|
| 125 |
OraDatabase.Parameters.Remove "PKG_VERSION"
|
135 |
OraDatabase.Parameters.Remove "PKG_VERSION"
|
| 126 |
|
136 |
|
| 127 |
|
137 |
|
| Line 152... |
Line 162... |
| 152 |
<td width="1" nowrap class="body_col" bgcolor="#E4E9EC"></td>
|
162 |
<td width="1" nowrap class="body_col" bgcolor="#E4E9EC"></td>
|
| 153 |
</tr>
|
163 |
</tr>
|
| 154 |
<tr>
|
164 |
<tr>
|
| 155 |
<td nowrap bgcolor="#E4E9EC"></td>
|
165 |
<td nowrap bgcolor="#E4E9EC"></td>
|
| 156 |
<td nowrap bgcolor="#E4E9EC"><input name="fpkgversion" type="text" class="form_item" size="15" value="<%=parFPkgVersion%>"></td>
|
166 |
<td nowrap bgcolor="#E4E9EC"><input name="fpkgversion" type="text" class="form_item" size="15" value="<%=parFPkgVersion%>"></td>
|
| 157 |
<td nowrap bgcolor="#E4E9EC"></td>
|
167 |
<td nowrap bgcolor="#E4E9EC">
|
| - |
|
168 |
<%
|
| - |
|
169 |
Response.write "<a href='"& scriptName &"?"& Persists_Query_String( "hideRipple=" & not hideRipple ) &"'>"
|
| - |
|
170 |
If hideRipple Then
|
| - |
|
171 |
Response.write "<img src='images/RippleSquareOff.gif' width='20' height='20' border='0' title='Rippled Versions Hidden. Toggle'>"
|
| - |
|
172 |
Else
|
| - |
|
173 |
Response.write "<img src='images/RippleSquare.gif' width='20' height='20' border='0' title='Rippled Versions Shown. Toggle'>"
|
| - |
|
174 |
End If
|
| - |
|
175 |
Response.write "</a>"
|
| - |
|
176 |
%>
|
| - |
|
177 |
</td>
|
| 158 |
<td nowrap bgcolor="#E4E9EC"></td>
|
178 |
<td nowrap bgcolor="#E4E9EC"></td>
|
| 159 |
<td nowrap bgcolor="#E4E9EC"></td>
|
179 |
<td nowrap bgcolor="#E4E9EC"></td>
|
| 160 |
</tr>
|
180 |
</tr>
|
| 161 |
<%
|
181 |
<%
|
| 162 |
' Descending order
|
182 |
' Descending order
|