Subversion Repositories DevTools

Rev

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

Rev 5098 Rev 5357
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 
Const allowNoPackage = TRUE     ' Allow page display without pvid being present
 13 
Const allowNoPackage = TRUE     ' Allow page display without pvid being present
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 
<!--#include file="common/common_dbedit.asp"-->
 20 
<!--#include file="common/common_dbedit.asp"-->
21 
<!--#include file="_tabs.asp"-->
 21 
<!--#include file="_tabs.asp"-->
22 
<!--#include file="common/_package_common.asp"-->
 22 
<!--#include file="common/_package_common.asp"-->
23 
<%
 23 
<%
24 
'------------ ACCESS CONTROL ------------------
 24 
'------------ ACCESS CONTROL ------------------
25 
%>
 25 
%>
26 
<!--#include file="_access_control_general.asp"-->
 26 
<!--#include file="_access_control_general.asp"-->
27 
<%
 27 
<%
28 
'------------ Variable Definition -------------
 28 
'------------ Variable Definition -------------
29 
Dim KeyWord
 29 
Dim KeyWord
30 
Dim parKeyword
 30 
Dim parKeyword
31 
Dim parRtagId
 31 
Dim parRtagId
32 
Dim rsRep
 32 
Dim rsRep
33 
Dim imgLock
 33 
Dim imgLock
34 
Dim parSearchType
 34 
Dim parSearchType
35 
Dim sLink
 35 
Dim sLink
36 
Dim   rsQry
 36 
Dim   rsQry
37 
Dim sPkgVersion
 37 
Dim sPkgVersion
38 
'------------ Constants Declaration -----------
 38 
'------------ Constants Declaration -----------
39 
Const IMG_OFFICIAL = "<img src='images/i_locked.gif' width='7' height='10' hspace='5' vspace='2' alt='Package is official'>"
 39 
Const IMG_OFFICIAL = "<img src='images/i_locked.gif' width='7' height='10' hspace='5' vspace='2' alt='Package is official'>"
40 
Const IMG_NOT_OFFICIAL = "<img src='images/spacer.gif' width='7' height='10' hspace='5' vspace='2'>"
 40 
Const IMG_NOT_OFFICIAL = "<img src='images/spacer.gif' width='7' height='10' hspace='5' vspace='2'>"
41 
Const MaxRows = 100
 41 
Const MaxRows = 100
42 
'------------ Variable Init -------------------
 42 
'------------ Variable Init -------------------
43 
parKeyword = Request("keyword")
 43 
parKeyword = Request("keyword")
44 
parRtagId = Request("rtag_id")
 44 
parRtagId = Request("rtag_id")
45 
parSearchType = Request("searchtype")
 45 
parSearchType = Request("searchtype")
46 
'----------------------------------------------
 46 
'----------------------------------------------
47 
%>
 47 
%>
48 
<%
 48 
<%
49 
'==================== MAIN LINE ===============================
 49 
'==================== MAIN LINE ===============================
50 
 
 50 
 
51 
' Check for Required parameters
 51 
' Check for Required parameters
52 
If (parSearchType = "")  OR  (nEnvTab = "") Then
 52 
If (parSearchType = "")  OR  (nEnvTab = "") Then
53 
   Response.Redirect ("dependencies.asp?rtag_id="& Request("rtag_id"))
 53 
   Response.Redirect ("dependencies.asp?rtag_id="& Request("rtag_id"))
54 
End If
 54 
End If
55 
'==============================================================
 55 
'==============================================================
56 
%>
 56 
%>
57 
<html>
 57 
<html>
58 
<head>
 58 
<head>
59 
<title><%=Title(parRtagId)%></title>
 59 
<title><%=Title(parRtagId)%></title>
60 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
 60 
<link rel="shortcut icon" href="<%=FavIcon%>"/>
61 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
 61 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
62 
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
 62 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
63 
<link rel="stylesheet" href="images/navigation.css" type="text/css">
 63 
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
64 
<script language="JavaScript" src="images/common.js"></script>
 64 
<link rel="stylesheet" href="images/navigation.css" type="text/css">
65 
<!--#include file="_jquery_includes.asp"-->
 65 
<script language="JavaScript" src="images/common.js"></script>
66 
<!-- TIPS -->
 66 
<!--#include file="_jquery_includes.asp"-->
67 
<script language="JavaScript" src="images/tipster.js"></script>
 67 
<!-- TIPS -->
68 
<script language="JavaScript" src="images/_help_tips.js"></script>
 68 
<script language="JavaScript" src="images/tipster.js"></script>
69 
<!-- DROPDOWN MENUS -->
 69 
<script language="JavaScript" src="images/_help_tips.js"></script>
70 
<!--#include file="_menu_def.asp"-->
 70 
<!-- DROPDOWN MENUS -->
71 
<script language="JavaScript1.2" src="images/popup_menu.js"></script>
 71 
<!--#include file="_menu_def.asp"-->
72 
</head>
 72 
<script language="JavaScript1.2" src="images/popup_menu.js"></script>
73 
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" >
 73 
</head>
74 
<!-- MENU LAYERS -------------------------------------->
 74 
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" >
75 
<div id="popmenu" class="menuskin" onMouseover="clearhidemenu();highlightmenu(event,'on')" onMouseout="highlightmenu(event,'off');dynamichide(event)">
 75 
<!-- MENU LAYERS -------------------------------------->
76 
  <!----------------------------------------------------->
 76 
<div id="popmenu" class="menuskin" onMouseover="clearhidemenu();highlightmenu(event,'on')" onMouseout="highlightmenu(event,'off');dynamichide(event)">
77 
</div>
 77 
  <!----------------------------------------------------->
78 
<!-- HEADER -->
 78 
</div>
79 
<!--#include file="_header.asp"-->
 79 
<!-- HEADER -->
80 
<!-- BODY ---->
 80 
<!--#include file="_header.asp"-->
81 
<table width="100%" border="0" cellspacing="0" cellpadding="0">
 81 
<!-- BODY ---->
82 
   <tr>
 82 
<table width="100%" border="0" cellspacing="0" cellpadding="0">
83 
      <td valign="top" width="1" background="images/bg_bage.gif">
 83 
   <tr>
84 
         <!-- LEFT -->
 84 
      <td valign="top" width="1" background="images/bg_bage.gif">
85 
         <!--#include file="_environment.asp"-->
 85 
         <!-- LEFT -->
86 
      </td>
 86 
         <!--#include file="_environment.asp"-->
87 
      <td width="1" bgcolor="#999999"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
 87 
      </td>
88 
      <td valign="top" width="100%">
 88 
      <td width="1" bgcolor="#999999"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
89 
         <!-- MIDDLE -->
 89 
      <td valign="top" width="100%">
90 
 
 90 
         <!-- MIDDLE -->
91 
         <table width="100%" border="0" cellspacing="0" cellpadding="0">
 91 
 
92 
            <tr>
 92 
         <table width="100%" border="0" cellspacing="0" cellpadding="0">
93 
               <td width="1%"></td>
 93 
            <tr>
94 
               <td width="100%" align="right"><img src="images/h_trsp_dot.gif" width="1" height="20"></td>
 94 
               <td width="1%"></td>
95 
               <td width="1%"></td>
 95 
               <td width="100%" align="right"><img src="images/h_trsp_dot.gif" width="1" height="20"></td>
96 
            </tr>
 96 
               <td width="1%"></td>
97 
            <tr>
 97 
            </tr>
98 
               <td width="1%" bgcolor="#FFFFFF"><img src="images/h_trsp_dot.gif" width="10" height="480"></td>
 98 
            <tr>
99 
               <td bgcolor="#FFFFFF" valign="top">
 99 
               <td width="1%" bgcolor="#FFFFFF"><img src="images/h_trsp_dot.gif" width="10" height="480"></td>
100 
                  <%
 100 
               <td bgcolor="#FFFFFF" valign="top">
101 
                  If InStr( Trim(parKeyword), "*") > 0 Then
 101 
                  <%
102 
                     KeyWord = Replace( Trim(parKeyword), "*", "%" )
 102 
                  If InStr( Trim(parKeyword), "*") > 0 Then
103 
                  Else
 103 
                     KeyWord = Replace( Trim(parKeyword), "*", "%" )
104 
                     KeyWord = "%"& Trim(parKeyword) &"%"
 104 
                  Else
105 
                  End If
 105 
                     KeyWord = "%"& Trim(parKeyword) &"%"
106 
 
 106 
                  End If
107 
                  OraDatabase.Parameters.Add "KEYWORD",    KeyWord, ORAPARM_INPUT, ORATYPE_VARCHAR2
 107 
 
108 
                  OraDatabase.Parameters.Add "RTAG_ID",    parRtagId, ORAPARM_INPUT, ORATYPE_NUMBER
 108 
                  OraDatabase.Parameters.Add "KEYWORD",    KeyWord, ORAPARM_INPUT, ORATYPE_VARCHAR2
109 
                  OraDatabase.Parameters.Add "SEARCH_AREA", nEnvTab, ORAPARM_INPUT, ORATYPE_NUMBER
 109 
                  OraDatabase.Parameters.Add "RTAG_ID",    parRtagId, ORAPARM_INPUT, ORATYPE_NUMBER
110 
                  OraDatabase.Parameters.Add "RECORD_SET",   NULL,    ORAPARM_OUTPUT,    ORATYPE_CURSOR
 110 
                  OraDatabase.Parameters.Add "SEARCH_AREA", nEnvTab, ORAPARM_INPUT, ORATYPE_NUMBER
111 
                  OraDatabase.Parameters.Add "PAGE_SIZE",    MaxRows, ORAPARM_INPUT, ORATYPE_NUMBER
 111 
                  OraDatabase.Parameters.Add "RECORD_SET",   NULL,    ORAPARM_OUTPUT,    ORATYPE_CURSOR
112 
 
 112 
                  OraDatabase.Parameters.Add "PAGE_SIZE",    MaxRows, ORAPARM_INPUT, ORATYPE_NUMBER
113 
                  If parSearchType = "1" Then
 113 
 
114 
                     ' Package Search
 114 
                  If parSearchType = "1" Then
115 
                     OraDatabase.ExecuteSQL "BEGIN  PK_ENVIRONMENT.FIND_PACKAGE ( :KEYWORD, :RTAG_ID, :SEARCH_AREA, :RECORD_SET );  END;"
 115 
                     ' Package Search
116 
                  ElseIf parSearchType = "2" Then
 116 
                     OraDatabase.ExecuteSQL "BEGIN  PK_ENVIRONMENT.FIND_PACKAGE ( :KEYWORD, :RTAG_ID, :SEARCH_AREA, :RECORD_SET );  END;"
117 
                     ' File Search
 117 
                  ElseIf parSearchType = "2" Then
118 
                     OraDatabase.ExecuteSQL "BEGIN  PK_ENVIRONMENT.FIND_FILE ( :KEYWORD, :RTAG_ID, :SEARCH_AREA, :PAGE_SIZE, :RECORD_SET );  END;"
 118 
                     ' File Search
119 
                  End If
 119 
                     OraDatabase.ExecuteSQL "BEGIN  PK_ENVIRONMENT.FIND_FILE ( :KEYWORD, :RTAG_ID, :SEARCH_AREA, :PAGE_SIZE, :RECORD_SET );  END;"
120 
 
 120 
                  End If
121 
                  Set rsRep = OraDatabase.Parameters("RECORD_SET").Value
 121 
 
122 
 
 122 
                  Set rsRep = OraDatabase.Parameters("RECORD_SET").Value
123 
                  OraDatabase.Parameters.Remove "KEYWORD"
 123 
 
124 
                  OraDatabase.Parameters.Remove "RTAG_ID"
 124 
                  OraDatabase.Parameters.Remove "KEYWORD"
125 
                  OraDatabase.Parameters.Remove "SEARCH_AREA"
 125 
                  OraDatabase.Parameters.Remove "RTAG_ID"
126 
                  OraDatabase.Parameters.Remove "PAGE_SIZE"
 126 
                  OraDatabase.Parameters.Remove "SEARCH_AREA"
127 
                  OraDatabase.Parameters.Remove "RECORD_SET"
 127 
                  OraDatabase.Parameters.Remove "PAGE_SIZE"
128 
                  %>
 128 
                  OraDatabase.Parameters.Remove "RECORD_SET"
129 
 
 129 
                  %>
130 
                  <table width="100%"  border="0" cellspacing="0" cellpadding="5">
 130 
 
131 
                     <tr>
 131 
                  <table width="100%"  border="0" cellspacing="0" cellpadding="5">
132 
                        <td>
 132 
                     <tr>
133 
                           <%If parSearchType = "1" Then%>
 133 
                        <td>
134 
                              <span class="body_sect">Find Package</span>
 134 
                           <%If parSearchType = "1" Then%>
135 
                           <%ElseIf parSearchType = "2" Then%>
 135 
                              <span class="body_sect">Find Package</span>
136 
                              <span class="body_sect">Find File</span>
 136 
                           <%ElseIf parSearchType = "2" Then%>
137 
                           <%End If%>
 137 
                              <span class="body_sect">Find File</span>
138 
                        </td>
 138 
                           <%End If%>
139 
                     </tr>
 139 
                        </td>
140 
                     <tr>
 140 
                     </tr>
141 
                        <td nowrap bgcolor="#E4E9EC" class="body_txt">
 141 
                     <tr>
142 
                           Results for <b><%=Trim(parKeyword)%></b><%If parSearchType = "2" Then%>. Showing max. <%=MaxRows%> results.<%End If%>
 142 
                        <td nowrap bgcolor="#E4E9EC" class="body_txt">
143 
                        </td>
 143 
                           Results for <b><%=Trim(parKeyword)%></b><%If parSearchType = "2" Then%>. Showing max. <%=MaxRows%> results.<%End If%>
144 
                     </tr>
 144 
                        </td>
145 
                  </table>
 145 
                     </tr>
146 
 
 146 
                  </table>
147 
 
 147 
 
148 
                  <%If parSearchType = "1" Then%>
 148 
 
149 
                     <!-- PACKAGE SEARCH ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 149 
                  <%If parSearchType = "1" Then%>
150 
                     <table width="100%" border="0" cellspacing="1" cellpadding="5">
 150 
                     <!-- PACKAGE SEARCH ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
151 
                        <form name="frm" method="get" action="<%=ScriptName%>">
 151 
                     <table width="100%" border="0" cellspacing="1" cellpadding="5">
152 
                           <!-- Heading -->
 152 
                        <form name="frm" method="get" action="<%=ScriptName%>">
153 
                           <tr>
 153 
                           <!-- Heading -->
154 
                              <td width="1" nowrap class="body_col" bgcolor="#E4E9EC"></td>
 154 
                           <tr>
155 
                              <td width="1" nowrap class="body_col" bgcolor="#E4E9EC">Package&nbsp;Name</td>
 155 
                              <td width="1" nowrap class="body_col" bgcolor="#E4E9EC"></td>
156 
                              <td width="1" nowrap class="body_col" bgcolor="#E4E9EC">Version</td>
 156 
                              <td width="1" nowrap class="body_col" bgcolor="#E4E9EC">Package&nbsp;Name</td>
157 
                              <td width="1" nowrap class="body_col" bgcolor="#E4E9EC">Location</td>
 157 
                              <td width="1" nowrap class="body_col" bgcolor="#E4E9EC">Version</td>
158 
                              <td width="100%" nowrap class="body_col" bgcolor="#E4E9EC">
 158 
                              <td width="1" nowrap class="body_col" bgcolor="#E4E9EC">Location</td>
159 
                                 <SPAN id="IMG_EXPAND_ALL_REASONS" name="IMG_EXPAND_ALL_REASONS" style="display:block;">
 159 
                              <td width="100%" nowrap class="body_col" bgcolor="#E4E9EC">
160 
                                    <a href="javascript:;" onClick="ExpandAll(); ToggleDisplay('IMG_EXPAND_ALL_REASONS','IMG_COLLAPSE_ALL_REASONS');" title="Show All Reasons for Release.">
 160 
                                 <SPAN id="IMG_EXPAND_ALL_REASONS" name="IMG_EXPAND_ALL_REASONS" style="display:block;">
161 
                                       <img src="icons/b_expand_all.gif" border="0" align="absmiddle" hspace="3">
 161 
                                    <a href="javascript:;" onClick="ExpandAll(); ToggleDisplay('IMG_EXPAND_ALL_REASONS','IMG_COLLAPSE_ALL_REASONS');" title="Show All Reasons for Release.">
162 
                                    </a>Reason&nbsp;for&nbsp;Release
 162 
                                       <img src="icons/b_expand_all.gif" border="0" align="absmiddle" hspace="3">
163 
                                 </SPAN>
 163 
                                    </a>Reason&nbsp;for&nbsp;Release
164 
                                 <SPAN id="IMG_COLLAPSE_ALL_REASONS" name="IMG_COLLAPSE_ALL_REASONS" style="display:none;">
 164 
                                 </SPAN>
165 
                                    <a href="javascript:;" onClick="CollapseAll(); ToggleDisplay('IMG_EXPAND_ALL_REASONS','IMG_COLLAPSE_ALL_REASONS');" title="Hide All Reasons for Release.">
 165 
                                 <SPAN id="IMG_COLLAPSE_ALL_REASONS" name="IMG_COLLAPSE_ALL_REASONS" style="display:none;">
166 
                                       <img src="icons/b_collapse_all.gif" border="0" align="absmiddle" hspace="3">
 166 
                                    <a href="javascript:;" onClick="CollapseAll(); ToggleDisplay('IMG_EXPAND_ALL_REASONS','IMG_COLLAPSE_ALL_REASONS');" title="Hide All Reasons for Release.">
167 
                                    </a>Reason&nbsp;for&nbsp;Release
 167 
                                       <img src="icons/b_collapse_all.gif" border="0" align="absmiddle" hspace="3">
168 
                                 </SPAN>
 168 
                                    </a>Reason&nbsp;for&nbsp;Release
169 
                              </td>
 169 
                                 </SPAN>
170 
                              <td width="1" nowrap class="body_col" bgcolor="#E4E9EC">Last&nbsp;Modified</td>
 170 
                              </td>
171 
                           </tr>
 171 
                              <td width="1" nowrap class="body_col" bgcolor="#E4E9EC">Last&nbsp;Modified</td>
172 
                           <%
 172 
                           </tr>
173 
                           If rsRep.RecordCount = 0 Then
 173 
                           <%
174 
                              With Response
 174 
                           If rsRep.RecordCount = 0 Then
175 
                                 .write "<tr>"
 175 
                              With Response
176 
                                 .write "<td colspan='6' class='body_row'>Found 0 records.</td>"
 176 
                                 .write "<tr>"
177 
                                 .write "</tr>"
 177 
                                 .write "<td colspan='6' class='body_row'>Found 0 records.</td>"
178 
                              End With
 178 
                                 .write "</tr>"
179 
                           End If
 179 
                              End With
180 
 
 180 
                           End If
181 
                           While ((NOT rsRep.BOF) AND (NOT rsRep.EOF))
 181 
 
182 
 
 182 
                           While ((NOT rsRep.BOF) AND (NOT rsRep.EOF))
183 
                              imgLock = IMG_NOT_OFFICIAL
 183 
 
184 
                              If (rsRep("dlocked") = "Y") OR (rsRep("dlocked") = "A") Then
 184 
                              imgLock = IMG_NOT_OFFICIAL
185 
                                 imgLock = IMG_OFFICIAL
 185 
                              If (rsRep("dlocked") = "Y") OR (rsRep("dlocked") = "A") Then
186 
                              End If%>
 186 
                                 imgLock = IMG_OFFICIAL
187 
                              <tr>
 187 
                              End If%>
188 
                                 <td valign="top" bgcolor="#F5F5F5"><%=imgLock%></td>
 188 
                              <tr>
189 
                                 <td nowrap class="body_txt" valign="top" bgcolor="#F5F5F5"><%=Highlight_Substring( rsRep("pkg_name"), Trim(parKeyword) )%></td>
 189 
                                 <td valign="top" bgcolor="#F5F5F5"><%=imgLock%></td>
190 
                                 <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>
 190 
                                 <td nowrap class="body_txt" valign="top" bgcolor="#F5F5F5"><%=Highlight_Substring( rsRep("pkg_name"), Trim(parKeyword) )%></td>
191 
                                 <td nowrap class="body_txt" valign="top" bgcolor="#F5F5F5"><%= GetEnvName(rsRep("env_area")) &"&nbsp;/&nbsp;"& rsRep("view_name")%></td>
 191 
                                 <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>
192 
                                 <td valign="top"  bgcolor="#F5F5F5" >
 192 
                                 <td nowrap class="body_txt" valign="top" bgcolor="#F5F5F5"><%= GetEnvName(rsRep("env_area")) &"&nbsp;/&nbsp;"& rsRep("view_name")%></td>
193 
                                    <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")%>');">
 193 
                                 <td valign="top"  bgcolor="#F5F5F5" >
194 
                                       <a href="#" class="row_txt_area" title="Click to see more...">Click to see more...</a>
 194 
                                    <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")%>');">
195 
                                    </DIV>
 195 
                                       <a href="#" class="row_txt_area" title="Click to see more...">Click to see more...</a>
196 
                                    <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")%>');">
 196 
                                    </DIV>
197 
                                       <a href="#" class="body_txt" title="Click to hide."><%=NewLine_To_BR ( To_HTML( rsRep("comments") ) )%></a>
 197 
                                    <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")%>');">
198 
                                    </DIV>
 198 
                                       <a href="#" class="body_txt" title="Click to hide."><%=NewLine_To_BR ( To_HTML( rsRep("comments") ) )%></a>
199 
                                 </td>
 199 
                                    </DIV>
200 
                                 <td nowrap class="body_txt" valign="top" bgcolor="#F5F5F5">
 200 
                                 </td>
201 
                                    <%= "<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") )%>
 201 
                                 <td nowrap class="body_txt" valign="top" bgcolor="#F5F5F5">
202 
                                 </td>
 202 
                                    <%= "<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") )%>
203 
                              </tr>
 203 
                                 </td>
204 
                           <%  rsRep.MoveNext
 204 
                              </tr>
205 
                           WEnd
 205 
                           <%  rsRep.MoveNext
206 
 
 206 
                           WEnd
207 
                           rsRep.Close()
 207 
 
208 
                           %>
 208 
                           rsRep.Close()
209 
                           <tr>
 209 
                           %>
210 
                              <td colspan='6' background="images/bg_rep_line.gif"><img src="images/spacer.gif" width="1" height="1"></td>
 210 
                           <tr>
211 
                           </tr>
 211 
                              <td colspan='6' background="images/bg_rep_line.gif"><img src="images/spacer.gif" width="1" height="1"></td>
212 
                        </form>
 212 
                           </tr>
213 
                     </table>
 213 
                        </form>
214 
                     <br>
 214 
                     </table>
215 
 
 215 
                     <br>
216 
                  <%ElseIf parSearchType = "2" Then%>
 216 
 
217 
                     <!-- FILE SEARCH ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 217 
                  <%ElseIf parSearchType = "2" Then%>
218 
                     <table width="100%" border="0" cellspacing="1" cellpadding="5">
 218 
                     <!-- FILE SEARCH ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
219 
                        <tr>
 219 
                     <table width="100%" border="0" cellspacing="1" cellpadding="5">
220 
                           <td width="20%" nowrap class="body_col" bgcolor="#E4E9EC">File Name</td>
 220 
                        <tr>
221 
                           <td width="20%" nowrap class="body_col" bgcolor="#E4E9EC">Path</td>
 221 
                           <td width="20%" nowrap class="body_col" bgcolor="#E4E9EC">File Name</td>
222 
                           <td width="20" nowrap class="body_col" bgcolor="#E4E9EC">Package&nbsp;Name</td>
 222 
                           <td width="20%" nowrap class="body_col" bgcolor="#E4E9EC">Path</td>
223 
                           <td width="20%" nowrap class="body_col" bgcolor="#E4E9EC">Version</td>
 223 
                           <td width="20" nowrap class="body_col" bgcolor="#E4E9EC">Package&nbsp;Name</td>
224 
                           <td width="20%" nowrap class="body_col" bgcolor="#E4E9EC">CheckSum&nbsp;(CKSUM)</td>
 224 
                           <td width="20%" nowrap class="body_col" bgcolor="#E4E9EC">Version</td>
225 
                        </tr>
 225 
                           <td width="20%" nowrap class="body_col" bgcolor="#E4E9EC">CheckSum&nbsp;(CKSUM)</td>
226 
                        <%
 226 
                        </tr>
227 
                        If rsRep.RecordCount = 0 Then
 227 
                        <%
228 
                           With Response
 228 
                        If rsRep.RecordCount = 0 Then
229 
                              .write "<tr>"
 229 
                           With Response
230 
                              .write "<td colspan='5' class='body_row'>Found 0 records.</td>"
 230 
                              .write "<tr>"
231 
                              .write "</tr>"
 231 
                              .write "<td colspan='5' class='body_row'>Found 0 records.</td>"
232 
                           End With
 232 
                              .write "</tr>"
233 
                        End If
 233 
                           End With
234 
 
 234 
                        End If
235 
                        While ((NOT rsRep.BOF) AND (NOT rsRep.EOF))
 235 
 
236 
 
 236 
                        While ((NOT rsRep.BOF) AND (NOT rsRep.EOF))
237 
                           If IsNull(rsRep("file_path")) Then
 237 
 
238 
                              ' DEVI-050252 - must not call Get_Pkg_Short_Info() with a null or empty string, so check the patch_id before doing so.
 238 
                           If IsNull(rsRep("file_path")) Then
239 
                              If IsNull(rsRep("patch_id")) OR rsRep("patch_id") = "" Then
 239 
                              ' DEVI-050252 - must not call Get_Pkg_Short_Info() with a null or empty string, so check the patch_id before doing so.
240 
                                 sLink = dpkg_archiveURL & rsRep("pkg_name") &"/"& rsRep("pkg_version") &"/"& Replace( rsRep("file_name"), "\", "/" )
 240 
                              If IsNull(rsRep("patch_id")) OR rsRep("patch_id") = "" Then
241 
                              Else
 241 
                                 sLink = dpkg_archiveURL & rsRep("pkg_name") &"/"& rsRep("pkg_version") &"/"& Replace( rsRep("file_name"), "\", "/" )
242 
                                 Call Get_Pkg_Short_Info(  rsRep("patch_id"), NULL, NULL, sPkgVersion, NULL, NULL, NULL )
 242 
                              Else
243 
                                 sLink = dpkg_archiveURL & rsRep("pkg_name") &"/"& sPkgVersion &"/"& rsRep("file_name")
 243 
                                 Call Get_Pkg_Short_Info(  rsRep("patch_id"), NULL, NULL, sPkgVersion, NULL, NULL, NULL )
244 
                              End If
 244 
                                 sLink = dpkg_archiveURL & rsRep("pkg_name") &"/"& sPkgVersion &"/"& rsRep("file_name")
245 
                           Else
 245 
                              End If
246 
                              sLink = dpkg_archiveURL & rsRep("pkg_name") &"/"& rsRep("pkg_version") &"/"& Replace( rsRep("file_path") & rsRep("file_name"), "\", "/" )
 246 
                           Else
247 
                           End If
 247 
                              sLink = dpkg_archiveURL & rsRep("pkg_name") &"/"& rsRep("pkg_version") &"/"& Replace( rsRep("file_path") & rsRep("file_name"), "\", "/" )
248 
                           %>
 248 
                           End If
249 
                           <tr>
 249 
                           %>
250 
                              <td class="body_row" valign="top" bgcolor="#F5F5F5"><a href="<%=sLink%>" class="body_link"><%=Highlight_Substring( rsRep("file_name"), Trim(parKeyword) )%></td>
 250 
                           <tr>
251 
                              <td nowrap class="body_row"  bgcolor="#F5F5F5"><%=rsRep("file_path")%></td>
 251 
                              <td class="body_row" valign="top" bgcolor="#F5F5F5"><a href="<%=sLink%>" class="body_link"><%=Highlight_Substring( rsRep("file_name"), Trim(parKeyword) )%></td>
252 
                              <td nowrap class="body_row"  bgcolor="#F5F5F5"><%=rsRep("pkg_name")%></td>
 252 
                              <td nowrap class="body_row"  bgcolor="#F5F5F5"><%=rsRep("file_path")%></td>
253 
                              <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>
 253 
                              <td nowrap class="body_row"  bgcolor="#F5F5F5"><%=rsRep("pkg_name")%></td>
254 
                              <td nowrap class="body_txt_gray"  bgcolor="#F5F5F5"><%=rsRep("crc_cksum")%></td>
 254 
                              <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>
255 
                           </tr>
 255 
                              <td nowrap class="body_txt_gray"  bgcolor="#F5F5F5"><%=rsRep("crc_cksum")%></td>
256 
                           <%  rsRep.MoveNext
 256 
                           </tr>
257 
                        WEnd
 257 
                           <%  rsRep.MoveNext
258 
 
 258 
                        WEnd
259 
                        rsRep.Close()
 259 
 
260 
                        %>
 260 
                        rsRep.Close()
261 
                        <tr>
 261 
                        %>
262 
                           <td colspan='6' background="images/bg_rep_line.gif"><img src="images/spacer.gif" width="1" height="1"></td>
 262 
                        <tr>
263 
                        </tr>
 263 
                           <td colspan='6' background="images/bg_rep_line.gif"><img src="images/spacer.gif" width="1" height="1"></td>
264 
                     </table>
 264 
                        </tr>
265 
                     <br>
 265 
                     </table>
266 
                     <!-- END OF SEARCH ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 266 
                     <br>
267 
                  <%End If%>
 267 
                     <!-- END OF SEARCH ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
268 
               </td>
 268 
                  <%End If%>
269 
           <td width="1%" background="images/lbox_bgside_white.gif">&nbsp;</td>
 269 
               </td>
270 
         </tr>
 270 
           <td width="1%" background="images/lbox_bgside_white.gif">&nbsp;</td>
271 
      </table>
 271 
         </tr>
272 
      <!-- END MIDDLE --------></td>
 272 
      </table>
273 
   </tr>
 273 
      <!-- END MIDDLE --------></td>
274 
</table>
 274 
   </tr>
275 
<!-- FOOTER -->
 275 
</table>
276 
<!--#include file="_footer.asp"-->
 276 
<!-- FOOTER -->
277 
</body>
 277 
<!--#include file="_footer.asp"-->
278 
</html>
 278 
</body>
279 
<%
 279 
</html>
280 
Call Destroy_All_Objects
 280 
<%
281 
%>
 281 
Call Destroy_All_Objects
- 
 
 282 
%>