WebSVN – DevTools – Diff – /ManagerSuite/Release_Manager/trunk/_wform_issues_notes.asp



Sub Get_Issue_Notes ( NNiss_db, NNiss_id, OOrsCQ )
	Dim SQLstr
	If Cint(NNiss_db) = enumCLEARQUEST_DEVI_ID Then
		SQLstr = _
		" SELECT dbid AS iss_id, new_num AS iss_num, headline AS summary, notes_log"&_
    "   FROM cq_devi.admin.software_issue si"&_
		"  WHERE si.dbid = "& NNiss_id
 
	'ElseIf Cint(NNiss_db) = enumCLEARQUEST_DPGIM_ID Then
	'	SQLstr = _
	'	" SELECT dbid AS iss_id, new_num AS iss_num, headline AS summary, notes_log"&_
	'	"   FROM dpgim.admin.software_issue si"&_
	'	"  WHERE si.dbid = "& NNiss_id
 
	ElseIf Cint(NNiss_db) = enumCLEARQUEST_VT5DM_ID Then
		SQLstr = _
		" SELECT dbid AS iss_id, new_num AS iss_num, headline AS summary, notes_log"&_
    "   FROM CQ_VT5DM.admin.software_issue si"&_
		"  WHERE si.dbid = "& NNiss_id
 
	End If
	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"-->

<link rel="stylesheet" href="images/navigation.css" type="text/css">
<script language="JavaScript" src="images/common.js"></script>
<script language="JavaScript">
<!--
function height()
{
	if( typeof( window.innerWidth ) == 'number' )
	{
		h = window.innerHeight;
	}
	else if(document.documentElement&&(document.documentElement.clientHeight ))
	{
		h = document.documentElement.clientHeight;
	}
	else if( document.body &&	( document.body.clientWidth || document.body.clientHeight ) )
	{
		h = document.body.clientHeight;
	}
 
	var e = document.getElementById("LayerDescription");
 
	if (navigator.userAgent.indexOf('Internet Explorer'))
	{
		e.style.height = h - 150 + "px";
		e.style.overflow = "auto";
	}

 
 
</head>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onload="self.focus();height();" onresize="height();">
<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, "Notes", "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">
		      <table width="100%" border="0" cellspacing="0" cellpadding="2">
		        <tr>
		          <td bgcolor="White" class="form_item"><span class="form_field">Notes Log</span><br>
					<div id="LayerDescription" style="height:height(); overflow: auto;">
					<%
					If NOT IsNull(rsCQ("notes_log")) OR (rsCQ("notes_log") <> "") Then
						Response.write NewLine_To_BR( Server.HTMLEncode( rsCQ("notes_log") ) )

		  </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"-->


Rev 119	Rev 159
Line 38...	Line 38...
38	`Sub Get_Issue_Notes ( NNiss_db, NNiss_id, OOrsCQ )`	38	`Sub Get_Issue_Notes ( NNiss_db, NNiss_id, OOrsCQ )`
39	`Dim SQLstr`	39	`Dim SQLstr`
40	`If Cint(NNiss_db) = enumCLEARQUEST_DEVI_ID Then`	40	`If Cint(NNiss_db) = enumCLEARQUEST_DEVI_ID Then`
41	`SQLstr = _`	41	`SQLstr = _`
42	`" SELECT dbid AS iss_id, new_num AS iss_num, headline AS summary, notes_log"&_`	42	`" SELECT dbid AS iss_id, new_num AS iss_num, headline AS summary, notes_log"&_`
43	`" FROM devi_prod.admin.software_issue si"&_`	43	`" FROM cq_devi.admin.software_issue si"&_`
44	`" WHERE si.dbid = "& NNiss_id`	44	`" WHERE si.dbid = "& NNiss_id`
45		45
46	`'ElseIf Cint(NNiss_db) = enumCLEARQUEST_DPGIM_ID Then`	46	`'ElseIf Cint(NNiss_db) = enumCLEARQUEST_DPGIM_ID Then`
47	`' SQLstr = _`	47	`' SQLstr = _`
48	`' " SELECT dbid AS iss_id, new_num AS iss_num, headline AS summary, notes_log"&_`	48	`' " SELECT dbid AS iss_id, new_num AS iss_num, headline AS summary, notes_log"&_`
49	`' " FROM dpgim.admin.software_issue si"&_`	49	`' " FROM dpgim.admin.software_issue si"&_`
50	`' " WHERE si.dbid = "& NNiss_id`	50	`' " WHERE si.dbid = "& NNiss_id`
51		51
52	`ElseIf Cint(NNiss_db) = enumCLEARQUEST_VT5DM_ID Then`	52	`ElseIf Cint(NNiss_db) = enumCLEARQUEST_VT5DM_ID Then`
53	`SQLstr = _`	53	`SQLstr = _`
54	`" SELECT dbid AS iss_id, new_num AS iss_num, headline AS summary, notes_log"&_`	54	`" SELECT dbid AS iss_id, new_num AS iss_num, headline AS summary, notes_log"&_`
55	`" FROM VT5DM.admin.software_issue si"&_`	55	`" FROM CQ_VT5DM.admin.software_issue si"&_`
56	`" WHERE si.dbid = "& NNiss_id`	56	`" WHERE si.dbid = "& NNiss_id`
57		57
58	`End If`	58	`End If`
59	`OOrsCQ.ActiveConnection = CQ_conn`	59	`OOrsCQ.ActiveConnection = CQ_conn`
60	`OOrsCQ.Source = SQLstr`	60	`OOrsCQ.Source = SQLstr`
61	`OOrsCQ.CursorType = 0`	61	`OOrsCQ.CursorType = 0`
62	`OOrsCQ.CursorLocation = 2`	62	`OOrsCQ.CursorLocation = 2`
63	`OOrsCQ.LockType = 3`	63	`OOrsCQ.LockType = 3`
64	`OOrsCQ.Open()`	64	`OOrsCQ.Open()`
65	`End Sub`	65	`End Sub`
66	`%>`	66	`%>`
67	`<%`	67	`<%`
68	`Call Get_Issue_Notes ( parIss_db, parIss_id, rsCQ )`	68	`Call Get_Issue_Notes ( parIss_db, parIss_id, rsCQ )`
69	`%>`	69	`%>`
70	`<!--#include file="_menu_def.asp"-->`	70	`<!--#include file="_menu_def.asp"-->`
Line 77...	Line 77...
77	`<link rel="stylesheet" href="images/navigation.css" type="text/css">`	77	`<link rel="stylesheet" href="images/navigation.css" type="text/css">`
78	`<script language="JavaScript" src="images/common.js"></script>`	78	`<script language="JavaScript" src="images/common.js"></script>`
79	`<script language="JavaScript">`	79	`<script language="JavaScript">`
80	`<!--`	80	`<!--`
81	`function height()`	81	`function height()`
82	`{`	82	`{`
83	`if( typeof( window.innerWidth ) == 'number' )`	83	`if( typeof( window.innerWidth ) == 'number' )`
84	`{`	84	`{`
85	`h = window.innerHeight;`	85	`h = window.innerHeight;`
86	`}`	86	`}`
87	`else if(document.documentElement&&(document.documentElement.clientHeight ))`	87	`else if(document.documentElement&&(document.documentElement.clientHeight ))`
88	`{`	88	`{`
89	`h = document.documentElement.clientHeight;`	89	`h = document.documentElement.clientHeight;`
90	`}`	90	`}`
91	`else if( document.body && ( document.body.clientWidth \|\| document.body.clientHeight ) )`	91	`else if( document.body && ( document.body.clientWidth \|\| document.body.clientHeight ) )`
92	`{`	92	`{`
93	`h = document.body.clientHeight;`	93	`h = document.body.clientHeight;`
94	`}`	94	`}`
95		95
96	`var e = document.getElementById("LayerDescription");`	96	`var e = document.getElementById("LayerDescription");`
97		97
98	`if (navigator.userAgent.indexOf('Internet Explorer'))`	98	`if (navigator.userAgent.indexOf('Internet Explorer'))`
99	`{`	99	`{`
100	`e.style.height = h - 150 + "px";`	100	`e.style.height = h - 150 + "px";`
101	`e.style.overflow = "auto";`	101	`e.style.overflow = "auto";`
102	`}`	102	`}`
Line 112...	Line 112...
112		112
113		113
114	`</head>`	114	`</head>`
115	`<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onload="self.focus();height();" onresize="height();">`	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">`	116	`<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">`
117	`<tr>`	117	`<tr>`
118	`<td width="1%" background="images/bg_lght_gray.gif"> </td>`	118	`<td width="1%" background="images/bg_lght_gray.gif"> </td>`
119	`<td width="100%" background="images/bg_lght_gray.gif"><span class="form_field"><br> Issue</span>`	119	`<td width="100%" background="images/bg_lght_gray.gif"><span class="form_field"><br> Issue</span>`
120	`<input name="FRpname" type="text" class="form_item" size="12" value="<%=rsCQ("iss_num")%>" readonly>`	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>`	121	`<input name="FRpname2" type="text" class="form_item" size="80" value="<%=rsCQ("summary")%>" readonly> </td>`
122	`</tr>`	122	`</tr>`
123	`<tr>`	123	`<tr>`
124	`<td background="images/bg_lght_gray.gif"><img src="images/h_trsp_dot.gif" width="1" height="400"></td>`	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">`	125	`<td valign="top" background="images/bg_form_lightbluedark.gif">`
126	`<table width="100%" border="0" cellspacing="0" cellpadding="0">`	126	`<table width="100%" border="0" cellspacing="0" cellpadding="0">`
127	`<tr>`	127	`<tr>`
128	`<td align="right" background="images/bg_lght_gray.gif"><br>`	128	`<td align="right" background="images/bg_lght_gray.gif"><br>`
129	`<!-- TABS ------------------------------------------->`	129	`<!-- TABS ------------------------------------------->`
130	`<%Call Generate_Tab_Menu ( TABarray4, "Notes", "blue" )%>`	130	`<%Call Generate_Tab_Menu ( TABarray4, "Notes", "blue" )%>`
131	`<!------------------------------------------------------------->`	131	`<!------------------------------------------------------------->`
132	`</td>`	132	`</td>`
133	`</tr>`	133	`</tr>`
134	`<tr>`	134	`<tr>`
135	`<td background="images/lbox_bg_blue.gif"> </td>`	135	`<td background="images/lbox_bg_blue.gif"> </td>`
136	`</tr>`	136	`</tr>`
137	`</table><br>`	137	`</table><br>`
138	`<table width="100%" border="0" cellspacing="5" cellpadding="1">`	138	`<table width="100%" border="0" cellspacing="5" cellpadding="1">`
139	`<tr>`	139	`<tr>`
140	`<td background="images/bg_vtree_h1.gif">`	140	`<td background="images/bg_vtree_h1.gif">`
141	`<table width="100%" border="0" cellspacing="0" cellpadding="2">`	141	`<table width="100%" border="0" cellspacing="0" cellpadding="2">`
142	`<tr>`	142	`<tr>`
143	`<td bgcolor="White" class="form_item"><span class="form_field">Notes Log</span><br>`	143	`<td bgcolor="White" class="form_item"><span class="form_field">Notes Log</span><br>`
144	`<div id="LayerDescription" style="height:height(); overflow: auto;">`	144	`<div id="LayerDescription" style="height:height(); overflow: auto;">`
145	`<%`	145	`<%`
146	`If NOT IsNull(rsCQ("notes_log")) OR (rsCQ("notes_log") <> "") Then`	146	`If NOT IsNull(rsCQ("notes_log")) OR (rsCQ("notes_log") <> "") Then`
147	`Response.write NewLine_To_BR( Server.HTMLEncode( rsCQ("notes_log") ) )`	147	`Response.write NewLine_To_BR( Server.HTMLEncode( rsCQ("notes_log") ) )`
Line 154...	Line 154...
154	`</td>`	154	`</td>`
155	`</tr>`	155	`</tr>`
156	`</table><br>`	156	`</table><br>`
157	`</td>`	157	`</td>`
158	`</tr>`	158	`</tr>`
159	`<tr>`	159	`<tr>`
160	`<td background="images/bg_lght_gray.gif"> </td>`	160	`<td background="images/bg_lght_gray.gif"> </td>`
161	`<td background="images/lbox_bg_blue.gif"> </td>`	161	`<td background="images/lbox_bg_blue.gif"> </td>`
162	`</tr>`	162	`</tr>`
163	`</table>`	163	`</table>`
164	`</body>`	164	`</body>`
165	`</html>`	165	`</html>`
166		166
167		167
168	`<!-- DESTRUCTOR ------->`	168	`<!-- DESTRUCTOR ------->`
169	`<!--#include file="common/destructor.asp"-->`	-
170		169	`<!--#include file="common/destructor.asp"-->`
-		170

Subversion Repositories DevTools

(root)/ManagerSuite/Release_Manager/trunk/_wform_issues_notes.asp @ 187 – Rev 119 → 159