1 <& /Elements/Header, Title=> $title &>
2 <& /Ticket/Elements/Tabs, Ticket => $Ticket &>
3 <& /Elements/TitleBoxStart, title => "Update ticket" &>
5 <FORM ACTION="Display.html" NAME="TicketUpdate"
6 METHOD=POST enctype="multipart/form-data">
10 <a href="ModifyPeople.html?id=<%$Ticket->Id%>">Ticket watchers</A></TD><TD align=right>
13 <b><% $Ticket->RequestorsAsString %></b>
15 <TR><TD> </TD><TD align=right>
18 <b><% $Ticket->CcAsString %></b>
20 <TR><TD> </TD><TD align=right>
23 <b><% $Ticket->AdminCcAsString %></b>
31 <tr><td align=right>Status:</td>
33 <& /Elements/SelectStatus, Name=>"Status", Default => $DefaultStatus &>
35 <& /Elements/SelectOwner, Name=>"Owner", Default => $Ticket->OwnerObj->Id(), QueueObj => $Ticket->QueueObj, TicketObj => $Ticket &>
36 Worked: <input size=4 name="UpdateTimeWorked"> minutes</td></tr>
37 <tr><td align=right>Update Type:</td>
38 <td><select name="UpdateType">
40 <option value="private" <%$CommentDefault%>>Comments (Not sent to requestors)</option>
43 <option value="response" <%$ResponseDefault%>>Response to requestors</option>
47 <tr><td align=right>Subject:</td><td> <input name="UpdateSubject" size=60 value="<%$Ticket->Subject()%>"></td></tr>
48 <tr><td align=right>Cc:</td><td> <input name="UpdateCc" size=60><BR>
49 <i><font size=-2>(Sends a carbon-copy of this update to a comma-delimited list
50 of email addresses. Does <b>not</b> change who will receive future updates.)</font></i>
52 <tr><td align=right>Bcc:</td><td> <input name="UpdateBcc" size=60><BR>
53 <i><font size=-2>(Sends a blind carbon-copy of this update to a comma-delimited list
54 of email addresses. Does <b>not</b> change who will receive future updates.)</font></i>
56 <tr><td align=right>Attach:</td><td><input name="UpdateAttachment" type="file"></td></tr>
58 <& /Elements/MessageBox, Name=>"UpdateContent", QuoteTransaction=>$ARGS{QuoteTransaction} &>
59 <INPUT TYPE=HIDDEN NAME=id VALUE="<%$Ticket->Id%>"><br>
64 <& /Elements/TitleBoxEnd &>
65 <& /Elements/Submit &>
76 my $Ticket = LoadTicket($id);
79 if ($DefaultStatus eq 'resolved') {
85 $title .= " ticket #" . $Ticket->id . " (" .$Ticket->Subject.")";
87 # Things needed in the template - we'll do the processing here, just
88 # for the convinience:
89 my $CommentDefault=$Action eq "Comment" ? "SELECTED" : "";
90 my $ResponseDefault=$Action eq "Respond" ? "SELECTED" : "";
92 $DefaultStatus = $Ticket->Status() unless ($DefaultStatus);
94 $CanRespond = 1 if ( $Ticket->CurrentUserHasRight('ReplyToTicket') or
95 $Ticket->CurrentUserHasRight('ModifyTicket') );
97 $CanComment = 1 if ( $Ticket->CurrentUserHasRight('CommentOnTicket') or
98 $Ticket->CurrentUserHasRight('ModifyTicket') );
109 $DefaultStatus => undef