Subversion Repositories DevTools

<%
'=====================================================
'   _used_by_all.asp
'   Core Implementation.
'   Needs to be used via a wrapper
'=====================================================
%>
<%
'------------ Variable Definition -------------
Dim rsTemp
Dim totalBuildTime : totalBuildTime = 0
Dim bUnknown : bUnknown = False
'------------ Constants Declaration -----------
'------------ Variable Init -------------------
'----------------------------------------------
'
'
'----------------------------------------------
%>
<script language="JavaScript" type="text/JavaScript">
formTips.tips.h_buildTime       = stdTip(300, 'Est. Build Duration', 'Estimated build duration in seconds. Based simply on the last build duration for this package');

formTips.tips.h_buildLevel       = stdTip(300, 'Build Level', 'This is a mesaure of the distance between the current package and the dependent package.' +
                                                            '<p>It is not a build order - that is much more complex to calculate');
</script>
<script language="JavaScript" type="text/javascript">
        $(document).ready(function() {
                /* Init DataTables */

        table = $("#pkgDeps").DataTable({
            "paging":   false,
            "info":     true,
            dom: "rtif",
            ordering: true,
            order: [[ 1, "asc" ]],
            lengthChange : false,

            columns: [
               { width: "1%",  className: "dt-nowrap black",  orderable: false, searchable: false},
               { width: "1%",  className: "dt-nowrap black",  orderable: true, searchable: false},
               { width: "1%",  className: "dt-nowrap black"  },
               { width: "25%", className: "dt-nowrap black" },
               { width: "5%",  className: "dt-nowrap black" },
               { width: "50%", className: "dt-nowrap black", orderable: false, searchable: false },
               { width: "5%",  className: "dt-nowrap black", orderable: false, searchable: false },
           ],
        });
    });
</script>

    <%If pkgInfoHash.Exists("pv_id") Then%>
    <%If Request("rtag_id") <> "" Then%>
     <br>
     <span class="body_sect">Used by Packages In This Release - Complete list</span>
     <br>
     <!-- USED BY ALL ------------------------------------------------>
     <table width="100%" border="0" cellspacing="1" cellpadding="3" class="etable" id="pkgDeps">
        <thead class="body_hcol">
         <tr class="body_col form_field_bg">
           <th class="form_field nowrap noCsv"></th>
           <th class="form_field nowrap noCsv">Build<br>Level<%=Quick_Help("h_buildLevel")%></th>
           <th class="form_field nowrap ">Name</th>
           <th class="form_field nowrap ">Version</th>
           <th class="form_field nowrap ">Build<br>Time<%=Quick_Help("h_buildTime")%></th>
           <th class="form_field nowrap noCsv"></th>
           <th class="form_field nowrap noCsv">Last Modified</th>
         </tr>
        </thead>
        <%
        OraDatabase.Parameters.Add "RTAG_ID", parRtag_id,                 ORAPARM_INPUT, ORATYPE_NUMBER
        OraDatabase.Parameters.Add "PV_ID",   pkgInfoHash.Item("pv_id"),  ORAPARM_INPUT, ORATYPE_NUMBER

        Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("UsedByAllPackagesInThisRelease.sql"), cint(0))

        OraDatabase.Parameters.Remove "PV_ID"
        OraDatabase.Parameters.Remove "RTAG_ID"
        %>
        <%If rsTemp.RecordCount < 1 Then%>
           <tr class="form_item_pad form_field_grey_bg">
              <td nowrap>&nbsp;</td>
              <td class="form_item_pad" colspan=5>Leaf Package - Is not used by any other package in this Release</td>
           </tr>
        <%End If%>
        <%While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
            Dim buildTime : buildTime = rsTemp("build_time")
            If ISNULL(buildTime) Then
                buildTime = "<SPAN class='err_alert'>Unknown</SPAN>"
                bUnknown = TRUE
            Else
                buildTime = CLng(buildTime)
                totalBuildTime = totalBuildTime + buildTime
            End If
         %>
           <tr class="form_item_pad form_field_grey_bg csvData">
              <%If rsTemp("deprecated_state") <> "" AND rsTemp("pkg_state") = 0 Then%>
                 <td><%=DefineStateIcon ( rsTemp("deprecated_state"), rsTemp("dlocked"), NULL, NULL, pkgInfoHash.Item("build_type"), TRUE )%></td>
              <%Else%>
                 <td><%=DefineStateIcon ( rsTemp("pkg_state"), rsTemp("dlocked"), NULL, NULL, pkgInfoHash.Item("build_type"), TRUE )%></td>
              <%End If%>

              <td class="form_item_pad" nowrap><%=rsTemp("BuildLevel")%></td>
              <td class="form_item_pad" nowrap><a href="<%=ScriptName%>?pv_id=<%=rsTemp("pv_id")%>&rtag_id=<%=parRtag_id%>" class="txt_linked"><%=rsTemp("pkg_name")%></a></td>
              <td class="form_item_pad nowrap"><%=rsTemp("pkg_version")%></td>
              <td class="form_item_pad nowrap"><%=buildTime%></td>
              <td class="form_item_pad"></td>
              <td class="form_item_pad nowrap"><%=emailField(enum_imgUser & rsTemp("full_name"), rsTemp("user_email"))%>&nbsp;<%=DisplayDate ( rsTemp("modified_stamp") )%></td>
           </tr>
           <%rsTemp.MoveNext
        WEnd%>
        <tfoot>
           <tr class="form_item_pad form_field_grey_bg">
              <td class="form_item_pad" nowrap colspan=4>Total Packages: <%=rsTemp.RecordCount%></td>
              <td class="form_item_pad" nowrap colspan=3>Total Built Time <%=totalBuildTime%>&nbsp;[<%=NiceDuration(totalBuildTime)%>]
                <%If bUnknown Then%>
                    <SPAN class="err_alert">&nbsp;Note:Some package build times not known</SPAN>
                <%End If%>
              </td>
           </tr>
         </tfoot>
     </table>
    <%End If%>
    <%rsTemp.Close()%>
    <%Set rsTemp = nothing%>
    <!-- END - USED BY ALL -->
<%End If%>