Subversion Repositories DevTools

Rev

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

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