1 <& /Admin/Elements/Header, title => "Modify template ".$TemplateObj->id&>
2 <& /Admin/Elements/QueueTabs, id => $Queue &>
3 <& /Elements/ListActions, actions => \@results &>
5 <& /Elements/TitleBoxStart, title => $title &>
7 <FORM METHOD=POST ACTION="Template.html">
9 <INPUT TYPE=HIDDEN NAME=template VALUE="new">
11 <INPUT TYPE=HIDDEN NAME=template VALUE="<%$TemplateObj->Id%>">
14 %# hang onto the queue id
15 <INPUT TYPE=HIDDEN name="Queue" value="<%$Queue%>">
18 Name: <input name="Name" VALUE="<%$TemplateObj->Name%>" SIZE=20><BR>
19 Description: <input name="Description" VALUE="<%$TemplateObj->Description%>" SIZE=80><BR>
21 <TEXTAREA NAME=Content ROWS=25 COLS=80 WRAP=SOFT>
22 <%$TemplateObj->Content%></TEXTAREA>
24 <& /Elements/TitleBoxEnd&>
32 my $TemplateObj = new RT::Template($session{'CurrentUser'});
33 my ($title, @results);
36 $title = "Create a template";
40 if ($template eq 'new') {
41 my ($val, $msg) = $TemplateObj->Create(Queue => $Queue, Name => $Name);
42 Abort("Could not create template: $msg") unless ($val);
44 $title = 'Created template ' . $TemplateObj->Name();
47 $TemplateObj->Load($template) || Abort('No Template');
48 $title = 'Editing template ' . $TemplateObj->Name();
53 if ($TemplateObj->Id()) {
54 $Queue = $TemplateObj->Queue;
56 my @attribs = qw( Description Content Queue Name);
57 my @aresults = UpdateRecordObject( AttributesRef => \@attribs,
58 Object => $TemplateObj,
60 push @results, @aresults;