Subversion Repositories DevTools

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
119 ghuddy 1
<%@LANGUAGE="VBSCRIPT"%>
2
<%
3
'=====================================================
5442 dpurdie 4
'   used_by.asp
119 ghuddy 5
'=====================================================
6
%>
7
<%
8
Option explicit
9
' Good idea to set when using redirect
129 ghuddy 10
Response.Expires = 0   ' always load the page, dont store
119 ghuddy 11
%>
12
<!--#include file="common/conf.asp"-->
13
<!--#include file="common/globals.asp"-->
14
<!--#include file="common/formating.asp"-->
15
<!--#include file="common/qstr.asp"-->
16
<!--#include file="common/common_subs.asp"-->
17
<!--#include file="common/common_dbedit.asp"-->
18
<!--#include file="_tabs.asp"-->
19
<!--#include file="common/_package_common.asp"-->
20
<%
21
'------------ ACCESS CONTROL ------------------
22
%>
23
<!--#include file="_access_control_general.asp"-->
24
<%
25
'------------ Variable Definition -------------
26
Dim rsTemp, rsState
27
Dim projId
145 ghuddy 28
Dim rsQry
29
Dim isDaemonEnabledRelease
119 ghuddy 30
'------------ Constants Declaration -----------
31
Const IMG_SVTREE = "<img src='images/i_vtree_small.gif' hspace='3' align='absmiddle' border='0'>"
32
Const IMG_WORLD = "<img src='images/i_foldero_small.gif' hspace='3' align='absmiddle' border='0'>"
33
Const IMG_GAP = "<img src='images/spacer.gif' width='20' height='1' border='0'>"
34
Const IMG_POINTER = "<img src='images/i_pointer.gif' border='0'>"
35
'------------ Variable Init -------------------
36
'----------------------------------------------
37
%>
38
<%
39
'-----------------------------------------------------------------------------------------------------------------------------
129 ghuddy 40
Sub SetUnignoreWarnings (strList)
119 ghuddy 41
 
129 ghuddy 42
   'Response.Write( pkgInfoHash.Item ("pkg_id"))
119 ghuddy 43
 
129 ghuddy 44
   OraDatabase.Parameters.Add "RTAG_ID",   parRtag_id,                  ORAPARM_INPUT, ORATYPE_NUMBER
45
   OraDatabase.Parameters.Add "PKG_ID",    pkgInfoHash.Item ("pkg_id"), ORAPARM_INPUT, ORATYPE_NUMBER
46
   OraDatabase.Parameters.Add "SELECTED",  strList,                     ORAPARM_INPUT, ORATYPE_VARCHAR2
119 ghuddy 47
 
129 ghuddy 48
   If pkgInfoHash.Item ("v_ext") <> "" Then
49
      OraDatabase.Parameters.Add "V_EXT",  pkgInfoHash.Item ("v_ext"), ORAPARM_INPUT, ORATYPE_VARCHAR2
50
   Else
51
      OraDatabase.Parameters.Add "V_EXT",  NULL, ORAPARM_INPUT, ORATYPE_VARCHAR2
52
   End If
119 ghuddy 53
 
129 ghuddy 54
   Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("UnIgnoreUsedByPackagesInThisRelease.sql"), cint(0))
119 ghuddy 55
 
129 ghuddy 56
   While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
57
      Call SetIgnoreWarnings(NULL, rsTemp("pv_id"), parRtag_id)
58
      rsTemp.MoveNext()
59
   Wend
119 ghuddy 60
 
129 ghuddy 61
   Set rsTemp = Nothing
62
   rsTemp.Close()
119 ghuddy 63
 
129 ghuddy 64
   OraDatabase.Parameters.Remove "RTAG_ID"
65
   OraDatabase.Parameters.Remove "PKG_ID"
66
   OraDatabase.Parameters.Remove "V_EXT"
67
   OraDatabase.Parameters.Remove "SELECTED"
119 ghuddy 68
 
69
End Sub
70
'-----------------------------------------------------------------------------------------------------------------------------
145 ghuddy 71
 
72
isDaemonEnabledRelease = is_daemon_enabled_release(parRtag_id, TRUE)
73
 
119 ghuddy 74
If Request("action") <> "" Then
129 ghuddy 75
   %>
76
   <!--#include file="_access_control_login.asp"-->
77
   <!--#include file="_access_control_project.asp"-->
78
   <%
79
   If ( parRtag_id <> "") AND (parPv_id <> "") Then
145 ghuddy 80
 
129 ghuddy 81
      Dim posComma, txt, posUnderscore, dpvId, pvId, value, pvIdList, apvIdList, strList
119 ghuddy 82
 
145 ghuddy 83
      If isDaemonEnabledRelease = FALSE Then
119 ghuddy 84
 
145 ghuddy 85
         Set pvIdList = CreateObject("Scripting.Dictionary")
86
         'On Error Resume Next
87
         txt = Mid(Request("ignore_warnings"), 1, len(Request("ignore_warnings")))
129 ghuddy 88
         posComma = InStr(txt, ",")
119 ghuddy 89
 
145 ghuddy 90
         While posComma <> 0
91
            'Response.Write(txt)
92
            value = Mid(txt, 1, posComma-1)
93
            posUnderscore = Instr(value, "_")
94
            pvId = Mid(value, 1, posUnderscore - 1)
95
            dpvId = Mid(value, posUnderscore + 1, posComma-1)
119 ghuddy 96
 
145 ghuddy 97
            Call SetIgnoreWarnings(dpvId, pvId, parRtag_id)
98
            pvIdList.Add CStr( pvId ), Empty
99
            txt = Mid(txt, posComma + 1, Len(txt))
100
            posComma = InStr(txt, ",")
101
         WEnd
119 ghuddy 102
 
145 ghuddy 103
         If posComma = 0 And Len(txt) > 0 Then
104
            posUnderscore = Instr(txt, "_")
105
            pvId = Mid(txt, 1, posUnderscore - 1)
106
            dpvId = Mid(txt, posUnderscore + 1)
107
            Call SetIgnoreWarnings(dpvId, pvId, parRtag_id)
108
            pvIdList.Add CStr( pvId ), Empty
109
         End if
119 ghuddy 110
 
145 ghuddy 111
         apvIdList = pvIdList.Keys
119 ghuddy 112
 
145 ghuddy 113
         'strList = 0
119 ghuddy 114
 
145 ghuddy 115
         'For Each pvId In apvIdList
116
         '   strList = strList&", "&pvId
117
         'Next
119 ghuddy 118
 
145 ghuddy 119
 
120
         'Call SetUnignoreWarnings (strList)
121
         'Call Notify ( parRtag_id )
122
 
123
      End If
124
 
129 ghuddy 125
      Response.Redirect("used_by.asp?pv_id="& parPv_id &"&rtag_id="& parRtag_id)
126
   Else
127
      Response.write "Some mandatory parameters are missing!" & "<br>" 'TODO
4955 dpurdie 128
      Response.write QSTR_FullQuery
129 ghuddy 129
   End If
119 ghuddy 130
End If
131
%>
132
<html>
133
<title><%=Title(Request("rtag_id"))%></title>
5357 dpurdie 134
<link rel="shortcut icon" href="<%=FavIcon%>"/>
119 ghuddy 135
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
136
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
137
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
138
<link rel="stylesheet" href="images/navigation.css" type="text/css">
139
<script language="JavaScript" src="images/common.js"></script>
140
<script language="JavaScript" src="scripts/remote_scripting.js"></script>
5085 dpurdie 141
<!--#include file="_jquery_includes.asp"-->
119 ghuddy 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>
185 brianf 207
		       <td width="100%" background="images/bg_action_norm.gif"><%Call RenderActionBar(parRtag_id,parPv_id)%></td>
129 ghuddy 208
               <td width="1%" background="images/bg_action_norm.gif"><IMG height=1 src="images/spacer.gif" width=15></td>
209
            </tr>
210
            <tr>
183 brianf 211
              <td background="images/bg_lght_gray.gif"><IMG height="45" src="images/spacer.gif" width=1></td>
187 brianf 212
              <td background="images/bg_lght_gray.gif"><%Call RenderStatus(parRtag_id,parPv_id)%></td>
183 brianf 213
              <td background="images/bg_lght_gray.gif">&nbsp;</td>
214
            </tr>
215
            <tr>
129 ghuddy 216
               <td background="images/bg_lght_gray.gif">&nbsp;</td>
217
               <td valign="bottom" background="images/bg_lght_gray.gif">
218
                  <table width="100" border="0" cellspacing="0" cellpadding="0">
219
                     <tr>
4687 dpurdie 220
                        <td><IMG height="1" src="images/spacer.gif" width="0" alt="tab-left-margin" ></td>
129 ghuddy 221
                        <td>
222
                           <!-- TABS ------------------------------------->
223
                           <%Call Generate_Tab_Menu ( TABarray1, "Used by", "orange" )%>
224
                        </td>
225
                     </tr>
226
                  </table>
227
               </td>
228
               <td background="images/bg_lght_gray.gif">&nbsp;</td>
229
            </tr>
230
            <tr>
231
               <td background="images/lbox_bg_orange.gif"><IMG height=35 src="images/spacer.gif" width=1></td>
232
               <td background="images/lbox_bg_orange.gif">
233
                  <!-- TAB ACTION BUTTONS ------------------------------------->
234
               </td>
235
               <td background="images/lbox_bg_orange.gif">&nbsp;</td>
236
            </tr>
237
            <tr>
238
               <td></td>
239
               <td valign="top">
240
                  <!-- DETAILS ------------------------------------------------->
241
                  <%
242
                  '-- FROM START ---------------------------------------------------------------------------------------------------------
243
                  objFormComponent.FormName = "FormName"
244
                  objFormComponent.Action = ScriptName&"?pv_id="&Request("pv_id")&"&rtag_id="&parRtag_id
245
                  Call objFormComponent.FormStart()
246
                  %>
247
                  <%If Request("rtag_id") <> "" Then%>
248
                     <br>
249
                     <span class="body_sect">Used by Packages In This Release</span>         <br>
250
                     <!-- USED BY ------------------------------------------------>
251
                     <table width="100%" border="0" cellspacing="1" cellpadding="3">
252
                        <tr>
145 ghuddy 253
                           <%If isDaemonEnabledRelease = FALSE Then%>
254
                              <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>
255
                           <%End If%>
129 ghuddy 256
                           <td background="images/bg_form_lightbluedark.gif" nowrap width="1"></td>
257
                           <td background="images/bg_form_lightbluedark.gif" nowrap width="1" class="form_field">Name</td>
258
                           <td background="images/bg_form_lightbluedark.gif" nowrap width="25%" class="form_field">Version</td>
259
                           <td background="images/bg_form_lightbluedark.gif" nowrap width="25%" class="form_field">Location</td>
260
                           <td background="images/bg_form_lightbluedark.gif" nowrap width="1" class="form_field"></td>
261
                           <td background="images/bg_form_lightbluedark.gif" nowrap width="25%" class="form_field">Version Used</td>
262
                           <td background="images/bg_form_lightbluedark.gif" nowrap width="25%" class="form_field">Last Modified</td>
263
                        </tr>
264
                        <%
145 ghuddy 265
                        OraDatabase.Parameters.Add "RTAG_ID", parRtag_id,                 ORAPARM_INPUT, ORATYPE_NUMBER
266
                        OraDatabase.Parameters.Add "PKG_ID",  pkgInfoHash.Item("pkg_id"), ORAPARM_INPUT, ORATYPE_NUMBER
129 ghuddy 267
 
268
                        If pkgInfoHash.Item ("v_ext") <> "" Then
145 ghuddy 269
                           OraDatabase.Parameters.Add "V_EXT", pkgInfoHash.Item("v_ext"), ORAPARM_INPUT, ORATYPE_VARCHAR2
129 ghuddy 270
                        Else
145 ghuddy 271
                           OraDatabase.Parameters.Add "V_EXT", NULL, ORAPARM_INPUT, ORATYPE_VARCHAR2
129 ghuddy 272
                        End If
273
 
274
                        Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("UsedByPackagesInThisRelease.sql"), cint(0))
275
 
276
                        OraDatabase.Parameters.Remove "RTAG_ID"
277
                        OraDatabase.Parameters.Remove "PKG_ID"
278
                        OraDatabase.Parameters.Remove "V_EXT"
279
                        %>
280
                        <%If rsTemp.RecordCount < 1 Then%>
281
                           <tr>
145 ghuddy 282
                              <%If isDaemonEnabledRelease = FALSE Then%>
283
                                 <td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
284
                              <%End If%>
129 ghuddy 285
                              <td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
286
                              <td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
287
                              <td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
288
                              <td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td><br>
289
                              <td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
290
                              <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
291
                              <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
292
                           </tr>
293
                        <%End If%>
294
                        <%While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))%>
295
                           <tr>
296
                              <%
297
                              Set rsState = OraDatabase.DbCreateDynaset( "select deprecated_state from release_content where rtag_id="&parRtag_id&" and pv_id="&rsTemp("pv_id"), cint(0))%>
298
 
145 ghuddy 299
                              <%If isDaemonEnabledRelease = FALSE Then%>
300
                                 <%If rsTemp("dpv_id") <> parPv_id And IsNull(rsTemp("ignore_warn")) Then%>
301
                                    <td background="images/bg_form_lightgray.gif" nowrap><input type="checkbox" name="ignore_warnings" value="<%=rsTemp("pv_id")%>_<%=rsTemp("dpv_id")%>"></td>
302
                                 <%ElseIf rsTemp("dpv_id") = parPv_id And IsNull(rsTemp("ignore_warn")) OR NOT isNull(rsTemp("ignore_warn")) Then%>
303
                                    <td background="images/bg_form_lightgray.gif" nowrap><input type="checkbox" name="ignore_warnings" value="<%=rsTemp("pv_id")%>_<%=rsTemp("dpv_id")%>" disabled></td>
304
                                 <%Else%>
305
                                    <td background="images/bg_form_lightgray.gif" nowrap><input type="checkbox" name="ignore_warnings" value="<%=rsTemp("pv_id")%>_<%=rsTemp("dpv_id")%>" checked></td>
306
                                 <%End If%>
129 ghuddy 307
                              <%End If%>
145 ghuddy 308
 
309
                              <%If rsState("deprecated_state") <> "" AND rsTemp("pkg_state") = 0 Then%>
129 ghuddy 310
                                 <td background="images/bg_form_lightgray.gif"><%=DefineStateIcon ( rsState("deprecated_state"), rsTemp("dlocked"), NULL, NULL, pkgInfoHash.Item("build_type"), TRUE )%></td>
311
                              <%Else%>
312
                                 <td background="images/bg_form_lightgray.gif"><%=DefineStateIcon ( rsTemp("pkg_state"), rsTemp("dlocked"), NULL, NULL, pkgInfoHash.Item("build_type"), TRUE )%></td>
313
                              <%End If%>
145 ghuddy 314
 
129 ghuddy 315
                              <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>
316
                              <td background="images/bg_form_lightgray.gif" class="form_item"><%=rsTemp("pkg_version")%></td>
317
                              <td background="images/bg_form_lightgray.gif" class="body_txt_gray" nowrap><%=GetEnvName(rsTemp("env_area"))%></td>
318
                              <td background="images/bg_form_lightgray.gif"><%=DefineStateIcon ( 0, "Y", rsTemp("ignore_warn"), rsTemp("is_patch_ignore"), pkgInfoHash.Item("build_type"), TRUE )%></td>
319
                              <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>
320
                              <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>
321
                           </tr>
322
                           <%rsTemp.MoveNext
323
                           rsTemp.Close()
324
                           rsState.Close()
325
 
326
                           Set rsState = nothing
327
                        WEnd
328
                        Set rsTemp = nothing
329
                        %>
330
                     </table>
145 ghuddy 331
                     <%If isDaemonEnabledRelease = FALSE Then%>
332
                        <input name="btn" type="submit" class="form_btn" value="Apply"><br>
333
                        <SPAN class="rep_small">NOTE: Click on Apply "To Ignore Warnings" On Packages Used By</SPAN><br>
334
                     <%End If%>
129 ghuddy 335
                     <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>
336
                     <br><br>
337
                     <input type="hidden" name="action" value="true">
338
                  <%End If%>
339
                  <%
340
                  Call objFormComponent.FormEnd()
341
                  '-- FROM END ----------------------------------------------------------------------------------------------------------------
342
                  %>
343
                  <!------------------------------------------------------------>
344
                  <br>
345
                  <span class="body_sect">Used by Projects</span>
346
                  <table width="100%"  border="0" cellspacing="1" cellpadding="4">
347
                     <tr>
348
                        <td width="1%" background="images/bg_form_lightbluedark.gif" nowrap class="body_col"></td>
349
                        <td width="100%" background="images/bg_form_lightbluedark.gif" nowrap class="body_col">Project</td>
350
                     </tr>
351
                     <%
352
                     Dim currWorld, bgColor, linkSync
353
                     currWorld = -1
354
 
355
                     OraDatabase.Parameters.Add "RTAG_ID", parRtag_id,    ORAPARM_INPUT, ORATYPE_NUMBER
356
                     OraDatabase.Parameters.Add "PKG_ID",  pkgInfoHash.Item ("pkg_id"),       ORAPARM_INPUT, ORATYPE_NUMBER
357
 
358
                     If pkgInfoHash.Item ("v_ext") <> "" Then
359
                        OraDatabase.Parameters.Add "V_EXT",   pkgInfoHash.Item ("v_ext"),       ORAPARM_INPUT, ORATYPE_VARCHAR2
360
                     Else
361
                        OraDatabase.Parameters.Add "V_EXT",   NULL,       ORAPARM_INPUT, ORATYPE_VARCHAR2
362
                     End If
363
 
364
                     Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("UsedByProjects.sql"), cint(0) )
365
 
366
                     OraDatabase.Parameters.Remove "RTAG_ID"
367
                     OraDatabase.Parameters.Remove "PKG_ID"
368
                     OraDatabase.Parameters.Remove "V_EXT"
369
                     %>
370
                     <%If rsTemp.RecordCount < 1 Then%>
371
                        <tr>
372
                           <td background="images/bg_form_lightgray.gif" nowrap class="form_item">&nbsp;</td>
373
                           <td background="images/bg_form_lightgray.gif" nowrap class="form_item">&nbsp;</td>
374
                        </tr>
375
                     <%End If%>
376
                     <%While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
377
                        projId = rsTemp("proj_id")
378
                        %>
379
                        <tr>
380
                           <td background="images/bg_form_lightgray.gif" class="form_item"></td>
381
                           <td nowrap background="images/bg_form_lightgray.gif" class="form_item">
382
                              <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>
383
                              <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>
384
 
385
                              <DIV id="PROJECT_<%=projId%>" name="PROJECT_<%=projId%>" style="display:none;"><%=enumLOADING%></DIV>
386
                           </td>
387
                        </tr>
388
 
389
                        <%rsTemp.MoveNext
390
                     WEnd
391
                     rsTemp.Close
392
                     Set rsTemp = nothing%>
393
 
394
                  </table><br>
395
                  <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>
396
                  <br>
397
                  <!-- END DETAILS ------------------------------------------------->
398
               </td>
399
               <td>&nbsp;</td>
400
            </tr>
401
         </table>
402
         <!-- END MIDDLE -------->
403
      </td>
404
   </tr>
119 ghuddy 405
</table>
406
<!-- FOOTER -->
407
<!--#include file="_footer.asp"-->
408
</body>
409
</html>
410
<%
411
Call Destroy_All_Objects
412
%>