Subversion Repositories DevTools

Rev

Rev 5357 | Rev 5590 | 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 
'					Update Unit Test
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="common/common_dbedit.asp"-->
17 
<!--#include file="_tabs.asp"-->
18 
<!--#include file="common/_popup_window_common.asp"-->
19 
<%
20 
' Set rfile parameter. This is a return page after Login
21 
Call objPMod.StoreParameter ( "rfile", "fixed_issues.asp" )
22 
'------------ ACCESS CONTROL ------------------
23 
%>
24 
<!--#include file="_access_control_login.asp"-->
25 
<!--#include file="_access_control_general.asp"-->
26 
<!--#include file="_access_control_project.asp"-->
27 
<%
28 
'------------ Variable Definition -------------
29 
Dim parPv_id
30 
Dim parTest_id
31 
Dim rsQry
32 
Dim rsUsr
33 
Dim isDLocked
34 
Dim sPath
35 
Dim sPkgName
36 
Dim sPkgVersion
37 
Dim outFileName
38 
'------------ Constants Declaration -----------
39 
'------------ Variable Init -------------------
40 
parPv_id = Request("pv_id")
41 
parTest_id = Request("test_id")
42 
parRtag_id = Request("rtag_id")
43 
'----------------------------------------------
44 
%>
45 
<%
46 
Sub Get_This_Unit_Test ( nTest_id, nPv_id, oRS )
47 
	Dim Query_String
48 
	Query_String = _
49 
	"   SELECT tt.TEST_TYPE_NAME,"&_
50 
	"		   ut.*"&_
51 
	"	  FROM UNIT_TESTS ut,"&_
52 
	"	  	   TEST_TYPES tt"&_
53 
	"	 WHERE ut.TEST_TYPES_FK = tt.TEST_TYPE_ID"&_
54 
	"	   AND ut.PV_ID = :PV_ID"&_
55 
	"	   AND ut.TEST_ID = :TEST_ID"
56 
	Query_String = Replace( Query_String, ":TEST_ID", nTest_id )
57 
	Query_String = Replace( Query_String, ":PV_ID", nPv_id )
58 
 
59 
	Set oRS = OraDatabase.CreateDynaset( Query_String, cint(0))
60 
End Sub
61 
 
62 
Function SQL_Get_Users ( nUser_id )
63 
	SQL_Get_Users = _
64 
	" SELECT usr.user_id, usr.full_name,"&_
65 
	"	     DECODE(usr.user_id, "& nUser_id &", 'selected', NULL) AS selected"&_
66 
	"   FROM USERS usr"&_
67 
	"  WHERE usr.disabled = 'N'"&_
68 
	" ORDER BY UPPER(usr.full_name)"
69 
 
70 
End Function
71 
'----------------------------------------------------------------------------------------
72 
%>
73 
<%
74 
'------------ Action Requirements -------------------
75 
Call Get_Pkg_Short_Info(  parPv_id, NULL, NULL, NULL, NULL, NULL, isDLocked )
76 
If isDLocked = "Y" Then
77 
	' Move to Acceptance id package is locked
78 
	Response.Redirect( "_wform_update_unit_test_acceptance.asp?test_id="& Request("test_id") &"&pv_id="& parPv_id &"&rtag_id="& parRtag_id  )
79 
End If
80 
 
81 
Call Get_This_Unit_Test ( parTest_id, parPv_id, rsQry )
82 
Call Get_Pkg_Short_Info(  Request("pv_id"), NULL, sPkgName, sPkgVersion, NULL, NULL, NULL )
83 
%>
84 
 
85 
<html>
86 
<head>
87 
<title>Release Manager</title>
88 
<link rel="shortcut icon" href="<%=FavIcon%>"/>
89 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
90 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
91 
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
92 
<link rel="stylesheet" href="images/navigation.css" type="text/css">
93 
<script language="JavaScript" src="images/common.js"></script>
94 
<!--#include file="_menu_def.asp"-->
95 
<!-- TIPS -->
96 
<script language="JavaScript" src="images/tipster.js"></script>
97 
<script language="JavaScript" src="images/_help_tips.js"></script>
98 
</head>
99 
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onload="self.focus();">
100 
<!-- TIPS LAYERS -------------------------------------->
101 
<div id="formTipsLayer" style="position: absolute; z-index: 1000; visibility: hidden; left:0; top: 0; width: 10">&nbsp;</div>
102 
<!----------------------------------------------------->
103 
<form action="_update_unit_test.asp" method="post" enctype="multipart/form-data" name="unittest" onSubmit="MM_validateForm('completion_date','Completion Date','RisDate','test_summary','Test Summary','maxLength:4000');return document.MM_returnValue;">
104 
  <table width="100%" border="0" cellspacing="0" cellpadding="2" height="100%">
105 
    <tr>
106 
      <td width="1%" background="images/lbox_bg_orange.gif"><img src="images/i_unit_test_off.gif" width="18" height="25" hspace="5" border="0"></td>
107 
      <td width="1%" background="images/lbox_bg_blue.gif" nowrap class="wform_ttl">&nbsp;Unit  Test</td>
108 
	  <td width="100%" background="images/lbox_bg_blue.gif" align="right" nowrap class="wform_ttl">
109 
		<input type="submit" name="btn" value="Save" class="form_btn">
110 
		<input type="reset" name="btn" value="Close" class="form_btn" onclick="self.close()">
111 
      </td>
112 
      <td background="images/lbox_bg_blue.gif" align="right" width="1%" nowrap><img src="images/h_trsp_dot.gif" width="5" height="22"></td>
113 
    </tr>
114 
    <tr>
115 
      <td height="100%" width="1%">&nbsp;</td>
116 
      <td valign="top" nowrap colspan="3" class="wform_ttl" background="images/bg_form_lightgray.gif">
117 
        <table width="100%"  border="0" cellspacing="0" cellpadding="0">
118 
          <tr>
119 
            <td width="1%" nowrap class="sublbox_hitem"><img src="images/h_trsp_dot.gif" width="10" height="30"><%If Request("save_stat") <> "" Then%>Saving complete.<%End If%></td>
120 
            <td width="100%" align="right" valign="bottom">
121 
			<!-- TABS ------------------------------------->
122 
			<%Call Generate_Tab_Menu ( TABarray6, "Unit Test Details", "blue" )%>
123 
			</td>
124 
          </tr>
125 
          <tr>
126 
            <td background="images/lbox_bg_blue.gif"></td>
127 
            <td background="images/lbox_bg_blue.gif">&nbsp;</td>
128 
          </tr>
129 
        </table>
130 
        <table width="100%" border="0" cellspacing="1" cellpadding="2">
131 
          <tr>
132 
            <td width="1%"><img src="images/h_trsp_dot.gif" width="10" height="30"></td>
133 
            <td width="1%" nowrap class="form_group" valign="bottom"></td>
134 
            <td nowrap width="100%">&nbsp; </td>
135 
          </tr>
136 
          <tr>
137 
            <td>&nbsp;</td>
138 
            <td nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Test
139 
              Type <%=Quick_Help ( "ut_test_type" )%></td>
140 
            <td nowrap background="images/bg_form_lightbluedark.gif" class="form_txt">
141 
			<select name="test_type" class="form_item" disabled>
142 
				<option><%=rsQry("test_type_name")%></option>
143 
            </select></td>
144 
          </tr>
145 
          <tr>
146 
            <td>&nbsp;</td>
147 
            <td nowrap background="images/bg_form_lightbluedark.gif" class="form_field"></td>
148 
            <td nowrap background="images/bg_form_lightbluedark.gif" class="form_field">
149 
			<%If rsQry("test_types_fk") = 5 Then%>
150 
			Results URL <br><input name="results_url" type="text" class="form_item" id="results_url" size="80" maxlength="2000" class="form_txt" value="<%=dpkg_archiveURL & sPkgName &"/"& sPkgVersion &"/doc/"%>"><br>
151 
			<span class="rep_small">NOTE: Root dpkg_archive URL is <%=dpkg_archiveURL%></span>
152 
			<%Else%>
153 
			Results File Attachment <br><input name="results_file" type="file" class="form_item" size="65" class="form_txt">
154 
			<%End If%>
155 
 
156 
 
157 
 
158 
            </td>
159 
          </tr>
160 
          <tr>
161 
            <td>&nbsp;</td>
162 
            <td nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Passed<br>
163 
              # / Total <%=Quick_Help ( "ut_passed" )%></td>
164 
            <td nowrap background="images/bg_form_lightbluedark.gif" class="form_txt"><input name="numof_test" type="text" class="form_item" id="numof_test" value="<%=rsQry("numof_test")%>" size="20">
165 
            </td>
166 
          </tr>
167 
          <tr>
168 
            <td>&nbsp;</td>
169 
            <td nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Completion
170 
              Date </td>
171 
            <td nowrap background="images/bg_form_lightbluedark.gif" class="form_txt"><input name="completion_date" type="text" class="form_item" id="completion_date" value="<%=EuroDate ( rsQry("completion_date") ) %>" size="20" maxlength="10">
172 
            </td>
173 
          </tr>
174 
          <tr>
175 
            <td width="1%">&nbsp;</td>
176 
            <td nowrap width="1%" valign="top" background="images/bg_form_lightbluedark.gif" class="form_field">Test Summary <%=Quick_Help ( "ut_summary" )%></td>
177 
            <td width="100%" valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_txt"><textarea cols="80" rows="20" name="test_summary" class="form_item" id="test_summary"><%=rsQry("test_summary")%></textarea>
178 
            </td>
179 
          </tr>
180 
          <tr>
181 
            <td width="1%">&nbsp;</td>
182 
            <td width="1%" nowrap class="form_field"><img src="images/h_trsp_dot.gif" width="100" height="10"></td>
183 
            <td nowrap width="100%"> <p>&nbsp;</p></td>
184 
          </tr>
185 
      </table> </td>
186 
    </tr>
187 
    <tr>
188 
      <td height="1%" width="1%"><img src="images/h_trsp_dot.gif" width="5" height="5"></td>
189 
      <td valign="top" nowrap colspan="3" class="wform_ttl" background="images/lbox_bg_blue.gif"></td>
190 
    </tr>
191 
  </table>
192 
  <input type="hidden" name="save_stat" value="true">
193 
  <input type="hidden" name="action" value="true">
194 
  <input type="hidden" name="pv_id" value="<%=parPv_id%>">
195 
  <input type="hidden" name="test_id" value="<%=parTest_id%>">
196 
  <input type="hidden" name="rtag_id" value="<%=parRtag_id%>">
197 
  <input type="hidden" name="test_type_id" value="<%=rsQry("test_types_fk")%>">
198 
</form>
199 
</body>
200 
</html>
201 
 
202 
<!-- DESTRUCTOR ------->
119 ghuddy 203 
<!--#include file="common/destructor.asp"-->