<%@LANGUAGE="VBSCRIPT"%> <% '===================================================== '| | '| FindInBom | '| | '===================================================== %> <% Option explicit Response.Expires = 0 %> <% '------------ ACCESS CONTROL ------------------ %> <% '------------ VARIABLE DEFINITION ------------- Dim rsQry Dim parKeyword '------------ CONSTANTS DECLARATION ----------- '------------ VARIABLE INIT ------------------- parKeyword = Request("keyword") '------------ CONDITIONS ---------------------- '---------------------------------------------- %> <% '------------ RUN BEFORE PAGE RENDER ---------- objPMod.PersistInQryString ( "keyword" ) '---------------------------------------------- %> Production Manager
<%Call RenderTitleWithoutVersion( objBomCollector )%>
    <%If Request.Cookies( enumCOOKIE_NAME )( "user_bar" ) = "hide" Then%><%End If%>
"&_ " "&_ "" %> <%Call objRepeater.Navigator ( TRUE, TRUE )%>
Search Results for <%=parKeyword%>
<% OraDatabase.Parameters.Add "BOM_ID", dbPARbom_id, ORAPARM_INPUT, ORATYPE_NUMBER OraDatabase.Parameters.Add "KEYWORD", "%"& parKeyword &"%", ORAPARM_INPUT, ORATYPE_NUMBER Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("FindInBom.sql") , ORADYN_DEFAULT ) 'Pass record set to Repeater objRepeater.RecordSet = rsQry 'Define Table Row with bound variables objRepeater.Row = _ "
""& HighlightSubstring ( <#RESULT_NAME#> , parKeyword ) &""
"&_ " ""& <#LOCATION#> &""
"&_ "
<%objRepeater.RenderDataGrid ()%>
<% OraDatabase.Parameters.Remove "BOM_ID" OraDatabase.Parameters.Remove "KEYWORD" rsQry.Close() Set rsQry = Nothing %> <%Call objRepeater.Navigator ( FALSE, TRUE )%>
<%If Request.Cookies( enumCOOKIE_NAME )( "user_bar" ) <> "hide" Then%> <%End If%>   <% '------------ RUN AFTER PAGE RENDER ----------- Set objPMod = Nothing Set objCrumbs = Nothing Set objTabControl = Nothing '---------------------------------------------- %>