Subversion Repositories DevTools

Rev

Rev 125 | 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">Branches</td>
127 
               <td nowrap class="body_txt" valign="top" background="images/bg_form_lightbluedark.gif">Last Modified</td>
128 
            </tr>
129 
 
130 
            <%
131 
            OraDatabase.Parameters.Add "RTAG_ID", Request("rtag_id"),    ORAPARM_INPUT, ORATYPE_NUMBER
132 
 
133 
            Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("PackageMetricsList.sql"), cint(0))
134 
 
135 
            OraDatabase.Parameters.Remove "RTAG_ID"
136 
 
137 
            If rsTemp.RecordCount < 1 Then
138 
            %>
139 
               <tr>
140 
                  <td colspan="7" background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
141 
               </tr>
142 
            <%
143 
            Else
144 
 
145 
               While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
146 
               %>
147 
 
148 
                  <tr>
149 
                     <td background="images/bg_form_lightgray.gif" nowrap class="body_txt">
150 
                        <SPAN id="IMG_EXPAND_RTAG_<%=Request("rtag_id")%>_<%=rsTemp("pv_id")%>_PREV_PKG_VERS" style="display:block;">
151 
                           <a href="javascript:;" class="txt_linked" onClick="RequestPreviousPackageVersions('?rtag_id=<%=Request("rtag_id")%>&pv_id=<%=rsTemp("pv_id")%>', '<%=Request("rtag_id")&"_"&rsTemp("pv_id")%>');">
152 
                              <img src="images/bt_plus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_world.gif" border="0" align="absmiddle" hspace="3">
153 
                           </a>
154 
                           <a class="txt_linked" href="dependencies.asp?pv_id=<%=rsTemp("pv_id")%>&rtag_id=<%=rsTemp("rtag_id")%>">
155 
                              <%=rsTemp("pkg_name")%>
156 
                              <%=VBNEWLine%><%=rsTemp("pkg_version")%>
157 
                           </a>
158 
                        </SPAN>
159 
                        <SPAN id="IMG_COLLAPSE_RTAG_<%=Request("rtag_id")%>_<%=rsTemp("pv_id")%>_PREV_PKG_VERS" style="display:none;">
160 
                           <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');">
161 
                              <img src="images/bt_minus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_world.gif" border="0" align="absmiddle" hspace="3">
162 
                           </a>
163 
                           <a class="txt_linked" href="dependencies.asp?pv_id=<%=rsTemp("pv_id")%>&rtag_id=<%=rsTemp("rtag_id")%>">
164 
                              <%=rsTemp("pkg_name")%>
165 
                              <%=VBNEWLine%><%=rsTemp("pkg_version")%>
166 
                           </a>
167 
                        </SPAN>
168 
                     </td>
169 
                     <td nowrap class="body_txt" background="images/bg_form_lightgray.gif">
170 
                        <%If rsTemp("is_autobuildable") = "Y" Then%>Yes<%Else%>No<%End If%>
171 
                     </td>
172 
                     <td nowrap class="body_txt" background="images/bg_form_lightgray.gif"><%=rsTemp("code_lines")%></td>
173 
                     <td nowrap class="body_txt" background="images/bg_form_lightgray.gif">
174 
                        <%If rsTemp("unit_tested") = "Y" Then%>Yes<%Else%>No<%End If%>
175 
                     </td>
176 
                     <td nowrap class="body_txt" background="images/bg_form_lightgray.gif">
177 
                        <%If rsTemp("autotested") = "Y" Then%>Yes<%Else%>No<%End If%>
178 
                     </td>
179 
                     <td nowrap class="body_txt" background="images/bg_form_lightgray.gif"><%=rsTemp("branches")%></td>
180 
                     <td nowrap class="body_txt" background="images/bg_form_lightgray.gif"><%=EuroDate(rsTemp("modified_stamp"))%></td>
181 
                  </tr>
182 
                  <tr>
183 
                     <td nowrap class="body_txt" colspan="3">
184 
                        <div id="DIVRTAG_<%=Request("rtag_id")%>_<%=rsTemp("pv_id")%>_PREV_PKG_VERS" style="display:none;"><%=enumLOADING%></div>
185 
                     </td>
186 
                  </tr>
187 
 
188 
                  <%rsTemp.MoveNext
189 
               WEnd
190 
               rsTemp.Close
191 
               Set rsTemp = nothing
192 
 
193 
            End If
194 
            %>
195 
         </table>
196 
      </td>
197 
   </tr>
119 ghuddy 198 
</table>
199 
<br>
125 ghuddy 200 
 
119 ghuddy 201 
<%
202 
Call Destroy_All_Objects
125 ghuddy 203 
%>