Subversion Repositories DevTools

Rev

Rev 6613 | Rev 6790 | Go to most recent revision | 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
%>
39
  <table width="100%"  border="0" cellspacing="1" cellpadding="4">
40
     <tr>
41
        <td width="1%" background="images/bg_form_lightbluedark.gif" nowrap class="body_col"></td>
42
        <td width="100%" background="images/bg_form_lightbluedark.gif" nowrap class="body_col">SBOM Project and Branch</td>
43
     </tr>
44
     <%
45
     OraDatabase.Parameters.Add "PV_ID", parPv_id,    ORAPARM_INPUT, ORATYPE_NUMBER
46
     OraDatabase.Parameters.Add "MATCH", parMode,    ORAPARM_INPUT, ORATYPE_NUMBER
47
     Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("UsedBySBOMSummary.sql"), cint(0) )
48
     OraDatabase.Parameters.Remove "PV_ID"
49
     OraDatabase.Parameters.Remove "MATCH"
50
     %>
51
     <%If rsTemp.RecordCount < 1 Then%>
52
        <tr>
53
           <td background="images/bg_form_lightgray.gif" nowrap class="form_item">&nbsp;</td>
54
           <td background="images/bg_form_lightgray.gif" nowrap class="form_item">None Found</td>
55
        </tr>
56
     <%End If%>
57
     <%While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
58
        branchId = rsTemp("branch_id")
59
        divId = "BRANCHID_" & parMode & "_" & branchId
60
        %>
61
        <tr>
62
           <td background="images/bg_form_lightgray.gif" class="form_item"></td>
63
           <td nowrap background="images/bg_form_lightgray.gif" class="form_item">
6613 dpurdie 64
              <a href="javascript:;" class="txt_linked" onClick="ToggleLoadControl('<%=divId%>','UsedBySBOMDetail.asp?pv_id=<%=parPv_id%>&branch_id=<%=branchId%>&mode=<%=parMode%>');">
6270 dpurdie 65
                    <img id=IMG_<%=divId%> src="images/bt_plus.gif" border="0" align="absmiddle" hspace="3">
66
                    <%= rsTemp("proj_name") & " / " & rsTemp("branch_name") &" ("& rsTemp("count") &")"%>
67
              </a>
68
              <DIV class="form_item" id="<%=divId%>" style="display:none;"><%=enumLOADING%></DIV>
69
           </td>
70
        </tr>
71
        <%rsTemp.MoveNext
72
     WEnd
73
     rsTemp.Close
74
     Set rsTemp = nothing%>
75
 
76
  </table><br>
77
<%
78
Call Destroy_All_Objects
79
%>