Subversion Repositories DevTools

Rev

Rev 159 | 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
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
%>
22
<!--#include file="_access_control_general.asp"-->
23
<%
24
'------------ Variable Definition -------------
25
Dim rsCQ
26
Dim ddWidth
27
Dim parIss_db
28
Dim parIss_id
29
'------------ Constants Declaration -----------
30
'------------ Variable Init -------------------
31
Set pkgInfoHash = CreateObject("Scripting.Dictionary")
32
Set rsCQ = Server.CreateObject("ADODB.Recordset")
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, si.new_num AS iss_num, si.headline AS summary, his.action_timestamp AS change_stamp, his.user_name, "&_
43
        "        his.action_name, his.new_state"&_
159 ghuddy 44
    " FROM cq_devi.admin.software_issue si LEFT OUTER JOIN"&_
45
      "    cq_devi.admin.history his ON si.dbid = his.entity_dbid"&_
119 ghuddy 46
		"  WHERE si.dbid =  "& NNiss_id &_
47
		"  ORDER BY his.action_timestamp"
159 ghuddy 48
 
119 ghuddy 49
	ElseIf Cint(NNiss_db) = enumCLEARQUEST_VT5DM_ID Then
50
		SQLstr = _
51
		" 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, "&_
52
        "        his.action_name, his.new_state"&_
159 ghuddy 53
    " FROM CQ_VT5DM.admin.software_issue si LEFT OUTER JOIN"&_
54
      "    CQ_VT5DM.admin.history his ON si.dbid = his.entity_dbid"&_
119 ghuddy 55
		"  WHERE si.dbid =  "& NNiss_id &_
56
		"  ORDER BY his.action_timestamp"
57
	End If
159 ghuddy 58
 
119 ghuddy 59
	OOrsCQ.ActiveConnection = CQ_conn
60
	OOrsCQ.Source = SQLstr
61
	OOrsCQ.CursorType = 0
62
	OOrsCQ.CursorLocation = 2
63
	OOrsCQ.LockType = 3
64
	OOrsCQ.Open()
159 ghuddy 65
End Sub
119 ghuddy 66
%>
67
<%
68
Call Get_Issue_Notes ( parIss_db, parIss_id, rsCQ )
69
%>
70
<!--#include file="_menu_def.asp"-->
71
<html>
72
<head>
73
<title>Release Manager</title>
74
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
75
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
76
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
77
<link rel="stylesheet" href="images/navigation.css" type="text/css">
78
<script language="JavaScript" src="images/common.js"></script>
79
<script language="JavaScript" type="text/JavaScript">
80
<!--
81
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
82
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
83
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
84
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
85
}
86
MM_reloadPage(true);
87
//-->
88
</script>
89
</head>
90
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onload="self.focus();">
91
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
159 ghuddy 92
  <tr>
119 ghuddy 93
    <td width="1%" background="images/bg_lght_gray.gif">&nbsp;</td>
159 ghuddy 94
    <td width="100%" background="images/bg_lght_gray.gif"><span class="form_field"><br>&nbsp;Issue</span>
119 ghuddy 95
      <input name="FRpname" type="text" class="form_item" size="12" value="<%=rsCQ("iss_num")%>" readonly>
96
      <input name="FRpname2" type="text" class="form_item" size="80" value="<%=rsCQ("summary")%>" readonly> </td>
97
  </tr>
159 ghuddy 98
  <tr>
119 ghuddy 99
    <td background="images/bg_lght_gray.gif"><img src="images/h_trsp_dot.gif" width="1" height="400"></td>
100
    <td valign="top" background="images/bg_form_lightbluedark.gif">
101
	  <table width="100%" border="0" cellspacing="0" cellpadding="0">
159 ghuddy 102
        <tr>
103
          <td align="right" background="images/bg_lght_gray.gif"><br>
119 ghuddy 104
            <!-- TABS ------------------------------------------->
105
            <%Call Generate_Tab_Menu ( TABarray4, "History", "blue" )%>
106
            <!------------------------------------------------------------->
107
          </td>
108
        </tr>
109
        <tr>
110
          <td background="images/lbox_bg_blue.gif">&nbsp;</td>
111
        </tr>
112
      </table><br>
113
      <table width="100%" border="0" cellspacing="5" cellpadding="1">
159 ghuddy 114
        <tr>
119 ghuddy 115
          <td background="images/bg_vtree_h1.gif">
159 ghuddy 116
			<div id="LayerHistory" style="height:360px; overflow: auto;">
119 ghuddy 117
		            <table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
118
		              <tr>
159 ghuddy 119
                        <td valign="top" bgcolor="#FFFFFF">
119 ghuddy 120
                          <table width="100%" border="0" cellspacing="0" cellpadding="0">
121
							<tr>
159 ghuddy 122
							  <td background="images/bg_vtree_footer.gif">
119 ghuddy 123
								<table width="100%" border="0" cellspacing="1" cellpadding="2">
159 ghuddy 124
								  <tr class="form_field">
119 ghuddy 125
									<td width="1%" nowrap background="images/bg_form_lightgray.gif">Change Date</td>
126
									<td width="100%" nowrap background="images/bg_form_lightgray.gif">User Name</td>
127
									<td width="1%" nowrap background="images/bg_form_lightgray.gif">Action</td>
128
									<td width="1%" nowrap background="images/bg_form_lightgray.gif">New State</td>
129
								  </tr>
130
								  <%If Not IsNull(rsCQ("change_stamp")) Then%>
131
								  <%While (NOT rsCQ.BOF) AND (NOT rsCQ.EOF) %>
159 ghuddy 132
								  <tr class="form_item">
119 ghuddy 133
									<td bgcolor="#FFFFFF" nowrap><%=Day(rsCQ("change_stamp")) &"-"& MonthName(Month(rsCQ("change_stamp")), TRUE) &"-"& Year(rsCQ("change_stamp")) &" "& FormatDateTime( rsCQ("change_stamp"), 4 )%></td>
134
									<td bgcolor="#FFFFFF" nowrap><%=rsCQ("user_name")%></td>
135
									<td bgcolor="#FFFFFF" nowrap><%=rsCQ("action_name")%></td>
136
									<td bgcolor="#FFFFFF" nowrap><%=rsCQ("new_state")%></td>
137
								  </tr>
138
								  <%rsCQ.MoveNext
139
								    Wend%>
140
								  <%End If%>
141
								</table>
142
							  </td>
143
							</tr>
144
						  </table>
145
					    </td>
146
                      </tr>
147
                   </table>
159 ghuddy 148
            </div>
119 ghuddy 149
		  </td>
150
        </tr>
151
      </table><br>
152
	  </td>
153
  </tr>
159 ghuddy 154
  <tr>
119 ghuddy 155
    <td background="images/bg_lght_gray.gif">&nbsp;</td>
156
    <td background="images/lbox_bg_blue.gif">&nbsp;</td>
157
  </tr>
158
</table>
159
</body>
160
</html>
161
 
162
 
163
<!-- DESTRUCTOR ------->
159 ghuddy 164
<!--#include file="common/destructor.asp"-->