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 
'|			          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>Production Manager</title>
 70 
<title>Production 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_green.gif"></td>
 95 
	  <tr>
96 
        <td align="right" valign="bottom" background="images/bg_green.gif" class="body_txtw"><%Call RenderTitle( objOsCollector )%></td>
 96 
        <td valign="top" background="images/bg_green.gif"></td>
97 
        <td background="images/bg_green.gif"><img src="images/spacer.gif" width="10" height="20"></td>
 97 
        <td align="right" valign="bottom" background="images/bg_green.gif" class="body_txtw"><%Call RenderTitle( objOsCollector )%></td>
98 
      </tr>
 98 
        <td background="images/bg_green.gif"><img src="images/spacer.gif" width="10" height="20"></td>
99 
      <tr>
 99 
      </tr>
100 
        <td width="1%" valign="top" background="images/bg_green.gif"></td>
 100 
      <tr>
101 
        <td width="100%" valign="bottom" background="images/bg_green.gif">
 101 
        <td width="1%" valign="top" background="images/bg_green.gif"></td>
102 
		<!-- TAB CONTROLS ++++++++++++++++++++++ -->
 102 
        <td width="100%" valign="bottom" background="images/bg_green.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_green.gif"><img src="images/spacer.gif" width="10" height="35"></td>
 114 
		</td>
115 
        </tr>
 115 
        <td width="1%" background="images/bg_green.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 
		<!-- +++++++++++++++++++++++++++++++++++ --></td>
 121
122 
        <td background="images/bg_green.gif"><img src="images/p_bar_corrner.gif" width="17" height="42"></td>
 122 
		<!-- +++++++++++++++++++++++++++++++++++ --></td>
123 
        </tr>
 123 
        <td background="images/bg_green.gif"><img src="images/p_bar_corrner.gif" width="17" height="42"></td>
124 
      <tr>
 124 
        </tr>
125 
        <td>&nbsp;</td>
 125 
      <tr>
126 
        <td>&nbsp;</td>
 126 
        <td>&nbsp;</td>
127 
        <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>
 127 
        <td>&nbsp;</td>
128 
        </tr>
 128 
        <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>
129 
    </table>
 129 
        </tr>
130 
	<table width="100%"  border="0" cellspacing="10" cellpadding="0">
 130 
    </table>
131 
      <tr>
 131 
	<table width="100%"  border="0" cellspacing="10" cellpadding="0">
132 
        <td class="body_scol">
 132 
      <tr>
133 
		<!-- PAGE DETAILS +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 133 
        <td class="body_scol">
134 
	  <%
 134 
		<!-- PAGE DETAILS +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
135 
	  '-- FROM START ---------------------------------------------------------------------------------------------------------
 135 
	  <%
136 
	  objFormComponent.FormName = "SetBaseConf"
 136 
	  '-- FROM START ---------------------------------------------------------------------------------------------------------
137 
	  objFormComponent.Action = "_SetBaseConf.asp"
 137 
	  objFormComponent.FormName = "SetBaseConf"
138 
	  objFormComponent.OnSubmit = "ShowProgress();"
 138 
	  objFormComponent.Action = "_SetBaseConf.asp"
139 
	  objFormComponent.IsReadonlyAction = objBomCollector.Item("is_readonly")
 139 
	  objFormComponent.OnSubmit = "ShowProgress();"
140
140 
	  objFormComponent.IsReadonlyAction = objBomCollector.Item("is_readonly")
141 
	  Call objFormComponent.FormStart()
 141
142 
	  %>
142 
	  Call objFormComponent.FormStart()
143 
		<SPAN class="body_colb">Assigned Base Configurations to OS</SPAN><br><br>
 143 
	  %>
144 
		<%=objFormComponent.Combo ( "base_env_id", GetBaseEnvList( parBom_id, parOs_id ),NULL,  "class='form_ivalue' disabled" )%>
 144 
		<SPAN class="body_colb">Assigned Base Configurations to OS</SPAN><br><br>
145 
		<%=objPMod.ComposeHiddenTags()%>
 145 
		<%=objFormComponent.Combo ( "base_env_id", GetBaseEnvList( parBom_id, parOs_id ),NULL,  "class='form_ivalue' disabled" )%>
146 
		<input type="hidden" name="rfile" value="<%=SCRIPT_NAME%>">
 146 
		<%=objPMod.ComposeHiddenTags()%>
147 
		<input type="hidden" name="action" value="true">
 147 
		<input type="hidden" name="rfile" value="<%=SCRIPT_NAME%>">
148
148 
		<input type="hidden" name="action" value="true">
149 
	 <%
 149
150 
	 Call objFormComponent.FormEnd()
 150 
	 <%
151
151 
	 Call objFormComponent.FormEnd()
152 
	 '-- FROM END ----------------------------------------------------------------------------------------------------------------
 152
153 
	 %>
 153 
	 '-- FROM END ----------------------------------------------------------------------------------------------------------------
154 
	<%If BaseEnvId <> "" Then%>
 154 
	 %>
155 
		<hr width="100%" size="1px" noshade color="Black">
 155 
	<%If BaseEnvId <> "" Then%>
156 
		<br>
 156 
		<hr width="100%" size="1px" noshade color="Black">
157 
		<SPAN class="body_colb">Base Configuration Setup</SPAN><br><br>
 157 
		<br>
158 
		<table width="100%"  border="0" cellspacing="0" cellpadding="3">
 158 
		<SPAN class="body_colb">Base Configuration Setup</SPAN><br><br>
159 
          <tr>
 159 
		<table width="100%"  border="0" cellspacing="0" cellpadding="3">
160 
		  	<td width="100%" background="images/bg_table_col.gif">
 160 
          <tr>
161 
		<!-- BUTTONS CONTROL +++++++++++++++++++ -->
 161 
		  	<td width="100%" background="images/bg_table_col.gif">
162 
 
 162 
		<!-- BUTTONS CONTROL +++++++++++++++++++ -->
163 
		<!-- +++++++++++++++++++++++++++++++++++ -->
 163 
 
164 
		    </td>
 164 
		<!-- +++++++++++++++++++++++++++++++++++ -->
165 
			<td width="1" background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="20"></td>
 165 
		    </td>
166 
		  </tr>
 166 
			<td width="1" background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="20"></td>
167 
		</table>
 167 
		  </tr>
168 
		<table width="100%"  border="0" cellspacing="3" cellpadding="0">
 168 
		</table>
169 
          <tr>
 169 
		<table width="100%"  border="0" cellspacing="3" cellpadding="0">
170
170 
          <tr>
171 
            <td width="1%" background="images/bg_table_border.gif"><table width="100%"  border="0" cellspacing="1" cellpadding="2">
 171
172 
              <tr>
 172 
            <td width="1%" background="images/bg_table_border.gif"><table width="100%"  border="0" cellspacing="1" cellpadding="2">
173 
                <td align="right" nowrap background="images/bg_table_col.gif" class="body_col">&nbsp;Install Order</td>
 173 
              <tr>
174 
              </tr>
 174 
                <td align="right" nowrap background="images/bg_table_col.gif" class="body_col">&nbsp;Install Order</td>
175 
            </table></td>
 175 
              </tr>
176 
			<td width="20%" align="right" nowrap background="images/bg_table_col.gif" class="body_col">Product Name</td>
 176 
            </table></td>
177 
            <td width="20%" align="right" nowrap background="images/bg_table_col.gif" class="body_col">Version</td>
 177 
			<td width="20%" align="right" nowrap background="images/bg_table_col.gif" class="body_col">Product Name</td>
178 
			<td width="60%" align="right" background="images/bg_table_col.gif" class="body_col">Installation Comments</td>
 178 
            <td width="20%" align="right" nowrap background="images/bg_table_col.gif" class="body_col">Version</td>
179 
			<td width="1" background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
 179 
			<td width="60%" align="right" background="images/bg_table_col.gif" class="body_col">Installation Comments</td>
180 
          </tr>
 180 
			<td width="1" background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
181 
		  <%
 181 
          </tr>
182 
		  ' Load some action buttons
 182 
		  <%
183 
		  Call objBtnControl.LoadActionButtons ( Array("btnEditProdBaseEnv"), OraDatabase )
 183 
		  ' Load some action buttons
184 
		  objBtnControl.ButtonSpacer = 1
 184 
		  Call objBtnControl.LoadActionButtons ( Array("btnEditProdBaseEnv"), OraDatabase )
185
185 
		  objBtnControl.ButtonSpacer = 1
186 
		  OraDatabase.Parameters.Add "BASE_ENV_ID", BaseEnvId,	ORAPARM_INPUT, ORATYPE_NUMBER
186
187
187 
		  OraDatabase.Parameters.Add "BASE_ENV_ID", BaseEnvId,	ORAPARM_INPUT, ORATYPE_NUMBER
188 
		  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("BaseEnvContents.sql"), ORADYN_DEFAULT )
 188
189 
		  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
 189 
		  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("BaseEnvContents.sql"), ORADYN_DEFAULT )
190 
		  	ProdId = rsQry("prod_id")
 190 
		  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
191 
		  	ProdName = rsQry("pkg_name").Value
 191 
		  	ProdId = rsQry("prod_id")
192 
		  %>
 192 
		  	ProdName = rsQry("pkg_name").Value
193 
          <tr>
 193 
		  %>
194 
			<td align="center" valign="top" class="body_txt"><%=rsQry("seq_num")%></td>
 194 
          <tr>
195 
            <td nowrap class="body_row" valign="top"><a href="ProdDefault.asp?prod_id=<%=ProdId%>&<%=objPMod.ComposeURL()%>" class="body_link"><%=GetProductIcon(rsQry)  &  ProdName%></a></td>
 195 
			<td align="center" valign="top" class="body_txt"><%=rsQry("seq_num")%></td>
196 
			<td nowrap class="body_row" valign="top"><%=rsQry("pkg_version")%></td>
 196 
            <td nowrap class="body_row" valign="top"><a href="ProdDefault.asp?prod_id=<%=ProdId%>&<%=objPMod.ComposeURL()%>" class="body_link"><%=GetProductIcon(rsQry)  &  ProdName%></a></td>
197 
            <td class="body_rowlite" valign="top"><%=objFormater.TextToHtml( rsQry("base_env_comments") )%></td>
 197 
			<td nowrap class="body_row" valign="top"><%=rsQry("pkg_version")%></td>
198 
			<td align="center" valign="top"><%Call objBtnControl.Render  ( Array("btnEditProdBaseEnv") )%></td>
 198 
            <td class="body_rowlite" valign="top"><%=objFormater.TextToHtml( rsQry("base_env_comments") )%></td>
199 
          </tr>
 199 
			<td align="center" valign="top"><%Call objBtnControl.Render  ( Array("btnEditProdBaseEnv") )%></td>
200 
		  <%rsQry.MoveNext%>
 200 
          </tr>
201
201 
		  <%rsQry.MoveNext%>
202 
		  <%If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then%>
 202
203 
          <tr>
 203 
		  <%If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then%>
204 
            <td colspan="6" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
 204 
          <tr>
205 
          </tr>
 205 
            <td colspan="6" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
206 
		  <%End If%>
 206 
          </tr>
207
207 
		  <%End If%>
208 
		  <%
 208
209 
		  WEnd
 209 
		  <%
210
210 
		  WEnd
211 
		  OraDatabase.Parameters.Remove "BASE_ENV_ID"
 211
212 
		  %>
 212 
		  OraDatabase.Parameters.Remove "BASE_ENV_ID"
213 
          <tr>
 213 
		  %>
214 
            <td colspan="6" background="images/bg_table_border.gif">
 214 
          <tr>
215 
			 <table width="100%"  border="0" cellspacing="1" cellpadding="2">
 215 
            <td colspan="6" background="images/bg_table_border.gif">
216 
              <tr>
 216 
			 <table width="100%"  border="0" cellspacing="1" cellpadding="2">
217 
                <td nowrap background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
 217 
              <tr>
218 
              </tr>
 218 
                <td nowrap background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
219 
             </table>
 219 
              </tr>
220 
			</td>
 220 
             </table>
221 
          </tr>
 221 
			</td>
222 
         </table>
222 
          </tr>
223 
	<%End If%>
223 
         </table>
224 
		<!-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 224 
	<%End If%>
225 
		</td>
 225 
		<!-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
226 
      </tr>
 226 
		</td>
227 
    </table>
 227 
      </tr>
228 
	</td>
 228 
    </table>
229 
    <td width="1%" valign="top" background="images/bg_favourits.gif">
 229 
	</td>
230 
	<%If Request.Cookies( enumCOOKIE_NAME )( "user_bar" ) <> "hide" Then%>
 230 
    <td width="1%" valign="top" background="images/bg_favourits.gif">
231
231 
	<%If Request.Cookies( enumCOOKIE_NAME )( "user_bar" ) <> "hide" Then%>
232 
	<%End If%>
 232
233 
   </td>
 233 
	<%End If%>
234 
  </tr>
 234 
   </td>
235 
  <tr>
 235 
  </tr>
236 
    <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="1" height="15"></td>
 236 
  <tr>
237 
    <td background="images/bg_bage_1.gif"><img src="images/spacer.gif" width="1" height="1"></td>
 237 
    <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="1" height="15"></td>
238 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
 238 
    <td background="images/bg_bage_1.gif"><img src="images/spacer.gif" width="1" height="1"></td>
239 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
 239 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
240 
  </tr>
 240 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
241 
  <tr>
 241 
  </tr>
242 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="20"></td>
 242 
  <tr>
243 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
 243 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="20"></td>
244 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
 244 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
245 
    <td bgcolor="#FFFFFF">&nbsp;</td>
 245 
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
246 
  </tr>
 246 
    <td bgcolor="#FFFFFF">&nbsp;</td>
247 
</table>
 247 
  </tr>
248 
<!-- FOOTER ++++++++++++++++ -->
 248 
</table>
249 
<!--#include file="_footer.asp"-->
 249 
<!-- FOOTER ++++++++++++++++ -->
250 
<!-- +++++++++++++++++++++++ -->
 250 
<!--#include file="_footer.asp"-->
251 
</body>
 251 
<!-- +++++++++++++++++++++++ -->
252 
</html>
 252 
</body>
253 
<%
 253 
</html>
254 
'------------ RUN AFTER PAGE RENDER -----------
 254 
<%
255 
Set objPMod = Nothing
 255 
'------------ RUN AFTER PAGE RENDER -----------
256 
Set objCrumbs = Nothing
 256 
Set objPMod = Nothing
257 
Set objTabControl = Nothing
 257 
Set objCrumbs = Nothing
258 
'----------------------------------------------
 258 
Set objTabControl = Nothing
- 
 
 259 
'----------------------------------------------
259 
%><!--#include file="common/globals_destructor.asp"-->
 260 
%><!--#include file="common/globals_destructor.asp"-->
260 

            261