Subversion Repositories DevTools

Rev

Rev 5506 | 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
'|            RequestProjectRelease.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
125 ghuddy 23
Dim Query_String
24
Dim Auto
119 ghuddy 25
'------------ Constants Declaration -----------
26
'------------ Variable Init -------------------
27
Set PageInfoHash = CreateObject("Scripting.Dictionary")
28
'----------------------------------------------
29
'------------------------ MAIN LINE ---------------------------------
30
%>
31
<table width="100%" border="0" cellspacing="1" cellpadding="1">
125 ghuddy 32
   <tr>
33
      <td background="images/bg_form_lightbluedark.gif">
6592 dpurdie 34
         <table width="100%" border="0" cellspacing="0" cellpadding="1">
125 ghuddy 35
            <tr>
36
               <td nowrap class="body_txt" valign="top" background="images/bg_form_lightbluedark.gif">Release</td>
37
               <td nowrap class="body_txt" valign="top" background="images/bg_form_lightbluedark.gif">Last Autobuild<br>Completed</td>
38
               <td nowrap class="body_txt" valign="top" background="images/bg_form_lightbluedark.gif">Autobuilt Packages</td>
39
               <td nowrap class="body_txt" valign="top" background="images/bg_form_lightbluedark.gif">Lines Of Code</td>
6592 dpurdie 40
               <td nowrap class="body_txt" valign="top" background="images/bg_form_lightbluedark.gif">Packages<br>Unit Tested</td>
41
               <td nowrap class="body_txt" valign="top" background="images/bg_form_lightbluedark.gif">Packages<br>Autotested</td>
42
               <td nowrap class="body_txt" valign="top" background="images/bg_form_lightbluedark.gif">Total Auto<br>Test Count</td>
125 ghuddy 43
            </tr>
119 ghuddy 44
 
125 ghuddy 45
            <%
46
            OraDatabase.Parameters.Add "PROJ_ID", Request("proj_id"),    ORAPARM_INPUT, ORATYPE_NUMBER
119 ghuddy 47
 
6592 dpurdie 48
            Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("ReleaseMetricsFull.sql"), cint(0))
125 ghuddy 49
 
50
            OraDatabase.Parameters.Remove "PROJ_ID"
51
 
52
            If rsTemp.RecordCount < 1 Then%>
53
               <tr>
54
                  <td background="images/bg_form_lightgray.gif" nowrap>&nbsp;</td>
55
               </tr>
56
            <%Else
57
 
58
               While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
59
 
60
                  Auto=FormatPercent(rsTemp("autobuilt")/rsTemp("total_packages"), 2)
61
                  %>
62
 
63
                  <tr>
64
                     <td background="images/bg_form_lightgray.gif" nowrap class="body_txt">
6592 dpurdie 65
 
125 ghuddy 66
                        <SPAN id="IMG_EXPAND_RTAG_<%=rsTemp("rtag_id")%>" style="display:block;">
67
                           <a href="javascript:;" class="txt_linked" onClick="RequestReleasePackages('?rtag_id=<%=rsTemp("rtag_id")%>', '<%=rsTemp("rtag_id")%>');">
68
                              <img src="images/bt_plus.gif" border="0" align="absmiddle" hspace="3">
69
                              <img src="images/i_world.gif" border="0" align="absmiddle" hspace="3">
70
                              <%=rsTemp("rtag_name")%>
71
                           </a>
72
                        </SPAN>
73
                        <SPAN id="IMG_COLLAPSE_RTAG_<%=rsTemp("rtag_id")%>" style="display:none;">
74
                           <a href="javascript:;" class="txt_linked" onClick="ToggleDisplay( 'DIVRTAG_<%=rsTemp("rtag_id")%>', 'IMG_EXPAND_RTAG_<%=rsTemp("rtag_id")%>', 'IMG_COLLAPSE_RTAG_<%=rsTemp("rtag_id")%>');">
75
                              <img src="images/bt_minus.gif" border="0" align="absmiddle" hspace="3">
76
                              <img src="images/i_world.gif" border="0" align="absmiddle" hspace="3">
77
                              <%=rsTemp("rtag_name")%>
78
                           </a>
79
                        </SPAN>
80
                     </td>
81
                     <td nowrap class="body_txt" background="images/bg_form_lightgray.gif"><%=rsTemp("last_build_time")%></td>
82
                     <td nowrap class="body_txt" background="images/bg_form_lightgray.gif"><%=rsTemp("autobuilt")%>/<%=rsTemp("total_packages")%> (<%=Auto%>)</td>
83
                     <td nowrap class="body_txt" background="images/bg_form_lightgray.gif"><%=rsTemp("lines_of_code")%></td>
84
                     <td nowrap class="body_txt" background="images/bg_form_lightgray.gif"><%=rsTemp("unit_tested")%></td>
85
                     <td nowrap class="body_txt" background="images/bg_form_lightgray.gif"><%=rsTemp("autotested")%></td>
6592 dpurdie 86
                     <td nowrap class="body_txt" background="images/bg_form_lightgray.gif"><%=rsTemp("total_test_count")%></td>
125 ghuddy 87
                  </tr>
88
                  <tr>
89
                     <td nowrap class="body_txt" colspan="6">
90
                        <DIV id="DIVRTAG_<%=rsTemp("rtag_id")%>" style="display:none;"><%=enumLOADING%></DIV>
91
                     </td>
92
                  </tr>
93
 
94
                  <%rsTemp.MoveNext
95
               WEnd
96
               rsTemp.Close
97
               Set rsTemp = nothing
98
 
99
            End If%>
100
         </table>
101
    </td>
119 ghuddy 102
  </tr>
103
</table>
104
<br>
125 ghuddy 105
 
119 ghuddy 106
<%
107
Call Destroy_All_Objects
125 ghuddy 108
%>