Subversion Repositories DevTools

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
119 ghuddy 1 
<%@LANGUAGE="VBSCRIPT"%>
2 
<%
3 
'=====================================================
4 
'|                                                   |
129 ghuddy 5 
'|                    USED BY                   |
119 ghuddy 6 
'|                                                   |
7 
'=====================================================
8 
%>
9 
<%
10 
Option explicit
11 
' Good idea to set when using redirect
129 ghuddy 12 
Response.Expires = 0   ' always load the page, dont store
119 ghuddy 13 
%>
14 
<!--#include file="common/conf.asp"-->
15 
<!--#include file="common/globals.asp"-->
16 
<!--#include file="common/formating.asp"-->
17 
<!--#include file="common/qstr.asp"-->
18 
<!--#include file="common/common_subs.asp"-->
19 
<!--#include file="common/common_dbedit.asp"-->
20 
<!--#include file="_tabs.asp"-->
21 
<!--#include file="common/_package_common.asp"-->
22 
<%
23 
'------------ ACCESS CONTROL ------------------
24 
%>
25 
<!--#include file="_access_control_general.asp"-->
26 
<%
27 
'------------ Variable Definition -------------
28 
Dim rsTemp, rsState
29 
Dim projId
145 ghuddy 30 
Dim rsQry
31 
Dim isDaemonEnabledRelease
119 ghuddy 32 
'------------ Constants Declaration -----------
33 
Const IMG_SVTREE = "<img src='images/i_vtree_small.gif' hspace='3' align='absmiddle' border='0'>"
34 
Const IMG_WORLD = "<img src='images/i_foldero_small.gif' hspace='3' align='absmiddle' border='0'>"
35 
Const IMG_GAP = "<img src='images/spacer.gif' width='20' height='1' border='0'>"
36 
Const IMG_POINTER = "<img src='images/i_pointer.gif' border='0'>"
37 
'------------ Variable Init -------------------
38 
'----------------------------------------------
39 
%>
40 
<%
41 
'-----------------------------------------------------------------------------------------------------------------------------
129 ghuddy 42 
Sub SetUnignoreWarnings (strList)
119 ghuddy 43 
 
129 ghuddy 44 
   'Response.Write( pkgInfoHash.Item ("pkg_id"))
119 ghuddy 45 
 
129 ghuddy 46 
   OraDatabase.Parameters.Add "RTAG_ID",   parRtag_id,                  ORAPARM_INPUT, ORATYPE_NUMBER
47 
   OraDatabase.Parameters.Add "PKG_ID",    pkgInfoHash.Item ("pkg_id"), ORAPARM_INPUT, ORATYPE_NUMBER
48 
   OraDatabase.Parameters.Add "SELECTED",  strList,                     ORAPARM_INPUT, ORATYPE_VARCHAR2
119 ghuddy 49 
 
129 ghuddy 50 
   If pkgInfoHash.Item ("v_ext") <> "" Then
51 
      OraDatabase.Parameters.Add "V_EXT",  pkgInfoHash.Item ("v_ext"), ORAPARM_INPUT, ORATYPE_VARCHAR2
52 
   Else
53 
      OraDatabase.Parameters.Add "V_EXT",  NULL, ORAPARM_INPUT, ORATYPE_VARCHAR2
54 
   End If
119 ghuddy 55 
 
129 ghuddy 56 
   Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("UnIgnoreUsedByPackagesInThisRelease.sql"), cint(0))
119 ghuddy 57 
 
129 ghuddy 58 
   While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
59 
      Call SetIgnoreWarnings(NULL, rsTemp("pv_id"), parRtag_id)
60 
      rsTemp.MoveNext()
61 
   Wend
119 ghuddy 62 
 
129 ghuddy 63 
   Set rsTemp = Nothing
64 
   rsTemp.Close()
119 ghuddy 65 
 
129 ghuddy 66 
   OraDatabase.Parameters.Remove "RTAG_ID"
67 
   OraDatabase.Parameters.Remove "PKG_ID"
68 
   OraDatabase.Parameters.Remove "V_EXT"
69 
   OraDatabase.Parameters.Remove "SELECTED"
119 ghuddy 70 
 
71 
End Sub
72 
'-----------------------------------------------------------------------------------------------------------------------------
145 ghuddy 73 
 
74 
isDaemonEnabledRelease = is_daemon_enabled_release(parRtag_id, TRUE)
75 
 
119 ghuddy 76 
If Request("action") <> "" Then
129 ghuddy 77 
   %>
78 
   <!--#include file="_access_control_login.asp"-->
79 
   <!--#include file="_access_control_project.asp"-->
80 
   <%
81 
   If ( parRtag_id <> "") AND (parPv_id <> "") Then
145 ghuddy 82 
 
129 ghuddy 83 
      Dim posComma, txt, posUnderscore, dpvId, pvId, value, pvIdList, apvIdList, strList
119 ghuddy 84 
 
145 ghuddy 85 
      If isDaemonEnabledRelease = FALSE Then
119 ghuddy 86 
 
145 ghuddy 87 
         Set pvIdList = CreateObject("Scripting.Dictionary")
88 
         'On Error Resume Next
89 
         txt = Mid(Request("ignore_warnings"), 1, len(Request("ignore_warnings")))
129 ghuddy 90 
         posComma = InStr(txt, ",")
119 ghuddy 91 
 
145 ghuddy 92 
         While posComma <> 0
93 
            'Response.Write(txt)
94 
            value = Mid(txt, 1, posComma-1)
95 
            posUnderscore = Instr(value, "_")
96 
            pvId = Mid(value, 1, posUnderscore - 1)
97 
            dpvId = Mid(value, posUnderscore + 1, posComma-1)
119 ghuddy 98 
 
145 ghuddy 99 
            Call SetIgnoreWarnings(dpvId, pvId, parRtag_id)
100 
            pvIdList.Add CStr( pvId ), Empty
101 
            txt = Mid(txt, posComma + 1, Len(txt))
102 
            posComma = InStr(txt, ",")
103 
         WEnd
119 ghuddy 104 
 
145 ghuddy 105 
         If posComma = 0 And Len(txt) > 0 Then
106 
            posUnderscore = Instr(txt, "_")
107 
            pvId = Mid(txt, 1, posUnderscore - 1)
108 
            dpvId = Mid(txt, posUnderscore + 1)
109 
            Call SetIgnoreWarnings(dpvId, pvId, parRtag_id)
110 
            pvIdList.Add CStr( pvId ), Empty
111 
         End if
119 ghuddy 112 
 
145 ghuddy 113 
         apvIdList = pvIdList.Keys
119 ghuddy 114 
 
145 ghuddy 115 
         'strList = 0
119 ghuddy 116 
 
145 ghuddy 117 
         'For Each pvId In apvIdList
118 
         '   strList = strList&", "&pvId
119 
         'Next
119 ghuddy 120 
 
145 ghuddy 121 
 
122 
         'Call SetUnignoreWarnings (strList)
123 
         'Call Notify ( parRtag_id )
124 
 
125 
      End If
126 
 
129 ghuddy 127 
      Response.Redirect("used_by.asp?pv_id="& parPv_id &"&rtag_id="& parRtag_id)
128 
   Else
129 
      Response.write "Some mandatory parameters are missing!" & "<br>" 'TODO
130 
      Response.write QSTR_All
131 
   End If
119 ghuddy 132 
End If
133 
%>
134 
<html>
135 
<title><%=Title(Request("rtag_id"))%></title>
136 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
137 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
138 
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
139 
<link rel="stylesheet" href="images/navigation.css" type="text/css">
140 
<script language="JavaScript" src="images/common.js"></script>
141 
<script language="JavaScript" src="scripts/remote_scripting.js"></script>
142 
<script language="javascript">
143 
<!--
144 
function checkUncheckAll(theElement) {
129 ghuddy 145 
   var theForm = theElement.form, z = 0;
146 
   for(z=0; z<theForm.length;z++){
119 ghuddy 147 
      if(theForm[z].type == 'checkbox' && theForm[z].name != 'checkall' && theForm[z].disabled != true){
129 ghuddy 148 
         theForm[z].checked = theElement.checked;
149 
      }
150 
   }
151 
}
119 ghuddy 152 
//-->
153 
</script>
154 
<!-- DROPDOWN MENUS -->
155 
<!--#include file="_menu_def.asp"-->
156 
<script language="JavaScript1.2" src="images/popup_menu.js"></script>
157 
<script language="JavaScript" type="text/javascript">
158 
<!--
159 
 
160 
function RequestUsedByThisProject( paramString, rowId ){
129 ghuddy 161 
   var requestURL = 'RequestUsedByThisProject.asp';
119 ghuddy 162 
 
129 ghuddy 163 
   // Show div
164 
   ToggleDisplay( 'PROJECT_'+ rowId, 'IMG_EXPAND_USED_BY_' + rowId, 'IMG_COLLAPSE_USED_BY_' + rowId );
119 ghuddy 165 
 
129 ghuddy 166 
   // Set ajax divname
167 
   ajaxdivname = 'PROJECT_'+ rowId;
119 ghuddy 168 
 
129 ghuddy 169 
   if ( MM_findObj( ajaxdivname ).innerHTML == '<%=enumLOADING%>')
170 
   {
171 
      //Append the name to search for to the requestURL
172 
      var url = requestURL + paramString;
119 ghuddy 173 
 
129 ghuddy 174 
      //Create the xmlHttp object to use in the request
175 
      //stateChangeHandler will fire when the state has changed, i.e. data is received back
176 
      // This is non-blocking (asynchronous)
177 
      xmlHttp = GetXmlHttpObject(stateChangeHandler);
119 ghuddy 178 
 
129 ghuddy 179 
      //Send the xmlHttp get to the specified url
180 
      xmlHttp_Get(xmlHttp, url);
181 
   }
119 ghuddy 182 
}
183 
 
184 
//-->
185 
</script>
186 
</head>
187 
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" >
188 
<!-- MENU LAYERS -------------------------------------->
129 ghuddy 189 
<div id="popmenu" class="menuskin" onMouseover="clearhidemenu();highlightmenu(event,'on')" onMouseout="highlightmenu(event,'off');dynamichide(event)">
119 ghuddy 190 
  <!----------------------------------------------------->
191 
</div>
192 
<!-- HEADER -->
193 
<!--#include file="_header.asp"-->
194 
<!-- BODY ---->
195 
<table width="100%" border="0" cellspacing="0" cellpadding="0">
129 ghuddy 196 
   <tr>
197 
      <td valign="top" width="1" background="images/bg_bage.gif">
198 
         <!-- LEFT -->
199 
         <!--#include file="_environment.asp"-->
200 
      </td>
201 
      <td width="1" bgcolor="#999999"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
202 
      <td valign="top" width="100%">
203 
         <!-- MIDDLE -->
204 
         <table width="100%" border="0" cellspacing="0" cellpadding="0">
205 
            <tr>
206 
               <td width="1%" background="images/bg_action_norm.gif"><IMG height=35 src="images/spacer.gif" width=15></td>
207 
               <td width="100%" background="images/bg_action_norm.gif"><!--#include file="_pkg_action_buttons.asp"--></td>
208 
               <td width="1%" background="images/bg_action_norm.gif"><IMG height=1 src="images/spacer.gif" width=15></td>
209 
            </tr>
210 
            <!-- PACKAGE PROPERTIES ----------------------------  -->
211 
            <%Call RenderPackageProperties ()%>
212 
            <tr>
213 
               <td background="images/bg_lght_gray.gif">&nbsp;</td>
214 
               <td valign="bottom" background="images/bg_lght_gray.gif">
215 
                  <table width="100" border="0" cellspacing="0" cellpadding="0">
216 
                     <tr>
217 
                        <td><IMG height=1 src="images/spacer.gif" width=50></td>
218 
                        <td>
219 
                           <!-- TABS ------------------------------------->
220 
                           <%Call Generate_Tab_Menu ( TABarray1, "Used by", "orange" )%>
221 
                        </td>
222 
                     </tr>
223 
                  </table>
224 
               </td>
225 
               <td background="images/bg_lght_gray.gif">&nbsp;</td>
226 
            </tr>
227 
            <tr>
228 
               <td background="images/lbox_bg_orange.gif"><IMG height=35 src="images/spacer.gif" width=1></td>
229 
               <td background="images/lbox_bg_orange.gif">
230 
                  <!-- TAB ACTION BUTTONS ------------------------------------->
231 
               </td>
232 
               <td background="images/lbox_bg_orange.gif">&nbsp;</td>
233 
            </tr>
234 
            <tr>
235 
               <td></td>
236 
               <td valign="top">
237 
                  <!-- DETAILS ------------------------------------------------->
238 
                  <%
239 
                  '-- FROM START ---------------------------------------------------------------------------------------------------------
240 
                  objFormComponent.FormName = "FormName"
241 
                  objFormComponent.Action = ScriptName&"?pv_id="&Request("pv_id")&"&rtag_id="&parRtag_id
242 
                  Call objFormComponent.FormStart()
243 
                  %>
244 
                  <%If Request("rtag_id") <> "" Then%>
245 
                     <br>
246 
                     <span class="body_sect">Used by Packages In This Release</span>         <br>
247 
                     <!-- USED BY ------------------------------------------------>
248 
                     <table width="100%" border="0" cellspacing="1" cellpadding="3">
249 
                        <tr>
145 ghuddy 250 
                           <%If isDaemonEnabledRelease = FALSE Then%>
251 
                              <td background="images/bg_form_lightbluedark.gif" nowrap width="1" class="form_field"><INPUT type=checkbox name="checkall" value="Check All" onClick="checkUncheckAll(this);"></td>
252 
                           <%End If%>
129 ghuddy 253 
                           <td background="images/bg_form_lightbluedark.gif" nowrap width="1"></td>
254 
                           <td background="images/bg_form_lightbluedark.gif" nowrap width="1" class="form_field">Name</td>
255 
                           <td background="images/bg_form_lightbluedark.gif" nowrap width="25%" class="form_field">Version</td>
256 
                           <td background="images/bg_form_lightbluedark.gif" nowrap width="25%" class="form_field">Location</td>
257 
                           <td background="images/bg_form_lightbluedark.gif" nowrap width="1" class="form_field"></td>
258 
                           <td background="images/bg_form_lightbluedark.gif" nowrap width="25%" class="form_field">Version Used</td>
259 
                           <td background="images/bg_form_lightbluedark.gif" nowrap width="25%" class="form_field">Last Modified</td>
260 
                        </tr>
261 
                        <%
145 ghuddy 262 
                        OraDatabase.Parameters.Add "RTAG_ID", parRtag_id,                 ORAPARM_INPUT, ORATYPE_NUMBER
263 
                        OraDatabase.Parameters.Add "PKG_ID",  pkgInfoHash.Item("pkg_id"), ORAPARM_INPUT, ORATYPE_NUMBER
129 ghuddy 264 
 
265 
                        If pkgInfoHash.Item ("v_ext") <> "" Then
145 ghuddy 266 
                           OraDatabase.Parameters.Add "V_EXT", pkgInfoHash.Item("v_ext"), ORAPARM_INPUT, ORATYPE_VARCHAR2
129 ghuddy 267 
                        Else
145 ghuddy 268 
                           OraDatabase.Parameters.Add "V_EXT", NULL, ORAPARM_INPUT, ORATYPE_VARCHAR2
129 ghuddy 269 
                        End If
270 
 
271 
                        Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("UsedByPackagesInThisRelease.sql"), cint(0))
272 
 
273 
                        OraDatabase.Parameters.Remove "RTAG_ID"
274 
                        OraDatabase.Parameters.Remove "PKG_ID"
275 
                        OraDatabase.Parameters.Remove "V_EXT"
276 
                        %>
277 
                        <%If rsTemp.RecordCount < 1 Then%>
278 
                           <tr>
145 ghuddy 279 
                              <%If isDaemonEnabledRelease = FALSE Then%>
280 
                                 <td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
281 
                              <%End If%>
129 ghuddy 282 
                              <td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
283 
                              <td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
284 
                              <td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
285 
                              <td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td><br>
286 
                              <td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
287 
                              <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
288 
                              <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
289 
                           </tr>
290 
                        <%End If%>
291 
                        <%While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))%>
292 
                           <tr>
293 
                              <%
294 
                              Set rsState = OraDatabase.DbCreateDynaset( "select deprecated_state from release_content where rtag_id="&parRtag_id&" and pv_id="&rsTemp("pv_id"), cint(0))%>
295 
 
145 ghuddy 296 
                              <%If isDaemonEnabledRelease = FALSE Then%>
297 
                                 <%If rsTemp("dpv_id") <> parPv_id And IsNull(rsTemp("ignore_warn")) Then%>
298 
                                    <td background="images/bg_form_lightgray.gif" nowrap><input type="checkbox" name="ignore_warnings" value="<%=rsTemp("pv_id")%>_<%=rsTemp("dpv_id")%>"></td>
299 
                                 <%ElseIf rsTemp("dpv_id") = parPv_id And IsNull(rsTemp("ignore_warn")) OR NOT isNull(rsTemp("ignore_warn")) Then%>
300 
                                    <td background="images/bg_form_lightgray.gif" nowrap><input type="checkbox" name="ignore_warnings" value="<%=rsTemp("pv_id")%>_<%=rsTemp("dpv_id")%>" disabled></td>
301 
                                 <%Else%>
302 
                                    <td background="images/bg_form_lightgray.gif" nowrap><input type="checkbox" name="ignore_warnings" value="<%=rsTemp("pv_id")%>_<%=rsTemp("dpv_id")%>" checked></td>
303 
                                 <%End If%>
129 ghuddy 304 
                              <%End If%>
145 ghuddy 305 
 
306 
                              <%If rsState("deprecated_state") <> "" AND rsTemp("pkg_state") = 0 Then%>
129 ghuddy 307 
                                 <td background="images/bg_form_lightgray.gif"><%=DefineStateIcon ( rsState("deprecated_state"), rsTemp("dlocked"), NULL, NULL, pkgInfoHash.Item("build_type"), TRUE )%></td>
308 
                              <%Else%>
309 
                                 <td background="images/bg_form_lightgray.gif"><%=DefineStateIcon ( rsTemp("pkg_state"), rsTemp("dlocked"), NULL, NULL, pkgInfoHash.Item("build_type"), TRUE )%></td>
310 
                              <%End If%>
145 ghuddy 311 
 
129 ghuddy 312 
                              <td background="images/bg_form_lightgray.gif" nowrap><a href="used_by.asp?pv_id=<%=rsTemp("pv_id")%>&rtag_id=<%=parRtag_id%>" class="txt_linked"><%=rsTemp("pkg_name")%></a></td>
313 
                              <td background="images/bg_form_lightgray.gif" class="form_item"><%=rsTemp("pkg_version")%></td>
314 
                              <td background="images/bg_form_lightgray.gif" class="body_txt_gray" nowrap><%=GetEnvName(rsTemp("env_area"))%></td>
315 
                              <td background="images/bg_form_lightgray.gif"><%=DefineStateIcon ( 0, "Y", rsTemp("ignore_warn"), rsTemp("is_patch_ignore"), pkgInfoHash.Item("build_type"), TRUE )%></td>
316 
                              <td background="images/bg_form_lightgray.gif" <%If rsTemp("dpv_id") <> parPv_id Then%>class="err_alert"<%Else%>class="form_item"<%End If%>><%=pkgInfoHash.Item ("pkg_name") &" "& rsTemp("dpkg_version")%></td>
317 
                              <td background="images/bg_form_lightgray.gif" class="form_item"><a href="mailto:<%=rsTemp("user_email")%>" class="txt_linked"><%=enum_imgUser%><%=rsTemp("full_name")%></a>&nbsp;<%=EuroDate ( rsTemp("modified_stamp") )%></td>
318 
                           </tr>
319 
                           <%rsTemp.MoveNext
320 
                           rsTemp.Close()
321 
                           rsState.Close()
322 
 
323 
                           Set rsState = nothing
324 
                        WEnd
325 
                        Set rsTemp = nothing
326 
                        %>
327 
                     </table>
145 ghuddy 328 
                     <%If isDaemonEnabledRelease = FALSE Then%>
329 
                        <input name="btn" type="submit" class="form_btn" value="Apply"><br>
330 
                        <SPAN class="rep_small">NOTE: Click on Apply "To Ignore Warnings" On Packages Used By</SPAN><br>
331 
                     <%End If%>
129 ghuddy 332 
                     <SPAN class="rep_small">NOTE: Versions in <SPAN class="err_alert">RED</SPAN> are different from <%=pkgInfoHash.Item("pkg_name") &" "& pkgInfoHash.Item("pkg_version")%></span>
333 
                     <br><br>
334 
                     <input type="hidden" name="action" value="true">
335 
                  <%End If%>
336 
                  <%
337 
                  Call objFormComponent.FormEnd()
338 
                  '-- FROM END ----------------------------------------------------------------------------------------------------------------
339 
                  %>
340 
                  <!------------------------------------------------------------>
341 
                  <br>
342 
                  <span class="body_sect">Used by Projects</span>
343 
                  <table width="100%"  border="0" cellspacing="1" cellpadding="4">
344 
                     <tr>
345 
                        <td width="1%" background="images/bg_form_lightbluedark.gif" nowrap class="body_col"></td>
346 
                        <td width="100%" background="images/bg_form_lightbluedark.gif" nowrap class="body_col">Project</td>
347 
                     </tr>
348 
                     <%
349 
                     Dim currWorld, bgColor, linkSync
350 
                     currWorld = -1
351 
 
352 
                     OraDatabase.Parameters.Add "RTAG_ID", parRtag_id,    ORAPARM_INPUT, ORATYPE_NUMBER
353 
                     OraDatabase.Parameters.Add "PKG_ID",  pkgInfoHash.Item ("pkg_id"),       ORAPARM_INPUT, ORATYPE_NUMBER
354 
 
355 
                     If pkgInfoHash.Item ("v_ext") <> "" Then
356 
                        OraDatabase.Parameters.Add "V_EXT",   pkgInfoHash.Item ("v_ext"),       ORAPARM_INPUT, ORATYPE_VARCHAR2
357 
                     Else
358 
                        OraDatabase.Parameters.Add "V_EXT",   NULL,       ORAPARM_INPUT, ORATYPE_VARCHAR2
359 
                     End If
360 
 
361 
                     Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("UsedByProjects.sql"), cint(0) )
362 
 
363 
                     OraDatabase.Parameters.Remove "RTAG_ID"
364 
                     OraDatabase.Parameters.Remove "PKG_ID"
365 
                     OraDatabase.Parameters.Remove "V_EXT"
366 
                     %>
367 
                     <%If rsTemp.RecordCount < 1 Then%>
368 
                        <tr>
369 
                           <td background="images/bg_form_lightgray.gif" nowrap class="form_item">&nbsp;</td>
370 
                           <td background="images/bg_form_lightgray.gif" nowrap class="form_item">&nbsp;</td>
371 
                        </tr>
372 
                     <%End If%>
373 
                     <%While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
374 
                        projId = rsTemp("proj_id")
375 
                        %>
376 
                        <tr>
377 
                           <td background="images/bg_form_lightgray.gif" class="form_item"></td>
378 
                           <td nowrap background="images/bg_form_lightgray.gif" class="form_item">
379 
                              <SPAN id="IMG_EXPAND_USED_BY_<%=projId%>" name="IMG_EXPAND_USED_BY_<%=projId%>" style="display:block;"><a href="javascript:;" class="txt_linked" onClick="RequestUsedByThisProject('?pv_id=<%=pkgInfoHash.Item("pv_id")%>&proj_id=<%=projId%>', '<%=projId%>');"><img src="images/bt_plus.gif" border="0" align="absmiddle" hspace="3"><%= rsTemp("proj_name") &" ("& rsTemp("used_count") &")"%></a></SPAN>
380 
                              <SPAN id="IMG_COLLAPSE_USED_BY_<%=projId%>" name="IMG_COLLAPSE_USED_BY_<%=projId%>" style="display:none;"><a href="javascript:;" class="txt_linked" onClick="ToggleDisplay( 'PROJECT_<%=projId%>', 'IMG_EXPAND_USED_BY_<%=projId%>', 'IMG_COLLAPSE_USED_BY_<%=projId%>');"><img src="images/bt_minus.gif" border="0" align="absmiddle" hspace="3"><%= rsTemp("proj_name") &" ("& rsTemp("used_count") &")"%></a></SPAN>
381 
 
382 
                              <DIV id="PROJECT_<%=projId%>" name="PROJECT_<%=projId%>" style="display:none;"><%=enumLOADING%></DIV>
383 
                           </td>
384 
                        </tr>
385 
 
386 
                        <%rsTemp.MoveNext
387 
                     WEnd
388 
                     rsTemp.Close
389 
                     Set rsTemp = nothing%>
390 
 
391 
                  </table><br>
392 
                  <SPAN class="rep_small">NOTE: Versions in <SPAN class="err_alert">RED</SPAN> are different from <%=pkgInfoHash.Item("pkg_name") &" "& pkgInfoHash.Item("pkg_version")%></span>
393 
                  <br>
394 
                  <!-- END DETAILS ------------------------------------------------->
395 
               </td>
396 
               <td>&nbsp;</td>
397 
            </tr>
398 
         </table>
399 
         <!-- END MIDDLE -------->
400 
      </td>
401 
   </tr>
119 ghuddy 402 
</table>
403 
<!-- FOOTER -->
404 
<!--#include file="_footer.asp"-->
405 
</body>
406 
</html>
407 
<%
408 
Call Destroy_All_Objects
409 
%>