Subversion Repositories DevTools

Rev

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

Rev 119 Rev 123
Line 1... Line 1...
1 
<%@LANGUAGE="VBSCRIPT"%>
 1 
<%@LANGUAGE="VBSCRIPT"%>
2 
<%
 2 
<%
3 
'=====================================================
 3 
'=====================================================
4 
'|                                                   |
 4 
'|                                                   |
5 
'|			           FIND		  				     |
 5 
'|                    FIND                           |
6 
'|                                                   |
 6 
'|                                                   |
7 
'=====================================================
 7 
'=====================================================
8 
%>
 8 
%>
9 
<%
 9 
<%
10 
Option explicit
 10 
Option explicit
11 
' Good idea to set when using redirect
 11 
' Good idea to set when using redirect
12 
Response.Expires = 0	' always load the page, dont store
 12 
Response.Expires = 0   ' always load the page, dont store
13 
%>
 13 
%>
14 
<!--#include file="common/conf.asp"-->
 14 
<!--#include file="common/conf.asp"-->
15 
<!--#include file="common/globals.asp"-->
 15 
<!--#include file="common/globals.asp"-->
16 
<!--#include file="common/formating.asp"-->
 16 
<!--#include file="common/formating.asp"-->
17 
<!--#include file="common/qstr.asp"-->
 17 
<!--#include file="common/qstr.asp"-->
Line 30... Line 30...
30 
Dim parRtagId
 30 
Dim parRtagId
31 
Dim rsRep
 31 
Dim rsRep
32 
Dim imgLock
 32 
Dim imgLock
33 
Dim parSearchType
 33 
Dim parSearchType
34 
Dim sLink
 34 
Dim sLink
35 
Dim	rsQry
 35 
Dim   rsQry
36 
Dim sPkgVersion
 36 
Dim sPkgVersion
37 
'------------ Constants Declaration -----------
 37 
'------------ Constants Declaration -----------
38 
Const IMG_OFFICIAL = "<img src='images/i_locked.gif' width='7' height='10' hspace='5' vspace='2' alt='Package is official'>"
 38 
Const IMG_OFFICIAL = "<img src='images/i_locked.gif' width='7' height='10' hspace='5' vspace='2' alt='Package is official'>"
39 
Const IMG_NOT_OFFICIAL = "<img src='images/spacer.gif' width='7' height='10' hspace='5' vspace='2'>"
 39 
Const IMG_NOT_OFFICIAL = "<img src='images/spacer.gif' width='7' height='10' hspace='5' vspace='2'>"
40 
Const MaxRows = 100
 40 
Const MaxRows = 100
Line 47... Line 47...
47 
<%
 47 
<%
48 
'==================== MAIN LINE ===============================
 48 
'==================== MAIN LINE ===============================
49 
 
 49 
 
50 
' Check for Required parameters
 50 
' Check for Required parameters
51 
If (parSearchType = "")  OR  (nEnvTab = "") Then
 51 
If (parSearchType = "")  OR  (nEnvTab = "") Then
52 
	Response.Redirect ("dependencies.asp?rtag_id="& Request("rtag_id"))
 52 
   Response.Redirect ("dependencies.asp?rtag_id="& Request("rtag_id"))
53 
End If
 53 
End If
54 
'==============================================================
 54 
'==============================================================
55 
%>
 55 
%>
56 
<html>
 56 
<html>
57 
<head>
 57 
<head>
Line 65... Line 65...
65 
<!--#include file="_menu_def.asp"-->
 65 
<!--#include file="_menu_def.asp"-->
66 
<script language="JavaScript1.2" src="images/popup_menu.js"></script>
 66 
<script language="JavaScript1.2" src="images/popup_menu.js"></script>
67 
</head>
 67 
</head>
68 
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" >
 68 
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" >
69 
<!-- MENU LAYERS -------------------------------------->
 69 
<!-- MENU LAYERS -------------------------------------->
70 
<div id="popmenu" class="menuskin" onMouseover="clearhidemenu();highlightmenu(event,'on')" onMouseout="highlightmenu(event,'off');dynamichide(event)">
70 
<div id="popmenu" class="menuskin" onMouseover="clearhidemenu();highlightmenu(event,'on')" onMouseout="highlightmenu(event,'off');dynamichide(event)">
71 
  <!----------------------------------------------------->
 71 
  <!----------------------------------------------------->
72 
</div>
 72 
</div>
73 
<!-- HEADER -->
 73 
<!-- HEADER -->
74 
<!--#include file="_header.asp"-->
 74 
<!--#include file="_header.asp"-->
75 
<!-- BODY ---->
 75 
<!-- BODY ---->
76 
<table width="100%" border="0" cellspacing="0" cellpadding="0">
 76 
<table width="100%" border="0" cellspacing="0" cellpadding="0">
77 
	<tr>
77 
   <tr>
78 
		<td valign="top" width="1" background="images/bg_bage.gif">
 78 
      <td valign="top" width="1" background="images/bg_bage.gif">
79 
		<!-- LEFT -->
 79 
         <!-- LEFT -->
80 
		<!--#include file="_environment.asp"-->
 80 
         <!--#include file="_environment.asp"-->
81 
		</td>
 81 
      </td>
82 
		<td width="1" bgcolor="#999999"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
 82 
      <td width="1" bgcolor="#999999"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
83 
		<td valign="top" width="100%">
 83 
      <td valign="top" width="100%">
84 
		<!-- MIDDLE -->
 84 
         <!-- MIDDLE -->
85
85 
 
86
86 
         <table width="100%" border="0" cellspacing="0" cellpadding="0">
87 
		 <table width="100%" border="0" cellspacing="0" cellpadding="0">
 87 
            <tr>
88 
			<tr>
88 
               <td width="1%"></td>
89 
			  <td width="1%"></td>
 89 
               <td width="100%" align="right"><img src="images/h_trsp_dot.gif" width="1" height="20"></td>
90 
			  <td width="100%" align="right"><img src="images/h_trsp_dot.gif" width="1" height="20"></td>
 90 
               <td width="1%"></td>
91 
			  <td width="1%"></td>
 91 
            </tr>
92 
			</tr>
 92 
            <tr>
93 
			<tr>
93 
               <td width="1%" bgcolor="#FFFFFF"><img src="images/h_trsp_dot.gif" width="10" height="480"></td>
94 
			  <td width="1%" bgcolor="#FFFFFF"><img src="images/h_trsp_dot.gif" width="10" height="480"></td>
 94 
               <td bgcolor="#FFFFFF" valign="top">
95 
			  <td bgcolor="#FFFFFF" valign="top">
95 
                  <%
96
96 
                  If InStr( Trim(parKeyword), "*") > 0 Then
97 
				<%
 97 
                     KeyWord = Replace( Trim(parKeyword), "*", "%" )
98 
				  If InStr( parKeyword, "*") > 0 Then
 98 
                  Else
99 
				  	KeyWord = Replace( parKeyword, "*", "%" )
 99 
                     KeyWord = "%"& Trim(parKeyword) &"%"
100 
				  Else
 100 
                  End If
101 
				  	KeyWord = "%"& parKeyword &"%"
 101 
 
102 
				  End If
 102 
                  OraDatabase.Parameters.Add "KEYWORD",    KeyWord, ORAPARM_INPUT, ORATYPE_VARCHAR2
103
103 
                  OraDatabase.Parameters.Add "RTAG_ID",    parRtagId, ORAPARM_INPUT, ORATYPE_NUMBER
104 
				  OraDatabase.Parameters.Add "KEYWORD", 	KeyWord, ORAPARM_INPUT, ORATYPE_VARCHAR2
 104 
                  OraDatabase.Parameters.Add "SEARCH_AREA", nEnvTab, ORAPARM_INPUT, ORATYPE_NUMBER
105 
				  OraDatabase.Parameters.Add "RTAG_ID", 	parRtagId, ORAPARM_INPUT, ORATYPE_NUMBER
 105 
                  OraDatabase.Parameters.Add "RECORD_SET",   NULL,    ORAPARM_OUTPUT,    ORATYPE_CURSOR
106 
				  OraDatabase.Parameters.Add "SEARCH_AREA", nEnvTab, ORAPARM_INPUT, ORATYPE_NUMBER
 106 
                  OraDatabase.Parameters.Add "PAGE_SIZE",    MaxRows, ORAPARM_INPUT, ORATYPE_NUMBER
107 
				  OraDatabase.Parameters.Add "RECORD_SET",	NULL, 	ORAPARM_OUTPUT, 	ORATYPE_CURSOR
 107 
 
108 
				  OraDatabase.Parameters.Add "PAGE_SIZE", 	MaxRows, ORAPARM_INPUT, ORATYPE_NUMBER
 108 
                  If parSearchType = "1" Then
109
109 
                     ' Package Search
110 
				  If parSearchType = "1" Then
 110 
                     OraDatabase.ExecuteSQL "BEGIN  PK_ENVIRONMENT.FIND_PACKAGE ( :KEYWORD, :RTAG_ID, :SEARCH_AREA, :RECORD_SET );  END;"
111 
				  	' Package Search
 111 
                  ElseIf parSearchType = "2" Then
112 
				  	OraDatabase.ExecuteSQL "BEGIN  PK_ENVIRONMENT.FIND_PACKAGE ( :KEYWORD, :RTAG_ID, :SEARCH_AREA, :RECORD_SET );  END;"
 112 
                     ' File Search
113
113 
                     OraDatabase.ExecuteSQL "BEGIN  PK_ENVIRONMENT.FIND_FILE ( :KEYWORD, :RTAG_ID, :SEARCH_AREA, :PAGE_SIZE, :RECORD_SET );  END;"
114 
				  ElseIf parSearchType = "2" Then
 114 
                  End If
115
115 
 
116 
				  	' File Search
 116 
                  Set rsRep = OraDatabase.Parameters("RECORD_SET").Value
117 
				  	OraDatabase.ExecuteSQL "BEGIN  PK_ENVIRONMENT.FIND_FILE ( :KEYWORD, :RTAG_ID, :SEARCH_AREA, :PAGE_SIZE, :RECORD_SET );  END;"
 117 
 
118
118 
                  OraDatabase.Parameters.Remove "KEYWORD"
119 
				  End If
 119 
                  OraDatabase.Parameters.Remove "RTAG_ID"
120
120 
                  OraDatabase.Parameters.Remove "SEARCH_AREA"
121
121 
                  OraDatabase.Parameters.Remove "PAGE_SIZE"
122 
				  Set rsRep = OraDatabase.Parameters("RECORD_SET").Value
 122 
                  OraDatabase.Parameters.Remove "RECORD_SET"
123
123 
                  %>
124
124 
 
125 
				  OraDatabase.Parameters.Remove "KEYWORD"
 125 
                  <table width="100%"  border="0" cellspacing="0" cellpadding="5">
126 
				  OraDatabase.Parameters.Remove "RTAG_ID"
 126 
                     <tr>
127 
				  OraDatabase.Parameters.Remove "SEARCH_AREA"
 127 
                        <td>
128 
				  OraDatabase.Parameters.Remove "PAGE_SIZE"
 128 
                           <%If parSearchType = "1" Then%>
129 
				  OraDatabase.Parameters.Remove "RECORD_SET"
 129 
                              <span class="body_sect">Find Package</span>
130
130 
                           <%ElseIf parSearchType = "2" Then%>
131 
				%>
 131 
                              <span class="body_sect">Find File</span>
132
132 
                           <%End If%>
133 
				<table width="100%"  border="0" cellspacing="0" cellpadding="5">
 133 
                        </td>
134 
				  <tr>
 134 
                     </tr>
135 
                    <td>
 135 
                     <tr>
136 
						<%If parSearchType = "1" Then%>
 136 
                        <td nowrap bgcolor="#E4E9EC" class="body_txt">
137 
						<span class="body_sect">Find Package</span>
 137 
                           Results for <b><%=Trim(parKeyword)%></b><%If parSearchType = "2" Then%>. Showing max. <%=MaxRows%> results.<%End If%>
138 
						<%ElseIf parSearchType = "2" Then%>
 138 
                        </td>
139 
						<span class="body_sect">Find File</span>
 139 
                     </tr>
140 
						<%End If%>
 140 
                  </table>
141 
					</td>
 141 
 
142 
                  </tr>
 142 
 
143 
                  <tr>
 143 
                  <%If parSearchType = "1" Then%>
144 
                    <td nowrap bgcolor="#E4E9EC" class="body_txt">
 144 
                     <!-- PACKAGE SEARCH ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
145 
					Results for <b><%=parKeyword%></b><%If parSearchType = "2" Then%>. Showing max. <%=MaxRows%> results.<%End If%>
 145 
                     <table width="100%" border="0" cellspacing="1" cellpadding="5">
146 
					</td>
 146 
                        <form name="frm" method="get" action="<%=ScriptName%>">
147 
                  </tr>
 147 
                           <tr>
148 
                </table>
 148 
                              <td width="1" nowrap class="body_col" bgcolor="#E4E9EC"></td>
149 
 
 149 
                              <td width="1" nowrap class="body_col" bgcolor="#E4E9EC">Package&nbsp;Name</td>
150
150 
                              <td width="1" nowrap class="body_col" bgcolor="#E4E9EC">Version</td>
151 
		<%If parSearchType = "1" Then%>
 151 
                              <td width="1" nowrap class="body_col" bgcolor="#E4E9EC">Location</td>
152 
				<!-- PACKAGE SEARCH ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 152 
                              <td width="100%" nowrap class="body_col" bgcolor="#E4E9EC">
153 
				<table width="100%" border="0" cellspacing="1" cellpadding="5">
 153 
                                 <SPAN id="IMG_EXPAND_ALL_REASONS" name="IMG_EXPAND_ALL_REASONS" style="display:block;">
154 
				<form name="frm" method="get" action="<%=ScriptName%>">
 154 
                                    <a href="javascript:;" onClick="ExpandAll(); ToggleDisplay('IMG_EXPAND_ALL_REASONS','IMG_COLLAPSE_ALL_REASONS');" title="Show All Reasons for Release.">
155 
				  <tr>
 155 
                                       <img src="icons/b_expand_all.gif" border="0" align="absmiddle" hspace="3">
156 
                    <td width="1" nowrap class="body_col" bgcolor="#E4E9EC"></td>
 156 
                                    </a>Reason&nbsp;for&nbsp;Release
157 
					<td width="1" nowrap class="body_col" bgcolor="#E4E9EC">Package&nbsp;Name</td>
 157 
                                 </SPAN>
158 
					<td width="1" nowrap class="body_col" bgcolor="#E4E9EC">Version</td>
 158 
                                 <SPAN id="IMG_COLLAPSE_ALL_REASONS" name="IMG_COLLAPSE_ALL_REASONS" style="display:none;">
159 
					<td width="1" nowrap class="body_col" bgcolor="#E4E9EC">Location</td>
 159 
                                    <a href="javascript:;" onClick="CollapseAll(); ToggleDisplay('IMG_EXPAND_ALL_REASONS','IMG_COLLAPSE_ALL_REASONS');" title="Hide All Reasons for Release.">
160 
					<td width="100%" nowrap class="body_col" bgcolor="#E4E9EC">
 160 
                                       <img src="icons/b_collapse_all.gif" border="0" align="absmiddle" hspace="3">
161 
					<SPAN id="IMG_EXPAND_ALL_REASONS" name="IMG_EXPAND_ALL_REASONS" style="display:block;"><a href="javascript:;" onClick="ExpandAll(); ToggleDisplay('IMG_EXPAND_ALL_REASONS','IMG_COLLAPSE_ALL_REASONS');" title="Show All Reasons for Release."><img src="icons/b_expand_all.gif" border="0" align="absmiddle" hspace="3"></a>Reason&nbsp;for&nbsp;Release</SPAN>
 161 
                                    </a>Reason&nbsp;for&nbsp;Release
162 
					<SPAN id="IMG_COLLAPSE_ALL_REASONS" name="IMG_COLLAPSE_ALL_REASONS" style="display:none;"><a href="javascript:;" onClick="CollapseAll(); ToggleDisplay('IMG_EXPAND_ALL_REASONS','IMG_COLLAPSE_ALL_REASONS');" title="Hide All Reasons for Release."><img src="icons/b_collapse_all.gif" border="0" align="absmiddle" hspace="3"></a>Reason&nbsp;for&nbsp;Release</SPAN>
 162 
                                 </SPAN>
163 
					</td>
 163 
                              </td>
164 
					<td width="1" nowrap class="body_col" bgcolor="#E4E9EC">Last&nbsp;Modified</td>
 164 
                              <td width="1" nowrap class="body_col" bgcolor="#E4E9EC">Last&nbsp;Modified</td>
165 
                  </tr>
 165 
                           </tr>
166 
				  <%
 166 
                           <%
167 
				  If rsRep.RecordCount = 0 Then
 167 
                           If rsRep.RecordCount = 0 Then
168 
					With Response
 168 
                              With Response
169 
						.write "<tr>"
 169 
                                 .write "<tr>"
170 
						.write "<td colspan='6' class='body_row'>Found 0 records.</td>"
 170 
                                 .write "<td colspan='6' class='body_row'>Found 0 records.</td>"
171 
						.write "</tr>"
 171 
                                 .write "</tr>"
172 
					End With
 172 
                              End With
173 
				  End If
 173 
                           End If
174
174 
 
175 
				  While ((NOT rsRep.BOF) AND (NOT rsRep.EOF))
175 
                           While ((NOT rsRep.BOF) AND (NOT rsRep.EOF))
176
176 
 
177 
					imgLock = IMG_NOT_OFFICIAL
 177 
                              imgLock = IMG_NOT_OFFICIAL
178 
					If (rsRep("dlocked") = "Y") OR (rsRep("dlocked") = "A") Then
 178 
                              If (rsRep("dlocked") = "Y") OR (rsRep("dlocked") = "A") Then
179 
						imgLock = IMG_OFFICIAL
 179 
                                 imgLock = IMG_OFFICIAL
180 
					End If
 180 
                              End If%>
181
181 
                              <tr>
182 
				  %>
 182 
                                 <td valign="top" bgcolor="#F5F5F5"><%=imgLock%></td>
183 
					  <tr>
183 
                                 <td class="body_txt" valign="top" bgcolor="#F5F5F5"><%=Highlight_Substring( rsRep("pkg_name"), Trim(parKeyword) )%></td>
184 
					    <td valign="top" bgcolor="#F5F5F5"><%=imgLock%></td>
 184 
                                 <td nowrap valign="top" bgcolor="#F5F5F5"><a href="dependencies.asp?pv_id=<%=rsRep("pv_id")%>&rtag_id=<%=parRtagId%>" class="body_link"><%=rsRep("pkg_version")%></a></td>
185 
						<td class="body_txt" valign="top" bgcolor="#F5F5F5"><%=Highlight_Substring( rsRep("pkg_name"), parKeyword )%></td>
 185 
                                 <td class="body_txt" valign="top" bgcolor="#F5F5F5"><%= GetEnvName(rsRep("env_area")) &"&nbsp;/&nbsp;"& rsRep("view_name")%></td>
186 
						<td nowrap valign="top" bgcolor="#F5F5F5"><a href="dependencies.asp?pv_id=<%=rsRep("pv_id")%>&rtag_id=<%=parRtagId%>" class="body_link"><%=rsRep("pkg_version")%></a></td>
 186 
                                 <td valign="top"  bgcolor="#F5F5F5" >
187 
						<td class="body_txt" valign="top" bgcolor="#F5F5F5"><%= GetEnvName(rsRep("env_area")) &"&nbsp;/&nbsp;"& rsRep("view_name")%></td>
 187 
                                    <DIV style="display:block;" id="SHORT_RFO<%= rsRep("env_area") &"_"& rsRep("pv_id")%>" name="SHORT_RFO<%= rsRep("env_area") &"_"& rsRep("pv_id")%>"  onclick="ToggleDisplay('SHORT_RFO<%= rsRep("env_area") &"_"& rsRep("pv_id")%>','FULL_RFO<%= rsRep("env_area") &"_"& rsRep("pv_id")%>');">
188 
						<td valign="top"  bgcolor="#F5F5F5" >
 188 
                                       <a href="#" class="row_txt_area" title="Click to see more...">Click to see more...</a>
189 
						<DIV style="display:block;" id="SHORT_RFO<%= rsRep("env_area") &"_"& rsRep("pv_id")%>" name="SHORT_RFO<%= rsRep("env_area") &"_"& rsRep("pv_id")%>"  onclick="ToggleDisplay('SHORT_RFO<%= rsRep("env_area") &"_"& rsRep("pv_id")%>','FULL_RFO<%= rsRep("env_area") &"_"& rsRep("pv_id")%>');">
 189 
                                    </DIV>
190 
							<a href="#" class="row_txt_area" title="Click to see more...">Click to see more...</a>
 190 
                                    <DIV id="FULL_RFO<%= rsRep("env_area") &"_"& rsRep("pv_id")%>" name="FULL_RFO<%= rsRep("env_area") &"_"& rsRep("pv_id")%>" style="display:none;" onclick="ToggleDisplay('SHORT_RFO<%= rsRep("env_area") &"_"& rsRep("pv_id")%>','FULL_RFO<%= rsRep("env_area") &"_"& rsRep("pv_id")%>');">
191 
						</DIV>
 191 
                                       <a href="#" class="body_txt" title="Click to hide."><%=NewLine_To_BR ( To_HTML( rsRep("comments") ) )%></a>
192 
						<DIV id="FULL_RFO<%= rsRep("env_area") &"_"& rsRep("pv_id")%>" name="FULL_RFO<%= rsRep("env_area") &"_"& rsRep("pv_id")%>" style="display:none;" onclick="ToggleDisplay('SHORT_RFO<%= rsRep("env_area") &"_"& rsRep("pv_id")%>','FULL_RFO<%= rsRep("env_area") &"_"& rsRep("pv_id")%>');">
 192 
                                    </DIV>
193 
							<a href="#" class="body_txt" title="Click to hide."><%=NewLine_To_BR ( To_HTML( rsRep("comments") ) )%></a>
 193 
                                 </td>
194 
						</DIV>
 194 
                                 <td nowrap class="body_txt" valign="top" bgcolor="#F5F5F5">
195 
						</td>
 195 
                                    <%= "<a href='mailto:"& rsRep("user_email") &"' class='txt_linked'><img src='images/i_user.gif' width='10' height='13' hspace='2' border='0' align='absmiddle' alt='"& rsRep("full_name") &" &lt;"& rsRep("user_email") &"&gt;'>"& rsRep("full_name") &"</a> "& EuroDateTime ( rsRep("modified_stamp") )%>
196 
						<td nowrap class="body_txt" valign="top" bgcolor="#F5F5F5"><%= "<a href='mailto:"& rsRep("user_email") &"' class='txt_linked'><img src='images/i_user.gif' width='10' height='13' hspace='2' border='0' align='absmiddle' alt='"& rsRep("full_name") &" &lt;"& rsRep("user_email") &"&gt;'>"& rsRep("full_name") &"</a> "& EuroDateTime ( rsRep("modified_stamp") )%></td>
 196 
                                 </td>
197 
					  </tr>
 197 
                              </tr>
198 
				  <%  rsRep.MoveNext
 198 
                           <%  rsRep.MoveNext
199 
				  WEnd
 199 
                           WEnd
200
200 
 
201 
				  rsRep.Close()
 201 
                           rsRep.Close()
202 
				  %>
 202 
                           %>
203 
				  <tr>
203 
                           <tr>
204 
					<td colspan='6' background="images/bg_rep_line.gif"><img src="images/spacer.gif" width="1" height="1"></td>
 204 
                              <td colspan='6' background="images/bg_rep_line.gif"><img src="images/spacer.gif" width="1" height="1"></td>
205 
				  </tr>
 205 
                           </tr>
206 
				</form>
206 
                        </form>
207 
				</table>
 207 
                     </table>
208 
				<br>
 208 
                     <br>
209 
 
 209 
 
210
210 
                  <%ElseIf parSearchType = "2" Then%>
211 
		<%ElseIf parSearchType = "2" Then%>
211 
                     <!-- FILE SEARCH ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
212 
				<!-- FILE SEARCH ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 212 
                     <table width="100%" border="0" cellspacing="1" cellpadding="5">
213 
				<table width="100%" border="0" cellspacing="1" cellpadding="5">
 213 
                        <tr>
214 
				  <tr>
 214 
                           <td width="20%" nowrap class="body_col" bgcolor="#E4E9EC">File Name</td>
215 
					<td width="20%" nowrap class="body_col" bgcolor="#E4E9EC">File Name</td>
 215 
                           <td width="20%" nowrap class="body_col" bgcolor="#E4E9EC">Path</td>
216 
					<td width="20%" nowrap class="body_col" bgcolor="#E4E9EC">Path</td>
 216 
                           <td width="20" nowrap class="body_col" bgcolor="#E4E9EC">Package&nbsp;Name</td>
217 
					<td width="20" nowrap class="body_col" bgcolor="#E4E9EC">Package&nbsp;Name</td>
 217 
                           <td width="20%" nowrap class="body_col" bgcolor="#E4E9EC">Version</td>
218 
					<td width="20%" nowrap class="body_col" bgcolor="#E4E9EC">Version</td>
 218 
                           <td width="20%" nowrap class="body_col" bgcolor="#E4E9EC">CheckSum&nbsp;(CKSUM)</td>
219 
					<td width="20%" nowrap class="body_col" bgcolor="#E4E9EC">CheckSum&nbsp;(CKSUM)</td>
 219 
                        </tr>
220 
                  </tr>
 220 
                        <%
221 
				  <%
 221 
                        If rsRep.RecordCount = 0 Then
222 
				  If rsRep.RecordCount = 0 Then
 222 
                           With Response
223 
					With Response
 223 
                              .write "<tr>"
224 
						.write "<tr>"
 224 
                              .write "<td colspan='5' class='body_row'>Found 0 records.</td>"
225 
						.write "<td colspan='5' class='body_row'>Found 0 records.</td>"
 225 
                              .write "</tr>"
226 
						.write "</tr>"
 226 
                           End With
227 
					End With
 227 
                        End If
228 
				  End If
 228 
 
229
229 
                        While ((NOT rsRep.BOF) AND (NOT rsRep.EOF))
230 
				  While ((NOT rsRep.BOF) AND (NOT rsRep.EOF))
 230 
 
231
231 
                           If IsNull(rsRep("file_path")) Then
232 
 
 232 
                              ' DEVI-050252 - must not call Get_Pkg_Short_Info() with a null or empty string, so check the patch_id before doing so.
233 
				  	If IsNull(rsRep("file_path")) Then
 233 
                              If IsNull(rsRep("patch_id")) OR rsRep("patch_id") = "" Then
234 
						Call Get_Pkg_Short_Info(  rsRep("patch_id"), NULL, NULL, sPkgVersion, NULL, NULL, NULL )
 234 
                                 sLink = dpkg_archiveURL & rsRep("pkg_name") &"/"& rsRep("pkg_version") &"/"& Replace( rsRep("file_name"), "\", "/" )
235 
						sLink = dpkg_archiveURL & rsRep("pkg_name") &"/"& sPkgVersion &"/"& rsRep("file_name")
 235 
                              Else
236 
					Else
 236 
                                 Call Get_Pkg_Short_Info(  rsRep("patch_id"), NULL, NULL, sPkgVersion, NULL, NULL, NULL )
237 
						sLink = dpkg_archiveURL & rsRep("pkg_name") &"/"& rsRep("pkg_version") &"/"& Replace( rsRep("file_path") & rsRep("file_name"), "\", "/" )
 237 
                                 sLink = dpkg_archiveURL & rsRep("pkg_name") &"/"& sPkgVersion &"/"& rsRep("file_name")
238 
					End If
 238 
                              End If
239 
				  %>
 239 
                           Else
240 
					  <tr>
240 
                              sLink = dpkg_archiveURL & rsRep("pkg_name") &"/"& rsRep("pkg_version") &"/"& Replace( rsRep("file_path") & rsRep("file_name"), "\", "/" )
241 
						<td class="body_row" valign="top" bgcolor="#F5F5F5"><a href="<%=sLink%>" class="body_link"><%=Highlight_Substring( rsRep("file_name"), parKeyword )%></td>
 241 
                           End If
242 
						<td nowrap class="body_row"  bgcolor="#F5F5F5"><%=rsRep("file_path")%></td>
 242 
                           %>
243 
						<td nowrap class="body_row"  bgcolor="#F5F5F5"><%=rsRep("pkg_name")%></td>
 243 
                           <tr>
244 
						<td nowrap class="body_row"  bgcolor="#F5F5F5"><a href="dependencies.asp?rtag_id=<%=parRtagId%>&pv_id=<%=rsRep("pv_id")%>" class="body_link"><%=rsRep("pkg_version")%></a></td>
 244 
                              <td class="body_row" valign="top" bgcolor="#F5F5F5"><a href="<%=sLink%>" class="body_link"><%=Highlight_Substring( rsRep("file_name"), Trim(parKeyword) )%></td>
245 
						<td nowrap class="body_txt_gray"  bgcolor="#F5F5F5"><%=rsRep("crc_cksum")%></td>
 245 
                              <td nowrap class="body_row"  bgcolor="#F5F5F5"><%=rsRep("file_path")%></td>
246 
					  </tr>
 246 
                              <td nowrap class="body_row"  bgcolor="#F5F5F5"><%=rsRep("pkg_name")%></td>
247 
				  <%  rsRep.MoveNext
 247 
                              <td nowrap class="body_row"  bgcolor="#F5F5F5"><a href="dependencies.asp?rtag_id=<%=parRtagId%>&pv_id=<%=rsRep("pv_id")%>" class="body_link"><%=rsRep("pkg_version")%></a></td>
248 
				  WEnd
 248 
                              <td nowrap class="body_txt_gray"  bgcolor="#F5F5F5"><%=rsRep("crc_cksum")%></td>
249
249 
                           </tr>
250 
				  rsRep.Close()
 250 
                           <%  rsRep.MoveNext
251 
				  %>
 251 
                        WEnd
252 
				  <tr>
252 
 
253 
					<td colspan='6' background="images/bg_rep_line.gif"><img src="images/spacer.gif" width="1" height="1"></td>
 253 
                        rsRep.Close()
254 
				  </tr>
 254 
                        %>
255 
				</table>
 255 
                        <tr>
256 
				<br>
256 
                           <td colspan='6' background="images/bg_rep_line.gif"><img src="images/spacer.gif" width="1" height="1"></td>
257 
				<!-- END OF SEARCH ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
257 
                        </tr>
258 
 
 258 
                     </table>
259 
		<%End If%>
259 
                     <br>
260
260 
                     <!-- END OF SEARCH ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
261 
				</td>
 261 
                  <%End If%>
262 
			  <td width="1%" background="images/lbox_bgside_white.gif">&nbsp;</td>
 262 
               </td>
263 
			</tr>
 263 
           <td width="1%" background="images/lbox_bgside_white.gif">&nbsp;</td>
264 
		  </table>
 264 
         </tr>
265
265 
      </table>
266
266 
      <!-- END MIDDLE --------></td>
267
267 
   </tr>
268
- 
 
269 
		<!-- END MIDDLE --------></td>
 - 
 
270 
	</tr>
 - 
 
271 
</table>
 268 
</table>
272 
<!-- FOOTER -->
 269 
<!-- FOOTER -->
273 
<!--#include file="_footer.asp"-->
 270 
<!--#include file="_footer.asp"-->
274 
</body>
 271 
</body>
275 
</html>
 272 
</html>