Subversion Repositories DevTools

Rev

Rev 6591 | Rev 6613 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
119 ghuddy 1 
<%@LANGUAGE="VBSCRIPT"%>
2 
<%
3 
'=====================================================
4 
'|                                                   |
125 ghuddy 5 
'|              RequestReleasePackages.asp           |
119 ghuddy 6 
'|                                                   |
7 
'=====================================================
8 
%>
9 
<%
10 
Option explicit
11 
' Good idea to set when using redirect
125 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 
<%
20 
'------------ Variable Definition -------------
21 
Dim rsTemp
22 
Dim PageInfoHash
23 
'------------ Constants Declaration -----------
24 
'------------ Variable Init -------------------
25 
Set PageInfoHash = CreateObject("Scripting.Dictionary")
26 
'----------------------------------------------
27 
%>
28 
<%
29 
'------------------------------------------------------------------------------------------------------------------------
30 
'------------------------------------------------------------------------------------------------------------------------
31 
%>
32 
<%
33 
'------------------------ MAIN LINE ---------------------------------
34 
'--------------------------------------------------------------------
35 
%>
36 
<table width="100%" border="0" cellspacing="1" cellpadding="1">
125 ghuddy 37 
   <tr>
38 
      <td background="images/bg_form_lightbluedark.gif">
39 
         <table width="100%" border="0" cellspacing="1" cellpadding="1">
40 
            <td background="images/bg_form_lightgray.gif" nowrap class="body_txt">
41 
               <SPAN id="IMG_EXPAND_RTAG_<%=Request("rtag_id")%>_TOP10_1_WEEK" style="display:block;">
42 
                  <a href="javascript:;" class="txt_linked" onClick="RequestTop10ChangesInLastWeek('?rtag_id=<%=Request("rtag_id")%>&Interval=1', '<%=Request("rtag_id")%>');">
43 
                     <img src="images/bt_plus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_world.gif" border="0" align="absmiddle" hspace="3">
44 
                     Top 10 Changed Packages In Last Week
45 
                  </a>
46 
               </SPAN>
47 
               <SPAN id="IMG_COLLAPSE_RTAG_<%=Request("rtag_id")%>_TOP10_1_WEEK" style="display:none;">
48 
                  <a href="javascript:;" class="txt_linked" onClick="ToggleDisplay( 'DIVRTAG_<%=Request("rtag_id")%>_TOP10_1_WEEK', 'IMG_EXPAND_RTAG_<%=Request("rtag_id")%>_TOP10_1_WEEK', 'IMG_COLLAPSE_RTAG_<%=Request("rtag_id")%>_TOP10_1_WEEK');">
49 
                     <img src="images/bt_minus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_world.gif" border="0" align="absmiddle" hspace="3">
50 
                     Top 10 Changed Packages In Last Week
51 
                  </a>
52 
               </SPAN>
53 
            </td>
54 
         </table>
55 
      </td>
56 
   </tr>
57 
   <tr>
58 
      <td nowrap class="body_txt" colspan="3">
59 
         <div id="DIVRTAG_<%=Request("rtag_id")%>_TOP10_1_WEEK" style="display:none;"><%=enumLOADING%></div>
60 
      </td>
61 
   </tr>
119 ghuddy 62 
 
125 ghuddy 63 
 
64 
   <tr>
65 
      <td background="images/bg_form_lightbluedark.gif">
66 
         <table width="100%" border="0" cellspacing="1" cellpadding="1">
67 
            <td background="images/bg_form_lightgray.gif" nowrap class="body_txt">
68 
               <SPAN id="IMG_EXPAND_RTAG_<%=Request("rtag_id")%>_TOP10_1_MONTH" style="display:block;">
69 
                  <a href="javascript:;" class="txt_linked" onClick="RequestTop10ChangesInLastMonth('?rtag_id=<%=Request("rtag_id")%>&Interval=2', '<%=Request("rtag_id")%>');">
70 
                     <img src="images/bt_plus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_world.gif" border="0" align="absmiddle" hspace="3">
71 
                     Top 10 Changed Packages In Last Month
72 
                  </a>
73 
               </SPAN>
74 
               <SPAN id="IMG_COLLAPSE_RTAG_<%=Request("rtag_id")%>_TOP10_1_MONTH" style="display:none;">
75 
                  <a href="javascript:;" class="txt_linked" onClick="ToggleDisplay( 'DIVRTAG_<%=Request("rtag_id")%>_TOP10_1_MONTH', 'IMG_EXPAND_RTAG_<%=Request("rtag_id")%>_TOP10_1_MONTH', 'IMG_COLLAPSE_RTAG_<%=Request("rtag_id")%>_TOP10_1_MONTH');">
76 
                     <img src="images/bt_minus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_world.gif" border="0" align="absmiddle" hspace="3">
77 
                     Top 10 Changed Packages In Last Month
78 
                  </a>
79 
               </SPAN>
80 
            </td>
81 
         </table>
82 
      </td>
83 
   </tr>
84 
   <tr>
85 
      <td nowrap class="body_txt" colspan="3">
86 
         <div id="DIVRTAG_<%=Request("rtag_id")%>_TOP10_1_MONTH" style="display:none;"><%=enumLOADING%></div>
87 
      </td>
88 
   </tr>
89 
 
90 
   <tr>
91 
      <td background="images/bg_form_lightbluedark.gif">
92 
         <table width="100%" border="0" cellspacing="1" cellpadding="1">
93 
            <td background="images/bg_form_lightgray.gif" nowrap class="body_txt">
94 
               <SPAN id="IMG_EXPAND_RTAG_<%=Request("rtag_id")%>_TOP10_3_MONTHS" style="display:block;">
95 
                  <a href="javascript:;" class="txt_linked" onClick="RequestTop10ChangesInLast3Months('?rtag_id=<%=Request("rtag_id")%>&Interval=3', '<%=Request("rtag_id")%>');">
96 
                     <img src="images/bt_plus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_world.gif" border="0" align="absmiddle" hspace="3">
97 
                     Top 10 Changed Packages In Last 3 Months
98 
                  </a>
99 
               </SPAN>
100 
               <SPAN id="IMG_COLLAPSE_RTAG_<%=Request("rtag_id")%>_TOP10_3_MONTHS" style="display:none;">
101 
                  <a href="javascript:;" class="txt_linked" onClick="ToggleDisplay( 'DIVRTAG_<%=Request("rtag_id")%>_TOP10_3_MONTHS', 'IMG_EXPAND_RTAG_<%=Request("rtag_id")%>_TOP10_3_MONTHS', 'IMG_COLLAPSE_RTAG_<%=Request("rtag_id")%>_TOP10_3_MONTHS');">
102 
                     <img src="images/bt_minus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_world.gif" border="0" align="absmiddle" hspace="3">
103 
                     Top 10 Changed Packages In Last 3 Months
104 
                  </a>
105 
               </SPAN>
106 
            </td>
107 
         </table>
108 
      </td>
109 
   </tr>
110 
   <tr>
111 
      <td nowrap class="body_txt" colspan="3">
112 
         <div id="DIVRTAG_<%=Request("rtag_id")%>_TOP10_3_MONTHS" style="display:none;"><%=enumLOADING%></div>
113 
      </td>
114 
   </tr>
115 
 
116 
 
117 
   <tr>
118 
      <td background="images/bg_form_lightbluedark.gif">
119 
         <table width="100%" border="0" cellspacing="1" cellpadding="1">
120 
            <tr>
121 
               <td nowrap class="body_txt" valign="top" background="images/bg_form_lightbluedark.gif">Package Version</td>
122 
               <td nowrap class="body_txt" valign="top" background="images/bg_form_lightbluedark.gif">Autobuilt</td>
123 
               <td nowrap class="body_txt" valign="top" background="images/bg_form_lightbluedark.gif">Lines Of Code</td>
124 
               <td nowrap class="body_txt" valign="top" background="images/bg_form_lightbluedark.gif">Unit Tested</td>
125 
               <td nowrap class="body_txt" valign="top" background="images/bg_form_lightbluedark.gif">Autotested</td>
126 
               <td nowrap class="body_txt" valign="top" background="images/bg_form_lightbluedark.gif">Last Modified</td>
127 
            </tr>
128 
 
129 
            <%
130 
            OraDatabase.Parameters.Add "RTAG_ID", Request("rtag_id"),    ORAPARM_INPUT, ORATYPE_NUMBER
131 
 
132 
            Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("PackageMetricsList.sql"), cint(0))
133 
 
134 
            OraDatabase.Parameters.Remove "RTAG_ID"
135 
 
136 
            If rsTemp.RecordCount < 1 Then
137 
            %>
138 
               <tr>
139 
                  <td colspan="7" background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
140 
               </tr>
141 
            <%
142 
            Else
143 
 
144 
               While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
145 
               %>
146 
 
147 
                  <tr>
148 
                     <td background="images/bg_form_lightgray.gif" nowrap class="body_txt">
149 
                        <SPAN id="IMG_EXPAND_RTAG_<%=Request("rtag_id")%>_<%=rsTemp("pv_id")%>_PREV_PKG_VERS" style="display:block;">
150 
                           <a href="javascript:;" class="txt_linked" onClick="RequestPreviousPackageVersions('?rtag_id=<%=Request("rtag_id")%>&pv_id=<%=rsTemp("pv_id")%>', '<%=Request("rtag_id")&"_"&rsTemp("pv_id")%>');">
151 
                              <img src="images/bt_plus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_world.gif" border="0" align="absmiddle" hspace="3">
152 
                           </a>
153 
                           <a class="txt_linked" href="dependencies.asp?pv_id=<%=rsTemp("pv_id")%>&rtag_id=<%=rsTemp("rtag_id")%>">
154 
                              <%=rsTemp("pkg_name")%>
155 
                              <%=VBNEWLine%><%=rsTemp("pkg_version")%>
156 
                           </a>
157 
                        </SPAN>
158 
                        <SPAN id="IMG_COLLAPSE_RTAG_<%=Request("rtag_id")%>_<%=rsTemp("pv_id")%>_PREV_PKG_VERS" style="display:none;">
159 
                           <a href="javascript:;" class="txt_linked" onClick="ToggleDisplay( 'DIVRTAG_<%=Request("rtag_id")%>_<%=rsTemp("pv_id")%>_PREV_PKG_VERS', 'IMG_EXPAND_RTAG_<%=Request("rtag_id")%>_<%=rsTemp("pv_id")%>_PREV_PKG_VERS', 'IMG_COLLAPSE_RTAG_<%=Request("rtag_id")%>_<%=rsTemp("pv_id")%>_PREV_PKG_VERS');">
160 
                              <img src="images/bt_minus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_world.gif" border="0" align="absmiddle" hspace="3">
161 
                           </a>
162 
                           <a class="txt_linked" href="dependencies.asp?pv_id=<%=rsTemp("pv_id")%>&rtag_id=<%=rsTemp("rtag_id")%>">
163 
                              <%=rsTemp("pkg_name")%>
164 
                              <%=VBNEWLine%><%=rsTemp("pkg_version")%>
165 
                           </a>
166 
                        </SPAN>
167 
                     </td>
168 
                     <td nowrap class="body_txt" background="images/bg_form_lightgray.gif">
169 
                        <%If rsTemp("is_autobuildable") = "Y" Then%>Yes<%Else%>No<%End If%>
170 
                     </td>
171 
                     <td nowrap class="body_txt" background="images/bg_form_lightgray.gif"><%=rsTemp("code_lines")%></td>
172 
                     <td nowrap class="body_txt" background="images/bg_form_lightgray.gif">
173 
                        <%If rsTemp("unit_tested") = "Y" Then%>Yes<%Else%>No<%End If%>
174 
                     </td>
175 
                     <td nowrap class="body_txt" background="images/bg_form_lightgray.gif">
6592 dpurdie 176 
                        <%If  IsNull(rsTemp("autotested")) OR rsTemp("autotested") <> "Y" Then %>No<%ElseIf rsTemp("test_count") = "0" Then%>?<%Else%><%=rsTemp("test_count")%><%End If%>
125 ghuddy 177 
                     </td>
5382 dpurdie 178 
                     <td nowrap class="body_txt" background="images/bg_form_lightgray.gif"><%=rsTemp("modified_stamp")%></td>
125 ghuddy 179 
                  </tr>
180 
                  <tr>
181 
                     <td nowrap class="body_txt" colspan="3">
182 
                        <div id="DIVRTAG_<%=Request("rtag_id")%>_<%=rsTemp("pv_id")%>_PREV_PKG_VERS" style="display:none;"><%=enumLOADING%></div>
183 
                     </td>
184 
                  </tr>
185 
 
186 
                  <%rsTemp.MoveNext
187 
               WEnd
188 
               rsTemp.Close
189 
               Set rsTemp = nothing
190 
 
191 
            End If
192 
            %>
193 
         </table>
194 
      </td>
195 
   </tr>
119 ghuddy 196 
</table>
197 
<br>
125 ghuddy 198 
 
119 ghuddy 199 
<%
200 
Call Destroy_All_Objects
125 ghuddy 201 
%>
6592 dpurdie 202