| Line 11... |
Line 11... |
| 11 |
Dim rsVB
|
11 |
Dim rsVB
|
| 12 |
Dim rowColor, imgPointer
|
12 |
Dim rowColor, imgPointer
|
| 13 |
Dim URLstring
|
13 |
Dim URLstring
|
| 14 |
Dim anchorName
|
14 |
Dim anchorName
|
| 15 |
Dim filterInUse
|
15 |
Dim filterInUse
|
| - |
|
16 |
Dim hideRipple
|
| - |
|
17 |
Dim rippleFilter
|
| 16 |
Dim DestroyPackage
|
18 |
Dim DestroyPackage
|
| 17 |
Dim CanDestroyPackage
|
19 |
Dim CanDestroyPackage
|
| 18 |
'------------ Constants Declaration -----------
|
20 |
'------------ Constants Declaration -----------
|
| 19 |
Const IMGBG_ROW_HI = "background='images/bg_row_hi.gif'"
|
21 |
Const IMGBG_ROW_HI = "background='images/bg_row_hi.gif'"
|
| 20 |
Const IMGBG_ROW = "bgcolor='#FFFFFF'"
|
22 |
Const IMGBG_ROW = "bgcolor='#FFFFFF'"
|
| Line 30... |
Line 32... |
| 30 |
Else
|
32 |
Else
|
| 31 |
parFLpkg_version = Request( "FLpkg_version" )
|
33 |
parFLpkg_version = Request( "FLpkg_version" )
|
| 32 |
parFLuser_name = Request( "FLuser_name" )
|
34 |
parFLuser_name = Request( "FLuser_name" )
|
| 33 |
filterInUse = Is_Filter_In_Use ( "FLpkg_version, FLuser_name" )
|
35 |
filterInUse = Is_Filter_In_Use ( "FLpkg_version, FLuser_name" )
|
| 34 |
End If
|
36 |
End If
|
| - |
|
37 |
|
| - |
|
38 |
If Request("hideRipple") = "True" Then
|
| - |
|
39 |
hideRipple = True
|
| - |
|
40 |
rippleFilter = "AND PV.BUILD_TYPE != 'Y'"
|
| - |
|
41 |
Else
|
| - |
|
42 |
hideRipple = False
|
| - |
|
43 |
rippleFilter = ""
|
| - |
|
44 |
End If
|
| - |
|
45 |
|
| 35 |
'----------------------------------------------
|
46 |
'----------------------------------------------
|
| 36 |
%>
|
47 |
%>
|
| 37 |
<%
|
48 |
<%
|
| 38 |
'-----------------------------------------------------------------------------------------------------------------------------------
|
49 |
'-----------------------------------------------------------------------------------------------------------------------------------
|
| 39 |
Function Get_All_Versions ( nPkg_id )
|
50 |
Function Get_All_Versions ( nPkg_id )
|
| 40 |
Get_All_Versions = _
|
51 |
Get_All_Versions = _
|
| 41 |
" SELECT PV.PV_ID, PV.PKG_VERSION, PV.DLOCKED, PV.MODIFIED_STAMP, USR.FULL_NAME, usr.user_name, USR.USER_EMAIL, PV.COMMENTS, PV.PKG_LABEL, PV.IS_PATCH, PV.RELEASE_NOTES_INFO "&_
|
52 |
" SELECT PV.PV_ID, PV.PKG_VERSION, PV.DLOCKED, PV.MODIFIED_STAMP, USR.FULL_NAME, usr.user_name, USR.USER_EMAIL, PV.COMMENTS, PV.PKG_LABEL, PV.IS_PATCH, PV.RELEASE_NOTES_INFO, PV.BUILD_TYPE "&_
|
| 42 |
" FROM PACKAGE_VERSIONS PV, USERS USR "&_
|
53 |
" FROM PACKAGE_VERSIONS PV, USERS USR "&_
|
| 43 |
" WHERE PV.MODIFIER_ID = USR.USER_ID "&_
|
54 |
" WHERE PV.MODIFIER_ID = USR.USER_ID "&_
|
| 44 |
" AND PV.PKG_ID = :PKG_ID"&_
|
55 |
" AND PV.PKG_ID = :PKG_ID"&_
|
| 45 |
" /*-- Manual Filer --*/"&_
|
56 |
" /*-- Manual Filer --*/"&_
|
| 46 |
" "& Construct_Filter ( parFLpkg_version, "pv.pkg_version" ) &_
|
57 |
" "& Construct_Filter ( parFLpkg_version, "pv.pkg_version" ) &_
|
| 47 |
" "& Construct_Filter ( parFLuser_name, "usr.user_name" ) &_
|
58 |
" "& Construct_Filter ( parFLuser_name, "usr.user_name" ) &_
|
| - |
|
59 |
" "& rippleFilter &_
|
| 48 |
" /*------------------*/"
|
60 |
" /*------------------*/"
|
| 49 |
|
61 |
|
| 50 |
Get_All_Versions = Replace( Get_All_Versions, ":PKG_ID", nPkg_id)
|
62 |
Get_All_Versions = Replace( Get_All_Versions, ":PKG_ID", nPkg_id)
|
| 51 |
End Function
|
63 |
End Function
|
| 52 |
'-----------------------------------------------------------------------------------------------------------------------------------
|
64 |
'-----------------------------------------------------------------------------------------------------------------------------------
|
| Line 123... |
Line 135... |
| 123 |
Response.write "<input type='image' name='btn' src='images/abtn_filter_on.gif' width='25' height='25' border='0' alt='Apply filter. (Filter is in use!)'>"
|
135 |
Response.write "<input type='image' name='btn' src='images/abtn_filter_on.gif' width='25' height='25' border='0' alt='Apply filter. (Filter is in use!)'>"
|
| 124 |
Else
|
136 |
Else
|
| 125 |
Response.write "<input type='image' name='btn' src='images/abtn_filter.gif' width='25' height='25' border='0' alt='Apply filter'>"
|
137 |
Response.write "<input type='image' name='btn' src='images/abtn_filter.gif' width='25' height='25' border='0' alt='Apply filter'>"
|
| 126 |
End If
|
138 |
End If
|
| 127 |
Response.write "<a href='"& scriptName &"?"& Persists_Query_String( "filter_reset=true" ) &"'><img src='images/abtn_remove_filter.gif' alt='Remove filter' width='25' height='25' hspace='2' border='0'></a>"
|
139 |
Response.write "<a href='"& scriptName &"?"& Persists_Query_String( "filter_reset=true" ) &"'><img src='images/abtn_remove_filter.gif' alt='Remove filter' width='25' height='25' hspace='2' border='0'></a>"
|
| - |
|
140 |
|
| - |
|
141 |
Response.write "<img src='images/spacer.gif' width='25' height='25'>"
|
| - |
|
142 |
Response.write "<a href='"& scriptName &"?"& Persists_Query_String( "hideRipple=" & not hideRipple ) &"'>"
|
| - |
|
143 |
If hideRipple Then
|
| - |
|
144 |
Response.write "<img src='images/RippleSquareOff.gif' width='25' height='25' border='0' title='Rippled Versions Hidden. Toggle'>"
|
| - |
|
145 |
Else
|
| - |
|
146 |
Response.write "<img src='images/RippleSquare.gif' width='25' height='25' border='0' title='Rippled Versions Shown. Toggle'>"
|
| - |
|
147 |
End If
|
| - |
|
148 |
Response.write "</a>"
|
| - |
|
149 |
|
| 128 |
%></td>
|
150 |
%></td>
|
| 129 |
<td width="1" valign="middle" background="images/bg_action_norm.gif"><a href="javascript:;" onClick="window.opener.document.location='dependencies.asp?pv_id=<%=parPv_id%>';self.close();"><img src="images/abtn_open.gif" width="46" height="25" hspace="5" border="0" alt="Open In Parent Window."></a></td>
|
151 |
<td width="1" valign="middle" background="images/bg_action_norm.gif"><a href="javascript:;" onClick="window.opener.document.location='dependencies.asp?pv_id=<%=parPv_id%>';self.close();"><img src="images/abtn_open.gif" width="46" height="25" hspace="5" border="0" alt="Open In Parent Window."></a></td>
|
| 130 |
<td width="1" valign="middle" background="images/bg_action_norm.gif"><a href="javascript:;" onClick="self.close();"><img src="images/abtn_close.gif" width="46" height="25" hspace="5" border="0" alt="Close this window."></a></td>
|
152 |
<td width="1" valign="middle" background="images/bg_action_norm.gif"><a href="javascript:;" onClick="self.close();"><img src="images/abtn_close.gif" width="46" height="25" hspace="5" border="0" alt="Close this window."></a></td>
|
| 131 |
</tr>
|
153 |
</tr>
|
| 132 |
</table>
|
154 |
</table>
|
| Line 176... |
Line 198... |
| 176 |
DestroyPackage = ""
|
198 |
DestroyPackage = ""
|
| 177 |
CanDestroyPackage = objAccessControl.IsVisible ( "DestroyPackage" )
|
199 |
CanDestroyPackage = objAccessControl.IsVisible ( "DestroyPackage" )
|
| 178 |
|
200 |
|
| 179 |
' Descending order
|
201 |
' Descending order
|
| 180 |
For i = lastRow To 0 Step -1
|
202 |
For i = lastRow To 0 Step -1
|
| 181 |
|
203 |
|
| 182 |
%>
|
204 |
%>
|
| 183 |
<% ' Highlight row case
|
205 |
<% ' Highlight row case
|
| 184 |
rowColor = IMGBG_ROW
|
206 |
rowColor = IMGBG_ROW
|
| 185 |
imgPointer = ""
|
207 |
imgPointer = ""
|
| 186 |
If CStr( aVersions( rsVB.FieldIndex("pv_id"), i ) ) = parPv_id Then
|
208 |
If CStr( aVersions( rsVB.FieldIndex("pv_id"), i ) ) = parPv_id Then
|