Subversion Repositories DevTools

Rev

Details | 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 dbid AS iss_id, new_num AS iss_num, headline AS summary, notes_log"&_
159 ghuddy 43
    "   FROM cq_devi.admin.software_issue si"&_
119 ghuddy 44
		"  WHERE si.dbid = "& NNiss_id
159 ghuddy 45
 
119 ghuddy 46
	'ElseIf Cint(NNiss_db) = enumCLEARQUEST_DPGIM_ID Then
47
	'	SQLstr = _
48
	'	" SELECT dbid AS iss_id, new_num AS iss_num, headline AS summary, notes_log"&_
49
	'	"   FROM dpgim.admin.software_issue si"&_
50
	'	"  WHERE si.dbid = "& NNiss_id
159 ghuddy 51
 
119 ghuddy 52
	ElseIf Cint(NNiss_db) = enumCLEARQUEST_VT5DM_ID Then
53
		SQLstr = _
54
		" SELECT dbid AS iss_id, new_num AS iss_num, headline AS summary, notes_log"&_
159 ghuddy 55
    "   FROM CQ_VT5DM.admin.software_issue si"&_
119 ghuddy 56
		"  WHERE si.dbid = "& NNiss_id
159 ghuddy 57
 
119 ghuddy 58
	End If
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">
80
<!--
81
function height()
159 ghuddy 82
{
83
	if( typeof( window.innerWidth ) == 'number' )
119 ghuddy 84
	{
85
		h = window.innerHeight;
86
	}
87
	else if(document.documentElement&&(document.documentElement.clientHeight ))
88
	{
89
		h = document.documentElement.clientHeight;
159 ghuddy 90
	}
119 ghuddy 91
	else if( document.body &&	( document.body.clientWidth || document.body.clientHeight ) )
92
	{
93
		h = document.body.clientHeight;
159 ghuddy 94
	}
95
 
119 ghuddy 96
	var e = document.getElementById("LayerDescription");
159 ghuddy 97
 
119 ghuddy 98
	if (navigator.userAgent.indexOf('Internet Explorer'))
99
	{
100
		e.style.height = h - 150 + "px";
101
		e.style.overflow = "auto";
102
	}
103
	else
104
	{
105
		// This line shouldn't be run by IE; it doesn't seem to work. It gets run in Firefox, etc.
106
		e.style.minHeight= h - 150 + "px";
107
		e.style.overflow = "auto";
108
	}
109
}
110
//-->
111
</script>
112
 
113
 
114
</head>
115
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onload="self.focus();height();" onresize="height();">
116
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
159 ghuddy 117
  <tr>
119 ghuddy 118
    <td width="1%" background="images/bg_lght_gray.gif">&nbsp;</td>
159 ghuddy 119
    <td width="100%" background="images/bg_lght_gray.gif"><span class="form_field"><br>&nbsp;Issue</span>
119 ghuddy 120
      <input name="FRpname" type="text" class="form_item" size="12" value="<%=rsCQ("iss_num")%>" readonly>
121
      <input name="FRpname2" type="text" class="form_item" size="80" value="<%=rsCQ("summary")%>" readonly> </td>
122
  </tr>
159 ghuddy 123
  <tr>
119 ghuddy 124
    <td background="images/bg_lght_gray.gif"><img src="images/h_trsp_dot.gif" width="1" height="400"></td>
125
    <td valign="top" background="images/bg_form_lightbluedark.gif">
126
	  <table width="100%" border="0" cellspacing="0" cellpadding="0">
159 ghuddy 127
        <tr>
128
          <td align="right" background="images/bg_lght_gray.gif"><br>
119 ghuddy 129
            <!-- TABS ------------------------------------------->
130
            <%Call Generate_Tab_Menu ( TABarray4, "Notes", "blue" )%>
131
            <!------------------------------------------------------------->
132
          </td>
133
        </tr>
134
        <tr>
135
          <td background="images/lbox_bg_blue.gif">&nbsp;</td>
136
        </tr>
137
      </table><br>
138
      <table width="100%" border="0" cellspacing="5" cellpadding="1">
159 ghuddy 139
        <tr>
119 ghuddy 140
          <td background="images/bg_vtree_h1.gif">
141
		      <table width="100%" border="0" cellspacing="0" cellpadding="2">
159 ghuddy 142
		        <tr>
119 ghuddy 143
		          <td bgcolor="White" class="form_item"><span class="form_field">Notes Log</span><br>
144
					<div id="LayerDescription" style="height:height(); overflow: auto;">
145
					<%
146
					If NOT IsNull(rsCQ("notes_log")) OR (rsCQ("notes_log") <> "") Then
147
						Response.write NewLine_To_BR( Server.HTMLEncode( rsCQ("notes_log") ) )
148
					End If
149
					%>
150
					</div>
151
				  </td>
152
		        </tr>
153
		      </table>
154
		  </td>
155
        </tr>
156
      </table><br>
157
	  </td>
158
  </tr>
159 ghuddy 159
  <tr>
119 ghuddy 160
    <td background="images/bg_lght_gray.gif">&nbsp;</td>
161
    <td background="images/lbox_bg_blue.gif">&nbsp;</td>
162
  </tr>
163
</table>
164
</body>
165
</html>
166
 
167
 
168
<!-- DESTRUCTOR ------->
159 ghuddy 169
<!--#include file="common/destructor.asp"-->