Subversion Repositories DevTools

Rev

Rev 119 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 119 Rev 129
Line 1... Line 1...
1 
<%@LANGUAGE="VBSCRIPT"%>
 1 
<%@LANGUAGE="VBSCRIPT"%>
2 
<%
 2 
<%
3 
Option explicit
 3 
Option explicit
4 
Response.Expires = 0	' always load the page, dont store
 4 
Response.Expires = 0   ' always load the page, dont store
5 
%>
 5 
%>
6 
<%
 6 
<%
7 
'=====================================================
 7 
'=====================================================
8 
'					Additional Note
 8 
'               Additional Note
9 
'=====================================================
 9 
'=====================================================
10 
%>
 10 
%>
11 
<!--#include file="common/conf.asp"-->
 11 
<!--#include file="common/conf.asp"-->
12 
<!--#include file="common/globals.asp"-->
 12 
<!--#include file="common/globals.asp"-->
13 
<!--#include file="common/formating.asp"-->
 13 
<!--#include file="common/formating.asp"-->
Line 31... Line 31...
31 
parPv_id = Request("pv_id")
 31 
parPv_id = Request("pv_id")
32 
'----------------------------------------------
 32 
'----------------------------------------------
33 
%>
 33 
%>
34 
<%
 34 
<%
35 
Sub New_Additional_Note ( nPv_id, sNote_Title, sNote_Body, nUser_Id )
 35 
Sub New_Additional_Note ( nPv_id, sNote_Title, sNote_Body, nUser_Id )
36 
	Dim retErrCode
 36 
   Dim retErrCode
37 
	OraDatabase.Parameters.Add "PV_ID", nPv_id, ORAPARM_INPUT, ORATYPE_NUMBER
 37 
   OraDatabase.Parameters.Add "PV_ID", nPv_id, ORAPARM_INPUT, ORATYPE_NUMBER
38 
	OraDatabase.Parameters.Add "NOTE_TITLE", sNote_Title, ORAPARM_INPUT, ORATYPE_VARCHAR2
 38 
   OraDatabase.Parameters.Add "NOTE_TITLE", sNote_Title, ORAPARM_INPUT, ORATYPE_VARCHAR2
39 
	OraDatabase.Parameters.Add "NOTE_BODY", sNote_Body, ORAPARM_INPUT, ORATYPE_VARCHAR2
 39 
   OraDatabase.Parameters.Add "NOTE_BODY", sNote_Body, ORAPARM_INPUT, ORATYPE_VARCHAR2
40 
	OraDatabase.Parameters.Add "USER_ID", nUser_Id, ORAPARM_INPUT, ORATYPE_NUMBER
 40 
   OraDatabase.Parameters.Add "USER_ID", nUser_Id, ORAPARM_INPUT, ORATYPE_NUMBER
41 
	OraDatabase.Parameters.Add "ERRCODE", 0, ORAPARM_OUTPUT, ORATYPE_NUMBER
 41 
   OraDatabase.Parameters.Add "ERRCODE", 0, ORAPARM_OUTPUT, ORATYPE_NUMBER
42
42 
 
- 
 
 43 
   objEH.TryORA ( OraSession )
43 
	OraSession.BeginTrans
 44 
   On Error Resume Next
- 
 
 45 
 
44 
	OraDatabase.ExecuteSQL _
 46 
   OraDatabase.ExecuteSQL _
45 
	"BEGIN  New_Additional_Note  ( :PV_ID,"&_
 47 
   "BEGIN  New_Additional_Note  ( :PV_ID,"&_
46 
	"	                           :NOTE_TITLE,"&_
 48 
   "                              :NOTE_TITLE,"&_
47 
	"	                           :NOTE_BODY,"&_
 49 
   "                              :NOTE_BODY,"&_
48 
	"	                           :USER_ID,"&_
 50 
   "                              :USER_ID,"&_
49 
	"	                           :ERRCODE ); END;"
 51 
   "                              :ERRCODE ); END;"
- 
 
 52 
 
- 
 
 53 
   objEH.CatchORA ( OraSession )
50
54 
 
51 
	retErrCode = OraDatabase.Parameters("ERRCODE").Value
55 
   retErrCode = OraDatabase.Parameters("ERRCODE").Value
52
56 
 
53 
	If retErrCode <> 0 Then
 57 
   If retErrCode <> 0 Then
54 
		OraSession.RollBack
 - 
 
55 
		Call RaiseMsg ( enum_MSG_DUPLICATE_AN, sNote_Title )
 58 
      Call RaiseMsg ( enum_MSG_DUPLICATE_AN, sNote_Title )
56 
	Else
 - 
 
57 
		OraSession.CommitTrans
 - 
 
58 
	End If
 59 
   End If
59
60 
 
60 
End Sub
 61 
End Sub
61 
%>
 62 
%>
62 
<%
 63 
<%
63 
'Process submition
 64 
'Process submition
64 
If CBool(Request("action")) AND objAccessControl.UserLogedIn Then
 65 
If CBool(Request("action")) AND objAccessControl.UserLogedIn Then
65 
	Call New_Additional_Note ( Request("pv_id"), Request("note_title"), Request("note_body"), objAccessControl.UserId )
 66 
   Call New_Additional_Note ( Request("pv_id"), Request("note_title"), Request("note_body"), objAccessControl.UserId )
66 
	Call OpenInParentWindow ("fixed_issues.asp?pv_id="& Request("pv_id") &"&rtag_id="& Request("rtag_id"))
 67 
   Call OpenInParentWindow ("fixed_issues.asp?pv_id="& Request("pv_id") &"&rtag_id="& Request("rtag_id"))
67 
	Call CloseWindow
 68 
   Call CloseWindow
- 
 
 69 
 
68 
 
 70 
 
69
- 
 
70 
End If
 71 
End If
71 
%>
 72 
%>
72 
<html>
 73 
<html>
73 
<head>
 74 
<head>
74 
<title>Release Manager</title>
 75 
<title>Release Manager</title>
Line 79... Line 80...
79 
<script language="JavaScript" src="images/common.js"></script>
 80 
<script language="JavaScript" src="images/common.js"></script>
80 
</head>
 81 
</head>
81 
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onload="self.focus();document.additionalnote.note_title.focus();">
 82 
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onload="self.focus();document.additionalnote.note_title.focus();">
82 
<form name="additionalnote" method="post" action="<%=scriptName%>" onSubmit="MM_validateForm('note_title','Note Title','R','note_body','Note Body','maxLength:4000');return document.MM_returnValue;">
 83 
<form name="additionalnote" method="post" action="<%=scriptName%>" onSubmit="MM_validateForm('note_title','Note Title','R','note_body','Note Body','maxLength:4000');return document.MM_returnValue;">
83 
  <table width="100%" border="0" cellspacing="0" cellpadding="2" height="100%">
 84 
  <table width="100%" border="0" cellspacing="0" cellpadding="2" height="100%">
84 
    <tr>
85 
    <tr>
85 
      <td background="images/lbox_bg_orange.gif" width="1%" height="1%"><img src="images/i_additional_notes_off.gif" width="26" height="20" hspace="5" border="0"></td>
 86 
      <td background="images/lbox_bg_orange.gif" width="1%" height="1%"><img src="images/i_additional_notes_off.gif" width="26" height="20" hspace="5" border="0"></td>
86 
      <td background="images/lbox_bg_blue.gif" nowrap width="50%" class="wform_ttl">&nbsp;Additional
87 
      <td background="images/lbox_bg_blue.gif" nowrap width="50%" class="wform_ttl">&nbsp;Additional
87 
        Note </td>
 88 
        Note </td>
88 
      <td background="images/lbox_bg_blue.gif" align="right" width="50%">
89 
      <td background="images/lbox_bg_blue.gif" align="right" width="50%">
89 
        <input type="submit" name="btn" value="Submit" class="form_btn_comp">
 90 
        <input type="submit" name="btn" value="Submit" class="form_btn_comp">
90 
        <input type="reset" name="btn" value="Cancel" class="form_btn_comp" onclick="self.close()">
 91 
        <input type="reset" name="btn" value="Cancel" class="form_btn_comp" onclick="self.close()">
91 
      </td>
 92 
      </td>
92 
      <td background="images/lbox_bg_blue.gif" align="right" width="1%%" nowrap>
93 
      <td background="images/lbox_bg_blue.gif" align="right" width="1%%" nowrap>
93 
        <img src="images/h_trsp_dot.gif" width="5" height="22"> </td>
 94 
        <img src="images/h_trsp_dot.gif" width="5" height="22"> </td>
94 
    </tr>
 95 
    </tr>
95 
    <tr>
96 
    <tr>
96 
      <td height="100%" width="1%">&nbsp;</td>
 97 
      <td height="100%" width="1%">&nbsp;</td>
97 
      <td valign="top" nowrap colspan="3" class="wform_ttl" background="images/bg_form_lightgray.gif">
98 
      <td valign="top" nowrap colspan="3" class="wform_ttl" background="images/bg_form_lightgray.gif">
98 
        <table width="100%" border="0" cellspacing="1" cellpadding="2">
 99 
        <table width="100%" border="0" cellspacing="1" cellpadding="2">
99 
          <tr>
100 
          <tr>
100 
            <td width="1%"><img src="images/h_trsp_dot.gif" width="10" height="30"></td>
 101 
            <td width="1%"><img src="images/h_trsp_dot.gif" width="10" height="30"></td>
101 
            <td width="1%" nowrap class="form_group" valign="bottom"></td>
 102 
            <td width="1%" nowrap class="form_group" valign="bottom"></td>
102 
            <td nowrap width="100%">&nbsp; </td>
 103 
            <td nowrap width="100%">&nbsp; </td>
103 
          </tr>
 104 
          </tr>
104 
          <tr>
105 
          <tr>
105 
            <td>&nbsp;</td>
 106 
            <td>&nbsp;</td>
106 
            <td nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Note Title</td>
 107 
            <td nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Note Title</td>
107 
            <td nowrap background="images/bg_form_lightbluedark.gif" class="form_txt"><input name="note_title" type="text" class="form_item" id="note_title" value="" size="80" maxlength="50">
108 
            <td nowrap background="images/bg_form_lightbluedark.gif" class="form_txt"><input name="note_title" type="text" class="form_item" id="note_title" value="" size="80" maxlength="50">
108 
            </td>
 109 
            </td>
109 
          </tr>
 110 
          </tr>
110 
          <tr>
111 
          <tr>
111 
            <td width="1%">&nbsp;</td>
 112 
            <td width="1%">&nbsp;</td>
112 
            <td width="1%" valign="top" background="images/bg_form_lightbluedark.gif" class="form_field">Note Body</td>
 113 
            <td width="1%" valign="top" background="images/bg_form_lightbluedark.gif" class="form_field">Note Body</td>
113 
            <td width="100%" valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_txt"><textarea cols="80" rows="20" name="note_body" wrap="off" class="form_item" id="note_body"></textarea>
114 
            <td width="100%" valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_txt"><textarea cols="80" rows="20" name="note_body" wrap="off" class="form_item" id="note_body"></textarea>
114 
            </td>
 115 
            </td>
115 
          </tr>
 116 
          </tr>
116 
          <tr>
117 
          <tr>
117 
            <td width="1%">&nbsp;</td>
 118 
            <td width="1%">&nbsp;</td>
118 
            <td width="1%" nowrap class="form_field"><img src="images/h_trsp_dot.gif" width="100" height="10"></td>
 119 
            <td width="1%" nowrap class="form_field"><img src="images/h_trsp_dot.gif" width="100" height="10"></td>
119 
            <td nowrap width="100%"> <p>&nbsp;</p></td>
 120 
            <td nowrap width="100%"> <p>&nbsp;</p></td>
120 
          </tr>
 121 
          </tr>
121 
        </table> </td>
 122 
        </table> </td>
Line 132... Line 133...
132 
</body>
 133 
</body>
133 
</html>
 134 
</html>
134 
 
 135 
 
135 
 
 136 
 
136 
<!-- DESTRUCTOR ------->
 137 
<!-- DESTRUCTOR ------->
137 
<!--#include file="common/destructor.asp"-->
 - 
 
138 

            138
            
<!--#include file="common/destructor.asp"-->

          

          

            -
            
 

            139