Subversion Repositories DevTools

Rev

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

Rev 23 Rev 5355
Line 1... Line 1...
1
<%@LANGUAGE="VBSCRIPT"%>
1
<%@LANGUAGE="VBSCRIPT"%>
2
<%
2
<%
3
'=====================================================
3
'=====================================================
4
'|                                                   |
4
'|                                                   |
5
'|			          OS_BaseConf				 	 |
5
'|			          OS_BaseConf				 	 |
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/_os_common.asp"-->
16
<!--#include file="common/_os_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 rsQry
23
Dim rsQry
24
Dim background
24
Dim background
25
Dim pointer
25
Dim pointer
26
Dim BaseEnvId
26
Dim BaseEnvId
27
Dim BaseEnvName
27
Dim BaseEnvName
28
Dim ProdId
28
Dim ProdId
29
Dim ProdName
29
Dim ProdName
30
'------------ CONSTANTS DECLARATION -----------
30
'------------ CONSTANTS DECLARATION -----------
31
'------------ VARIABLE INIT -------------------
31
'------------ VARIABLE INIT -------------------
32
parBom_id = Request("bom_id")
32
parBom_id = Request("bom_id")
33
parOs_id = Request("os_id")
33
parOs_id = Request("os_id")
34
BaseEnvName = objOsCollector.Item("base_env_name")
34
BaseEnvName = objOsCollector.Item("base_env_name")
35
BaseEnvId = objOsCollector.Item("base_env_id")
35
BaseEnvId = objOsCollector.Item("base_env_id")
36
'------------ CONDITIONS ----------------------
36
'------------ CONDITIONS ----------------------
37
'----------------------------------------------
37
'----------------------------------------------
38
%>
38
%>
39
<%
39
<%
40
'--------------------------------------------------------------------------------------------------------------------------
40
'--------------------------------------------------------------------------------------------------------------------------
41
Function GetBaseEnvList( nBom_id, nOs_id )
41
Function GetBaseEnvList( nBom_id, nOs_id )
42
	Dim rsQry, query
42
	Dim rsQry, query
43
	OraDatabase.Parameters.Add "BOM_ID", 		dbPARbom_id,	ORAPARM_INPUT, ORATYPE_NUMBER 
43
	OraDatabase.Parameters.Add "BOM_ID", 		dbPARbom_id,	ORAPARM_INPUT, ORATYPE_NUMBER 
44
	OraDatabase.Parameters.Add "OS_ID", 		dbPARos_id,		ORAPARM_INPUT, ORATYPE_NUMBER 
44
	OraDatabase.Parameters.Add "OS_ID", 		dbPARos_id,		ORAPARM_INPUT, ORATYPE_NUMBER 
45
	
45
	
46
	Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("BaseEnvList.sql"), ORADYN_DEFAULT )
46
	Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("BaseEnvList.sql"), ORADYN_DEFAULT )
47
	
47
	
48
	If rsQry.RecordCount > 0 Then
48
	If rsQry.RecordCount > 0 Then
49
		GetBaseEnvList = rsQry.GetRows()
49
		GetBaseEnvList = rsQry.GetRows()
50
		
50
		
51
	Else
51
	Else
52
		GetBaseEnvList = NULL
52
		GetBaseEnvList = NULL
53
		
53
		
54
	End If
54
	End If
55
	
55
	
56
	OraDatabase.Parameters.Remove "BOS_ID"
56
	OraDatabase.Parameters.Remove "BOS_ID"
57
	OraDatabase.Parameters.Remove "OS_ID"
57
	OraDatabase.Parameters.Remove "OS_ID"
58
	
58
	
59
	rsQry.Close
59
	rsQry.Close
60
	Set rsQry = Nothing
60
	Set rsQry = Nothing
61
End Function
61
End Function
62
'--------------------------------------------------------------------------------------------------------------------------
62
'--------------------------------------------------------------------------------------------------------------------------
63
%>
63
%>
64
<%
64
<%
65
'------------ RUN BEFORE PAGE RENDER ----------
65
'------------ RUN BEFORE PAGE RENDER ----------
66
'----------------------------------------------
66
'----------------------------------------------
67
%>
67
%>
68
<html>
68
<html>
69
<head>
69
<head>
70
<title>Deployment Manager</title>
70
<title>Deployment Manager</title>
71
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
71
<link rel="shortcut icon" href="<%=FavIcon%>"/>
72
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
72
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
73
<link href="scripts/deployment_manager.css" rel="stylesheet" type="text/css">
73
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
74
<script language="JavaScript" src="scripts/common.js"></script>
74
<link href="scripts/deployment_manager.css" rel="stylesheet" type="text/css">
75
</head>
75
<script language="JavaScript" src="scripts/common.js"></script>
76
 
76
</head>
77
<body leftmargin="0" topmargin="0">
77
 
78
<!-- HEADER ++++++++++++++++ -->
78
<body leftmargin="0" topmargin="0">
79
<!--#include file="_header.asp"-->
79
<!-- HEADER ++++++++++++++++ -->
80
<!-- +++++++++++++++++++++++ -->
80
<!--#include file="_header.asp"-->
81
<!-- MAIN MENU  +  CRUMBS ++++++++++++++++ -->
81
<!-- +++++++++++++++++++++++ -->
82
<!--#include file="_main_menu.asp"-->
82
<!-- MAIN MENU  +  CRUMBS ++++++++++++++++ -->
83
<!-- +++++++++++++++++++++++++++++++++++++ -->
83
<!--#include file="_main_menu.asp"-->
84
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
84
<!-- +++++++++++++++++++++++++++++++++++++ -->
85
  <tr>
85
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
86
    <td width="1%" valign="top" background="images/bg_bage_0.gif">
86
  <tr>
87
	<!-- NODE BROWSER ++++++++++++++++++++++ -->
87
    <td width="1%" valign="top" background="images/bg_bage_0.gif">
88
	<!--#include file="_bom_browser.asp"-->
88
	<!-- NODE BROWSER ++++++++++++++++++++++ -->
89
	<!-- END OF NODE BROWSER +++++++++++++++ -->
89
	<!--#include file="_bom_browser.asp"-->
90
	</td>
90
	<!-- END OF NODE BROWSER +++++++++++++++ -->
91
    <td width="1" background="images/bg_bage_1.gif"><img src="images/spacer.gif" width="1" height="600"></td>
91
	</td>
92
    <td width="100%" valign="top" bgcolor="#FFFFFF">
92
    <td width="1" background="images/bg_bage_1.gif"><img src="images/spacer.gif" width="1" height="600"></td>
93
	<table width="100%"  border="0" cellspacing="0" cellpadding="0">
93
    <td width="100%" valign="top" bgcolor="#FFFFFF">
94
	  <tr>
94
	<table width="100%"  border="0" cellspacing="0" cellpadding="0">
95
        <td valign="top" background="images/bg_blue.gif"></td>
95
	  <tr>
96
        <td align="right" valign="bottom" background="images/bg_blue.gif" class="body_txtw"><%Call RenderTitle( objOsCollector )%></td>
96
        <td valign="top" background="images/bg_blue.gif"></td>
97
        <td background="images/bg_blue.gif"><img src="images/spacer.gif" width="10" height="20"></td>
97
        <td align="right" valign="bottom" background="images/bg_blue.gif" class="body_txtw"><%Call RenderTitle( objOsCollector )%></td>
98
      </tr>
98
        <td background="images/bg_blue.gif"><img src="images/spacer.gif" width="10" height="20"></td>
99
      <tr>
99
      </tr>
100
        <td width="1%" valign="top" background="images/bg_blue.gif"></td>
100
      <tr>
101
        <td width="100%" valign="bottom" background="images/bg_blue.gif">
101
        <td width="1%" valign="top" background="images/bg_blue.gif"></td>
102
		<!-- TAB CONTROLS ++++++++++++++++++++++ -->
102
        <td width="100%" valign="bottom" background="images/bg_blue.gif">
103
		<!--#include file="_tabs_definition.asp"-->
103
		<!-- TAB CONTROLS ++++++++++++++++++++++ -->
104
		<%
104
		<!--#include file="_tabs_definition.asp"-->
105
		Set objTabControl = New TabControl
105
		<%
106
		objTabControl.TemplateDoc = ReadFile( Server.MapPath("controls/ERGTabStyleWinXP/tab_style.html") ) ' Supply tab style definition
106
		Set objTabControl = New TabControl
107
		objTabControl.TabStyle = "StyleWinXP"
107
		objTabControl.TemplateDoc = ReadFile( Server.MapPath("controls/ERGTabStyleWinXP/tab_style.html") ) ' Supply tab style definition
108
		objTabControl.AddTabDefnition ( arrOsTabDef )
108
		objTabControl.TabStyle = "StyleWinXP"
109
		objTabControl.SelectByName ("Base Configuration")
109
		objTabControl.AddTabDefnition ( arrOsTabDef )
110
		objTabControl.Render ()
110
		objTabControl.SelectByName ("Base Configuration")
111
		%>
111
		objTabControl.Render ()
112
		<!-- END OF TAB CONTROLS +++++++++++++++ -->
112
		%>
113
		</td>
113
		<!-- END OF TAB CONTROLS +++++++++++++++ -->
114
        <td width="1%" background="images/bg_blue.gif"><img src="images/spacer.gif" width="10" height="35"></td>
114
		</td>
115
        </tr>
115
        <td width="1%" background="images/bg_blue.gif"><img src="images/spacer.gif" width="10" height="35"></td>
116
      <tr>
116
        </tr>
117
        <td background="images/bg_bage_0.gif"><img src="images/spacer.gif" width="30" height="10"></td>
117
      <tr>
118
        <td background="images/bg_bage_0.gif">
118
        <td background="images/bg_bage_0.gif"><img src="images/spacer.gif" width="30" height="10"></td>
119
		<!-- BUTTONS CONTROL +++++++++++++++++++ -->
119
        <td background="images/bg_bage_0.gif">
120
		<%
120
		<!-- BUTTONS CONTROL +++++++++++++++++++ -->
121
		'-- Define Action buttons on this tab
121
		<%
122
		aTabBtnsDef = Array("btnAddBaseEnv", "btnDestroyBaseEnv", "height=30", "btnPropertiesBaseEnv", "height=30", "btnSortBase")
122
		'-- Define Action buttons on this tab
123
		
123
		aTabBtnsDef = Array("btnAddBaseEnv", "btnDestroyBaseEnv", "height=30", "btnPropertiesBaseEnv", "height=30", "btnSortBase")
124
		Call LoadTabActionButtons ( aTabBtnsDef, objBtnControl )
124
		
125
		
125
		Call LoadTabActionButtons ( aTabBtnsDef, objBtnControl )
126
		' -- Tell control if buttons need to be readonly actions 
126
		
127
		objBtnControl.IsReadonlyAction = objBomCollector.Item("is_readonly")
127
		' -- Tell control if buttons need to be readonly actions 
128
		
128
		objBtnControl.IsReadonlyAction = objBomCollector.Item("is_readonly")
129
		' -- Conditions
129
		
130
		If IsNull( BaseEnvId ) Then
130
		' -- Conditions
131
			Call objBtnControl.Active ("btnPropertiesBaseEnv", "N")
131
		If IsNull( BaseEnvId ) Then
132
			Call objBtnControl.Active ("btnDestroyBaseEnv", "N")
132
			Call objBtnControl.Active ("btnPropertiesBaseEnv", "N")
133
		End If
133
			Call objBtnControl.Active ("btnDestroyBaseEnv", "N")
134
		
134
		End If
135
		' -- Render Buttons
135
		
136
		Call objBtnControl.Render  ( aTabBtnsDef )
136
		' -- Render Buttons
137
		%>
137
		Call objBtnControl.Render  ( aTabBtnsDef )
138
		<!-- +++++++++++++++++++++++++++++++++++ --></td>
138
		%>
139
        <td background="images/bg_blue.gif"><img src="images/p_bar_corrner.gif" width="17" height="42"></td>
139
		<!-- +++++++++++++++++++++++++++++++++++ --></td>
140
        </tr>
140
        <td background="images/bg_blue.gif"><img src="images/p_bar_corrner.gif" width="17" height="42"></td>
141
      <tr>
141
        </tr>
142
        <td>&nbsp;</td>
142
      <tr>
143
        <td>&nbsp;</td>
143
        <td>&nbsp;</td>
144
        <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>
144
        <td>&nbsp;</td>
145
        </tr>
145
        <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>
146
    </table>
146
        </tr>
147
	<table width="100%"  border="0" cellspacing="10" cellpadding="0">
147
    </table>
148
      <tr>
148
	<table width="100%"  border="0" cellspacing="10" cellpadding="0">
149
        <td class="body_scol">
149
      <tr>
150
		<!-- PAGE DETAILS +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
150
        <td class="body_scol">
151
	  <%
151
		<!-- PAGE DETAILS +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
152
	  '-- FROM START ---------------------------------------------------------------------------------------------------------
152
	  <%
153
	  objFormComponent.FormName = "SetBaseConf"
153
	  '-- FROM START ---------------------------------------------------------------------------------------------------------
154
	  objFormComponent.Action = "_SetBaseConf.asp"
154
	  objFormComponent.FormName = "SetBaseConf"
155
	  objFormComponent.OnSubmit = "ShowProgress();"
155
	  objFormComponent.Action = "_SetBaseConf.asp"
156
	  objFormComponent.IsReadonlyAction = objBomCollector.Item("is_readonly")
156
	  objFormComponent.OnSubmit = "ShowProgress();"
157
	  
157
	  objFormComponent.IsReadonlyAction = objBomCollector.Item("is_readonly")
158
	  Call objFormComponent.FormStart()
158
	  
159
	  %>		
159
	  Call objFormComponent.FormStart()
160
		<SPAN class="body_colb">Assign Base Configurations to OS</SPAN><br><br>
160
	  %>		
161
		<%=objFormComponent.Combo ( "base_env_id", GetBaseEnvList( parBom_id, parOs_id ), TRUE, "class='form_ivalue'" )%>
161
		<SPAN class="body_colb">Assign Base Configurations to OS</SPAN><br><br>
162
		<%=objPMod.ComposeHiddenTags()%>
162
		<%=objFormComponent.Combo ( "base_env_id", GetBaseEnvList( parBom_id, parOs_id ), TRUE, "class='form_ivalue'" )%>
163
		<input type="hidden" name="rfile" value="<%=SCRIPT_NAME%>">
163
		<%=objPMod.ComposeHiddenTags()%>
164
		<input type="hidden" name="action" value="true">
164
		<input type="hidden" name="rfile" value="<%=SCRIPT_NAME%>">
165
		<%=objFormComponent.SubmitButton ("Assign", "name='btn' class='form_btn'")%>
165
		<input type="hidden" name="action" value="true">
166
	 <%
166
		<%=objFormComponent.SubmitButton ("Assign", "name='btn' class='form_btn'")%>
167
	 Call objFormComponent.FormEnd()
167
	 <%
168
	 
168
	 Call objFormComponent.FormEnd()
169
	 '-- FROM END ----------------------------------------------------------------------------------------------------------------
169
	 
170
	 %>
170
	 '-- FROM END ----------------------------------------------------------------------------------------------------------------
171
	<%If BaseEnvId <> "" Then%>
171
	 %>
172
		<hr width="100%" size="1px" noshade color="Black">
172
	<%If BaseEnvId <> "" Then%>
173
		<br>
173
		<hr width="100%" size="1px" noshade color="Black">
174
		<SPAN class="body_colb">Base Configuration Setup</SPAN><br><br>
174
		<br>
175
		<table width="100%"  border="0" cellspacing="0" cellpadding="3">
175
		<SPAN class="body_colb">Base Configuration Setup</SPAN><br><br>
176
          <tr>
176
		<table width="100%"  border="0" cellspacing="0" cellpadding="3">
177
		  	<td width="100%" background="images/bg_table_col.gif">
177
          <tr>
178
		<!-- BUTTONS CONTROL +++++++++++++++++++ -->
178
		  	<td width="100%" background="images/bg_table_col.gif">
179
		<%
179
		<!-- BUTTONS CONTROL +++++++++++++++++++ -->
180
		'-- Define Action buttons on this tab
180
		<%
181
		aTabBtnsDef = Array("btnAddBaseEnvProd","height=30", "btnPasteProdToBaseEnv")
181
		'-- Define Action buttons on this tab
182
		
182
		aTabBtnsDef = Array("btnAddBaseEnvProd","height=30", "btnPasteProdToBaseEnv")
183
		Call objBtnControl.LoadActionButtons ( aTabBtnsDef, OraDatabase )
183
		
184
		
184
		Call objBtnControl.LoadActionButtons ( aTabBtnsDef, OraDatabase )
185
		' -- Render Buttons
185
		
186
		Call objBtnControl.Render  ( aTabBtnsDef )
186
		' -- Render Buttons
187
		%>
187
		Call objBtnControl.Render  ( aTabBtnsDef )
188
		<!-- +++++++++++++++++++++++++++++++++++ -->
188
		%>
189
		    </td>
189
		<!-- +++++++++++++++++++++++++++++++++++ -->
190
			<td width="1" background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="20"></td>
190
		    </td>
191
		  </tr>
191
			<td width="1" background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="20"></td>
192
		</table>
192
		  </tr>
193
		<table width="100%"  border="0" cellspacing="3" cellpadding="0">
193
		</table>
194
          <tr>
194
		<table width="100%"  border="0" cellspacing="3" cellpadding="0">
195
		  	<td width="1" background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
195
          <tr>
196
            <td width="1%" background="images/bg_table_border.gif"><table width="100%"  border="0" cellspacing="1" cellpadding="2">
196
		  	<td width="1" background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
197
              <tr>
197
            <td width="1%" background="images/bg_table_border.gif"><table width="100%"  border="0" cellspacing="1" cellpadding="2">
198
                <td align="right" nowrap background="images/bg_table_col.gif" class="body_col">&nbsp;Install Order</td>
198
              <tr>
199
              </tr>
199
                <td align="right" nowrap background="images/bg_table_col.gif" class="body_col">&nbsp;Install Order</td>
200
            </table></td>
200
              </tr>
201
			<td width="20%" align="right" nowrap background="images/bg_table_col.gif" class="body_col">Product Name</td>
201
            </table></td>
202
            <td width="20%" align="right" nowrap background="images/bg_table_col.gif" class="body_col">Version</td>
202
			<td width="20%" align="right" nowrap background="images/bg_table_col.gif" class="body_col">Product Name</td>
203
			<td width="60%" align="right" background="images/bg_table_col.gif" class="body_col">Installation Comments</td>
203
            <td width="20%" align="right" nowrap background="images/bg_table_col.gif" class="body_col">Version</td>
204
			<td width="1" background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
204
			<td width="60%" align="right" background="images/bg_table_col.gif" class="body_col">Installation Comments</td>
205
          </tr>
205
			<td width="1" background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
206
		  <%
206
          </tr>
207
		  ' Load some action buttons
207
		  <%
208
		  Call objBtnControl.LoadActionButtons ( Array("btnEditProdBaseEnv", "btnRemoveProdBaseEnv"), OraDatabase )
208
		  ' Load some action buttons
209
		  objBtnControl.ButtonSpacer = 1
209
		  Call objBtnControl.LoadActionButtons ( Array("btnEditProdBaseEnv", "btnRemoveProdBaseEnv"), OraDatabase )
210
		  
210
		  objBtnControl.ButtonSpacer = 1
211
		  OraDatabase.Parameters.Add "BASE_ENV_ID", BaseEnvId,	ORAPARM_INPUT, ORATYPE_NUMBER 
211
		  
212
		  
212
		  OraDatabase.Parameters.Add "BASE_ENV_ID", BaseEnvId,	ORAPARM_INPUT, ORATYPE_NUMBER 
213
		  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("BaseEnvContents.sql"), ORADYN_DEFAULT )
213
		  
214
		  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
214
		  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("BaseEnvContents.sql"), ORADYN_DEFAULT )
215
		  	ProdId = rsQry("prod_id")
215
		  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
216
		  	ProdName = rsQry("pkg_name").Value
216
		  	ProdId = rsQry("prod_id")
217
		  %>
217
		  	ProdName = rsQry("pkg_name").Value
218
          <tr>
218
		  %>
219
		  	<td align="center" valign="top"><input type="checkbox" name="prod_id_list" value="<%=ProdId%>"></td>
219
          <tr>
220
			<td align="center" valign="top" class="body_txt"><%=rsQry("seq_num")%></td>
220
		  	<td align="center" valign="top"><input type="checkbox" name="prod_id_list" value="<%=ProdId%>"></td>
221
            <td nowrap class="body_row" valign="top"><a href="ProdDefault.asp?prod_id=<%=ProdId%>&<%=objPMod.ComposeURL()%>" class="body_link"><%=GetProductIcon(rsQry)  &  ProdName%></a></td>
221
			<td align="center" valign="top" class="body_txt"><%=rsQry("seq_num")%></td>
222
			<td nowrap class="body_row" valign="top"><%=rsQry("pkg_version")%></td>
222
            <td nowrap class="body_row" valign="top"><a href="ProdDefault.asp?prod_id=<%=ProdId%>&<%=objPMod.ComposeURL()%>" class="body_link"><%=GetProductIcon(rsQry)  &  ProdName%></a></td>
223
            <td class="body_rowlite" valign="top"><%=objFormater.TextToHtml( rsQry("base_env_comments") )%></td>
223
			<td nowrap class="body_row" valign="top"><%=rsQry("pkg_version")%></td>
224
			<td align="center" valign="top"><%Call objBtnControl.Render  ( Array("btnEditProdBaseEnv", "btnRemoveProdBaseEnv") )%></td>
224
            <td class="body_rowlite" valign="top"><%=objFormater.TextToHtml( rsQry("base_env_comments") )%></td>
225
          </tr>
225
			<td align="center" valign="top"><%Call objBtnControl.Render  ( Array("btnEditProdBaseEnv", "btnRemoveProdBaseEnv") )%></td>
226
		  <%rsQry.MoveNext%>
226
          </tr>
227
		  
227
		  <%rsQry.MoveNext%>
228
		  <%If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then%>
228
		  
229
          <tr>
229
		  <%If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then%>
230
            <td colspan="6" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
230
          <tr>
231
          </tr>
231
            <td colspan="6" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
232
		  <%End If%>
232
          </tr>
233
		  
233
		  <%End If%>
234
		  <%
234
		  
235
		  WEnd
235
		  <%
236
		  
236
		  WEnd
237
		  OraDatabase.Parameters.Remove "BASE_ENV_ID"
237
		  
238
		  %>
238
		  OraDatabase.Parameters.Remove "BASE_ENV_ID"
239
          <tr>
239
		  %>
240
            <td colspan="6" background="images/bg_table_border.gif">
240
          <tr>
241
			 <table width="100%"  border="0" cellspacing="1" cellpadding="2">
241
            <td colspan="6" background="images/bg_table_border.gif">
242
              <tr>
242
			 <table width="100%"  border="0" cellspacing="1" cellpadding="2">
243
                <td nowrap background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
243
              <tr>
244
              </tr>
244
                <td nowrap background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
245
             </table>
245
              </tr>
246
			</td>
246
             </table>
247
          </tr>
247
			</td>
248
         </table>	
248
          </tr>
249
	<%End If%>		 
249
         </table>	
250
		<!-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
250
	<%End If%>		 
251
		</td>
251
		<!-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
252
      </tr>
252
		</td>
253
    </table>
253
      </tr>
254
	</td>
254
    </table>
255
    <td width="1%" valign="top" background="images/bg_favourits.gif">
255
	</td>
256
	<%If Request.Cookies( enumCOOKIE_NAME )( "user_bar" ) <> "hide" Then%>
256
    <td width="1%" valign="top" background="images/bg_favourits.gif">
257
	<!-- PERSONAL PANE +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
257
	<%If Request.Cookies( enumCOOKIE_NAME )( "user_bar" ) <> "hide" Then%>
258
      <table width="100%"  border="0" cellspacing="0" cellpadding="0">
258
	<!-- PERSONAL PANE +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
259
      <tr>
259
      <table width="100%"  border="0" cellspacing="0" cellpadding="0">
260
        <td width="100%" valign="bottom" background="images/bg_node_icon.gif"><%=GetNodeImage ( dbPARnode_id )%></td>
260
      <tr>
261
        <td width="1" background="images/bg_node_icon.gif"><img src="images/spacer.gif" width="1" height="97"></td>
261
        <td width="100%" valign="bottom" background="images/bg_node_icon.gif"><%=GetNodeImage ( dbPARnode_id )%></td>
262
      </tr>
262
        <td width="1" background="images/bg_node_icon.gif"><img src="images/spacer.gif" width="1" height="97"></td>
263
      </table>
263
      </tr>
264
      <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">
264
      </table>
265
      <tr>
265
      <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">
266
        <td valign="top"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
266
      <tr>
267
          <tr>
267
        <td valign="top"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
268
            <td valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
268
          <tr>
269
            <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="10" height="3"></td>
269
            <td valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
270
            <td align="right" valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
270
            <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="10" height="3"></td>
271
          </tr>
271
            <td align="right" valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
272
          <tr>
272
          </tr>
273
            <td colspan="3" background="images/bg_favourits2.gif"><table width="100%"  border="0" cellspacing="5" cellpadding="0">
273
          <tr>
274
              <tr>
274
            <td colspan="3" background="images/bg_favourits2.gif"><table width="100%"  border="0" cellspacing="5" cellpadding="0">
275
                <td valign="top" class="fav_txt"><span class="fav_head">Reason for release</span><br>
275
              <tr>
276
                      <br>
276
                <td valign="top" class="fav_txt"><span class="fav_head">Reason for release</span><br>
277
<!--         This version needs to be rebuild on new sysbase_types 1.5.0.mas<br> -->
277
                      <br>
278
                </td>
278
<!--         This version needs to be rebuild on new sysbase_types 1.5.0.mas<br> -->
279
              </tr>
279
                </td>
280
            </table></td>
280
              </tr>
281
            </tr>
281
            </table></td>
282
          <tr>
282
            </tr>
283
            <td valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
283
          <tr>
284
            <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="190" height="3"></td>
284
            <td valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
285
            <td align="right" valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
285
            <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="190" height="3"></td>
286
          </tr>
286
            <td align="right" valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
287
        </table>
287
          </tr>
288
          <br>
288
        </table>
289
          <table width="100%"  border="0" cellspacing="0" cellpadding="0">
289
          <br>
290
            <tr>
290
          <table width="100%"  border="0" cellspacing="0" cellpadding="0">
291
              <td valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
291
            <tr>
292
              <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="10" height="3"></td>
292
              <td valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
293
              <td align="right" valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
293
              <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="10" height="3"></td>
294
            </tr>
294
              <td align="right" valign="top" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
295
            <tr background="images/bg_gray.gif">
295
            </tr>
296
              <td colspan="3" background="images/bg_favourits2.gif"><table width="100%"  border="0" cellspacing="5" cellpadding="0">
296
            <tr background="images/bg_gray.gif">
297
                <tr>
297
              <td colspan="3" background="images/bg_favourits2.gif"><table width="100%"  border="0" cellspacing="5" cellpadding="0">
298
                  <td valign="top" class="fav_txt"><span class="fav_head">Fixed Issues</span><br>
298
                <tr>
299
                      <br>
299
                  <td valign="top" class="fav_txt"><span class="fav_head">Fixed Issues</span><br>
300
                      <table width="100%"  border="0" cellspacing="0" cellpadding="2">
300
                      <br>
301
<!--                         <tr>
301
                      <table width="100%"  border="0" cellspacing="0" cellpadding="2">
302
                          <td><img src="icons/i_bulet.gif" width="4" height="4" hspace="5"></td>
302
<!--                         <tr>
303
                          <td><a href="#" class="fav_link">DEVI-021532</a></td>
303
                          <td><img src="icons/i_bulet.gif" width="4" height="4" hspace="5"></td>
304
                        </tr>
304
                          <td><a href="#" class="fav_link">DEVI-021532</a></td>
305
                        <tr>
305
                        </tr>
306
                          <td><img src="icons/i_bulet.gif" width="4" height="4" hspace="5"></td>
306
                        <tr>
307
                          <td><a href="#" class="fav_link">DEVI-021534</a></td>
307
                          <td><img src="icons/i_bulet.gif" width="4" height="4" hspace="5"></td>
308
                        </tr>
308
                          <td><a href="#" class="fav_link">DEVI-021534</a></td>
309
                        <tr>
309
                        </tr>
310
                          <td width="1%"><img src="icons/i_bulet.gif" width="4" height="4" hspace="5"></td>
310
                        <tr>
311
                          <td width="100%"><a href="#" class="fav_link">DEVI-021536</a></td>
311
                          <td width="1%"><img src="icons/i_bulet.gif" width="4" height="4" hspace="5"></td>
312
                        </tr> -->
312
                          <td width="100%"><a href="#" class="fav_link">DEVI-021536</a></td>
313
                    </table></td>
313
                        </tr> -->
314
                </tr>
314
                    </table></td>
315
              </table></td>
315
                </tr>
316
              </tr>
316
              </table></td>
317
            <tr>
317
              </tr>
318
              <td valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
318
            <tr>
319
              <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="190" height="3"></td>
319
              <td valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
320
              <td align="right" valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
320
              <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="190" height="3"></td>
321
            </tr>
321
              <td align="right" valign="bottom" background="images/bg_bage_0a.gif"><img src="images/dot_white.gif" width="1" height="1"></td>
322
          </table></td>
322
            </tr>
323
        <td width="1%"><img src="images/spacer.gif" width="15" height="400"></td>
323
          </table></td>
324
      </tr>
324
        <td width="1%"><img src="images/spacer.gif" width="15" height="400"></td>
325
    </table>
325
      </tr>
326
	<!-- END OF PERSONAL BAR ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
326
    </table>
327
	<%End If%>
327
	<!-- END OF PERSONAL BAR ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
328
   </td>
328
	<%End If%>
329
  </tr>
329
   </td>
330
  <tr>
330
  </tr>
331
    <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="1" height="15"></td>
331
  <tr>
332
    <td background="images/bg_bage_1.gif"><img src="images/spacer.gif" width="1" height="1"></td>
332
    <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="1" height="15"></td>
333
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
333
    <td background="images/bg_bage_1.gif"><img src="images/spacer.gif" width="1" height="1"></td>
334
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
334
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
335
  </tr>
335
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
336
  <tr>
336
  </tr>
337
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="20"></td>
337
  <tr>
338
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
338
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="20"></td>
339
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
339
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
340
    <td bgcolor="#FFFFFF">&nbsp;</td>
340
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
341
  </tr>
341
    <td bgcolor="#FFFFFF">&nbsp;</td>
342
</table>
342
  </tr>
343
<!-- FOOTER ++++++++++++++++ -->
343
</table>
344
<!--#include file="_footer.asp"-->
344
<!-- FOOTER ++++++++++++++++ -->
345
<!-- +++++++++++++++++++++++ -->
345
<!--#include file="_footer.asp"-->
346
</body>
346
<!-- +++++++++++++++++++++++ -->
347
</html>
347
</body>
348
<%
348
</html>
349
'------------ RUN AFTER PAGE RENDER -----------
349
<%
350
Set objPMod = Nothing
350
'------------ RUN AFTER PAGE RENDER -----------
351
Set objCrumbs = Nothing
351
Set objPMod = Nothing
352
Set objTabControl = Nothing
352
Set objCrumbs = Nothing
353
'----------------------------------------------
353
Set objTabControl = Nothing
-
 
354
'----------------------------------------------
354
%><!--#include file="common/globals_destructor.asp"-->
355
%><!--#include file="common/globals_destructor.asp"-->
355
356