Subversion Repositories DevTools

Rev

Rev 6181 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
5357 dpurdie 1
<%@LANGUAGE="VBSCRIPT"%>
2
<%
3
Option explicit
4
Response.Expires = 0	' always load the page, dont store
5
%>
6
<%
7
'=====================================================
8
'					ISSUE NOTES
9
'=====================================================
10
%>
11
<!--#include file="common/conf.asp"-->
12
<!--#include file="common/globals.asp"-->
13
<!--#include file="common/formating.asp"-->
14
<!--#include file="common/qstr.asp"-->
15
<!--#include file="common/common_subs.asp"-->
16
<!--#include file="_tabs.asp"-->
17
<!--#include file="common/cq_common_subs.asp"-->
18
<!--#include file="common/_popup_window_common.asp"-->
19
<%
20
'------------ ACCESS CONTROL ------------------
21
%>
6181 dpurdie 22
<!--#include file="_access_control_login_optional.asp"-->
5357 dpurdie 23
<!--#include file="_access_control_general.asp"-->
24
<%
25
'------------ Variable Definition -------------
26
Dim rsCQ
27
Dim ddWidth
28
Dim parIss_db
29
Dim parIss_id
30
'------------ Constants Declaration -----------
31
'------------ Variable Init -------------------
32
Set pkgInfoHash = CreateObject("Scripting.Dictionary")
33
Call Get_Iss_Parameters ( parIss_db, parIss_id )
34
ddWidth = 20
35
'----------------------------------------------
36
%>
37
<%
38
Sub Get_Issue_Notes ( NNiss_db, NNiss_id, OOrsCQ )
39
	Dim SQLstr
40
	If Cint(NNiss_db) = enumCLEARQUEST_DEVI_ID Then
41
		SQLstr = _
42
		" SELECT si.dbid AS iss_id, " &_
43
        "        si.new_num AS iss_num," &_
44
        "        si.headline AS summary," &_
45
        "        his.action_timestamp AS change_stamp," &_
46
        "        his.user_name, "&_
47
        "        his.action_name, " &_
48
        "        his.new_state"&_
49
        " FROM release_manager.CQ_software_issue si LEFT OUTER JOIN"&_
50
        "      release_manager.CQ_history his ON si.dbid = his.entity_dbid"&_
51
		"  WHERE si.dbid =  "& NNiss_id &_
52
		"  ORDER BY his.action_timestamp"
53
 
54
    Set OOrsCQ = OraDatabase.DbCreateDynaset( SQLstr, cint(0))
55
    End If
56
End Sub
57
%>
58
<%
59
Call Get_Issue_Notes ( parIss_db, parIss_id, rsCQ )
60
%>
61
<!--#include file="_menu_def.asp"-->
62
<html>
63
<head>
64
<title>Release Manager</title>
65
<link rel="shortcut icon" href="<%=FavIcon%>"/>
66
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
67
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
6579 dpurdie 68
<link rel="stylesheet" href="images/release_manager_style.css?ver=<%=VixVerNum%>" type="text/css">
69
<link rel="stylesheet" href="images/navigation.css?ver=<%=VixVerNum%>" type="text/css">
70
<script language="JavaScript" src="images/common.js?ver=<%=VixVerNum%>"></script>
5357 dpurdie 71
<script language="JavaScript" type="text/JavaScript">
72
<!--
73
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
74
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
75
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
76
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
77
}
78
MM_reloadPage(true);
79
//-->
80
</script>
81
</head>
82
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onload="self.focus();">
83
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
84
  <tr>
85
    <td width="1%" background="images/bg_lght_gray.gif">&nbsp;</td>
86
    <td width="100%" background="images/bg_lght_gray.gif"><span class="form_field"><br>&nbsp;Issue</span>
87
      <input name="FRpname" type="text" class="form_item" size="12" value="<%=rsCQ("iss_num")%>" readonly>
88
      <input name="FRpname2" type="text" class="form_item" size="80" value="<%=rsCQ("summary")%>" readonly> </td>
89
  </tr>
90
  <tr>
91
    <td background="images/bg_lght_gray.gif"><img src="images/h_trsp_dot.gif" width="1" height="400"></td>
92
    <td valign="top" background="images/bg_form_lightbluedark.gif">
93
	  <table width="100%" border="0" cellspacing="0" cellpadding="0">
94
        <tr>
95
          <td align="right" background="images/bg_lght_gray.gif"><br>
96
            <!-- TABS ------------------------------------------->
97
            <%Call Generate_Tab_Menu ( TABarray4, "History", "blue" )%>
98
            <!------------------------------------------------------------->
99
          </td>
100
        </tr>
101
        <tr>
102
          <td background="images/lbox_bg_blue.gif">&nbsp;</td>
103
        </tr>
104
      </table><br>
105
      <table width="100%" border="0" cellspacing="5" cellpadding="1">
106
        <tr>
107
          <td background="images/bg_vtree_h1.gif">
108
			<div id="LayerHistory" style="height:360px; overflow: auto;">
109
		            <table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
110
		              <tr>
111
                        <td valign="top" bgcolor="#FFFFFF">
112
                          <table width="100%" border="0" cellspacing="0" cellpadding="0">
113
							<tr>
114
							  <td background="images/bg_vtree_footer.gif">
115
								<table width="100%" border="0" cellspacing="1" cellpadding="2">
116
								  <tr class="form_field">
117
									<td width="1%" nowrap background="images/bg_form_lightgray.gif">Change Date</td>
118
									<td width="100%" nowrap background="images/bg_form_lightgray.gif">User Name</td>
119
									<td width="1%" nowrap background="images/bg_form_lightgray.gif">Action</td>
120
									<td width="1%" nowrap background="images/bg_form_lightgray.gif">New State</td>
121
								  </tr>
122
								  <%If Not IsNull(rsCQ("change_stamp")) Then%>
123
								  <%While (NOT rsCQ.BOF) AND (NOT rsCQ.EOF) %>
124
								  <tr class="form_item">
125
									<td bgcolor="#FFFFFF" nowrap><%=Day(rsCQ("change_stamp")) &"-"& MonthName(Month(rsCQ("change_stamp")), TRUE) &"-"& Year(rsCQ("change_stamp")) &" "& FormatDateTime( rsCQ("change_stamp"), 4 )%></td>
126
									<td bgcolor="#FFFFFF" nowrap><%=rsCQ("user_name")%></td>
127
									<td bgcolor="#FFFFFF" nowrap><%=rsCQ("action_name")%></td>
128
									<td bgcolor="#FFFFFF" nowrap><%=rsCQ("new_state")%></td>
129
								  </tr>
130
								  <%rsCQ.MoveNext
131
								    Wend%>
132
								  <%End If%>
133
								</table>
134
							  </td>
135
							</tr>
136
						  </table>
137
					    </td>
138
                      </tr>
139
                   </table>
140
            </div>
141
		  </td>
142
        </tr>
143
      </table><br>
144
	  </td>
145
  </tr>
146
  <tr>
147
    <td background="images/bg_lght_gray.gif">&nbsp;</td>
148
    <td background="images/lbox_bg_blue.gif">&nbsp;</td>
149
  </tr>
150
</table>
151
</body>
152
</html>
153
<!-- DESTRUCTOR ------->
154
<!--#include file="common/destructor.asp"-->