PageRenderTime 46ms CodeModel.GetById 17ms RepoModel.GetById 0ms app.codeStats 0ms

/LN/m008p0401.asp

http://github.com/boss2009/ASP-site
ASP | 146 lines | 143 code | 3 blank | 0 comment | 22 complexity | fb2f1074334fbe346d573970c98852c7 MD5 | raw file
  1. <%@language="JAVASCRIPT"%>
  2. <!--#include file="../inc/ASPUtility.inc" -->
  3. <!--#include file="../inc/ASPCheckLogin.inc" -->
  4. <!--#include file="../Connections/cnnASP02.asp" -->
  5. <%
  6. if (String(Request.QueryString("Search"))=="true") {
  7. var rsEquipmentClass__inspSrtBy = "1";
  8. if(String(Request.QueryString("inspSrtBy")) != "undefined") {
  9. rsEquipmentClass__inspSrtBy = String(Request.QueryString("inspSrtBy"));
  10. }
  11. var rsEquipmentClass__inspSrtOrd = "0";
  12. if(String(Request.QueryString("inspSrtOrd")) != "undefined") {
  13. rsEquipmentClass__inspSrtOrd = String(Request.QueryString("inspSrtOrd"));
  14. }
  15. var rsEquipmentClass__chvFilter = "";
  16. if(String(Request.QueryString("chvFilter")) != "undefined") {
  17. rsEquipmentClass__chvFilter = String(Request.QueryString("chvFilter"));
  18. }
  19. var rsEquipmentClass = Server.CreateObject("ADODB.Recordset");
  20. rsEquipmentClass.ActiveConnection = MM_cnnASP02_STRING;
  21. rsEquipmentClass.Source = "{call dbo.cp_EC_Eqp_Class("+ rsEquipmentClass__inspSrtBy.replace(/'/g, "''") + ","+ rsEquipmentClass__inspSrtOrd.replace(/'/g, "''") + ",'"+ rsEquipmentClass__chvFilter.replace(/'/g, "''") + "')}";
  22. rsEquipmentClass.CursorType = 0;
  23. rsEquipmentClass.CursorLocation = 2;
  24. rsEquipmentClass.LockType = 3;
  25. rsEquipmentClass.Open();
  26. }
  27. var rsSysOptr = Server.CreateObject("ADODB.Recordset");
  28. rsSysOptr.ActiveConnection = MM_cnnASP02_STRING;
  29. rsSysOptr.Source = "{call dbo.cp_SysOptr(0,0,22)}";
  30. rsSysOptr.CursorType = 0;
  31. rsSysOptr.CursorLocation = 2;
  32. rsSysOptr.LockType = 3;
  33. rsSysOptr.Open();
  34. %>
  35. <html>
  36. <head>
  37. <title>Inventory Class Search</title>
  38. <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
  39. <link rel="stylesheet" href="../css/MyStyle.css" type="text/css">
  40. <script language="JavaScript" src="../js/m007Srh01.js"></script>
  41. <script language="javascript">
  42. if (window.focus) self.focus();
  43. function CnstrFltr() {
  44. var chvOptr = document.frm0101.ClassNameOperator[document.frm0101.ClassNameOperator.selectedIndex].value ;
  45. var chvStg1 = document.frm0101.ClassName.value;
  46. var stgFilter = ACfltr_07("1","",chvOptr,chvStg1,"");
  47. stgPgQuery = "m008p0401.asp?";
  48. stgPgQuery += "Search=true&inspSrtBy=1&inspSrtOrd=0&chvFilter=" + stgFilter ;
  49. document.frm0101.action = stgPgQuery ;
  50. document.frm0101.submit() ;
  51. }
  52. function SelectClass(){
  53. if (document.frm0101.SearchResult.selectedIndex==-1){
  54. alert("Select a class.")
  55. return ;
  56. }
  57. if (!top.opener.closed) {
  58. top.opener.document.frm08s01.ClassSearchText.value=document.frm0101.SearchResult.options[document.frm0101.SearchResult.selectedIndex].text;
  59. top.opener.document.frm08s01.ClassSearchID.value=document.frm0101.SearchResult[document.frm0101.SearchResult.selectedIndex].value;
  60. }
  61. top.window.close();
  62. }
  63. function init(){
  64. <%
  65. if (String(Request.QueryString("Search")) == "true") {
  66. %>
  67. document.frm0101.SearchResult.focus();
  68. <%
  69. } else {
  70. %>
  71. document.frm0101.ClassNameOperator.focus();
  72. <%
  73. }
  74. %>
  75. }
  76. </script>
  77. </head>
  78. <body onLoad="init();">
  79. <form name="frm0101" method="POST" action="">
  80. <h5>Search Criteria</h5>
  81. <table cellpadding="1" cellspacing="1">
  82. <tr>
  83. <td nowrap>
  84. Class Name:
  85. <select name="ClassNameOperator" tabindex="1" accesskey="F">
  86. <%
  87. while (!rsSysOptr.EOF) {
  88. %>
  89. <option value="<%=(rsSysOptr.Fields.Item("intOptrId").Value)%>" <%=((rsSysOptr.Fields.Item("intOptrId").Value == 2)?"SELECTED":"")%> ><%=(rsSysOptr.Fields.Item("chvOptrDesc").Value)%></option>
  90. <%
  91. rsSysOptr.MoveNext();
  92. }
  93. %>
  94. </select>
  95. <input type="text" name="ClassName" size="40" tabindex="2" maxlength="50" value="<%=Request.QueryString("ClassName")%>">
  96. <input type="button" value="Search" onClick="CnstrFltr();" tabindex="3" class="btnstyle">
  97. </td>
  98. </tr>
  99. </table>
  100. <hr>
  101. <table cellpadding="1" cellspacing="1">
  102. <tr>
  103. <td nowrap><select name="SearchResult" size="20" style="width:420px" tabindex="4">
  104. <%
  105. if (String(Request.QueryString("Search")) == "true") {
  106. var count = 0;
  107. while (!rsEquipmentClass.EOF) {
  108. count++;
  109. switch(rsEquipmentClass.Fields.Item("chrClass_Type").Value){
  110. case 'C':
  111. %>
  112. <option value="<%=(rsEquipmentClass.Fields.Item("insEquip_Class_id").Value)%>"><%=(rsEquipmentClass.Fields.Item("chvClass_Name").Value)%> - Concrete
  113. <%
  114. break;
  115. }
  116. rsEquipmentClass.MoveNext();
  117. }
  118. }
  119. %>
  120. </select></td>
  121. </tr>
  122. <tr>
  123. <td nowrap><input type="button" value="Select Class" tabindex="5" onClick="SelectClass();" class="btnstyle"></td>
  124. </tr>
  125. </table>
  126. <%
  127. if (String(Request.QueryString("Search")) == "true") {
  128. if (count > 0) rsEquipmentClass.MoveFirst();
  129. while (!rsEquipmentClass.EOF) {
  130. %>
  131. <input type="hidden" name="ListUnitCost" value="<%=(rsEquipmentClass.Fields.Item("fltList_Unit_Cost").Value)%>">
  132. <%
  133. rsEquipmentClass.MoveNext();
  134. }
  135. rsEquipmentClass.Close();
  136. }
  137. %>
  138. </form>
  139. </body>
  140. </html>
  141. <%
  142. rsSysOptr.Close();
  143. %>