Subversion Repositories DevTools

Rev

Rev 6790 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
6270 dpurdie 1
<%@LANGUAGE="VBSCRIPT"%>
2
<%
3
'=====================================================
4
'   UsedBySBOMSummary.asp
5
'   Show the body of the used by SBOM summary display
6
'   This is invoked via AJAX
7
'=====================================================
8
%>
9
<%
10
Option explicit
11
' Good idea to set when using redirect
12
Response.Expires = 0	' always load the page, dont store
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
<%
20
'------------ Variable Definition -------------
21
Dim rsTemp
22
Dim branchId
23
Dim parPv_id
24
Dim parMode
25
Dim divId
26
'------------ Constants Declaration -----------
27
'------------ Variable Init -------------------
28
parPv_id = Request ("pv_id")
29
parMode = Request ("mode")
30
'----------------------------------------------
31
%>
32
<%
33
'------------------------------------------------------------------------------------------------------------------------
34
%>
35
<%
36
'------------------------ MAIN LINE ---------------------------------
37
'--------------------------------------------------------------------
38
%>
6790 dpurdie 39
  <table width="100%"  border="0" cellspacing="1" cellpadding="4" class="stdGrey">
40
      <thead>
41
         <tr>
42
            <th width="1%"   nowrap></th>
43
            <th width="100%" nowrap>SBOM Project and Branch</th>
44
         </tr>
45
      </thead>
6270 dpurdie 46
     <%
47
     OraDatabase.Parameters.Add "PV_ID", parPv_id,    ORAPARM_INPUT, ORATYPE_NUMBER
48
     OraDatabase.Parameters.Add "MATCH", parMode,    ORAPARM_INPUT, ORATYPE_NUMBER
49
     Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("UsedBySBOMSummary.sql"), cint(0) )
50
     OraDatabase.Parameters.Remove "PV_ID"
51
     OraDatabase.Parameters.Remove "MATCH"
52
     %>
53
     <%If rsTemp.RecordCount < 1 Then%>
54
        <tr>
6790 dpurdie 55
           <td nowrap>&nbsp;</td>
56
           <td nowrap>None Found</td>
6270 dpurdie 57
        </tr>
58
     <%End If%>
59
     <%While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
60
        branchId = rsTemp("branch_id")
61
        divId = "BRANCHID_" & parMode & "_" & branchId
62
        %>
63
        <tr>
6790 dpurdie 64
           <td></td>
65
           <td nowrap>
6827 dpurdie 66
              <span class="pointer txt_linked" onClick="ToggleLoadControl('<%=divId%>','UsedBySBOMDetail.asp?pv_id=<%=parPv_id%>&branch_id=<%=branchId%>&mode=<%=parMode%>');">
6270 dpurdie 67
                    <img id=IMG_<%=divId%> src="images/bt_plus.gif" border="0" align="absmiddle" hspace="3">
68
                    <%= rsTemp("proj_name") & " / " & rsTemp("branch_name") &" ("& rsTemp("count") &")"%>
6827 dpurdie 69
              </span>
6790 dpurdie 70
              <DIV id="<%=divId%>" style="display:none;"><%=enumLOADING%></DIV>
6270 dpurdie 71
           </td>
72
        </tr>
73
        <%rsTemp.MoveNext
74
     WEnd
75
     rsTemp.Close
76
     Set rsTemp = nothing%>
77
 
78
  </table><br>
79
<%
80
Call Destroy_All_Objects
81
%>