Subversion Repositories DevTools

Rev

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

Rev 119 Rev 121
Line 1... Line 1...
1 
<%@LANGUAGE="VBSCRIPT"%>
 1 
<%@LANGUAGE="VBSCRIPT"%>
2 
<%
 2 
<%
3 
'=====================================================
 3 
'=====================================================
4 
'|                                                   |
 4 
'|                                                   |
5 
'|				       SEARCH RESULT			     |
 5 
'|             SEARCH RESULT                         |
6 
'|					  PACKAGES					     |
 6 
'|               PACKAGES                            |
7 
'|                                                   |
 7 
'|                                                   |
8 
'=====================================================
 8 
'=====================================================
9 
%>
 9 
%>
10 
<%
 10 
<%
11 
Option explicit
 11 
Option explicit
12 
' Good idea to set when using redirect
 12 
' Good idea to set when using redirect
13 
Response.Expires = 0	' always load the page, dont store
 13 
Response.Expires = 0   ' always load the page, dont store
14 
%>
 14 
%>
15 
<!--#include file="common/conf.asp"-->
 15 
<!--#include file="common/conf.asp"-->
16 
<!--#include file="common/globals.asp"-->
 16 
<!--#include file="common/globals.asp"-->
17 
<!--#include file="common/formating.asp"-->
 17 
<!--#include file="common/formating.asp"-->
18 
<!--#include file="common/qstr.asp"-->
 18 
<!--#include file="common/qstr.asp"-->
19 
<!--#include file="common/common_subs.asp"-->
 19 
<!--#include file="common/common_subs.asp"-->
20 
<%
 20 
<%
21 
' Make sure rtag_id is always present
 21 
' Make sure rtag_id is always present
22 
If Request("pv_id") = "" AND Request("rtag_id") = "" Then
 22 
If Request("pv_id") = "" AND Request("rtag_id") = "" Then
23 
	Response.Redirect("index.asp")
 23 
   Response.Redirect("index.asp")
24 
End If
 24 
End If
25 
 
 25 
 
26 
objPMod.PersistInQryString ( aPersistList(enumPAR_ADD_TYPE) )
 26 
objPMod.PersistInQryString ( aPersistList(enumPAR_ADD_TYPE) )
27 
objPMod.PersistInCookie("pkgfind")
 27 
objPMod.PersistInCookie("pkgfind")
28 
%>
 28 
%>
Line 36... Line 36...
36 
Dim parAdd_type
 36 
Dim parAdd_type
37 
Dim parPkgfind
 37 
Dim parPkgfind
38 
Dim rsFind
 38 
Dim rsFind
39 
Dim parPv_id
 39 
Dim parPv_id
40 
Dim RecCount
 40 
Dim RecCount
- 
 
 41 
 
41 
'------------ Constants Declaration -----------
 42 
'------------ Constants Declaration -----------
42 
'------------ Variable Init -------------------
 43 
'------------ Variable Init -------------------
43 
parAdd_type = Request("add_type")
 44 
parAdd_type = Request("add_type")
44 
parPkgfind = Request("pkgfind")
 45 
parPkgfind = Request("pkgfind")
45 
parPv_id = Request("pv_id")
 46 
parPv_id = Request("pv_id")
46 
'----------------------------------------------
 47 
'----------------------------------------------
47 
%>
 48 
%>
48 
<%
 49 
<%
49 
Function Page_Title ( NNadd_type )
 50 
Function Page_Title ( NNadd_type )
50 
	If NNadd_type = Cstr(enum_ADD_PACKAGES) Then
 51 
   If NNadd_type = Cstr(enum_ADD_PACKAGES) Then
51 
		Page_Title = "ADD package"
 52 
      Page_Title = "ADD package"
52
53 
 
53 
	ElseIf NNadd_type = Cstr(enum_ADD_DEPENDENCIES) Then
 54 
   ElseIf NNadd_type = Cstr(enum_ADD_DEPENDENCIES) Then
54 
		Page_Title = "ADD dependency"
 55 
      Page_Title = "ADD dependency"
55
56 
 
56 
	ElseIf NNadd_type = Cstr(enum_ADD_RUNTIME_DEPENDENCIES) Then
 57 
   ElseIf NNadd_type = Cstr(enum_ADD_RUNTIME_DEPENDENCIES) Then
57 
		Page_Title = "ADD Runtime Dependency"
 58 
      Page_Title = "ADD Runtime Dependency"
58
59 
 
59 
	Else
 60 
   Else
60 
		Page_Title = ""
 61 
      Page_Title = ""
61
62 
 
62 
	End If
 63 
   End If
63 
End Function
 64 
End Function
64 
 
 65 
 
65 
Function Search_For_Package_Names ( SSpkgfind )
 66 
Function Search_For_Package_Names ( SSpkgfind )
66 
	Dim pkg_name_like, SQLor, pkglistARR
 67 
   Dim pkg_name_like, SQLor, pkglistARR
67
68 
 
68 
	SQLor = ""
 69 
   SQLor = ""
69 
	If Len( Replace( SSpkgfind, " ", "" ) ) = 0 Then
 70 
   If Len( Replace( SSpkgfind, " ", "" ) ) = 0 Then
70 
		' Show all pkg names
 71 
      ' Show all pkg names
71 
		SQLor = " OR pkg.pkg_name LIKE '%'"
 72 
      SQLor = " OR pkg.pkg_name LIKE '%'"
72
73 
 
73 
	Else
 74 
   Else
74 
		' Search for ...
 75 
      ' Search for ...
75 
		pkglistARR = Split( Trim( SSpkgfind ), " ")
 76 
      pkglistARR = Split( Trim( SSpkgfind ), " ")
76
77 
 
77 
		If Ubound( pkglistARR ) > 0 Then
 78 
      If Ubound( pkglistARR ) > 0 Then
78 
			' Multiple pkg_name search
 79 
         ' Multiple pkg_name search
79 
			For Each pkg_name_like In pkglistARR
 80 
         For Each pkg_name_like In pkglistARR
80 
				If pkg_name_like <> "" Then
 81 
            If pkg_name_like <> "" Then
81 
					SQLor = SQLor &" OR UPPER(pkg.pkg_name) LIKE UPPER('%"& pkg_name_like &"%')"
 82 
               SQLor = SQLor &" OR UPPER(pkg.pkg_name) LIKE UPPER('%"& pkg_name_like &"%')"
82 
				End If
 83 
            End If
83 
			Next
 84 
         Next
84
85 
 
85 
		Else
 86 
      Else
86 
			' Single pkg_name search
 87 
         ' Single pkg_name search
87 
			SQLor = " OR UPPER(pkg.pkg_name) LIKE UPPER('%"& Trim( SSpkgfind ) &"%')"
 88 
         SQLor = " OR UPPER(pkg.pkg_name) LIKE UPPER('%"& Trim( SSpkgfind ) &"%')"
88 
		End If
 89 
      End If
89
90 
 
90 
	End If
 91 
   End If
91
92 
 
- 
 
 93 
   ' Search may be restricted to those packages that have versions in the specified release, so alter the
- 
 
 94 
   ' query accordingly.
- 
 
 95 
   If ( (NOT IsNull(parAdd_type)) AND (NOT IsNull(parRtag_id)) AND (parAdd_type = Cstr(enum_ADD_DEPENDENCIES)) ) Then
- 
 
 96 
      ' find all packages matching wildcard, that have versions in the specified release, and that are not already
- 
 
 97 
      ' configured as a build dependency, and that is not the actual package we are configuring dependencies for
92 
	Search_For_Package_Names = _
 98 
      Search_For_Package_Names = _
- 
 
 99 
      " SELECT pkg.*, pv.pv_id, pv.v_ext"&_
- 
 
 100 
      "  FROM packages pkg, release_content rc, package_versions pv"&_
- 
 
 101 
      " WHERE pkg.pkg_id != 0"&_
- 
 
 102 
      "   AND pv.pkg_id = pkg.pkg_id"&_
- 
 
 103 
      "   AND pv.pv_id = rc.pv_id"&_
- 
 
 104 
      "   AND rc.pv_id NOT IN (SELECT pd.dpv_id FROM package_dependencies pd WHERE pd.pv_id = "& parPv_id & ")"&_
- 
 
 105 
      "   AND pkg.pkg_id NOT IN (SELECT pvv.pkg_id FROM package_versions pvv WHERE pvv.pv_id = "& parPv_id & ")"&_
- 
 
 106 
      "   AND rc.rtag_id = "& parRtag_id &_
- 
 
 107 
      "   AND ( pkg.pkg_name = ''"&_
- 
 
 108 
      SQLor &_
- 
 
 109 
      "       )"&_
- 
 
 110 
      "ORDER BY UPPER(pkg.pkg_name)"
- 
 
 111 
   Else
- 
 
 112 
      If ( (NOT IsNull(parAdd_type)) AND (NOT IsNull(parRtag_id)) AND (parAdd_type = Cstr(enum_ADD_RUNTIME_DEPENDENCIES)) ) Then
- 
 
 113 
         ' find all packages matching wildcard, that have versions in the specified release, and that are not already
- 
 
 114 
         ' configured as a runtime dependency, and that is not the actual package we are configuring dependencies for
- 
 
 115 
         Search_For_Package_Names = _
- 
 
 116 
         " SELECT pkg.*, pv.pv_id, pv.v_ext"&_
- 
 
 117 
         "  FROM packages pkg, release_content rc, package_versions pv"&_
- 
 
 118 
         " WHERE pkg.pkg_id != 0"&_
- 
 
 119 
         "   AND pv.pkg_id = pkg.pkg_id"&_
- 
 
 120 
         "   AND pv.pv_id = rc.pv_id"&_
- 
 
 121 
         "   AND pv.pv_id NOT IN (SELECT rtd.rtd_id FROM runtime_dependencies rtd WHERE rtd.pv_id = "& parPv_id & ")"&_
- 
 
 122 
         "   AND pkg.pkg_id NOT IN (SELECT pvv.pkg_id FROM package_versions pvv WHERE pvv.pv_id = "& parPv_id & ")"&_
- 
 
 123 
         "   AND rc.rtag_id = "& parRtag_id &_
- 
 
 124 
         "   AND ( pkg.pkg_name = ''"&_
- 
 
 125 
         SQLor &_
- 
 
 126 
         "       )"&_
- 
 
 127 
         "ORDER BY UPPER(pkg.pkg_name)"
- 
 
 128 
      Else
- 
 
 129 
         ' simply find all packages matching wildcard, regardless of the specified release or any other constraint
- 
 
 130 
         ' This is needed when user is adding package versions to a release.
- 
 
 131 
         Search_For_Package_Names = _
93 
	" SELECT pkg.*"&_
 132 
         " SELECT pkg.*"&_
94 
	"  FROM packages pkg"&_
 133 
         "  FROM packages pkg"&_
95 
	" WHERE pkg.pkg_id != 0"&_
 134 
         " WHERE pkg.pkg_id != 0"&_
96 
	"   AND ( pkg.pkg_name = ''"&_
 135 
         "   AND ( pkg.pkg_name = ''"&_
97 
	SQLor &_
 136 
         SQLor &_
98 
	"       )"&_
 137 
         "       )"&_
99 
	"ORDER BY UPPER(pkg.pkg_name)"
 138 
         "ORDER BY UPPER(pkg.pkg_name)"
- 
 
 139 
      End If
- 
 
 140 
   End If
100
141 
 
101 
End Function
 142 
End Function
102 
%>
 143 
%>
103 
<html>
 144 
<html>
104 
<head>
 145 
<head>
105 
<title>Release Manager</title>
 146 
<title>Release Manager</title>
Line 113... Line 154...
113 
<script language="JavaScript1.2" src="images/popup_menu.js"></script>
 154 
<script language="JavaScript1.2" src="images/popup_menu.js"></script>
114 
 
 155 
 
115 
</head>
 156 
</head>
116 
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onload="self.focus();document.pkgnames.btnnext.focus();">
 157 
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onload="self.focus();document.pkgnames.btnnext.focus();">
117 
<!-- MENU LAYERS -------------------------------------->
 158 
<!-- MENU LAYERS -------------------------------------->
118 
<div id="popmenu" class="menuskin" onMouseover="clearhidemenu();highlightmenu(event,'on')" onMouseout="highlightmenu(event,'off');dynamichide(event)">
159 
<div id="popmenu" class="menuskin" onMouseover="clearhidemenu();highlightmenu(event,'on')" onMouseout="highlightmenu(event,'off');dynamichide(event)">
119 
</div>
 160 
</div>
120 
<!-- TIPS LAYERS -------------------------------------->
 161 
<!-- TIPS LAYERS -------------------------------------->
121 
<div id="formTipsLayer" style="position: absolute; z-index: 1000; visibility: hidden; left:0; top: 0; width: 10">&nbsp;</div>
 162 
<div id="formTipsLayer" style="position: absolute; z-index: 1000; visibility: hidden; left:0; top: 0; width: 10">&nbsp;</div>
122 
<!----------------------------------------------------->
 163 
<!----------------------------------------------------->
123 
<!-- HEADER -->
 164 
<!-- HEADER -->
124 
<!--#include file="_header.asp"-->
 165 
<!--#include file="_header.asp"-->
125 
<!-- BODY ---->
 166 
<!-- BODY ---->
126 
<table width="100%" height="80%" border="0" cellpadding="0" cellspacing="0">
 167 
<table width="100%" height="80%" border="0" cellpadding="0" cellspacing="0">
127 
  <tr>
 168 
   <tr>
128 
    <td align="center" valign="top" background="images/bg_lght_gray.gif">
 169 
      <td align="center" valign="top" background="images/bg_lght_gray.gif">
129 
	<!-- MIDDLE ---------------------------------------->
 170 
         <!-- MIDDLE ---------------------------------------->
130 
	<table width="650" border="0" cellspacing="0" cellpadding="0">
 - 
 
131 
	  <tr>
- 
 
132 
	    <td>
- 
 
133 
	      <table width="100%" border="0" cellspacing="0" cellpadding="0">
 171 
         <table width="650" border="0" cellspacing="0" cellpadding="0">
134 
	        <tr>
- 
 
135 
	          <td width="1%"></td>
 - 
 
136 
	          <td align="right"><img src="images/h_trsp_dot.gif" width="30" height="30"></td>
 - 
 
137 
	          <td width="1%"></td>
 - 
 
138 
	        </tr>
 - 
 
139 
	        <tr>
- 
 
140 
	          <td width="1%"></td>
 - 
 
141 
	          <td>
- 
 
142 
	            <table width="100%" border="0" cellspacing="0" cellpadding="0">
 - 
 
143 
	              <tr>
172 
            <tr>
144 
	                  <td nowrap class="form_ttl"><%=Page_Title ( parAdd_type )%></td>
 - 
 
145 
	                <td align="right" valign="bottom"></td>
 - 
 
146 
	              </tr>
 173 
               <td>
147 
	            </table>
 - 
 
148 
	          </td>
 - 
 
149 
	          <td width="1%"></td>
 - 
 
150 
	        </tr>
 - 
 
151 
	        <tr>
- 
 
152 
	          <td align="left" valign="top" width="1%" background="images/lbox_bg_blue.gif"><img src="images/lbox_tl_cnr_b.gif" width="13" height="13"></td>
 - 
 
153 
	          <td background="images/lbox_bg_blue.gif" align="right"><!-- Heading --><img src="images/h_trsp_dot.gif" width="1" height="20"><!-- END Heading --></td>
 - 
 
154 
	          <td align="right" valign="top" width="1%" background="images/lbox_bg_blue.gif"><img src="images/lbox_tr_cnr_b.gif" width="13" height="13"></td>
 - 
 
155 
	        </tr>
 - 
 
156 
	        <tr>
- 
 
157 
	            <td width="1%" bgcolor="#FFFFFF"><img src="images/h_trsp_dot.gif" width="10" height="100"></td>
 - 
 
158 
	            <td bgcolor="#FFFFFF" valign="top">
- 
 
159 
                  <!-- Body -->
 - 
 
160 
                  <br>
 - 
 
161 
                  <table width="100%" border="0" cellspacing="0" cellpadding="0">
 174 
                  <table width="100%" border="0" cellspacing="0" cellpadding="0">
162 
                    <tr>
 175 
                     <tr>
- 
 
 176 
                        <td width="1%"></td>
- 
 
 177 
                        <td align="right"><img src="images/h_trsp_dot.gif" width="30" height="30"></td>
- 
 
 178 
                        <td width="1%"></td>
- 
 
 179 
                     </tr>
- 
 
 180 
                     <tr>
- 
 
 181 
                        <td width="1%"></td>
- 
 
 182 
                        <td>
- 
 
 183 
                           <table width="100%" border="0" cellspacing="0" cellpadding="0">
- 
 
 184 
                              <tr>
163 
                      <td valign="bottom" nowrap><span class="form_txt">Search result
185 
                                 <td nowrap class="form_ttl"><%=Page_Title ( parAdd_type )%></td>
164 
                        for <strong><%=parPkgfind%></strong></span></td>
 186 
                                 <td align="right" valign="bottom"></td>
- 
 
 187 
                              </tr>
- 
 
 188 
                           </table>
- 
 
 189 
                        </td>
- 
 
 190 
                        <td width="1%"></td>
- 
 
 191 
                     </tr>
- 
 
 192 
                     <tr>
- 
 
 193 
                        <td align="left" valign="top" width="1%" background="images/lbox_bg_blue.gif">
- 
 
 194 
                           <img src="images/lbox_tl_cnr_b.gif" width="13" height="13">
- 
 
 195 
                        </td>
- 
 
 196 
                        <td background="images/lbox_bg_blue.gif" align="right">
- 
 
 197 
                           <!-- Heading --><img src="images/h_trsp_dot.gif" width="1" height="20"><!-- END Heading -->
- 
 
 198 
                        </td>
- 
 
 199 
                        <td align="right" valign="top" width="1%" background="images/lbox_bg_blue.gif">
- 
 
 200 
                           <img src="images/lbox_tr_cnr_b.gif" width="13" height="13">
- 
 
 201 
                        </td>
- 
 
 202 
                     </tr>
- 
 
 203 
                     <tr>
- 
 
 204 
                        <td width="1%" bgcolor="#FFFFFF"><img src="images/h_trsp_dot.gif" width="10" height="100"></td>
- 
 
 205 
                        <td bgcolor="#FFFFFF" valign="top">
- 
 
 206 
                           <!-- Body -->
- 
 
 207 
                           <br>
- 
 
 208 
                           <table width="100%" border="0" cellspacing="0" cellpadding="0">
- 
 
 209 
                              <tr>
- 
 
 210 
                                 <td valign="bottom" nowrap>
- 
 
 211 
                                    <span class="form_txt">Search result for <strong><%=parPkgfind%></strong></span>
- 
 
 212 
                                 </td>
- 
 
 213 
                                 <td align="right" valign="top" nowrap>
165 
                      <td align="right" valign="top" nowrap><a href="form_new_pkg_name.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>&add_type=<%=parAdd_type%>" class="body_txt_drk"><strong>Not
214 
                                    <a href="form_new_pkg_name.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>&add_type=<%=parAdd_type%>" class="body_txt_drk">
166 
                        found what you looking for?</strong><br>
 215 
                                    <strong>Not found what you looking for?</strong>
- 
 
 216 
                                    <br>
167 
                        <img src="images/i_new_pkg.gif" width="20" height="21" hspace="3" border="0" align="absmiddle">Create
217 
                                    <img src="images/i_new_pkg.gif" width="20" height="21" hspace="3" border="0" align="absmiddle">Create new package name.</a>
168 
                        new package name.</a></td>
 218 
                                 </td>
169 
                    </tr>
 219 
                              </tr>
- 
 
 220 
                           </table>
170 
                  </table><br>
 221 
                           <br>
171 
                  <table width="100%" border="0" cellspacing="1" cellpadding="2">
 222 
                           <table width="100%" border="0" cellspacing="1" cellpadding="2">
172 
					<form name="pkgnames" method="post" action="form_add_pkg_versions.asp">
 223 
                              <form name="pkgnames" method="post" action="form_add_pkg_versions.asp?add_type=<%=parAdd_type%>">
173 
                      <tr>
224 
                                 <tr>
174 
                        <td colspan="2" valign="bottom" nowrap class="form_txt">Select desired packages and click Next.</td>
 225 
                                    <td colspan="2" valign="bottom" nowrap class="form_txt">Select desired packages and click Next.</td>
175 
                      </tr>
 226 
                                 </tr>
176 
					  <tr>
227 
                                 <tr>
177 
                        <td background="images/bg_form_lightbluedark.gif"></td>
 228 
                                    <td background="images/bg_form_lightbluedark.gif"></td>
178 
                        <td background="images/bg_form_lightbluedark.gif" class="form_txt"><b>Package Name</b></td>
 229 
                                    <td background="images/bg_form_lightbluedark.gif" class="form_txt"><b>Package Name</b></td>
179 
                      </tr>
 230 
                                 </tr>
180 
					  <%Set rsFind = OraDatabase.DbCreateDynaset( Search_For_Package_Names ( parPkgfind ), cint(0))%>
 231 
                                 <%Set rsFind = OraDatabase.DbCreateDynaset( Search_For_Package_Names ( parPkgfind ), cint(0))%>
181 
					  <%RecCount = CInt(rsFind.RecordCount)%>
 232 
                                 <%RecCount = CInt(rsFind.RecordCount)%>
182 
					  <%While ((NOT rsFind.BOF) AND (NOT rsFind.EOF)) %>
 233 
                                 <%While ((NOT rsFind.BOF) AND (NOT rsFind.EOF)) %>
183 
                      <tr>
234 
                                    <tr>
- 
 
 235 
                                       <td background="images/bg_form_lightgray.gif">
- 
 
 236 
                                          <%If ( (NOT IsNull(parAdd_type)) AND ((parAdd_type = Cstr(enum_ADD_DEPENDENCIES)) OR (parAdd_type = Cstr(enum_ADD_RUNTIME_DEPENDENCIES))) ) Then%>
- 
 
 237 
                                             <input name="pkg_list" id="pkg_list" type="checkbox" value="<%=rsFind("pv_id")%>" <%If RecCount = 1 Then%>checked<%End If%>>
- 
 
 238 
                                          <%Else%>
184 
                        <td background="images/bg_form_lightgray.gif"><input name="pkg_list" id="pkg_list" type="checkbox" value="<%=rsFind("pkg_id")%>" <%If RecCount = 1 Then%>checked<%End If%>></td>
 239 
                                             <input name="pkg_list" id="pkg_list" type="checkbox" value="<%=rsFind("pkg_id")%>" <%If RecCount = 1 Then%>checked<%End If%>>
- 
 
 240 
                                          <%End If%>
- 
 
 241 
                                       </td>
- 
 
 242 
                                       <td background="images/bg_form_lightgray.gif" class="form_txt">
- 
 
 243 
                                          <%
- 
 
 244 
                                          Dim ver_ext
- 
 
 245 
                                          ver_ext = ""
- 
 
 246 
                                          If ( (NOT IsNull(parAdd_type)) AND (NOT IsNull(parRtag_id)) AND ((parAdd_type = Cstr(enum_ADD_DEPENDENCIES)) OR (parAdd_type = Cstr(enum_ADD_RUNTIME_DEPENDENCIES))) ) Then
- 
 
 247 
                                             ver_ext = rsFind("v_ext")
- 
 
 248 
                                             If NOT IsNull(ver_ext) AND ver_ext <> "" Then
- 
 
 249 
                                                ' Remove leading dot character, if there is one
- 
 
 250 
                                                If Left(ver_ext,1) = "." AND Len(ver_ext) > 1 Then
- 
 
 251 
                                                   ver_ext = Mid(ver_ext, 2, Len(ver_ext)-1)
- 
 
 252 
                                                Else
- 
 
 253 
                                                   ver_ext = ""
- 
 
 254 
                                                End If
- 
 
 255 
                                             End If
- 
 
 256 
                                          End If
- 
 
 257 
                                          %>
- 
 
 258 
 
- 
 
 259 
                                          <%If NOT IsNull(ver_ext) AND Len(ver_ext) > 0 Then%>
- 
 
 260 
                                             <%=Highlight_Substring ( rsFind("pkg_name"), parPkgfind )%>&nbsp&nbsp&nbsp&nbsp(<%=ver_ext%>)
- 
 
 261 
                                          <%Else%>
185 
                        <td background="images/bg_form_lightgray.gif" class="form_txt"><%=Highlight_Substring ( rsFind("pkg_name"), parPkgfind )%></td>
 262 
                                             <%=Highlight_Substring ( rsFind("pkg_name"), parPkgfind )%>
- 
 
 263 
                                          <%End If%>
- 
 
 264 
                                       </td>
186 
                      </tr>
 265 
                                    </tr>
187 
					  <%rsFind.MoveNext
 266 
                                    <%rsFind.MoveNext
188 
					  WEnd
 267 
                                 WEnd
189
268 
 
190 
					  rsFind.Close
 269 
                                 rsFind.Close
191 
					  Set rsFind = nothing
 270 
                                 Set rsFind = nothing
192 
					  %>
 271 
                                 %>
193 
                      <tr>
272 
                                 <tr>
194 
                        <td width="1%" nowrap class="form_field">&nbsp; </td>
 273 
                                    <td width="1%" nowrap class="form_field">&nbsp; </td>
195 
                        <td nowrap width="100%" class="form_txt">
 274 
                                    <td nowrap width="100%" class="form_txt">
196 
						  <%If Request("errmsg") <> "" Then Call DisplayInfo( "PKG_NAME_REQUIRED", 200 )%>
 275 
                                       <%If Request("errmsg") <> "" Then Call DisplayInfo( "PKG_NAME_REQUIRED", 200 )%>
197 
						  <input type="reset" name="btn" value="&laquo; Back" class="form_btn" onClick="history.back();">
276 
                                       <input type="reset" name="btn" value="&laquo; Back" class="form_btn" onClick="history.back();">
198 
                          <input type="submit" name="btn" value="Next &raquo;" class="form_btn" id="btnnext">
277 
                                       <input type="submit" name="btn" value="Next &raquo;" class="form_btn" id="btnnext">
199 
                          <input type="reset" name="btn" value="Cancel" class="form_btn" onClick="history.go(-2);">
 278 
                                       <input type="reset" name="btn" value="Cancel" class="form_btn" onClick="history.go(-2);">
200 
                          <br>
 279 
                                       <br>
201 
                          <br>
 280 
                                       <br>
202 
                        </td>
 281 
                                    </td>
203 
                      </tr>
 282 
                                 </tr>
204 
					  <input type="hidden" name="pv_id" value="<%=parPv_id%>">
 283 
                                 <input type="hidden" name="pv_id" value="<%=parPv_id%>">
205 
                      <input type="hidden" name="rtag_id" value="<%=parRtag_id%>">
 284 
                                 <input type="hidden" name="rtag_id" value="<%=parRtag_id%>">
206 
                      <input type="hidden" name="add_type" value="<%=parAdd_type%>">
 285 
                                 <input type="hidden" name="add_type" value="<%=parAdd_type%>">
207 
					  <input type="hidden" name="pkgfind" value="<%=parPkgfind%>">
 286 
                                 <input type="hidden" name="pkgfind" value="<%=parPkgfind%>">
- 
 
 287 
                              </form>
- 
 
 288 
                           </table>
- 
 
 289 
                        <!-- END Body-->
- 
 
 290 
                        </td>
- 
 
 291 
                        <td width="1%" background="images/lbox_bgside_white.gif">&nbsp;</td>
- 
 
 292 
                     </tr>
- 
 
 293 
                     <tr>
- 
 
 294 
                        <td width="1%" background="images/lbox_bg_blue.gif" valign="bottom">
- 
 
 295 
                           <img src="images/lbox_bl_cnr_b.gif" width="13" height="13">
- 
 
 296 
                        </td>
- 
 
 297 
                        <td background="images/lbox_bg_blue.gif"></td>
- 
 
 298 
                        <td width="1%" background="images/lbox_bg_blue.gif" valign="bottom" align="right">
- 
 
 299 
                           <img src="images/lbox_br_cnr_b.gif" width="13" height="13">
- 
 
 300 
                        </td>
208 
                    </form>
 301 
                     </tr>
209 
                  </table>
 302 
                  </table>
210 
	            <!-- END Body-->
 - 
 
211 
	          </td>
 303 
               </td>
212 
	          <td width="1%" background="images/lbox_bgside_white.gif">&nbsp;</td>
 - 
 
213 
	        </tr>
 - 
 
214 
	        <tr>
- 
 
215 
	          <td width="1%" background="images/lbox_bg_blue.gif" valign="bottom"><img src="images/lbox_bl_cnr_b.gif" width="13" height="13"></td>
 - 
 
216 
	          <td background="images/lbox_bg_blue.gif"></td>
 - 
 
217 
	          <td width="1%" background="images/lbox_bg_blue.gif" valign="bottom" align="right"><img src="images/lbox_br_cnr_b.gif" width="13" height="13"></td>
 - 
 
218 
	        </tr>
 304 
            </tr>
219 
	      </table>
 305 
         </table>
220 
	    </td>
 - 
 
221 
	  </tr>
 - 
 
222 
	</table>
 - 
 
223 
	<!-------------------------------------------------->
 306 
         <!-------------------------------------------------->
224 
	</td>
 307 
      </td>
225 
  </tr>
 308 
   </tr>
226 
  <tr>
 309 
   <tr>
227 
    <td valign="bottom" background="images/bg_lght_gray.gif">
 310 
      <td valign="bottom" background="images/bg_lght_gray.gif">
228 
	<!-- FOOTER -->
 311 
         <!-- FOOTER -->
229 
	<!--#include file="_footer.asp"-->
 312 
         <!--#include file="_footer.asp"-->
230 
	</td>
 313 
      </td>
231 
  </tr>
 314 
   </tr>
232 
</table>
 315 
</table>
233 
</body>
 316 
</body>
234 
</html>
 317 
</html>
235 
<%
 318 
<%
236 
Call Destroy_All_Objects
 319 
Call Destroy_All_Objects
237 
%>
 - 
 
238 

            320
            
%>

          

          

            -
            
 

            321