<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=US-ASCII">
<META NAME="Generator" CONTENT="MS Exchange Server version 5.5.2658.2">
<TITLE>How set a default value on Custom Field when Change Owner</TITLE>
</HEAD>
<BODY>
<P><FONT SIZE=2>I made a scrip to set a value on CF when changing owner, but is not working.</FONT>
<BR><FONT SIZE=2>Does somebody can help me.</FONT>
<BR><FONT SIZE=2>My code bellow:</FONT>
</P>
<P><FONT SIZE=2>use RT::Ticket;</FONT>
<BR><FONT SIZE=2>use RT::CustomField;</FONT>
<BR><FONT SIZE=2>my $Ticket = $self->TicketObj;</FONT>
<BR><FONT SIZE=2>my $CFName = 'Tipo de Defacement';</FONT>
<BR><FONT SIZE=2>my $QueueObj = $Ticket->QueueObj;</FONT>
<BR><FONT SIZE=2>my $CFObj = RT::CustomField->new( $QueueObj->$self->CurrentUser );</FONT>
<BR><FONT SIZE=2>$CFObj->LoadByNameAndQueue( Name => $CFName, Queue => $QueueObj->id );</FONT>
<BR><FONT SIZE=2>$Ticket->AddCustomFieldValue( Field => $CFObj->id,</FONT>
<BR><FONT SIZE=2> Value => "Desfiguracao de Sitio",</FONT>
<BR><FONT SIZE=2> RecordTransaction => 1);</FONT>
<BR><FONT SIZE=2>Thanks.</FONT>
</P>
</BODY>
</HTML>