/beta/AR/include_SelectClosedOrder.asp

http://github.com/khaneh/Orders · ASP · 71 lines · 58 code · 3 blank · 10 comment · 4 complexity · 8dc7dea504a8895cca4ea7a259cbb503 MD5 · raw file

  1. <%
  2. ' This Include File Needs Following Variables to have values:
  3. '
  4. ' SO_Action (the Action of the submit button onclick)
  5. ' SO_Customer (AccountTitle or Name to be searched)
  6. ' SO_StepText (e.g. ' : ')
  7. '
  8. '
  9. %>
  10. <div dir='rtl'><B><%=SO_StepText%></B>
  11. </div><br>
  12. <!-- -->
  13. <%
  14. SO_mySQL="SELECT * From Accounts WHERE (ID='"& SO_Customer & "')"
  15. Set SO_RS1 = conn.Execute(SO_mySQL)
  16. if (SO_RS1.eof) then
  17. response.write "Error ! No such customer"
  18. response.end
  19. else
  20. SO_AccountTitle=SO_RS1("AccountTitle")
  21. end if
  22. ' SO_mySQL="SELECT * From Orders WHERE (Customer='"& SO_Customer & "') ORDER BY ID"
  23. ' SO_mySQL="SELECT Orders.ID, Orders.CreatedDate FROM Orders LEFT OUTER JOIN InvoiceOrderRelations ON Orders.ID = InvoiceOrderRelations.[Order] WHERE (InvoiceOrderRelations.Invoice IS NOT NULL) AND (Orders.Customer = '"& SO_Customer & "') ORDER BY Orders.ID"
  24. ' Changed By Kid 82/09/16
  25. SO_mySQL="SELECT * From Orders WHERE (Customer='"& SO_Customer & "') AND (Closed=1) ORDER BY ID"
  26. Set SO_RS1 = conn.Execute(SO_mySQL)
  27. if (SO_RS1.eof) then ' Not Found %>
  28. <table class="RcpTable" align='center' cellpadding='5'><tr><td bgcolor='#FFCCCC' dir='rtl' align='center'> <br></td></tr></table><br>
  29. <% else
  30. %>
  31. <br>
  32. <TABLE class="RcpTable" align="center" border="1" cellspacing="1" cellpadding="5" dir="RTL">
  33. <tr bgcolor='#DDDDEE'>
  34. <td align='center' colspan="3"> <br>'<%=SO_AccountTitle%>'<br> </td>
  35. </tr>
  36. <tr bgcolor='#C3C3FF'>
  37. <td align='center' width="30"> <input type="checkbox" disabled checked> </td>
  38. <td align='center' width="70"> </td>
  39. <td align='center' width="80"> </td>
  40. </tr>
  41. <% SO_tempCounter=0
  42. while Not (SO_RS1.EOF)
  43. SO_tempCounter=SO_tempCounter+1
  44. if (SO_tempCounter Mod 2 = 1)then
  45. SO_tempColor="#FFFFFF"
  46. else
  47. SO_tempColor="#DDDDEE"
  48. end if
  49. %> <tr bgcolor='<%=SO_tempColor%>'>
  50. <td align='center'><input type="checkbox" name="selectedOrders" value="<%=SO_RS1("ID")%>">&nbsp;</td>
  51. <td dir='ltr' align='center'><%=Link2Trace(SO_RS1("ID"))%>&nbsp;</td>
  52. <td dir='ltr' align='center'><%=SO_RS1("CreatedDate")%>&nbsp;</td>
  53. </tr>
  54. <% SO_RS1.movenext
  55. wend
  56. %>
  57. <tr bgcolor='#C3C3FF'>
  58. <td align='center' colspan="4"><input name="SO_SelectButton" class="GenButton" type="submit" value="" onclick="<%=SO_Action%>" >&nbsp;<input name="selectedCustomer" type="hidden" value="<%=SO_Customer%>"></td>
  59. </tr>
  60. </TABLE>
  61. <SCRIPT LANGUAGE="JavaScript">
  62. <!--
  63. //document.all.SO_SelectButton.focus();
  64. //-->
  65. </SCRIPT>
  66. <%
  67. end if
  68. %>