Subversion Repositories DevTools

Rev

Rev 1281 | Blame | Compare with Previous | Last modification | View Log | RSS feed 

<%@LANGUAGE="VBSCRIPT"%>
<%
Option explicit
Response.Expires = 0    ' always load the page, dont store
%>
<%
'=====================================================
'                                       ISSUE NOTES
'=====================================================
%>
<!--#include file="common/conf.asp"-->
<!--#include file="common/globals.asp"-->
<!--#include file="common/formating.asp"-->
<!--#include file="common/qstr.asp"-->
<!--#include file="common/common_subs.asp"-->
<!--#include file="_tabs.asp"-->
<!--#include file="common/cq_common_subs.asp"-->
<!--#include file="common/_popup_window_common.asp"-->
<%
'------------ ACCESS CONTROL ------------------
%>
<!--#include file="_access_control_general.asp"-->
<%
'------------ Variable Definition -------------
Dim rsCQ
Dim ddWidth
Dim parIss_db
Dim parIss_id
'------------ Constants Declaration -----------
'------------ Variable Init -------------------
Set pkgInfoHash = CreateObject("Scripting.Dictionary")
Set rsCQ = Server.CreateObject("ADODB.Recordset")
Call Get_Iss_Parameters ( parIss_db, parIss_id )
ddWidth = 20
'----------------------------------------------
%>
<%
Sub Get_Issue_Notes ( NNiss_db, NNiss_id, OOrsCQ )
        Dim SQLstr
        If Cint(NNiss_db) = enumCLEARQUEST_DEVI_ID Then
                SQLstr = _
                " SELECT si.dbid AS iss_id, si.new_num AS iss_num, si.headline AS summary, his.action_timestamp AS change_stamp, his.user_name, "&_
        "        his.action_name, his.new_state"&_
    " FROM cq_devi.admin.software_issue si LEFT OUTER JOIN"&_
      "    cq_devi.admin.history his ON si.dbid = his.entity_dbid"&_
                "  WHERE si.dbid =  "& NNiss_id &_
                "  ORDER BY his.action_timestamp"

        OOrsCQ.ActiveConnection = CQ_conn
        OOrsCQ.Source = SQLstr
        OOrsCQ.CursorType = 0
        OOrsCQ.CursorLocation = 2
        OOrsCQ.LockType = 3
        OOrsCQ.Open()
End Sub
%>
<%
Call Get_Issue_Notes ( parIss_db, parIss_id, rsCQ )
%>
<!--#include file="_menu_def.asp"-->
<html>
<head>
<title>Release Manager</title>
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
<link rel="stylesheet" href="images/navigation.css" type="text/css">
<script language="JavaScript" src="images/common.js"></script>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
</script>
</head>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onload="self.focus();">
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td width="1%" background="images/bg_lght_gray.gif">&nbsp;</td>
    <td width="100%" background="images/bg_lght_gray.gif"><span class="form_field"><br>&nbsp;Issue</span>
      <input name="FRpname" type="text" class="form_item" size="12" value="<%=rsCQ("iss_num")%>" readonly>
      <input name="FRpname2" type="text" class="form_item" size="80" value="<%=rsCQ("summary")%>" readonly> </td>
  </tr>
  <tr>
    <td background="images/bg_lght_gray.gif"><img src="images/h_trsp_dot.gif" width="1" height="400"></td>
    <td valign="top" background="images/bg_form_lightbluedark.gif">
          <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td align="right" background="images/bg_lght_gray.gif"><br>
            <!-- TABS ------------------------------------------->
            <%Call Generate_Tab_Menu ( TABarray4, "History", "blue" )%>
            <!------------------------------------------------------------->
          </td>
        </tr>
        <tr>
          <td background="images/lbox_bg_blue.gif">&nbsp;</td>
        </tr>
      </table><br>
      <table width="100%" border="0" cellspacing="5" cellpadding="1">
        <tr>
          <td background="images/bg_vtree_h1.gif">
                        <div id="LayerHistory" style="height:360px; overflow: auto;">
                            <table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
                              <tr>
                        <td valign="top" bgcolor="#FFFFFF">
                          <table width="100%" border="0" cellspacing="0" cellpadding="0">
                                                        <tr>
                                                          <td background="images/bg_vtree_footer.gif">
                                                                <table width="100%" border="0" cellspacing="1" cellpadding="2">
                                                                  <tr class="form_field">
                                                                        <td width="1%" nowrap background="images/bg_form_lightgray.gif">Change Date</td>
                                                                        <td width="100%" nowrap background="images/bg_form_lightgray.gif">User Name</td>
                                                                        <td width="1%" nowrap background="images/bg_form_lightgray.gif">Action</td>
                                                                        <td width="1%" nowrap background="images/bg_form_lightgray.gif">New State</td>
                                                                  </tr>
                                                                  <%If Not IsNull(rsCQ("change_stamp")) Then%>
                                                                  <%While (NOT rsCQ.BOF) AND (NOT rsCQ.EOF) %>
                                                                  <tr class="form_item">
                                                                        <td bgcolor="#FFFFFF" nowrap><%=Day(rsCQ("change_stamp")) &"-"& MonthName(Month(rsCQ("change_stamp")), TRUE) &"-"& Year(rsCQ("change_stamp")) &" "& FormatDateTime( rsCQ("change_stamp"), 4 )%></td>
                                                                        <td bgcolor="#FFFFFF" nowrap><%=rsCQ("user_name")%></td>
                                                                        <td bgcolor="#FFFFFF" nowrap><%=rsCQ("action_name")%></td>
                                                                        <td bgcolor="#FFFFFF" nowrap><%=rsCQ("new_state")%></td>
                                                                  </tr>
                                                                  <%rsCQ.MoveNext
                                                                    Wend%>
                                                                  <%End If%>
                                                                </table>
                                                          </td>
                                                        </tr>
                                                  </table>
                                            </td>
                      </tr>
                   </table>
            </div>
                  </td>
        </tr>
      </table><br>
          </td>
  </tr>
  <tr>
    <td background="images/bg_lght_gray.gif">&nbsp;</td>
    <td background="images/lbox_bg_blue.gif">&nbsp;</td>
  </tr>
</table>
</body>
</html>


<!-- DESTRUCTOR ------->
<!--#include file="common/destructor.asp"-->