Subversion Repositories DevTools

Rev

Rev 6617 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6617 Rev 6618
Line 16... Line 16...
16 
<!--#include file="common/formating.asp"-->
 16 
<!--#include file="common/formating.asp"-->
17 
<!--#include file="common/qstr.asp"-->
 17 
<!--#include file="common/qstr.asp"-->
18 
<!--#include file="common/common_subs.asp"-->
 18 
<!--#include file="common/common_subs.asp"-->
19 
<%
 19 
<%
20 
'------------ Variable Definition -------------
 20 
'------------ Variable Definition -------------
21 
Dim rsTemp
 21 
Dim BaseId
22 
Dim PageInfoHash
 - 
 
23 
'------------ Constants Declaration -----------
 22 
'------------ Constants Declaration -----------
24 
'------------ Variable Init -------------------
 23 
'------------ Variable Init -------------------
25 
Set PageInfoHash = CreateObject("Scripting.Dictionary")
 - 
 
26 
'----------------------------------------------
 24 
'----------------------------------------------
27 
%>
 25 
%>
28 
<%
 26 
<%
29 
'------------------------ MAIN LINE ---------------------------------
 27 
'------------------------ MAIN LINE ---------------------------------
30 
'--------------------------------------------------------------------
 - 
 
31 
Dim BaseId
 - 
 
32 
BaseId = "TOP10_" & Request("rtag_id")
 28 
BaseId = "TOP10_" & Request("rtag_id")
33 
%>
 29 
%>
34 
<!-- RequestReleasePackages.asp -->
 30 
<!-- RequestReleasePackages.asp -->
35 
<table width="100%" border="0" cellspacing="1" cellpadding="1">
 31 
<table width="100%" border="0" cellspacing="1" cellpadding="1">
36 
<tr class="form_field_bg">
 32 
<tr class="form_field_bg">
37 
    <td nowrap class="body_row">
 33 
    <td nowrap class="body_row">
38 
        <a href='javascript:;' class="txt_linked" onClick="ToggleLoadControl('<%=BaseId%>','RequestTop10Changes.asp?rtag_id=<%=Request("rtag_id")%>&Interval=7');"><img id='IMG_<%=BaseId%>' src="images/bt_plus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_world.gif" border="0" align="absmiddle" hspace="3">Top 20 Changed Packages In Last Week</a>
 34 
        <a href='javascript:;' class="txt_linked" onClick="ToggleLoadControl('<%=BaseId%>','RequestTop10Changes.asp?rtag_id=<%=Request("rtag_id")%>&Interval=7');"><img id='IMG_<%=BaseId%>' src="images/bt_plus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_world.gif" border="0" align="absmiddle" hspace="3">Top 20 Changed Packages In Last Week</a>
39 
    </td>
 35 
    </td>
40 
</tr>
 36 
</tr>
41 
<tr class="form_field_bg" id="TGL_<%=BaseId%>" style="display:none;">
 37 
<tr class="form_field_bg" id="TGL_<%=BaseId%>" style="display:none;">
42 
  <td nowrap class="body_row"><div class='subindent' id='<%=BaseId%>'><%=enumLOADING%></div></td>
 38 
  <td nowrap class="body_row"><div class='subSectionIndent' id='<%=BaseId%>'><%=enumLOADING%></div></td>
43 
</tr>
 39 
</tr>
44 
<%BaseId = "TOP10MON_" & Request("rtag_id")%>
 40 
<%BaseId = "TOP10MON_" & Request("rtag_id")%>
45 
<tr class="form_field_bg">
 41 
<tr class="form_field_bg">
46 
    <td nowrap class="body_row">
 42 
    <td nowrap class="body_row">
47 
        <a href='javascript:;' class="txt_linked" onClick="ToggleLoadControl('<%=BaseId%>','RequestTop10Changes.asp?rtag_id=<%=Request("rtag_id")%>&Interval=31');"><img id='IMG_<%=BaseId%>' src="images/bt_plus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_world.gif" border="0" align="absmiddle" hspace="3">Top 20 Changed Packages In Last Month</a>
 43 
        <a href='javascript:;' class="txt_linked" onClick="ToggleLoadControl('<%=BaseId%>','RequestTop10Changes.asp?rtag_id=<%=Request("rtag_id")%>&Interval=31');"><img id='IMG_<%=BaseId%>' src="images/bt_plus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_world.gif" border="0" align="absmiddle" hspace="3">Top 20 Changed Packages In Last Month</a>
48 
    </td>
 44 
    </td>
49 
</tr>
 45 
</tr>
50 
<tr class="form_field_bg" id="TGL_<%=BaseId%>" style="display:none;">
 46 
<tr class="form_field_bg" id="TGL_<%=BaseId%>" style="display:none;">
51 
  <td nowrap class="body_row"><div class='subindent' id='<%=BaseId%>'><%=enumLOADING%></div></td>
 47 
  <td nowrap class="body_row"><div class='subSectionIndent' id='<%=BaseId%>'><%=enumLOADING%></div></td>
52 
</tr>
 48 
</tr>
53 
<%BaseId = "TOP10_3MON_" & Request("rtag_id")%>
 49 
<%BaseId = "TOP10_3MON_" & Request("rtag_id")%>
54 
<tr class="form_field_bg">
 50 
<tr class="form_field_bg">
55 
    <td nowrap class="body_row">
 51 
    <td nowrap class="body_row">
56 
        <a href='javascript:;' class="txt_linked" onClick="ToggleLoadControl('<%=BaseId%>','RequestTop10Changes.asp?rtag_id=<%=Request("rtag_id")%>&Interval=90');"><img id='IMG_<%=BaseId%>' src="images/bt_plus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_world.gif" border="0" align="absmiddle" hspace="3">Top 20 Changed Packages In Last 3 Months</a>
 52 
        <a href='javascript:;' class="txt_linked" onClick="ToggleLoadControl('<%=BaseId%>','RequestTop10Changes.asp?rtag_id=<%=Request("rtag_id")%>&Interval=90');"><img id='IMG_<%=BaseId%>' src="images/bt_plus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_world.gif" border="0" align="absmiddle" hspace="3">Top 20 Changed Packages In Last 3 Months</a>
57 
    </td>
 53 
    </td>
58 
</tr>
 54 
</tr>
59 
<tr class="form_field_bg" id="TGL_<%=BaseId%>" style="display:none;">
 55 
<tr class="form_field_bg" id="TGL_<%=BaseId%>" style="display:none;">
60 
  <td nowrap class="body_row"><div class='subindent' id='<%=BaseId%>'><%=enumLOADING%></div></td>
 56 
  <td nowrap class="body_row"><div class='subSectionIndent' id='<%=BaseId%>'><%=enumLOADING%></div></td>
61 
</tr>
 57 
</tr>
62 
<%BaseId = "PKGLST_" & Request("rtag_id")%>
 58 
<%BaseId = "PKGLST_" & Request("rtag_id")%>
63 
<tr class="form_field_bg">
 59 
    <tr class="form_field_bg">
64 
    <td nowrap class="body_row">
 60 
    <td nowrap class="body_row">
65 
        <a href='javascript:;' class="txt_linked" onClick="ToggleLoadControl('<%=BaseId%>',null);"><img id='IMG_<%=BaseId%>' src="images/bt_minus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_world.gif" border="0" align="absmiddle" hspace="3">Complete Package List</a>
 61 
        <a href='javascript:;' class="txt_linked" onClick="ToggleLoadControl('<%=BaseId%>','RequestReleasePackageList.asp?rtag_id=<%=Request("rtag_id")%>');"><img id='IMG_<%=BaseId%>' src="images/bt_plus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_world.gif" border="0" align="absmiddle" hspace="3">Complete Package List</a>
66 
    </td>
 62 
    </td>
67 
</tr>
 63 
</tr>
68 
<tr class="form_field_bg" id="TGL_<%=BaseId%>">
 - 
 
69 
  <td nowrap class="body_row">
 - 
 
70 
    <div class='subindent' id='<%=BaseId%>'>
 - 
 
71 
<table width="100%" border="0" cellspacing="1" cellpadding="1">
 - 
 
72 
<tr class="form_field_bg">
 - 
 
73 
  <td>
 - 
 
74 
     <table width="100%" border="0" cellspacing="1" cellpadding="1">
 - 
 
75 
        <tr class="form_field_bg">
 - 
 
76 
           <td nowrap class="body_row" valign="top">Package Version</td>
 - 
 
77 
           <td nowrap class="body_row" valign="top">Autobuilt</td>
 - 
 
78 
           <td nowrap class="body_row" valign="top">Lines Of Code</td>
 - 
 
79 
           <td nowrap class="body_row" valign="top">Unit Tested</td>
 - 
 
80 
           <td nowrap class="body_row" valign="top">Autotested</td>
 - 
 
81 
           <td nowrap class="body_row" valign="top">Last Modified</td>
 - 
 
82 
        </tr>
 - 
 
83 
 
 - 
 
84 
        <%
 - 
 
85 
        OraDatabase.Parameters.Add "RTAG_ID", Request("rtag_id"),    ORAPARM_INPUT, ORATYPE_NUMBER
 - 
 
86 
        Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("PackageMetricsList.sql"), cint(0))
 - 
 
87 
        OraDatabase.Parameters.Remove "RTAG_ID"
 - 
 
88 
 
 - 
 
89 
        If rsTemp.RecordCount < 1 Then
 - 
 
90 
        %>
 - 
 
91 
           <tr class="form_field_grey_bg">
 - 
 
92 
              <td colspan="7" nowrap>&nbsp;</td>
 - 
 
93 
           </tr>
 - 
 
94 
        <%
 - 
 
95 
        Else
 - 
 
96 
 
 - 
 
97 
           While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
 - 
 
98 
            BaseId = "PREV_" & Request("rtag_id") & "_" & rsTemp("pv_id")
 - 
 
99 
           %>
 - 
 
100 
              <tr class="form_field_grey_bg">
 - 
 
101 
                 <td nowrap class="body_row">
 - 
 
102 
                       <a href="javascript://rtag_id=<%=Request("rtag_id")%>&pv_id=<%=rsTemp("pv_id")%>;" class="txt_linked" onClick="ToggleLoadControl('<%=BaseId%>','RequestPackageVersionHistoryMetrics.asp?rtag_id=<%=Request("rtag_id")%>&pv_id=<%=rsTemp("pv_id")%>');"><img id='IMG_<%=BaseId%>' src="images/bt_plus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_world.gif" border="0" align="absmiddle" hspace="3"></a>
 64 
<tr class="form_field_bg" id="TGL_<%=BaseId%>" style="display:none;">
103 
                       <a class="txt_linked" href="dependencies.asp?pv_id=<%=rsTemp("pv_id")%>&rtag_id=<%=rsTemp("rtag_id")%>"><%=rsTemp("pkg_name")%>&nbsp;<%=rsTemp("pkg_version")%></a>
 - 
 
104 
                 </td>
 - 
 
105 
                 <td nowrap class="body_row">
 - 
 
106 
                    <%If rsTemp("is_autobuildable") = "Y" Then%>Yes<%Else%>No<%End If%>
 - 
 
107 
                 </td>
 - 
 
108 
                 <td nowrap class="body_row"><%=rsTemp("code_lines")%></td>
 - 
 
109 
                 <td nowrap class="body_row">
 - 
 
110 
                    <%If rsTemp("unit_tested") = "Y" Then%>Yes<%Else%>No<%End If%>
 - 
 
111 
                 </td>
 - 
 
112 
                 <td nowrap class="body_row">
 - 
 
113 
                    <%If  IsNull(rsTemp("autotested")) OR rsTemp("autotested") <> "Y" Then %>No<%ElseIf rsTemp("test_count") = "0" Then%>?<%Else%><%=rsTemp("test_count")%><%End If%>
 - 
 
114 
                 </td>
 - 
 
115 
                 <td nowrap class="body_row"><%=rsTemp("modified_stamp")%></td>
 - 
 
116 
              </tr>
 - 
 
117 
              <tr class="form_field_bg" id='TGL_<%=BaseId%>' style="display:none;">
 - 
 
118 
                 <td nowrap class="body_row" colspan="6"><div class='subindent' id='<%=BaseId%>'><%=enumLOADING%></td></div>
 65 
  <td nowrap class="body_row"><div class='subSectionIndent' id='<%=BaseId%>'><%=enumLOADING%></div></td>
119 
              </tr>
 - 
 
120 
              <%rsTemp.MoveNext
 - 
 
121 
           WEnd
 - 
 
122 
           rsTemp.Close
 - 
 
123 
           Set rsTemp = nothing
 - 
 
124 
        End If
 - 
 
125 
        %>
 - 
 
126 
     </table>
 - 
 
127 
  </td>
 - 
 
128 
</tr>
 - 
 
129 
    </table>
 - 
 
130 
    </div></td>
 - 
 
131 
</tr>
 66 
</tr>
- 
 
 67 
 
132 
</table>
 68 
</table>
133 
<br>
 69 
<br>
134 
<%
 70 
<%
135 
Call Destroy_All_Objects
 71 
Call Destroy_All_Objects
136 
%>
 72 
%>