Subversion Repositories DevTools

Rev

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

Rev 127 Rev 5357
Line 1... Line 1...
1 
<%@LANGUAGE="VBSCRIPT"%>
 1 
<%@LANGUAGE="VBSCRIPT"%>
2 
<%
 2 
<%
3 
'=====================================================
 3 
'=====================================================
4 
'|                                                   |
 4 
'|                                                   |
5 
'|         View Release Licencing Details            |
 5 
'|         View Release Licencing Details            |
6 
'|                                                   |
 6 
'|                                                   |
7 
'=====================================================
 7 
'=====================================================
8 
Option explicit
 8 
Option explicit
9 
' Good idea to set when using redirect
 9 
' Good idea to set when using redirect
10 
Response.Expires = 0  ' always load the page, dont store
 10 
Response.Expires = 0  ' always load the page, dont store
11 
%>
 11 
%>
12 
<!--#include file="common/conf.asp"-->
 12 
<!--#include file="common/conf.asp"-->
13 
<!--#include file="common/globals.asp"-->
 13 
<!--#include file="common/globals.asp"-->
14 
<!--#include file="common/formating.asp"-->
 14 
<!--#include file="common/formating.asp"-->
15 
<!--#include file="common/qstr.asp"-->
 15 
<!--#include file="common/qstr.asp"-->
16 
<!--#include file="common/common_subs.asp"-->
 16 
<!--#include file="common/common_subs.asp"-->
17 
<!--#include file="common/_form_window_common.asp"-->
 17 
<!--#include file="common/_form_window_common.asp"-->
18 
<%
 18 
<%
19 
' Make sure rtag_id is always present
 19 
' Make sure rtag_id is always present
20 
If Request("rtag_id") = "" Then
 20 
If Request("rtag_id") = "" Then
21 
	Response.Redirect("index.asp")
 21 
	Response.Redirect("index.asp")
22 
End If
 22 
End If
23 
 
 23 
 
24 
' Set rfile parameter. This is a return page after Login
 24 
' Set rfile parameter. This is a return page after Login
25 
Call objPMod.StoreParameter ( "rfile", "dependencies.asp" )
 25 
Call objPMod.StoreParameter ( "rfile", "dependencies.asp" )
26 
'------------ ACCESS CONTROL ------------------
 26 
'------------ ACCESS CONTROL ------------------
27 
%>
 27 
%>
28 
<!--#include file="_access_control_login.asp"-->
 28 
<!--#include file="_access_control_login.asp"-->
29 
<!--#include file="_access_control_general.asp"-->
 29 
<!--#include file="_access_control_general.asp"-->
30 
<!--#include file="_access_control_project.asp"-->
 30 
<!--#include file="_access_control_project.asp"-->
31 
<%
 31 
<%
32 
'------------ Variable Definition -------------
 32 
'------------ Variable Definition -------------
33 
 
 33 
 
34 
'------------ Constants Declaration -----------
 34 
'------------ Constants Declaration -----------
35 
 
 35 
 
36 
'------------ Variable Init -------------------
 36 
'------------ Variable Init -------------------
37 
 
 37 
 
38 
 
 38 
 
39 
'--------------------------------------------------------------------------------------------------------------------------
 39 
'--------------------------------------------------------------------------------------------------------------------------
40 
'  release_licencing_query_string
 40 
'  release_licencing_query_string
41 
'
 41 
'
42 
'  DESCRIPTION
 42 
'  DESCRIPTION
43 
'     Constructs a query string using the provided release tag, designed to elicit
 43 
'     Constructs a query string using the provided release tag, designed to elicit
44 
'     a list of PV_ID's, thier package names, versions and extensions, and licencing
 44 
'     a list of PV_ID's, thier package names, versions and extensions, and licencing
45 
'     associations from the release. Only those PV_IDs with one or more licencing
 45 
'     associations from the release. Only those PV_IDs with one or more licencing
46 
'     associations are returned.
 46 
'     associations are returned.
47 
'
 47 
'
48 
'  INPUTS
 48 
'  INPUTS
49 
'     NNrtag_id : The release tag to be used in the query string
 49 
'     NNrtag_id : The release tag to be used in the query string
50 
'
 50 
'
51 
Function release_licencing_query_string(NNrtag_id)
 51 
Function release_licencing_query_string(NNrtag_id)
52 
 
 52 
 
53 
   release_licencing_query_string = "SELECT * FROM ("&_
 53 
   release_licencing_query_string = "SELECT * FROM ("&_
54 
                                    "      SELECT pv.pv_id, pkg.pkg_name, pv.pkg_version, pv.v_ext, lcs.name AS licenceName"&_
 54 
                                    "      SELECT pv.pv_id, pkg.pkg_name, pv.pkg_version, pv.v_ext, lcs.name AS licenceName"&_
55 
                                    "        FROM release_content rc, package_versions pv, packages pkg, licencing lcng, licences lcs"&_
 55 
                                    "        FROM release_content rc, package_versions pv, packages pkg, licencing lcng, licences lcs"&_
56 
                                    "       WHERE rc.rtag_id = "& CStr(NNrtag_id) &_
 56 
                                    "       WHERE rc.rtag_id = "& CStr(NNrtag_id) &_
57 
                                    "         AND pv.pv_id = rc.pv_id "&_
 57 
                                    "         AND pv.pv_id = rc.pv_id "&_
58 
                                    "         AND pkg.pkg_id = pv.pkg_id "&_
 58 
                                    "         AND pkg.pkg_id = pv.pkg_id "&_
59 
                                    "         AND pv.pv_id (+) = lcng.pv_id "&_
 59 
                                    "         AND pv.pv_id (+) = lcng.pv_id "&_
60 
                                    "         AND lcng.licence (+) = lcs.licence "&_
 60 
                                    "         AND lcng.licence (+) = lcs.licence "&_
61 
                                    "      UNION "&_
 61 
                                    "      UNION "&_
62 
                                    "      SELECT pv.pv_id, pkg.pkg_name, pv.pkg_version, pv.v_ext, lcs.name AS licenceName"&_
 62 
                                    "      SELECT pv.pv_id, pkg.pkg_name, pv.pkg_version, pv.v_ext, lcs.name AS licenceName"&_
63 
                                    "        FROM work_in_progress wip, package_versions pv, packages pkg, licencing lcng, licences lcs"&_
 63 
                                    "        FROM work_in_progress wip, package_versions pv, packages pkg, licencing lcng, licences lcs"&_
64 
                                    "       WHERE wip.rtag_id = "& CStr(NNrtag_id) &_
 64 
                                    "       WHERE wip.rtag_id = "& CStr(NNrtag_id) &_
65 
                                    "         AND pv.pv_id = wip.pv_id "&_
 65 
                                    "         AND pv.pv_id = wip.pv_id "&_
66 
                                    "         AND pkg.pkg_id = pv.pkg_id "&_
 66 
                                    "         AND pkg.pkg_id = pv.pkg_id "&_
67 
                                    "         AND pv.pv_id (+) = lcng.pv_id "&_
 67 
                                    "         AND pv.pv_id (+) = lcng.pv_id "&_
68 
                                    "         AND lcng.licence (+) = lcs.licence "&_
 68 
                                    "         AND lcng.licence (+) = lcs.licence "&_
69 
                                    "      UNION "&_
 69 
                                    "      UNION "&_
70 
                                    "      SELECT pv.pv_id, pkg.pkg_name, pv.pkg_version, pv.v_ext, lcs.name AS licenceName"&_
 70 
                                    "      SELECT pv.pv_id, pkg.pkg_name, pv.pkg_version, pv.v_ext, lcs.name AS licenceName"&_
71 
                                    "        FROM planned pl, package_versions pv, packages pkg, licencing lcng, licences lcs"&_
 71 
                                    "        FROM planned pl, package_versions pv, packages pkg, licencing lcng, licences lcs"&_
72 
                                    "       WHERE pl.rtag_id = "& CStr(NNrtag_id) &_
 72 
                                    "       WHERE pl.rtag_id = "& CStr(NNrtag_id) &_
73 
                                    "         AND pv.pv_id = pl.pv_id "&_
 73 
                                    "         AND pv.pv_id = pl.pv_id "&_
74 
                                    "         AND pkg.pkg_id = pv.pkg_id "&_
 74 
                                    "         AND pkg.pkg_id = pv.pkg_id "&_
75 
                                    "         AND (pl.operation IS NULL OR pl.operation = 'R') "&_
 75 
                                    "         AND (pl.operation IS NULL OR pl.operation = 'R') "&_
76 
                                    "         AND pv.pv_id (+) = lcng.pv_id "&_
 76 
                                    "         AND pv.pv_id (+) = lcng.pv_id "&_
77 
                                    "         AND lcng.licence (+) = lcs.licence "&_
 77 
                                    "         AND lcng.licence (+) = lcs.licence "&_
78 
                                    ") ORDER BY UPPER(pkg_name), UPPER(v_ext), pv_id DESC, UPPER(licenceName)"
 78 
                                    ") ORDER BY UPPER(pkg_name), UPPER(v_ext), pv_id DESC, UPPER(licenceName)"
79 
End Function
 79 
End Function
80 
 
 80 
 
81 
 
 81 
 
82 
'--------------------------------------------------------------------------------------------------------------------------
 82 
'--------------------------------------------------------------------------------------------------------------------------
83 
'  PV_ID_ListHTML
 83 
'  PV_ID_ListHTML
84 
'
 84 
'
85 
'  DESCRIPTION
 85 
'  DESCRIPTION
86 
'     Constructs the HTML to render the rows of package names, versions and extensions, and licences
 86 
'     Constructs the HTML to render the rows of package names, versions and extensions, and licences
87 
'
 87 
'
88 
Function PV_ID_ListHTML
 88 
Function PV_ID_ListHTML
89 
   Dim rsQry
 89 
   Dim rsQry
90 
   Dim html_string
 90 
   Dim html_string
91 
 
 91 
 
92 
   Set rsQry = OraDatabase.DbCreateDynaset( release_licencing_query_string(parRtag_Id), cint(0) )
 92 
   Set rsQry = OraDatabase.DbCreateDynaset( release_licencing_query_string(parRtag_Id), cint(0) )
93 
 
 93 
 
94 
   '--- Render rows ---
 94 
   '--- Render rows ---
95 
   Do While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
 95 
   Do While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
96 
 
 96 
 
97 
      ' BEGIN ROW
 97 
      ' BEGIN ROW
98 
      html_string = html_string & "<tr>"
 98 
      html_string = html_string & "<tr>"
99 
 
 99 
 
100 
      ' PACKAGE NAME
 100 
      ' PACKAGE NAME
101 
      html_string = html_string & "<td nowrap class='body_rowg'>" & rsQry("pkg_name") & "</td>"
 101 
      html_string = html_string & "<td nowrap class='body_rowg'>" & rsQry("pkg_name") & "</td>"
102 
 
 102 
 
103 
      ' PACKAGE VERSION
 103 
      ' PACKAGE VERSION
104 
      If IsNull(rsQry("v_ext")) Then
 104 
      If IsNull(rsQry("v_ext")) Then
105 
         html_string = html_string & "<td nowrap class='body_rowg'>" & rsQry("pkg_version") & "</td>"
 105 
         html_string = html_string & "<td nowrap class='body_rowg'>" & rsQry("pkg_version") & "</td>"
106 
      Else
 106 
      Else
107 
         html_string = html_string & "<td nowrap class='body_rowg'>" & Left(rsQry("pkg_version"), Len(rsQry("pkg_version")) - Len(rsQry("v_ext")) ) & "</td>"
 107 
         html_string = html_string & "<td nowrap class='body_rowg'>" & Left(rsQry("pkg_version"), Len(rsQry("pkg_version")) - Len(rsQry("v_ext")) ) & "</td>"
108 
      End If
 108 
      End If
109 
 
 109 
 
110 
      ' PACKAGE EXTENSION
 110 
      ' PACKAGE EXTENSION
111 
      html_string = html_string & "<td nowrap class='body_rowg'>" & rsQry("v_ext") & "</td>"
 111 
      html_string = html_string & "<td nowrap class='body_rowg'>" & rsQry("v_ext") & "</td>"
112 
 
 112 
 
113 
      ' LICENCE NAME
 113 
      ' LICENCE NAME
114 
      html_string = html_string & "<td nowrap class='body_rowg'>" & rsQry("licenceName") & "</td>"
 114 
      html_string = html_string & "<td nowrap class='body_rowg'>" & rsQry("licenceName") & "</td>"
115 
 
 115 
 
116 
      ' END ROW
 116 
      ' END ROW
117 
      html_string = html_string & "</tr>"
 117 
      html_string = html_string & "</tr>"
118 
 
 118 
 
119 
      rsQry.MoveNext
 119 
      rsQry.MoveNext
120 
 
 120 
 
121 
      ' ROW SEPERATOR
 121 
      ' ROW SEPERATOR
122 
      If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then
 122 
      If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then
123 
         html_string = html_string & "<tr><td colspan='8' background='images/bg_table_border.gif'><img src='images/spacer.gif' width='1' height='1'></td></tr>"
 123 
         html_string = html_string & "<tr><td colspan='8' background='images/bg_table_border.gif'><img src='images/spacer.gif' width='1' height='1'></td></tr>"
124 
      End If
 124 
      End If
125 
   Loop
 125 
   Loop
126 
 
 126 
 
127 
   ' destroy objects
 127 
   ' destroy objects
128 
   rsQry.Close()
 128 
   rsQry.Close()
129 
   Set rsQry = nothing
 129 
   Set rsQry = nothing
130 
 
 130 
 
131 
   ' return result
 131 
   ' return result
132 
   PV_ID_ListHTML = html_string
 132 
   PV_ID_ListHTML = html_string
133 
End Function
 133 
End Function
134 
 
 134 
 
135 
'--------------------------------------------------------------------------------------------------------------------------
 135 
'--------------------------------------------------------------------------------------------------------------------------
136 
'--------------------------------------------------------------------------------------------------------------------------
 136 
'--------------------------------------------------------------------------------------------------------------------------
137 
'------------ RUN BEFORE PAGE RENDER ----------
 137 
'------------ RUN BEFORE PAGE RENDER ----------
138 
 
 138 
 
139 
 
 139 
 
140 
 
 140 
 
141 
'----------------------------------------------
 141 
'----------------------------------------------
142 
%>
 142 
%>
143 
 
 143 
 
144 
<html>
 144 
<html>
145 
<head>
 145 
<head>
146 
<title>Release Manager</title>
 146 
<title>Release Manager</title>
147 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
 147 
<link rel="shortcut icon" href="<%=FavIcon%>"/>
148 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
 148 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
149 
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
 149 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
150 
<link rel="stylesheet" href="images/navigation.css" type="text/css">
 150 
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
151 
<script language="JavaScript" src="images/common.js"></script>
 151 
<link rel="stylesheet" href="images/navigation.css" type="text/css">
152 
<script language="JavaScript" src="scripts/remote_scripting.js"></script>
 152 
<script language="JavaScript" src="images/common.js"></script>
153 
 
 153 
<script language="JavaScript" src="scripts/remote_scripting.js"></script>
154 
<!-- DROPDOWN MENUS -->
 154 
 
155 
 
 155 
<!-- DROPDOWN MENUS -->
156 
 
 156 
 
157 
<!--#include file="_menu_def.asp"-->
 157 
 
158 
<script language="JavaScript1.2" src="images/popup_menu.js"></script>
 158 
<!--#include file="_menu_def.asp"-->
159 
 
 159 
<script language="JavaScript1.2" src="images/popup_menu.js"></script>
160 
</head>
 160 
 
161 
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0">
 161 
</head>
162 
<!-- MENU LAYERS -------------------------------------->
 162 
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0">
163 
<div id="popmenu" class="menuskin" onMouseover="clearhidemenu();highlightmenu(event,'on')" onMouseout="highlightmenu(event,'off');dynamichide(event)">
 163 
<!-- MENU LAYERS -------------------------------------->
164 
</div>
 164 
<div id="popmenu" class="menuskin" onMouseover="clearhidemenu();highlightmenu(event,'on')" onMouseout="highlightmenu(event,'off');dynamichide(event)">
165 
<!-- TIPS LAYERS -------------------------------------->
 165 
</div>
166 
<div id="formTipsLayer" style="position: absolute; z-index: 1000; visibility: hidden; left:0; top: 0; width: 10">&nbsp;</div>
 166 
<!-- TIPS LAYERS -------------------------------------->
167 
<!----------------------------------------------------->
 167 
<div id="formTipsLayer" style="position: absolute; z-index: 1000; visibility: hidden; left:0; top: 0; width: 10">&nbsp;</div>
168 
<!-- HEADER -->
 168 
<!----------------------------------------------------->
169 
<!--#include file="_header.asp"-->
 169 
<!-- HEADER -->
170 
<!-- BODY ---->
 170 
<!--#include file="_header.asp"-->
171 
 
 171 
<!-- BODY ---->
172 
<table width="100%" border="0" cellspacing="0" cellpadding="0">
 172 
 
173 
   <%
 173 
<table width="100%" border="0" cellspacing="0" cellpadding="0">
174 
   '-- FROM START ---------------------------------------------------------------------------------------------------------
 174 
   <%
175 
 
 175 
   '-- FROM START ---------------------------------------------------------------------------------------------------------
176 
   objFormComponent.FormName = "FormName"
 176 
 
177 
   objFormComponent.Method = "post"
 177 
   objFormComponent.FormName = "FormName"
178 
   objFormComponent.Action = ScriptName & "?rtag_id=" & parRtag_Id
 178 
   objFormComponent.Method = "post"
179 
   Call objFormComponent.FormStart()
 179 
   objFormComponent.Action = ScriptName & "?rtag_id=" & parRtag_Id
180 
   %>
 180 
   Call objFormComponent.FormStart()
181 
   <tr>
 181 
   %>
182 
      <td width="1" background="images/bg_home_orange.gif" valign="top"></td>
 182 
   <tr>
183 
      <td width="100%" rowspan="2" align="center" valign="top" bgcolor="#EEEFEF">
 183 
      <td width="1" background="images/bg_home_orange.gif" valign="top"></td>
184 
         <table width="10" border="0" cellspacing="0" cellpadding="0">
 184 
      <td width="100%" rowspan="2" align="center" valign="top" bgcolor="#EEEFEF">
185 
            <tr>
 185 
         <table width="10" border="0" cellspacing="0" cellpadding="0">
186 
               <td width="1%"></td>
 186 
            <tr>
187 
               <td width="100%">
 187 
               <td width="1%"></td>
188 
                  <table width="100%"  border="0" cellspacing="0" cellpadding="0">
 188 
               <td width="100%">
189 
                     <tr>
 189 
                  <table width="100%"  border="0" cellspacing="0" cellpadding="0">
190 
                        <td nowrap class="body_txt"></td>
 190 
                     <tr>
191 
                     </tr>
 191 
                        <td nowrap class="body_txt"></td>
192 
                  </table>
 192 
                     </tr>
193 
                  <table width="100%" border="0" cellspacing="0" cellpadding="0">
 193 
                  </table>
194 
                     <tr>
 194 
                  <table width="100%" border="0" cellspacing="0" cellpadding="0">
195 
                        <td nowrap class="form_ttl"><p>&nbsp;</p>
 195 
                     <tr>
196 
                           <p>VIEW RELEASE LICENCING DETAILS</p>
 196 
                        <td nowrap class="form_ttl"><p>&nbsp;</p>
197 
                        </td>
 197 
                           <p>VIEW RELEASE LICENCING DETAILS</p>
198 
                        <td align="right" valign="bottom"></td>
 198 
                        </td>
199 
                     </tr>
 199 
                        <td align="right" valign="bottom"></td>
200 
                  </table>
 200 
                     </tr>
201 
               </td>
 201 
                  </table>
202 
               <td width="1%"></td>
 202 
               </td>
203 
            </tr>
 203 
               <td width="1%"></td>
204 
            <tr>
 204 
            </tr>
205 
               <td align="left" valign="top" background="images/lbox_bg_blue.gif"><img src="images/lbox_tl_cnr_b.gif" width="13" height="13"></td>
 205 
            <tr>
206 
               <td background="images/lbox_bg_blue.gif" class="lbox_ttl_w"><img src="images/h_trsp_dot.gif" width="600" height="15"></td>
 206 
               <td align="left" valign="top" background="images/lbox_bg_blue.gif"><img src="images/lbox_tl_cnr_b.gif" width="13" height="13"></td>
207 
               <td align="right" valign="top"  background="images/lbox_bg_blue.gif"><img src="images/lbox_tr_cnr_b.gif" width="13" height="13"></td>
 207 
               <td background="images/lbox_bg_blue.gif" class="lbox_ttl_w"><img src="images/h_trsp_dot.gif" width="600" height="15"></td>
208 
            </tr>
 208 
               <td align="right" valign="top"  background="images/lbox_bg_blue.gif"><img src="images/lbox_tr_cnr_b.gif" width="13" height="13"></td>
209 
            <tr>
 209 
            </tr>
210 
               <td bgcolor="#FFFFFF"><img src="images/h_trsp_dot.gif" width="10" height="100"></td>
 210 
            <tr>
211 
               <td bgcolor="#FFFFFF" valign="top">
 211 
               <td bgcolor="#FFFFFF"><img src="images/h_trsp_dot.gif" width="10" height="100"></td>
212 
                  <%
 212 
               <td bgcolor="#FFFFFF" valign="top">
213 
                  %>
 213 
                  <%
214 
                  <!-- MESSAGE +++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 214 
                  %>
215 
                  <!--#include file="messages/_msg_inline.asp"-->
 215 
                  <!-- MESSAGE +++++++++++++++++++++++++++++++++++++++++++++++++++ -->
216 
                  <!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 216 
                  <!--#include file="messages/_msg_inline.asp"-->
217 
                  <br>
 217 
                  <!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
218 
                  <table width="100%"  border="0" cellspacing="2" cellpadding="0">
 218 
                  <br>
219 
                     <tr>
 219 
                  <table width="100%"  border="0" cellspacing="2" cellpadding="0">
220 
                        <td width="9%" valign="top"></td>
 220 
                     <tr>
221 
                        <tr>
 221 
                        <td width="9%" valign="top"></td>
222 
                           <td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Package Name</td>
 222 
                        <tr>
223 
                           <td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Package Version</td>
 223 
                           <td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Package Name</td>
224 
                           <td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Package Extension</td>
 224 
                           <td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Package Version</td>
225 
                           <td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Licences</td>
 225 
                           <td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Package Extension</td>
226 
                           <td valign="top">
 226 
                           <td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Licences</td>
227 
                        </tr>
 227 
                           <td valign="top">
228 
                        <%=PV_ID_ListHTML()%>
 228 
                        </tr>
229 
                        <tr>
 229 
                        <%=PV_ID_ListHTML()%>
230 
                           <td class="form_iname">&nbsp;</td>
 230 
                        <tr>
231 
                           <td>&nbsp;</td>
 231 
                           <td class="form_iname">&nbsp;</td>
232 
                           <td class="val_err"></td>
 232 
                           <td>&nbsp;</td>
233 
                        </tr>
 233 
                           <td class="val_err"></td>
234 
                     </tr>
 234 
                        </tr>
235 
                  </table>
 235 
                     </tr>
236 
               </td>
 236 
                  </table>
237 
               <td background="images/lbox_bgside_white.gif">&nbsp;</td>
 237 
               </td>
238 
            </tr>
 238 
               <td background="images/lbox_bgside_white.gif">&nbsp;</td>
239 
            <tr>
 239 
            </tr>
240 
               <td background="images/bg_action_norm.gif" ></td>
 240 
            <tr>
241 
               <td align="right" background="images/bg_action_norm.gif" >
 241 
               <td background="images/bg_action_norm.gif" ></td>
242 
                  <input name="btn_submit" type="reset" class="form_btn" value="OK", onClick="history.back();">
 242 
               <td align="right" background="images/bg_action_norm.gif" >
243 
               </td>
 243 
                  <input name="btn_submit" type="reset" class="form_btn" value="OK", onClick="history.back();">
244 
               <td background="images/bg_action_norm.gif" ><img src="images/h_trsp_dot.gif" width="5" height="30"></td>
 244 
               </td>
245 
            </tr>
 245 
               <td background="images/bg_action_norm.gif" ><img src="images/h_trsp_dot.gif" width="5" height="30"></td>
246 
            <tr>
 246 
            </tr>
247 
               <td background="images/lbox_bg_blue.gif" valign="bottom"><img src="images/lbox_bl_cnr_b.gif" width="13" height="13"></td>
 247 
            <tr>
248 
               <td background="images/lbox_bg_blue.gif"></td>
 248 
               <td background="images/lbox_bg_blue.gif" valign="bottom"><img src="images/lbox_bl_cnr_b.gif" width="13" height="13"></td>
249 
               <td background="images/lbox_bg_blue.gif" valign="bottom" align="right"><img src="images/lbox_br_cnr_b.gif" width="13" height="13"></td>
 249 
               <td background="images/lbox_bg_blue.gif"></td>
250 
            </tr>
 250 
               <td background="images/lbox_bg_blue.gif" valign="bottom" align="right"><img src="images/lbox_br_cnr_b.gif" width="13" height="13"></td>
251 
         </table>
 251 
            </tr>
252 
      </td>
 252 
         </table>
253 
      <td width="1" valign="top"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
 253 
      </td>
254 
   </tr>
 254 
      <td width="1" valign="top"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
255 
   <tr>
 255 
   </tr>
256 
      <td valign="bottom" align="center" background="images/bg_home_orange.gif"><img src="images/img_vtree.gif" width="86" height="99" vspace="20" hspace="30"></td>
 256 
   <tr>
257 
      <td background="images/bg_lght_gray.gif" valign="top"><img src="images/h_trsp_dot.gif" width="1" height="500"></td>
 257 
      <td valign="bottom" align="center" background="images/bg_home_orange.gif"><img src="images/img_vtree.gif" width="86" height="99" vspace="20" hspace="30"></td>
258 
   </tr>
 258 
      <td background="images/bg_lght_gray.gif" valign="top"><img src="images/h_trsp_dot.gif" width="1" height="500"></td>
259 
   <%
 259 
   </tr>
260 
   Call objFormComponent.FormEnd()
 260 
   <%
261 
   '-- FROM END ----------------------------------------------------------------------------------------------------------------
 261 
   Call objFormComponent.FormEnd()
262 
   %>
 262 
   '-- FROM END ----------------------------------------------------------------------------------------------------------------
263 
</table>
 263 
   %>
264 
<!-- FOOTER -->
 264 
</table>
265 
<!--#include file="_footer.asp"-->
 265 
<!-- FOOTER -->
266 
</body>
 266 
<!--#include file="_footer.asp"-->
267 
</html>
 267 
</body>
268 
<%
 268 
</html>
269 
Call Destroy_All_Objects
 269 
<%
270 
%>
 270 
Call Destroy_All_Objects
- 
 
 271 
%>