Subversion Repositories DevTools

Rev

Rev 62 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 62 Rev 5356
Line 1... Line 1...
1 
<%@LANGUAGE="VBSCRIPT"%>
 1 
<%@LANGUAGE="VBSCRIPT"%>
2 
<%
 2 
<%
3 
'=====================================================
 3 
'=====================================================
4 
'|                                                   |
 4 
'|                                                   |
5 
'|			          ProdDefault				 	 |
 5 
'|			          ProdDefault				 	 |
6 
'|                                                   |
 6 
'|                                                   |
7 
'=====================================================
 7 
'=====================================================
8 
%>
 8 
%>
9 
<%
 9 
<%
10 
Option explicit
 10 
Option explicit
11 
Response.Expires = 0
 11 
Response.Expires = 0
12 
%>
 12 
%>
13 
<!--#include file="common/globals.asp"-->
 13 
<!--#include file="common/globals.asp"-->
14 
<!--#include file="common/config.asp"-->
 14 
<!--#include file="common/config.asp"-->
15 
<!--#include file="common/common_subs.asp"-->
 15 
<!--#include file="common/common_subs.asp"-->
16 
<!--#include file="common/_product_common.asp"-->
 16 
<!--#include file="common/_product_common.asp"-->
17 
<%
 17 
<%
18 
'------------ ACCESS CONTROL ------------------
 18 
'------------ ACCESS CONTROL ------------------
19 
%>
 19 
%>
20 
<!--#include file="_access_control_general.asp"-->
 20 
<!--#include file="_access_control_general.asp"-->
21 
<%
 21 
<%
22 
'------------ VARIABLE DEFINITION -------------
 22 
'------------ VARIABLE DEFINITION -------------
23 
Dim nOldProdID
 23 
Dim nOldProdID
24 
Dim rsQry
 24 
Dim rsQry
25 
Dim sMessage
 25 
Dim sMessage
26 
Dim parBase_env_id
 26 
Dim parBase_env_id
27 
Dim objFormCollector
 27 
Dim objFormCollector
28 
'Dim objOldProdCollector
 28 
'Dim objOldProdCollector
29 
'------------ CONSTANTS DECLARATION -----------
 29 
'------------ CONSTANTS DECLARATION -----------
30 
Const LIMG_NOTE_NEW = "<img src='icons/i_note_new.gif' width='18' height='18' border='0' align='absmiddle'>"
 30 
Const LIMG_NOTE_NEW = "<img src='icons/i_note_new.gif' width='18' height='18' border='0' align='absmiddle'>"
31 
Const LIMG_NOTE_EDIT = "<img src='icons/i_note_edit.gif' width='18' height='18' border='0' align='absmiddle'>"
 31 
Const LIMG_NOTE_EDIT = "<img src='icons/i_note_edit.gif' width='18' height='18' border='0' align='absmiddle'>"
32 
'------------ VARIABLE INIT -------------------
 32 
'------------ VARIABLE INIT -------------------
33 
'Set objOldProdCollector = CreateObject("Scripting.Dictionary")
 33 
'Set objOldProdCollector = CreateObject("Scripting.Dictionary")
34 
Set objFormCollector = CreateObject("Scripting.Dictionary")
 34 
Set objFormCollector = CreateObject("Scripting.Dictionary")
35 
'------------ CONDITIONS ----------------------
 35 
'------------ CONDITIONS ----------------------
36 
'----------------------------------------------
 36 
'----------------------------------------------
37 
%>
 37 
%>
38 
<%
 38 
<%
39 
'--------------------------------------------------------------------------------------------------------------------------
 39 
'--------------------------------------------------------------------------------------------------------------------------
40 
Sub GetFormDetails ( nProd_id, nOs_id, nBaseEnvId, nBom_id, ByRef outobjDetails )
 40 
Sub GetFormDetails ( nProd_id, nOs_id, nBaseEnvId, nBom_id, ByRef outobjDetails )
41 
	Dim rsQry, query
 41 
	Dim rsQry, query
42
42
43 
	OraDatabase.Parameters.Add "BOM_ID", nBom_id,	ORAPARM_INPUT, ORATYPE_NUMBER
43 
	OraDatabase.Parameters.Add "BOM_ID", nBom_id,	ORAPARM_INPUT, ORATYPE_NUMBER
44
44
45
45
46
46
47
47
48
48
49 
	'/* Get Project Details */
 49 
	'/* Get Project Details */
50 
	query = _
 50 
	query = _
51 
	" SELECT proj.RM_PROJECTS_FK, bo.rtag_id_fk"&_
 51 
	" SELECT proj.RM_PROJECTS_FK, bo.rtag_id_fk"&_
52 
	"  FROM BOMS bo,"&_
 52 
	"  FROM BOMS bo,"&_
53 
	"  	   BRANCHES br,"&_
 53 
	"  	   BRANCHES br,"&_
54 
	"	   DM_PROJECTS proj"&_
 54 
	"	   DM_PROJECTS proj"&_
55 
	" WHERE br.PROJ_ID = proj.PROJ_ID"&_
 55 
	" WHERE br.PROJ_ID = proj.PROJ_ID"&_
56 
	"   AND bo.BRANCH_ID = br.BRANCH_ID"&_
 56 
	"   AND bo.BRANCH_ID = br.BRANCH_ID"&_
57 
	"   AND bo.BOM_ID = :BOM_ID"
 57 
	"   AND bo.BOM_ID = :BOM_ID"
58
58
59 
	Set rsQry = OraDatabase.DbCreateDynaset( query , ORADYN_DEFAULT )
 59 
	Set rsQry = OraDatabase.DbCreateDynaset( query , ORADYN_DEFAULT )
60
60
61 
	If ((NOT rsQry.BOF) AND (NOT rsQry.EOF)) Then
 61 
	If ((NOT rsQry.BOF) AND (NOT rsQry.EOF)) Then
62 
		outobjDetails.Item ("rm_projects_fk")   = rsQry("rm_projects_fk")
 62 
		outobjDetails.Item ("rm_projects_fk")   = rsQry("rm_projects_fk")
63 
		outobjDetails.Item ("rtag_id_fk")   = rsQry("rtag_id_fk")
 63 
		outobjDetails.Item ("rtag_id_fk")   = rsQry("rtag_id_fk")
64
64
65 
	Else
 65 
	Else
66 
		Err.Raise 8, "Sub GetFormDetails", "Empty record set returned. nBom_id="& nBom_id
66 
		Err.Raise 8, "Sub GetFormDetails", "Empty record set returned. nBom_id="& nBom_id
67
67
68 
	End If
 68 
	End If
69
69
70 
	OraDatabase.Parameters.Remove "PROD_ID"
 70 
	OraDatabase.Parameters.Remove "PROD_ID"
71 
	OraDatabase.Parameters.Remove "OS_ID"
 71 
	OraDatabase.Parameters.Remove "OS_ID"
72 
	OraDatabase.Parameters.Remove "BASE_ENV_ID"
 72 
	OraDatabase.Parameters.Remove "BASE_ENV_ID"
73 
	OraDatabase.Parameters.Remove "BOM_ID"
 73 
	OraDatabase.Parameters.Remove "BOM_ID"
74
74
75 
	rsQry.Close
 75 
	rsQry.Close
76 
	Set rsQry = Nothing
 76 
	Set rsQry = Nothing
77 
End Sub
 77 
End Sub
78 
'-----------------------------------------------------------------------------------------------------------------
 78 
'-----------------------------------------------------------------------------------------------------------------
79 
Sub GetOldProdDetails ( nProd_id, ByRef outobjDetails )
 79 
Sub GetOldProdDetails ( nProd_id, ByRef outobjDetails )
80 
	Dim rsQry, query
 80 
	Dim rsQry, query
81 
	OraDatabase.Parameters.Add "PROD_ID", nProd_id,	ORAPARM_INPUT, ORATYPE_NUMBER
81 
	OraDatabase.Parameters.Add "PROD_ID", nProd_id,	ORAPARM_INPUT, ORATYPE_NUMBER
82
82
83 
	query = _
 83 
	query = _
84 
		"   SELECT pkg.pkg_name, cpv.pkg_version, ppv.pkg_version AS previous_version, cpv.last_pv_id AS old_prod_id"&_
 84 
		"   SELECT pkg.pkg_name, cpv.pkg_version, ppv.pkg_version AS previous_version, cpv.last_pv_id AS old_prod_id"&_
85 
		"	  FROM PACKAGE_VERSIONS cpv,"&_
 85 
		"	  FROM PACKAGE_VERSIONS cpv,"&_
86 
		"	  	   PACKAGE_VERSIONS ppv,"&_
 86 
		"	  	   PACKAGE_VERSIONS ppv,"&_
87 
		"	       PACKAGES pkg"&_
 87 
		"	       PACKAGES pkg"&_
88 
		"	 WHERE cpv.LAST_PV_ID = ppv.pv_id"&_
 88 
		"	 WHERE cpv.LAST_PV_ID = ppv.pv_id"&_
89 
		"	   AND cpv.pkg_id = pkg.pkg_id"&_
 89 
		"	   AND cpv.pkg_id = pkg.pkg_id"&_
90 
		"	   AND cpv.pv_id = :PROD_ID"
 90 
		"	   AND cpv.pv_id = :PROD_ID"
91
91
92 
	Set rsQry = OraDatabase.DbCreateDynaset( query , ORADYN_DEFAULT )
 92 
	Set rsQry = OraDatabase.DbCreateDynaset( query , ORADYN_DEFAULT )
93
93
94 
	If ((NOT rsQry.BOF) AND (NOT rsQry.EOF)) Then
 94 
	If ((NOT rsQry.BOF) AND (NOT rsQry.EOF)) Then
95 
		outobjDetails.Item ("old_prod_id")   = rsQry("old_prod_id")
 95 
		outobjDetails.Item ("old_prod_id")   = rsQry("old_prod_id")
96 
		outobjDetails.Item ("pkg_name") = rsQry("pkg_name").Value
 96 
		outobjDetails.Item ("pkg_name") = rsQry("pkg_name").Value
97 
		outobjDetails.Item ("pkg_version") = rsQry("pkg_version").Value
 97 
		outobjDetails.Item ("pkg_version") = rsQry("pkg_version").Value
98 
		outobjDetails.Item ("previous_version") = rsQry("previous_version").Value
 98 
		outobjDetails.Item ("previous_version") = rsQry("previous_version").Value
99
99
100 
	End If
 100 
	End If
101
101
102 
	OraDatabase.Parameters.Remove "PROD_ID"
 102 
	OraDatabase.Parameters.Remove "PROD_ID"
103 
	rsQry.Close
 103 
	rsQry.Close
104 
	Set rsQry = Nothing
 104 
	Set rsQry = Nothing
105 
End Sub
 105 
End Sub
106 
'-----------------------------------------------------------------------------------------------------------------
 106 
'-----------------------------------------------------------------------------------------------------------------
107 
Sub RowStyle ( nStatus, ByRef outIcon, ByRef outStyle )
 107 
Sub RowStyle ( nStatus, ByRef outIcon, ByRef outStyle )
108
108
109 
	Select Case CInt( nStatus )
 109 
	Select Case CInt( nStatus )
110 
		Case enumDB_DIFF_NO_CHANGE
 110 
		Case enumDB_DIFF_NO_CHANGE
111 
			outStyle = "body_rowg"
 111 
			outStyle = "body_rowg"
112 
			outIcon = NULL
 112 
			outIcon = NULL
113
113
114 
		Case enumDB_DIFF_UPDATED
 114 
		Case enumDB_DIFF_UPDATED
115 
			outStyle = "body_rowbold"
 115 
			outStyle = "body_rowbold"
116 
			outIcon = LIMG_UPDATED
 116 
			outIcon = LIMG_UPDATED
117
117
118 
		Case enumDB_DIFF_NEW
 118 
		Case enumDB_DIFF_NEW
119 
			outStyle = "body_rowbold"
 119 
			outStyle = "body_rowbold"
120 
			outIcon = LIMG_ADDED
 120 
			outIcon = LIMG_ADDED
121
121
122 
		Case enumDB_DIFF_REMOVED
 122 
		Case enumDB_DIFF_REMOVED
123 
			outStyle = "body_rowthru"
 123 
			outStyle = "body_rowthru"
124 
			outIcon = LIMG_REMOVED
 124 
			outIcon = LIMG_REMOVED
125
125
126 
	End Select
 126 
	End Select
127
127
128 
End Sub
 128 
End Sub
129 
'-----------------------------------------------------------------------------------------------------------------
 129 
'-----------------------------------------------------------------------------------------------------------------
130 
Function UserName (nUserId)
 130 
Function UserName (nUserId)
131 
 
 131 
 
132 
If nUserId <> "" Then
 132 
If nUserId <> "" Then
133
133
134 
	Dim rsTemp, user_name
 134 
	Dim rsTemp, user_name
135 
 
 135 
 
136 
	Set rsTemp = OraDatabase.DbCreateDynaset( "select * from users where user_id ="&nUserId , ORADYN_DEFAULT )
 136 
	Set rsTemp = OraDatabase.DbCreateDynaset( "select * from users where user_id ="&nUserId , ORADYN_DEFAULT )
137 
 
 137 
 
138 
	user_name = rsTemp("full_name")
 138 
	user_name = rsTemp("full_name")
139 
 
 139 
 
140 
	rsTemp.Close()
 140 
	rsTemp.Close()
141 
	Set rsTemp = Nothing
 141 
	Set rsTemp = Nothing
142 
 
 142 
 
143 
UserName = user_name
143 
UserName = user_name
144 
 
 144 
 
145 
Else
 145 
Else
146 
 
 146 
 
147 
UserName = NULL
 147 
UserName = NULL
148 
 
 148 
 
149 
End If
 149 
End If
150 
 
 150 
 
151 
 
 151 
 
152 
End Function
 152 
End Function
153 
'-----------------------------------------------------------------------------------------------------------------
 153 
'-----------------------------------------------------------------------------------------------------------------
154 
%>
 154 
%>
155 
<%
 155 
<%
156 
'------------ RUN BEFORE PAGE RENDER ----------
 156 
'------------ RUN BEFORE PAGE RENDER ----------
157 
' --- Get Form details from DB ---
 157 
' --- Get Form details from DB ---
158 
Call GetFormDetails ( parProd_id, parOs_id, parBase_env_id, Request("bom_id"), objFormCollector )
 158 
Call GetFormDetails ( parProd_id, parOs_id, parBase_env_id, Request("bom_id"), objFormCollector )
159 
 
 159 
 
160 
'----------------------------------------------
 160 
'----------------------------------------------
161 
%>
 161 
%>
162 
<html>
 162 
<html>
163 
<head>
 163 
<head>
164 
<title>Production Manager</title>
 164 
<title>Production Manager</title>
165 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
 165 
<link rel="shortcut icon" href="<%=FavIcon%>"/>
166 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
 166 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
167 
<link href="scripts/deployment_manager.css" rel="stylesheet" type="text/css">
 167 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
168 
<script language="JavaScript" src="scripts/common.js"></script>
 168 
<link href="scripts/deployment_manager.css" rel="stylesheet" type="text/css">
169 
</head>
 169 
<script language="JavaScript" src="scripts/common.js"></script>
170 
 
 170 
</head>
171 
<body leftmargin="0" topmargin="0">
 171 
 
172 
<!-- HEADER ++++++++++++++++ -->
 172 
<body leftmargin="0" topmargin="0">
173 
<!--#include file="_header.asp"-->
 173 
<!-- HEADER ++++++++++++++++ -->
174 
<!-- +++++++++++++++++++++++ -->
 174 
<!--#include file="_header.asp"-->
175 
<!-- MAIN MENU  +  CRUMBS ++++++++++++++++ -->
 175 
<!-- +++++++++++++++++++++++ -->
176 
<!--#include file="_main_menu.asp"-->
 176 
<!-- MAIN MENU  +  CRUMBS ++++++++++++++++ -->
177 
<!-- +++++++++++++++++++++++++++++++++++++ -->
 177 
<!--#include file="_main_menu.asp"-->
178 
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
 178 
<!-- +++++++++++++++++++++++++++++++++++++ -->
179 
  <tr>
 179 
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
180 
    <td width="1%" valign="top" background="images/bg_bage_0.gif">
 180 
  <tr>
181 
	<!-- NODE BROWSER ++++++++++++++++++++++ -->
 181 
    <td width="1%" valign="top" background="images/bg_bage_0.gif">
182 
	<!--#include file="_bom_browser.asp"-->
 182 
	<!-- NODE BROWSER ++++++++++++++++++++++ -->
183 
	<!-- END OF NODE BROWSER +++++++++++++++ -->
 183 
	<!--#include file="_bom_browser.asp"-->
184 
	</td>
 184 
	<!-- END OF NODE BROWSER +++++++++++++++ -->
185 
    <td width="1" background="images/bg_bage_1.gif"><img src="images/spacer.gif" width="1" height="600"></td>
 185 
	</td>
186 
    <td width="100%" valign="top" bgcolor="#FFFFFF">
 186 
    <td width="1" background="images/bg_bage_1.gif"><img src="images/spacer.gif" width="1" height="600"></td>
187 
	<table width="100%"  border="0" cellspacing="0" cellpadding="0">
 187 
    <td width="100%" valign="top" bgcolor="#FFFFFF">
188 
	  <tr>
 188 
	<table width="100%"  border="0" cellspacing="0" cellpadding="0">
189 
        <td valign="top" background="images/bg_green.gif"></td>
 189 
	  <tr>
190 
        <td align="right" valign="bottom" background="images/bg_green.gif" class="body_txtw"><%Call RenderTitle( objProdCollector )%></td>
 190 
        <td valign="top" background="images/bg_green.gif"></td>
191 
        <td background="images/bg_green.gif"><img src="images/spacer.gif" width="10" height="20"></td>
 191 
        <td align="right" valign="bottom" background="images/bg_green.gif" class="body_txtw"><%Call RenderTitle( objProdCollector )%></td>
192 
      </tr>
 192 
        <td background="images/bg_green.gif"><img src="images/spacer.gif" width="10" height="20"></td>
193 
      <tr>
 193 
      </tr>
194 
        <td width="1%" valign="top" background="images/bg_green.gif"></td>
 194 
      <tr>
195 
        <td width="100%" valign="bottom" background="images/bg_green.gif">
 195 
        <td width="1%" valign="top" background="images/bg_green.gif"></td>
196 
		<!-- TAB CONTROLS ++++++++++++++++++++++ -->
 196 
        <td width="100%" valign="bottom" background="images/bg_green.gif">
197 
		<!--#include file="_tabs_definition.asp"-->
 197 
		<!-- TAB CONTROLS ++++++++++++++++++++++ -->
198 
		<%
 198 
		<!--#include file="_tabs_definition.asp"-->
199 
		Set objTabControl = New TabControl
 199 
		<%
200 
		objTabControl.TemplateDoc = ReadFile( Server.MapPath("controls/ERGTabStyleWinXP/tab_style.html") ) ' Supply tab style definition
 200 
		Set objTabControl = New TabControl
201 
		objTabControl.TabStyle = "StyleWinXP"
 201 
		objTabControl.TemplateDoc = ReadFile( Server.MapPath("controls/ERGTabStyleWinXP/tab_style.html") ) ' Supply tab style definition
202 
		objTabControl.AddTabDefnition ( arrProdTabDef )
 202 
		objTabControl.TabStyle = "StyleWinXP"
203 
		objTabControl.Render ()
 203 
		objTabControl.AddTabDefnition ( arrProdTabDef )
204 
		%>
 204 
		objTabControl.Render ()
205 
		<!-- END OF TAB CONTROLS +++++++++++++++ -->
 205 
		%>
206 
		</td>
 206 
		<!-- END OF TAB CONTROLS +++++++++++++++ -->
207 
        <td width="1%" background="images/bg_green.gif"><img src="images/spacer.gif" width="10" height="35"></td>
 207 
		</td>
208 
        </tr>
 208 
        <td width="1%" background="images/bg_green.gif"><img src="images/spacer.gif" width="10" height="35"></td>
209 
      <tr>
 209 
        </tr>
210 
        <td background="images/bg_bage_0.gif"><img src="images/spacer.gif" width="30" height="10"></td>
 210 
      <tr>
211 
        <td background="images/bg_bage_0.gif">
 211 
        <td background="images/bg_bage_0.gif"><img src="images/spacer.gif" width="30" height="10"></td>
212 
		<!-- BUTTONS CONTROL +++++++++++++++++++ -->
 212 
        <td background="images/bg_bage_0.gif">
213 
		<!-- +++++++++++++++++++++++++++++++++++ -->
 213 
		<!-- BUTTONS CONTROL +++++++++++++++++++ -->
214 
		</td>
 214 
		<!-- +++++++++++++++++++++++++++++++++++ -->
215 
        <td background="images/bg_green.gif"><img src="images/p_bar_corrner.gif" width="17" height="42"></td>
 215 
		</td>
216 
        </tr>
 216 
        <td background="images/bg_green.gif"><img src="images/p_bar_corrner.gif" width="17" height="42"></td>
217 
      <tr>
 217 
        </tr>
218 
        <td>&nbsp;</td>
 218 
      <tr>
219 
        <td>&nbsp;</td>
 219 
        <td>&nbsp;</td>
220 
        <td valign="top"><%If Request.Cookies( enumCOOKIE_NAME )( "user_bar" ) = "hide" Then%><a href="<%=SCRIPT_NAME%>?user_bar=<%=enumDEFAULT%>&<%=objPMod.ComposeURL()%>"><img src="icons/b_left.gif" title="Maximize favourits" width="13" height="13" vspace="5" border="0"></a><%End If%></td>
 220 
        <td>&nbsp;</td>
221 
        </tr>
 221 
        <td valign="top"><%If Request.Cookies( enumCOOKIE_NAME )( "user_bar" ) = "hide" Then%><a href="<%=SCRIPT_NAME%>?user_bar=<%=enumDEFAULT%>&<%=objPMod.ComposeURL()%>"><img src="icons/b_left.gif" title="Maximize favourits" width="13" height="13" vspace="5" border="0"></a><%End If%></td>
222 
    </table>
 222 
        </tr>
223 
	<table width="100%"  border="0" cellspacing="10" cellpadding="0">
 223 
    </table>
224 
      <tr>
 224 
	<table width="100%"  border="0" cellspacing="10" cellpadding="0">
225 
        <td>
 225 
      <tr>
226 
		<!-- PAGE DETAILS +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 226 
        <td>
227 
		<%
 227 
		<!-- PAGE DETAILS +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
228 
		OraDatabase.Parameters.Add "PROD_ID", 		dbPARprod_id,		ORAPARM_INPUT, ORATYPE_NUMBER
228 
		<%
229 
		%>
 229 
		OraDatabase.Parameters.Add "PROD_ID", 		dbPARprod_id,		ORAPARM_INPUT, ORATYPE_NUMBER
230 
		<form name="OldVersion" method="get" action="<%=SCRIPT_NAME%>">
 230 
		%>
231 
			<SPAN class="body_txt">Changes since version&nbsp;</SPAN>
 231 
		<form name="OldVersion" method="get" action="<%=SCRIPT_NAME%>">
232 
			<select name="old_prod_id" class="form_ivalue">
 232 
			<SPAN class="body_txt">Changes since version&nbsp;</SPAN>
233 
			   <option value=""></option>
 233 
			<select name="old_prod_id" class="form_ivalue">
234 
			  <%
 234 
			   <option value=""></option>
235 
			  nOldProdID = Request("old_prod_id")
 235 
			  <%
236 
			  If nOldProdID = "" Then nOldProdID = objProdCollector.Item ("last_pv_id")
 236 
			  nOldProdID = Request("old_prod_id")
237
237 
			  If nOldProdID = "" Then nOldProdID = objProdCollector.Item ("last_pv_id")
238 
			  OraDatabase.Parameters.Add "PKG_ID", 		objProdCollector.Item ("pkg_id"),	ORAPARM_INPUT, ORATYPE_NUMBER
238
239 
			  OraDatabase.Parameters.Add "V_EXT", 		objProdCollector.Item ("v_ext"),	ORAPARM_INPUT, ORATYPE_NUMBER
239 
			  OraDatabase.Parameters.Add "PKG_ID", 		objProdCollector.Item ("pkg_id"),	ORAPARM_INPUT, ORATYPE_NUMBER
240 
			  OraDatabase.Parameters.Add "OLD_PROD_ID", nOldProdID,	ORAPARM_INPUT, ORATYPE_NUMBER
240 
			  OraDatabase.Parameters.Add "V_EXT", 		objProdCollector.Item ("v_ext"),	ORAPARM_INPUT, ORATYPE_NUMBER
241 
			  OraDatabase.Parameters.Add "PROJ_ID",   objFormCollector.Item("rm_projects_fk"),	ORAPARM_INPUT, ORATYPE_NUMBER
241 
			  OraDatabase.Parameters.Add "OLD_PROD_ID", nOldProdID,	ORAPARM_INPUT, ORATYPE_NUMBER
242 
			  OraDatabase.Parameters.Add "BRANCH_ID",   objFormCollector.Item("rtag_id_fk"),	ORAPARM_INPUT, ORATYPE_NUMBER
242 
			  OraDatabase.Parameters.Add "PROJ_ID",   objFormCollector.Item("rm_projects_fk"),	ORAPARM_INPUT, ORATYPE_NUMBER
243 
		      OraDatabase.Parameters.Add "FILTER_ON",   0,	ORAPARM_INPUT, ORATYPE_NUMBER
243 
			  OraDatabase.Parameters.Add "BRANCH_ID",   objFormCollector.Item("rtag_id_fk"),	ORAPARM_INPUT, ORATYPE_NUMBER
244
244 
		      OraDatabase.Parameters.Add "FILTER_ON",   0,	ORAPARM_INPUT, ORATYPE_NUMBER
245 
			  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ProductVersionsList.sql"), ORADYN_DEFAULT )
 245
246 
			  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
 246 
			  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ProductVersionsList.sql"), ORADYN_DEFAULT )
247 
			  %>
 247 
			  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
248 
				<option value="<%=rsQry("pv_id")%>" <%=rsQry("selected")%>><%=rsQry("pkg_version")%></option>
 248 
			  %>
249 
			  <%
 249 
				<option value="<%=rsQry("pv_id")%>" <%=rsQry("selected")%>><%=rsQry("pkg_version")%></option>
250 
			  	rsQry.MoveNext
 250 
			  <%
251 
			  WEnd
 251 
			  	rsQry.MoveNext
252 
			  rsQry.Close
 252 
			  WEnd
253
253 
			  rsQry.Close
254 
			  %>
 254
255 
			</select>
 255 
			  %>
256 
			<%=objPMod.ComposeHiddenTags()%>
 256 
			</select>
257 
			<input type="submit" name="btn" value="Compare" class="form_btn">
 257 
			<%=objPMod.ComposeHiddenTags()%>
258 
		<hr width="100%" size="1px" noshade color="Black">
 258 
			<input type="submit" name="btn" value="Compare" class="form_btn">
259 
		</form>
 259 
		<hr width="100%" size="1px" noshade color="Black">
260 
		<!-- PRODUCT REJECTED ------------------------------------------------------------------------------------------ -->
 260 
		</form>
261 
		<%
 261 
		<!-- PRODUCT REJECTED ------------------------------------------------------------------------------------------ -->
262 
		If objProdCollector.Item ("is_rejected") = enumDB_YES Then
 262 
		<%
263
263 
		If objProdCollector.Item ("is_rejected") = enumDB_YES Then
264 
			OraDatabase.Parameters.Add "ENTITY_ID", 		dbPARprod_id,	ORAPARM_INPUT, ORATYPE_NUMBER
 264
265 
			OraDatabase.Parameters.Add "ENUM_ENTITY_TYPE", 	"enumENTITY_TYPE_PRODUCT",	ORAPARM_INPUT, ORATYPE_VARCHAR2
 265 
			OraDatabase.Parameters.Add "ENTITY_ID", 		dbPARprod_id,	ORAPARM_INPUT, ORATYPE_NUMBER
266
266 
			OraDatabase.Parameters.Add "ENUM_ENTITY_TYPE", 	"enumENTITY_TYPE_PRODUCT",	ORAPARM_INPUT, ORATYPE_VARCHAR2
267
267
268 
			Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("RejectionTrail.sql"), ORADYN_DEFAULT )
 268
269
269 
			Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("RejectionTrail.sql"), ORADYN_DEFAULT )
270 
			sMessage = "<table width='100%'  border='0' cellspacing='3' cellpadding='0'>"
 270
271 
			sMessage = sMessage &"<tr>"
 271 
			sMessage = "<table width='100%'  border='0' cellspacing='3' cellpadding='0'>"
272 
			sMessage = sMessage &"<td width='100%' class='body_txt'><b>Product is REJECTED!</b><br><br><br></td>"
 272 
			sMessage = sMessage &"<tr>"
273 
			sMessage = sMessage &"<td width='1%' nowrap valign='bottom' align='right'><a href='javascript:;' onClick=""MM_openBrWindow('wProdRejectNote.asp?rfile="& SCRIPT_NAME &"&"& objPMod.ComposeURL() &"','ProdRejectNote','scrollbars=yes,resizable=yes,width=600,height=350');""  class='body_smllink' title='Create new note'>Create Note"& LIMG_NOTE_NEW &"</a></td>"
 273 
			sMessage = sMessage &"<td width='100%' class='body_txt'><b>Product is REJECTED!</b><br><br><br></td>"
274 
			sMessage = sMessage &"</tr>"
 274 
			sMessage = sMessage &"<td width='1%' nowrap valign='bottom' align='right'><a href='javascript:;' onClick=""MM_openBrWindow('wProdRejectNote.asp?rfile="& SCRIPT_NAME &"&"& objPMod.ComposeURL() &"','ProdRejectNote','scrollbars=yes,resizable=yes,width=600,height=350');""  class='body_smllink' title='Create new note'>Create Note"& LIMG_NOTE_NEW &"</a></td>"
275
275 
			sMessage = sMessage &"</tr>"
276 
			While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
 276
277 
				sMessage = sMessage & "<tr><td colspan='2' background='images/bg_table_border.gif'><img src='images/spacer.gif' width='1' height='1'></td></tr>"
 277 
			While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
278 
				sMessage = sMessage &"<tr>"
 278 
				sMessage = sMessage & "<tr><td colspan='2' background='images/bg_table_border.gif'><img src='images/spacer.gif' width='1' height='1'></td></tr>"
279 
				sMessage = sMessage &"<td class='body_txt'>"
 279 
				sMessage = sMessage &"<tr>"
280 
				If rsQry("is_rejected") = enumDB_YES Then
 280 
				sMessage = sMessage &"<td class='body_txt'>"
281 
					sMessage = sMessage &"Product is REJECTED!<br>"
 281 
				If rsQry("is_rejected") = enumDB_YES Then
282 
				Else
 282 
					sMessage = sMessage &"Product is REJECTED!<br>"
283 
					sMessage = sMessage &"Product is Accepted!<br>"
 283 
				Else
284 
				End If
 284 
					sMessage = sMessage &"Product is Accepted!<br>"
285 
				sMessage = sMessage & objFormater.TextToHTML( rsQry("comments") ) &"<br><SPAN class='body_smltxtg'>"& rsQry("creator") &"</SPAN></td>"
 285 
				End If
286 
				sMessage = sMessage &"<td nowrap valign='bottom' align='right'><a href='javascript:;' onClick=""MM_openBrWindow('wProdRejectNote.asp?reject_seq="& rsQry("reject_seq") &"&rfile="& SCRIPT_NAME &"&"& objPMod.ComposeURL() &"','ProdRejectNote','scrollbars=yes,resizable=yes,width=600,height=350');"" class='body_smllink' title='Edit note'>Edit Note"& LIMG_NOTE_EDIT &"</a></td>"
 286 
				sMessage = sMessage & objFormater.TextToHTML( rsQry("comments") ) &"<br><SPAN class='body_smltxtg'>"& rsQry("creator") &"</SPAN></td>"
287 
				sMessage = sMessage &"</tr>"
 287 
				sMessage = sMessage &"<td nowrap valign='bottom' align='right'><a href='javascript:;' onClick=""MM_openBrWindow('wProdRejectNote.asp?reject_seq="& rsQry("reject_seq") &"&rfile="& SCRIPT_NAME &"&"& objPMod.ComposeURL() &"','ProdRejectNote','scrollbars=yes,resizable=yes,width=600,height=350');"" class='body_smllink' title='Edit note'>Edit Note"& LIMG_NOTE_EDIT &"</a></td>"
288
288 
				sMessage = sMessage &"</tr>"
289 
				rsQry.MoveNext
 289
290 
			WEnd
 290 
				rsQry.MoveNext
291 
			rsQry.Close
 291 
			WEnd
292
292 
			rsQry.Close
293 
			sMessage = sMessage &"</table>"
 293
294
294 
			sMessage = sMessage &"</table>"
295 
			Call Messenger ( sMessage, "i_product_rejected.gif", "100%" )
 295
296
296 
			Call Messenger ( sMessage, "i_product_rejected.gif", "100%" )
297 
			Response.write "<br>"
 297
298
298 
			Response.write "<br>"
299 
			OraDatabase.Parameters.Remove "ENTITY_ID"
 299
300 
			OraDatabase.Parameters.Remove "ENUM_ENTITY_TYPE"
 300 
			OraDatabase.Parameters.Remove "ENTITY_ID"
301 
		End If
 301 
			OraDatabase.Parameters.Remove "ENUM_ENTITY_TYPE"
302 
		%>
 302 
		End If
303 
		<!-- Module Changes -------------------------------------------------------------------------------------------- -->
 303 
		%>
304 
		<SPAN class="body_colb">Module Changes</SPAN>
 304 
		<!-- Module Changes -------------------------------------------------------------------------------------------- -->
305 
		<table width="100%"  border="0" cellspacing="3" cellpadding="0">
 305 
		<SPAN class="body_colb">Module Changes</SPAN>
306 
          <tr>
 306 
		<table width="100%"  border="0" cellspacing="3" cellpadding="0">
307 
		  	<td width="1" background="images/bg_table_col.gif"><img src="images/spacer.gif" width="16" height="16" hspace="2"></td>
 307 
          <tr>
308 
            <td width="20%" background="images/bg_table_border.gif"><table width="100%"  border="0" cellspacing="1" cellpadding="2">
 308 
		  	<td width="1" background="images/bg_table_col.gif"><img src="images/spacer.gif" width="16" height="16" hspace="2"></td>
309 
              <tr>
 309 
            <td width="20%" background="images/bg_table_border.gif"><table width="100%"  border="0" cellspacing="1" cellpadding="2">
310 
                <td align="right" nowrap background="images/bg_table_col.gif" class="body_col">Module Name</td>
 310 
              <tr>
311 
              </tr>
 311 
                <td align="right" nowrap background="images/bg_table_col.gif" class="body_col">Module Name</td>
312 
            </table></td>
 312 
              </tr>
313 
			<td width="20%" align="right" nowrap background="images/bg_table_col.gif" class="body_col">Current Version</td>
 313 
            </table></td>
314 
            <td width="20%" align="right" nowrap background="images/bg_table_col.gif" class="body_col">Previous Version</td>
 314 
			<td width="20%" align="right" nowrap background="images/bg_table_col.gif" class="body_col">Current Version</td>
315 
			<td width="70%" background="images/bg_table_col.gif"></td>
 315 
            <td width="20%" align="right" nowrap background="images/bg_table_col.gif" class="body_col">Previous Version</td>
316 
			<td width="1%" align="right" background="images/bg_table_col.gif" class="body_col">Owner</td>
 316 
			<td width="70%" background="images/bg_table_col.gif"></td>
317
317 
			<td width="1%" align="right" background="images/bg_table_col.gif" class="body_col">Owner</td>
318 
          </tr>
 318
319 
		  <%
 319 
          </tr>
320 
		  Dim style, icon
 320 
		  <%
321
321 
		  Dim style, icon
322 
		  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ProductsDiff.sql"), ORADYN_DEFAULT )
 322
323 
		  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
 323 
		  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ProductsDiff.sql"), ORADYN_DEFAULT )
324 
		  	Call RowStyle ( rsQry("status"), icon, style )
 324 
		  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
325 
		  %>
 325 
		  	Call RowStyle ( rsQry("status"), icon, style )
326 
          <tr>
 326 
		  %>
327 
            <td align="center"><%=icon%></td>
 327 
          <tr>
328 
			<td nowrap class="<%=style%>"><%=rsQry("pkg_name").Value%></td>
 328 
            <td align="center"><%=icon%></td>
329 
            <td nowrap class="<%=style%>"><%=rsQry("pkg_version").Value%></td>
 329 
			<td nowrap class="<%=style%>"><%=rsQry("pkg_name").Value%></td>
330 
			<td nowrap class="<%=style%>"><%=rsQry("previous_version").Value%></td>
 330 
            <td nowrap class="<%=style%>"><%=rsQry("pkg_version").Value%></td>
331 
			<td nowrap class="<%=style%>"></td>
 331 
			<td nowrap class="<%=style%>"><%=rsQry("previous_version").Value%></td>
332 
			<td nowrap><a href="mailto:<%=rsQry("user_email")%>" class="body_link" title="Send Email to <%=rsQry("user_email")%>"><%=LIMG_EMAIL  &  rsQry("full_name").Value%></a></td>
 332 
			<td nowrap class="<%=style%>"></td>
333
333 
			<td nowrap><a href="mailto:<%=rsQry("user_email")%>" class="body_link" title="Send Email to <%=rsQry("user_email")%>"><%=LIMG_EMAIL  &  rsQry("full_name").Value%></a></td>
334 
          </tr>
 334
335 
		  <%rsQry.MoveNext%>
 335 
          </tr>
336
336 
		  <%rsQry.MoveNext%>
337 
		  <%If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then%>
 337
338 
          <tr>
 338 
		  <%If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then%>
339 
            <td colspan="7" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
 339 
          <tr>
340 
          </tr>
 340 
            <td colspan="7" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
341 
		  <%End If%>
 341 
          </tr>
342
342 
		  <%End If%>
343 
		  <%
 343
344 
		  WEnd
 344 
		  <%
345 
		  %>
 345 
		  WEnd
346 
          <tr>
 346 
		  %>
347 
            <td colspan="7" background="images/bg_table_border.gif">
 347 
          <tr>
348 
			 <table width="100%"  border="0" cellspacing="1" cellpadding="2">
 348 
            <td colspan="7" background="images/bg_table_border.gif">
349 
              <tr>
 349 
			 <table width="100%"  border="0" cellspacing="1" cellpadding="2">
350 
                <td nowrap background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
 350 
              <tr>
351 
              </tr>
 351 
                <td nowrap background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
352 
             </table>
 352 
              </tr>
353 
			</td>
 353 
             </table>
354 
          </tr>
 354 
			</td>
355 
         </table>
 355 
          </tr>
356 
		 <SPAN class="body_smltxtg">
 356 
         </table>
357 
		 NOTE: <%=LIMG_UPDATED%>&nbsp;Updated, <%=LIMG_ADDED%>&nbsp;Added, <%=LIMG_REMOVED%>&nbsp;Removed, [Blank]&nbsp;No change
 357 
		 <SPAN class="body_smltxtg">
358 
		 </span>
 358 
		 NOTE: <%=LIMG_UPDATED%>&nbsp;Updated, <%=LIMG_ADDED%>&nbsp;Added, <%=LIMG_REMOVED%>&nbsp;Removed, [Blank]&nbsp;No change
359 
		 <br><br><br>
 359 
		 </span>
360 
		<!-- Reasons For This Version -------------------------------------------------------------------------------------------- -->
 360 
		 <br><br><br>
361 
		<SPAN class="body_colb">Reasons For This Version</SPAN>
 361 
		<!-- Reasons For This Version -------------------------------------------------------------------------------------------- -->
362 
		<table width="100%"  border="0" cellspacing="3" cellpadding="0">
 362 
		<SPAN class="body_colb">Reasons For This Version</SPAN>
363 
		  <tr>
 363 
		<table width="100%"  border="0" cellspacing="3" cellpadding="0">
364 
            <td background="images/bg_table_border.gif">
 364 
		  <tr>
365 
			 <table width="100%"  border="0" cellspacing="1" cellpadding="2">
 365 
            <td background="images/bg_table_border.gif">
366 
              <tr>
 366 
			 <table width="100%"  border="0" cellspacing="1" cellpadding="2">
367 
                <td nowrap background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
 367 
              <tr>
368 
              </tr>
 368 
                <td nowrap background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
369 
             </table>
 369 
              </tr>
370 
			</td>
 370 
             </table>
371 
          </tr>
 371 
			</td>
372 
		  <%
 372 
          </tr>
373 
		  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ReasonsForVersionList.sql"), ORADYN_DEFAULT )
 373 
		  <%
374 
		  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
 374 
		  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ReasonsForVersionList.sql"), ORADYN_DEFAULT )
375 
		  %>
 375 
		  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
376 
          <tr>
 376 
		  %>
377 
            <td class="body_rowlite">
 377 
          <tr>
378 
			<b><%=rsQry("pkg_name").Value &" "& rsQry("pkg_version").Value%><img src="icons/i_popup_link.gif" hspace="2" border="0" align="absmiddle"></b><br>
 378 
            <td class="body_rowlite">
379 
			<%
 379 
			<b><%=rsQry("pkg_name").Value &" "& rsQry("pkg_version").Value%><img src="icons/i_popup_link.gif" hspace="2" border="0" align="absmiddle"></b><br>
380 
			If IsNull(rsQry("comments")) OR rsQry("comments") = "" Then
 380 
			<%
381 
				Response.write "Not specified. Check Issues list."
 381 
			If IsNull(rsQry("comments")) OR rsQry("comments") = "" Then
382 
			Else
 382 
				Response.write "Not specified. Check Issues list."
383 
				Response.write objFormater.TextToHtml( rsQry("comments") )
 383 
			Else
384 
			End If
 384 
				Response.write objFormater.TextToHtml( rsQry("comments") )
385
385 
			End If
386 
			%>
 386
387 
			</td>
 387 
			%>
388 
          </tr>
 388 
			</td>
389 
		  <%rsQry.MoveNext%>
 389 
          </tr>
390
390 
		  <%rsQry.MoveNext%>
391 
		  <%If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then%>
 391
392 
          <tr>
 392 
		  <%If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then%>
393 
            <td background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
 393 
          <tr>
394 
          </tr>
 394 
            <td background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
395 
		  <%End If%>
 395 
          </tr>
396
396 
		  <%End If%>
397 
		  <%
 397
398 
		  WEnd
 398 
		  <%
399 
		  %>
 399 
		  WEnd
400 
          <tr>
 400 
		  %>
401 
            <td background="images/bg_table_border.gif">
 401 
          <tr>
402 
			 <table width="100%"  border="0" cellspacing="1" cellpadding="2">
 402 
            <td background="images/bg_table_border.gif">
403 
              <tr>
 403 
			 <table width="100%"  border="0" cellspacing="1" cellpadding="2">
404 
                <td nowrap background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
 404 
              <tr>
405 
              </tr>
 405 
                <td nowrap background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
406 
             </table>
 406 
              </tr>
407 
			</td>
 407 
             </table>
408 
          </tr>
 408 
			</td>
409 
         </table>
 409 
          </tr>
410 
		<p>
 410 
         </table>
411 
		    <%
 411 
		<p>
412 
		OraDatabase.Parameters.Remove "PROD_ID"
 412 
		    <%
413 
		OraDatabase.Parameters.Remove "OLD_PROD_ID"
 413 
		OraDatabase.Parameters.Remove "PROD_ID"
414 
		OraDatabase.Parameters.Remove "PKG_ID"
 414 
		OraDatabase.Parameters.Remove "OLD_PROD_ID"
415 
		OraDatabase.Parameters.Remove "V_EXT"
 415 
		OraDatabase.Parameters.Remove "PKG_ID"
416 
		%>
 416 
		OraDatabase.Parameters.Remove "V_EXT"
417 
</p>
 417 
		%>
418 
<!-- Realease Authorisation -------------------------------------------------------------------------------------------- -->
 418 
</p>
419 
		<SPAN class="body_colb">Release Authorisation </SPAN>
 419 
<!-- Realease Authorisation -------------------------------------------------------------------------------------------- -->
420 
<%
 420 
		<SPAN class="body_colb">Release Authorisation </SPAN>
421 
Set rsQry = OraDatabase.DbCreateDynaset( "select * from release_authorisation where pv_id="&dbPARprod_id, ORADYN_DEFAULT )
 421 
<%
422 
If rsQry.RecordCount > 0 Then
 422 
Set rsQry = OraDatabase.DbCreateDynaset( "select * from release_authorisation where pv_id="&dbPARprod_id, ORADYN_DEFAULT )
423 
%>
423 
If rsQry.RecordCount > 0 Then
424 
		<table width="100%"  border="0" cellspacing="3" cellpadding="0">
 424 
%>
425 
 
 425 
		<table width="100%"  border="0" cellspacing="3" cellpadding="0">
426 
              <tr>
 426 
 
427 
              <td background="images/bg_bage_0a.gif">
 427 
              <tr>
428 
			   <table width="100%"  border="0" cellspacing="1" cellpadding="3">
 428 
              <td background="images/bg_bage_0a.gif">
429 
                <tr>
 429 
			   <table width="100%"  border="0" cellspacing="1" cellpadding="3">
430 
                  <td width="10%" background="images/bg_bage_0.gif" class="body_col">Date</td>
 430 
                <tr>
431 
                  <td width="20%" background="images/bg_bage_0.gif" class="body_col">Regional Tester</td>
 431 
                  <td width="10%" background="images/bg_bage_0.gif" class="body_col">Date</td>
432 
				  <td width="70%" background="images/bg_bage_0.gif" class="body_col">Tester Comments</td>
 432 
                  <td width="20%" background="images/bg_bage_0.gif" class="body_col">Regional Tester</td>
433
433 
				  <td width="70%" background="images/bg_bage_0.gif" class="body_col">Tester Comments</td>
434 
                </tr>
 434
435 
                <tr>
 435 
                </tr>
436 
                  <td width="10%" background="images/bg_lght_gray.gif" class="body_rowlite"><%=rsQry("tester_datestamp")%></td>
 436 
                <tr>
437 
                  <td width="20%" background="images/bg_lght_gray.gif" class="body_rowlite"><%=UserName(rsQry("tester_id"))%></td>
 437 
                  <td width="10%" background="images/bg_lght_gray.gif" class="body_rowlite"><%=rsQry("tester_datestamp")%></td>
438 
				  <td width="70%" background="images/bg_lght_gray.gif" class="body_rowlite"><%=rsQry("tester_comments")%></td>
 438 
                  <td width="20%" background="images/bg_lght_gray.gif" class="body_rowlite"><%=UserName(rsQry("tester_id"))%></td>
439
439 
				  <td width="70%" background="images/bg_lght_gray.gif" class="body_rowlite"><%=rsQry("tester_comments")%></td>
440 
                </tr>
440
441 
				<%'objRepeater.RenderDataGrid ()%>
 441 
                </tr>
442 
              </table>
 442 
				<%'objRepeater.RenderDataGrid ()%>
443
443 
              </table>
444 
			   <table width="100%"  border="0" cellspacing="1" cellpadding="3">
 444
445 
                <tr>
 445 
			   <table width="100%"  border="0" cellspacing="1" cellpadding="3">
446 
				  <td width="10%" background="images/bg_bage_0.gif" class="body_col">Date</td>
 446 
                <tr>
447 
				  <td width="20%" background="images/bg_bage_0.gif" class="body_col">Regional Manager</td>
 447 
				  <td width="10%" background="images/bg_bage_0.gif" class="body_col">Date</td>
448 
				  <td width="70%" background="images/bg_bage_0.gif" class="body_col">Manager Comments</td>
448 
				  <td width="20%" background="images/bg_bage_0.gif" class="body_col">Regional Manager</td>
449 
                </tr>
 449 
				  <td width="70%" background="images/bg_bage_0.gif" class="body_col">Manager Comments</td>
450 
                <tr>
 450 
                </tr>
451 
				  <td width="10%" background="images/bg_lght_gray.gif" class="body_rowlite"><%=rsQry("manager_datestamp")%></td>
 451 
                <tr>
452 
				  <td width="20%" background="images/bg_lght_gray.gif" class="body_rowlite"><%=UserName(rsQry("manager_id"))%></td>
 452 
				  <td width="10%" background="images/bg_lght_gray.gif" class="body_rowlite"><%=rsQry("manager_datestamp")%></td>
453 
				  <td width="70%" background="images/bg_lght_gray.gif" class="body_rowlite"><%=rsQry("manager_comments")%></td>
453 
				  <td width="20%" background="images/bg_lght_gray.gif" class="body_rowlite"><%=UserName(rsQry("manager_id"))%></td>
454 
                </tr>
454 
				  <td width="70%" background="images/bg_lght_gray.gif" class="body_rowlite"><%=rsQry("manager_comments")%></td>
455 
				<%'objRepeater.RenderDataGrid ()%>
 455 
                </tr>
456 
              </table>
456 
				<%'objRepeater.RenderDataGrid ()%>
457 
			 </td>
 457 
              </table>
458 
            </tr>
 458 
			 </td>
459 
        </table>
 459 
            </tr>
460 
<%
 460 
        </table>
461 
Else
 461 
<%
462 
%>
462 
Else
463 
<SPAN class="body_col">No Information </SPAN>
 463 
%>
464 
 
 464 
<SPAN class="body_col">No Information </SPAN>
465
465 
 
466 
<%
 466
467 
End If
 467 
<%
468 
rsQry.Close()
 468 
End If
469 
Set rsQry = Nothing
 469 
rsQry.Close()
470 
 
 470 
Set rsQry = Nothing
471 
%>
471 
 
472
472 
%>
473 
			<p>
473
474 
		  <!-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 474 
			<p>
475 
	      </p></td>
 475 
		  <!-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
476 
      </tr>
 476 
	      </p></td>
477 
    </table>
 477 
      </tr>
478 
	</td>
 478 
    </table>
479 
    <td width="1%" valign="top" background="images/bg_favourits.gif">
 479 
	</td>
480 
	<%If Request.Cookies( enumCOOKIE_NAME )( "user_bar" ) <> "hide" Then%>
 480 
    <td width="1%" valign="top" background="images/bg_favourits.gif">
481 
	<!-- PERSONAL PANE +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 481 
	<%If Request.Cookies( enumCOOKIE_NAME )( "user_bar" ) <> "hide" Then%>
482 
      <table width="100%"  border="0" cellspacing="0" cellpadding="0">
 482 
	<!-- PERSONAL PANE +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
483 
      <tr>
 483 
      <table width="100%"  border="0" cellspacing="0" cellpadding="0">
484 
        <td width="100%" valign="bottom" background="images/bg_green.gif"><%=GetNodeImage ( dbPARnode_id )%></td>
 484 
      <tr>
485 
        <td width="1" background="images/bg_green.gif"><img src="images/spacer.gif" width="1" height="97"></td>
 485 
        <td width="100%" valign="bottom" background="images/bg_green.gif"><%=GetNodeImage ( dbPARnode_id )%></td>
486 
      </tr>
 486 
        <td width="1" background="images/bg_green.gif"><img src="images/spacer.gif" width="1" height="97"></td>
487 
      </table>
 487 
      </tr>
488 
      <a href="<%=SCRIPT_NAME%>?user_bar=hide&<%=objPMod.ComposeURL()%>"><img src="icons/b_right.gif" title="Minimize favourits" width="13" height="13" vspace="5" border="0"></a>      <table width="100%"  border="0" cellspacing="0" cellpadding="0">
 488 
      </table>
489 
      <tr>
 489 
      <a href="<%=SCRIPT_NAME%>?user_bar=hide&<%=objPMod.ComposeURL()%>"><img src="icons/b_right.gif" title="Minimize favourits" width="13" height="13" vspace="5" border="0"></a>      <table width="100%"  border="0" cellspacing="0" cellpadding="0">
490 
        <td valign="top"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
 490 
      <tr>
491 
          <tr>
 491 
        <td valign="top"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
492 
            <td valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
 492 
          <tr>
493 
            <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="10" height="3"></td>
 493 
            <td valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
494 
            <td align="right" valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
 494 
            <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="10" height="3"></td>
495 
          </tr>
 495 
            <td align="right" valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
496 
          <tr>
 496 
          </tr>
497 
            <td colspan="3" background="images/bg_favourits2.gif"><table width="100%"  border="0" cellspacing="5" cellpadding="0">
 497 
          <tr>
498 
              <tr>
 498 
            <td colspan="3" background="images/bg_favourits2.gif"><table width="100%"  border="0" cellspacing="5" cellpadding="0">
499 
                <td valign="top" class="fav_txt"><span class="fav_head">Reason for release</span><br>
 499 
              <tr>
500 
                      <br>
 500 
                <td valign="top" class="fav_txt"><span class="fav_head">Reason for release</span><br>
501 
    <!--     This version needs to be rebuild on new sysbase_types 1.5.0.mas<br> -->
 501 
                      <br>
502 
                </td>
 502 
    <!--     This version needs to be rebuild on new sysbase_types 1.5.0.mas<br> -->
503 
              </tr>
 503 
                </td>
504 
            </table></td>
 504 
              </tr>
505 
            </tr>
 505 
            </table></td>
506 
          <tr>
 506 
            </tr>
507 
            <td valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
 507 
          <tr>
508 
            <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="190" height="3"></td>
 508 
            <td valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
509 
            <td align="right" valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
 509 
            <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="190" height="3"></td>
510 
          </tr>
 510 
            <td align="right" valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
511 
        </table>
 511 
          </tr>
512 
          <br>
 512 
        </table>
513 
          <table width="100%"  border="0" cellspacing="0" cellpadding="0">
 513 
          <br>
514 
            <tr>
 514 
          <table width="100%"  border="0" cellspacing="0" cellpadding="0">
515 
              <td valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
 515 
            <tr>
516 
              <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="10" height="3"></td>
 516 
              <td valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
517 
              <td align="right" valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
 517 
              <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="10" height="3"></td>
518 
            </tr>
 518 
              <td align="right" valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
519 
            <tr background="images/bg_gray.gif">
 519 
            </tr>
520 
              <td colspan="3" background="images/bg_favourits2.gif"><table width="100%"  border="0" cellspacing="5" cellpadding="0">
 520 
            <tr background="images/bg_gray.gif">
521 
                <tr>
 521 
              <td colspan="3" background="images/bg_favourits2.gif"><table width="100%"  border="0" cellspacing="5" cellpadding="0">
522 
                  <td valign="top" class="fav_txt"><span class="fav_head">Fixed Issues</span><br>
 522 
                <tr>
523 
                      <br>
 523 
                  <td valign="top" class="fav_txt"><span class="fav_head">Fixed Issues</span><br>
524 
                      <table width="100%"  border="0" cellspacing="0" cellpadding="2">
 524 
                      <br>
525 
<!--                         <tr>
 525 
                      <table width="100%"  border="0" cellspacing="0" cellpadding="2">
526 
                          <td><img src="icons/i_bulet.gif" width="4" height="4" hspace="5"></td>
 526 
<!--                         <tr>
527 
                          <td><a href="#" class="fav_link">DEVI-021532</a></td>
 527 
                          <td><img src="icons/i_bulet.gif" width="4" height="4" hspace="5"></td>
528 
                        </tr>
 528 
                          <td><a href="#" class="fav_link">DEVI-021532</a></td>
529 
                        <tr>
 529 
                        </tr>
530 
                          <td><img src="icons/i_bulet.gif" width="4" height="4" hspace="5"></td>
 530 
                        <tr>
531 
                          <td><a href="#" class="fav_link">DEVI-021534</a></td>
 531 
                          <td><img src="icons/i_bulet.gif" width="4" height="4" hspace="5"></td>
532 
                        </tr>
 532 
                          <td><a href="#" class="fav_link">DEVI-021534</a></td>
533 
                        <tr>
 533 
                        </tr>
534 
                          <td width="1%"><img src="icons/i_bulet.gif" width="4" height="4" hspace="5"></td>
 534 
                        <tr>
535 
                          <td width="100%"><a href="#" class="fav_link">DEVI-021536</a></td>
 535 
                          <td width="1%"><img src="icons/i_bulet.gif" width="4" height="4" hspace="5"></td>
536 
                        </tr> -->
 536 
                          <td width="100%"><a href="#" class="fav_link">DEVI-021536</a></td>
537 
                    </table></td>
 537 
                        </tr> -->
538 
                </tr>
 538 
                    </table></td>
539 
              </table></td>
 539 
                </tr>
540 
              </tr>
 540 
              </table></td>
541 
            <tr>
 541 
              </tr>
542 
              <td valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
 542 
            <tr>
543 
              <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="190" height="3"></td>
 543 
              <td valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
544 
              <td align="right" valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
 544 
              <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="190" height="3"></td>
545 
            </tr>
 545 
              <td align="right" valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
546 
          </table></td>
 546 
            </tr>
547 
        <td width="1%"><img src="images/spacer.gif" width="15" height="400"></td>
 547 
          </table></td>
548 
      </tr>
 548 
        <td width="1%"><img src="images/spacer.gif" width="15" height="400"></td>
549 
    </table>
 549 
      </tr>
550 
	<!-- END OF PERSONAL BAR ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 550 
    </table>
551 
	<%End If%>
 551 
	<!-- END OF PERSONAL BAR ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
552 
   </td>
 552 
	<%End If%>
553 
  </tr>
 553 
   </td>
554 
  <tr>
 554 
  </tr>
555 
    <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="1" height="15"></td>
 555 
  <tr>
556 
    <td background="images/bg_bage_1.gif"><img src="images/spacer.gif" width="1" height="1"></td>
 556 
    <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="1" height="15"></td>
557 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
 557 
    <td background="images/bg_bage_1.gif"><img src="images/spacer.gif" width="1" height="1"></td>
558 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
 558 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
559 
  </tr>
 559 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
560 
  <tr>
 560 
  </tr>
561 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="20"></td>
 561 
  <tr>
562 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
 562 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="20"></td>
563 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
 563 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
564 
    <td bgcolor="#FFFFFF">&nbsp;</td>
 564 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
565 
  </tr>
 565 
    <td bgcolor="#FFFFFF">&nbsp;</td>
566 
</table>
 566 
  </tr>
567 
<!-- FOOTER ++++++++++++++++ -->
 567 
</table>
568 
<!--#include file="_footer.asp"-->
 568 
<!-- FOOTER ++++++++++++++++ -->
569 
<!-- +++++++++++++++++++++++ -->
 569 
<!--#include file="_footer.asp"-->
570 
</body>
 570 
<!-- +++++++++++++++++++++++ -->
571 
</html>
 571 
</body>
572 
<%
 572 
</html>
573 
'------------ RUN AFTER PAGE RENDER -----------
 573 
<%
574 
Set objPMod = Nothing
 574 
'------------ RUN AFTER PAGE RENDER -----------
575 
Set objCrumbs = Nothing
 575 
Set objPMod = Nothing
576 
Set objTabControl = Nothing
 576 
Set objCrumbs = Nothing
577 
Set objBtnControl = Nothing
 577 
Set objTabControl = Nothing
578 
'----------------------------------------------
 578 
Set objBtnControl = Nothing
579 
%><!--#include file="common/globals_destructor.asp"-->
 579 
'----------------------------------------------
- 
 
 580 
%><!--#include file="common/globals_destructor.asp"-->