Subversion Repositories DevTools

Rev

Rev 5958 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
5355 dpurdie 1 
<%@LANGUAGE="VBSCRIPT"%>
2 
<%
3 
'=====================================================
4 
'|                                                   |
5 
'|			          wAddProdBySearch			 	 |
6 
'|                                                   |
7 
'=====================================================
8 
%>
9 
<%
10 
Option explicit
11 
Response.Expires = 0
12 
%>
13 
<!--#include file="common/globals.asp"-->
14 
<!--#include file="common/config.asp"-->
15 
<!--#include file="common/common_subs.asp"-->
16 
<!--#include file="common/_popup_window_common.asp"-->
17 
<%
18 
'------------ ACCESS CONTROL ------------------
19 
%>
20 
<!--#include file="_access_control_general.asp"-->
21 
<%
22 
'------------ VARIABLE DEFINITION -------------
23 
Dim rsQry
24 
Dim parProd_name
25 
'------------ CONSTANTS DECLARATION -----------
26 
'------------ VARIABLE INIT -------------------
27 
parBom_id = Request("bom_id")
28 
parProd_name = Request("prod_name")
29 
parOs_id = Request("os_id")
30 
'------------ CONDITIONS ----------------------
31 
'----------------------------------------------
32 
%>
33 
<%
34 
'--------------------------------------------------------------------------------------------------------------------------
35 
Function SearchProductNamesQuery ( sProd_name )
36 
	Dim tempSTR
37 
	tempSTR = GetQuery ("ProductNameSearch.sql")
38 
	SearchProductNamesQuery = Replace ( tempSTR, ":PROD_NAME", sProd_name )
39 
End Function
40 
'--------------------------------------------------------------------------------------------------------------------------
41 
%>
42 
<%
43 
'------------ RUN BEFORE PAGE RENDER ----------
44 
objPMod.PersistInQryString ( Array("base_env_id") )
45 
'----------------------------------------------
46 
%>
47 
<html>
48 
<head>
49 
<title>Deployment Manager</title>
50 
<link rel="shortcut icon" href="<%=FavIcon%>"/>
51 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
52 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
6663 dpurdie 53 
<link href="scripts/deployment_manager.css?ver=<%=VixVerNum%>" rel="stylesheet" type="text/css">
54 
<script language="JavaScript" src="scripts/common.js?ver=<%=VixVerNum%>"></script>
5355 dpurdie 55 
</head>
56 
 
57 
<body background="images/bg_bage_0.gif" leftmargin="0" topmargin="0" onLoad="self.focus();">
58 
<table width="100%"  border="0" cellspacing="0" cellpadding="10">
59 
  <tr>
60 
    <td bgcolor="#FFFFFF" class="body_txt"><span class="body_h1"><img src="icons/i_linkarrow_black.gif" width="11" height="11" align="absmiddle">&nbsp;Add Product </span> <br><br>
61 
 
62 
      </td>
63 
  </tr>
64 
  <form name="FormSearch" method="post" action="wAddProdBySearch.asp">
65 
  <tr>
66 
    <td background="images/bg_quicksearch.gif" class="body_txt"><table width="100" border="0" cellspacing="3" cellpadding="0">
67 
        <tr>
68 
          <td nowrap class="body_txtw"><strong>Product Search</strong> </td>
69 
          <td><input name="prod_name" type="text" class="body_txt" size="20" value="<%=parProd_name%>"></td>
70 
          <td><input name="btnSearch" type="image" src="icons/b_search.gif" width="16" height="16" border="0"></td>
71 
        </tr>
72 
      </table></td>
73 
  </tr>
74 
  <%=objPMod.ComposeHiddenTags()%>
75 
  </form>
76 
  <form name="FormName" method="post" action="wAddProdGetVersion.asp">
77 
  <tr>
78 
    <td background="images/bg_login.gif"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
79 
      <tr>
80 
        <td>&nbsp;</td>
81 
        <td align="right"><input name="btn" type="reset" class="form_btn" value="&laquo; Back" onClick="history.back();">
82 
        <input name="btn" type="submit" class="form_btn" value="Next &raquo;" <%If parProd_name = "" Then%>disabled<%End If%>>
83 
        &nbsp;&nbsp;
84 
        <input name="btn" type="reset" class="form_btn" value="Add" disabled>
85 
          <input name="btn" type="reset" class="form_btn" value="Cancel" onClick="self.close();"></td>
86 
      </tr>
87 
    </table></td>
88 
  </tr>
89 
  <tr>
90 
    <td>
91 
<!-- PRODUCT NAME RESULTS ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
92 
<%If parProd_name <> "" Then%>
93 
	<table width="100%"  border="0" cellspacing="10" cellpadding="0">
94 
      <tr>
95 
        <td width="100%" valign="top" nowrap class="body_txt">Search result for <strong><%=parProd_name%></strong> <br>
96 
          <br>
97 
		  <%
98 
		  Set rsQry = OraDatabase.DbCreateDynaset( SearchProductNamesQuery ( parProd_name ), ORADYN_DEFAULT )
99 
		  %>
100 
 
101 
		  <%If rsQry.RecordCount < 1 Then%>
102 
		  <!-- NO RESULTS -->
103 
		  No Results Found.
104 
		  <%Else%>
105 
		  <!-- FOUND RESULTS -->
106 
		  Select Product and click Next.
107 
          <table width="100%"  border="0" cellspacing="2" cellpadding="0">
108 
 
109 
			<%
110 
			While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
111 
			%>
112 
 			<tr>
113 
              <td nowrap class="form_iname"><input type="checkbox" name="pkg_id_list" value="<%=rsQry("pkg_id")%>" <%=rsQry("checked")%>></td>
114 
              <td valign="top" nowrap class="body_txt"><img src="icons/i_product.gif" width="19" height="19" hspace="2" align="absmiddle"><%=HighlightSubstring ( rsQry("pkg_name"), parProd_name )%></td>
115 
            </tr>
116 
            <%rsQry.MoveNext%>
117 
			<%
118 
			WEnd
119 
 
120 
			rsQry.Close
121 
			Set rsQry = Nothing
122 
			%>
123 
			<tr>
124 
              <td width="1" background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="1" height="1"></td>
125 
              <td width="100%" background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="1" height="1"></td>
126 
            </tr>
127 
          </table>
128 
		  <%End If%>
129 
 
130 
		  </td>
131 
        </tr>
132 
 
133 
    </table>
134 
<%End If%>
135 
	<!-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
136 
    </td>
137 
  </tr>
138 
  <%=objPMod.ComposeHiddenTags()%>
139 
  </form>
140 
</table>
141 
</body>
142 
</html>
5958 dpurdie 143 
<!--#include file="common/globals_destructor.asp"-->