<html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns:m="http://schemas.microsoft.com/office/2004/12/omml" xmlns="http://www.w3.org/TR/REC-html40"><head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=us-ascii"><meta name=Generator content="Microsoft Word 12 (filtered medium)"><style><!--
/* Font Definitions */
@font-face
{font-family:"Cambria Math";
panose-1:2 4 5 3 5 4 6 3 2 4;}
@font-face
{font-family:Calibri;
panose-1:2 15 5 2 2 2 4 3 2 4;}
@font-face
{font-family:Consolas;
panose-1:2 11 6 9 2 2 4 3 2 4;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin:0in;
margin-bottom:.0001pt;
font-size:11.0pt;
font-family:"Calibri","sans-serif";}
a:link, span.MsoHyperlink
{mso-style-priority:99;
color:blue;
text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
{mso-style-priority:99;
color:purple;
text-decoration:underline;}
p.MsoPlainText, li.MsoPlainText, div.MsoPlainText
{mso-style-priority:99;
mso-style-link:"Plain Text Char";
margin:0in;
margin-bottom:.0001pt;
font-size:10.5pt;
font-family:Consolas;}
span.EmailStyle17
{mso-style-type:personal-compose;
font-family:"Calibri","sans-serif";
color:windowtext;}
span.PlainTextChar
{mso-style-name:"Plain Text Char";
mso-style-priority:99;
mso-style-link:"Plain Text";
font-family:Consolas;}
.MsoChpDefault
{mso-style-type:export-only;}
@page WordSection1
{size:8.5in 11.0in;
margin:1.0in 1.0in 1.0in 1.0in;}
div.WordSection1
{page:WordSection1;}
--></style><!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]--></head><body lang=EN-US link=blue vlink=purple><div class=WordSection1><p class=MsoPlainText>I've written a scrip to do not only that, but to change the SLA whenever the Priority is changed, based off what the priority is changed to, however it doesn't seem to work. Here's the code - I'm fairly new to perl, so I may have missed something in the code:<o:p></o:p></p><p class=MsoPlainText><o:p> </o:p></p><p class=MsoPlainText>my $ticketPriority = $self->TicketObj->Priority;<o:p></o:p></p><p class=MsoPlainText> <o:p></o:p></p><p class=MsoPlainText>if($ticketPriority == 0) {<o:p></o:p></p><p class=MsoPlainText> my $SLA = '24';<o:p></o:p></p><p class=MsoPlainText> }<o:p></o:p></p><p class=MsoPlainText>elsif($ticketPriority == 25) {<o:p></o:p></p><p class=MsoPlainText> my $SLA = '8';<o:p></o:p></p><p class=MsoPlainText> }<o:p></o:p></p><p class=MsoPlainText>elsif($ticketPriority == 50) {<o:p></o:p></p><p class=MsoPlainText> my $SLA = '4';<o:p></o:p></p><p class=MsoPlainText> }<o:p></o:p></p><p class=MsoPlainText>elsif($ticketPriority == 75) {<o:p></o:p></p><p class=MsoPlainText> my $SLA = '1';<o:p></o:p></p><p class=MsoPlainText> }<o:p></o:p></p><p class=MsoPlainText>else {<o:p></o:p></p><p class=MsoPlainText> my $SLA = 'Critical';<o:p></o:p></p><p class=MsoPlainText> }<o:p></o:p></p><p class=MsoPlainText><o:p> </o:p></p><p class=MsoPlainText>my $CFName = 'SLA';<o:p></o:p></p><p class=MsoPlainText>my $CF = RT::CustomField->new( $RT::SystemUser ); $CF->LoadByNameAndQueue( Name => $CFName, Queue => $Ticket->Queue ); unless( $CF->id ) {<o:p></o:p></p><p class=MsoPlainText> $CF->LoadByNameAndQueue( Name => $CFName, Queue => '0' ); }<o:p></o:p></p><p class=MsoPlainText> <o:p></o:p></p><p class=MsoPlainText>unless( $CF->id ) {<o:p></o:p></p><p class=MsoPlainText> $RT::Logger->error( "No field $CFName in queue ". $Ticket->QueueObj->Name );<o:p></o:p></p><p class=MsoPlainText> return undef;<o:p></o:p></p><p class=MsoPlainText>}<o:p></o:p></p><p class=MsoPlainText><o:p> </o:p></p><p class=MsoPlainText>$Ticket->AddCustomFieldValue ( Field => $CF, Value => $SLA );<o:p></o:p></p><p class=MsoPlainText><o:p> </o:p></p><p class=MsoPlainText><o:p> </o:p></p><p class=MsoPlainText>Any suggestions or problems you see?<o:p></o:p></p><p class=MsoNormal><o:p> </o:p></p><p class=MsoNormal>Thanks!<o:p></o:p></p><p class=MsoNormal><o:p> </o:p></p><p class=MsoNormal><b><span style='color:#00B050'>David Hollinger III<o:p></o:p></span></b></p><p class=MsoNormal><b><span style='color:#00B050'>IT Infrastructure Coordinator<o:p></o:p></span></b></p><p class=MsoNormal><b><span style='color:#00B050'>Handwriting Without Tears<o:p></o:p></span></b></p><p class=MsoNormal><b><span style='color:#00B050'>(301)263-2700 ext 285<o:p></o:p></span></b></p><p class=MsoNormal><b><span style='color:#00B050'>(402)430-3127</span><span style='color:#C2D69B'><o:p></o:p></span></b></p><p class=MsoNormal><o:p> </o:p></p></div></body></html>