PageRenderTime 27ms CodeModel.GetById 15ms RepoModel.GetById 0ms app.codeStats 0ms

/PL/m020e0202.asp

http://github.com/boss2009/ASP-site
ASP | 80 lines | 80 code | 0 blank | 0 comment | 3 complexity | 893dee13b357a70b521b360ac1adcecf 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. var rsResponseHistory = Server.CreateObject("ADODB.Recordset");
  7. rsResponseHistory.ActiveConnection = MM_cnnASP02_STRING;
  8. rsResponseHistory.Source = "{call dbo.cp_pjt_responses("+Request.QueryString("intIssue_id")+",'',0,0,0,0,'',0,0,0,'',0,'',0,'Q',0)}";
  9. rsResponseHistory.CursorType = 0;
  10. rsResponseHistory.CursorLocation = 2;
  11. rsResponseHistory.LockType = 3;
  12. rsResponseHistory.Open();
  13. %>
  14. <html>
  15. <head>
  16. <title>Response History</title>
  17. <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
  18. <link rel="stylesheet" href="../css/MyStyle.css" type="text/css">
  19. <script for="document" event="onkeyup()" language="JavaScript">
  20. if (window.event.ctrlKey) {
  21. switch (window.event.keyCode) {
  22. case 76 :
  23. //alert("L");
  24. window.close();
  25. break;
  26. }
  27. }
  28. </script>
  29. </head>
  30. <body>
  31. <h5>Response History</h5>
  32. <%
  33. while (!rsResponseHistory.EOF){
  34. %>
  35. <hr>
  36. <table cellpadding="2" cellspacing="1">
  37. <tr>
  38. <td class="headrow" align="left" nowrap>Created By:</td>
  39. <td style="border: solid 1px #cccccc" width="231"><%=(rsResponseHistory.Fields.Item("chvSubmitted_by").Value)%>&nbsp;</td>
  40. <td class="headrow" align="left" width="105">Assigned To:</td>
  41. <td style="border: solid 1px #cccccc" width="217"><%=(rsResponseHistory.Fields.Item("chvAssigned_to").Value)%>&nbsp;</td>
  42. </tr>
  43. <tr>
  44. <td class="headrow" align="left" nowrap>Date:</td>
  45. <td style="border: solid 1px #cccccc"><%=(rsResponseHistory.Fields.Item("dtsDate_response").Value)%>&nbsp;</td>
  46. <td class="headrow" align="left">Version:</td>
  47. <td style="border: solid 1px #cccccc"><%=(rsResponseHistory.Fields.Item("ncvVersion").Value)%>&nbsp;</td>
  48. </tr>
  49. <tr>
  50. <td class="headrow" align="left" nowrap>Tested:</td>
  51. <td style="border: solid 1px #cccccc"><%=(rsResponseHistory.Fields.Item("bitTested").Value)%>&nbsp;</td>
  52. <td class="headrow" align="left">Approved:</td>
  53. <td style="border: solid 1px #cccccc"><%=(rsResponseHistory.Fields.Item("bitApproved").Value)%>&nbsp;</td>
  54. </tr>
  55. <tr>
  56. <td class="headrow" align="left" nowrap>Priority:</td>
  57. <td style="border: solid 1px #cccccc"><%=(rsResponseHistory.Fields.Item("chvPriority").Value)%>&nbsp;</td>
  58. <td class="headrow" align="left">Status:</td>
  59. <td style="border: solid 1px #cccccc"><%=(rsResponseHistory.Fields.Item("chvStatus").Value)%>&nbsp;</td>
  60. </tr>
  61. <tr>
  62. <td class="headrow" valign="top" align="left">Response:</td>
  63. <td colspan="3"><textarea cols="75" rows="7" readonly tabindex="1" accesskey="F"><%=(rsResponseHistory.Fields.Item("chvDescription").Value)%></textarea></td>
  64. </tr>
  65. </table>
  66. <%
  67. rsResponseHistory.MoveNext();
  68. }
  69. %>
  70. <hr>
  71. <table cellpadding="1" cellspacing="1">
  72. <tr>
  73. <td><input type="button" value="Close" onClick="window.close();" tabindex="2" class="btnstyle"></td>
  74. </tr>
  75. </table>
  76. </body>
  77. </html>
  78. <%
  79. rsResponseHistory.Close();
  80. %>