To list,<br><br>I'm trying to create a scrip that gives me the difference between the started date and the resolved date when the ticket is resolved:<br><br>This is my scrip:<br><br>Condition: On Resolve<br>Action: User-defined<br>
Template: Blank<br>Stage: TransBatch<br><br>Custom Prep Code:<br>return 1;<br><br>Custom Cleanup Code:<br><br># Set initial values<br><br>my $trans = $self->TransactionObj;<br>my $ticket = $self->TicketObj;<br>my $timeworked = $ticket->TimeWorked;<br>
my $started = $ticket->StartedObj;<br>my $now = new RT::Date($RT::SystemUser);<br>$now->SetToNow();<br>my $worked = $now->DiffAsString($started);<br><br># Set value for TimeWorked if not already set<br><br>unless ($timeworked)<br>
    {<br>     $ticket->SetTimeWorked($worked);<br>     return 1;<br>    }<br>return 0;<br><br>This was what was in the log:<br><br>        DBIx::SearchBuilder::Record::__Set('RT::Ticket=HASH(0xcfbcfe0)', 'Field', 'TimeWorked', 'Value', '5 sec', 'IsSQL', 'undef') called at /usr/lib/perl5/site_perl/5.8.8/DBIx/SearchBuilder/Record/Cachable.pm line 139        DBIx::SearchBuilder::Record::Cachable::__Set('RT::Ticket=HASH(0xcfbcfe0)', 'Field', 'TimeWorked', 'Value', '5 sec', 'IsSQL', 'undef') called at /usr/lib/perl5/site_perl/5.8.8/DBIx/SearchBuilder/Record.pm line 745        DBIx::SearchBuilder::Record::_Set('RT::Ticket=HASH(0xcfbcfe0)', 'Field', 'TimeWorked', 'Value', '5 sec', 'IsSQL', 'undef') called at /opt/rt3/bin/../local/lib/RT/Record.pm line 482        RT::Record::_Set('RT::Ticket=HASH(0xcfbcfe0)', 'Field', 'TimeWorked', 'Value', '5 sec') called at /opt/rt3/bin/../lib/RT/Ticket_Overlay.pm line 3313        RT::Ticket::_Set('RT::Ticket=HASH(0xcfbcfe0)', 'Field', 'TimeWorked', 'Value', '5 sec') called at /usr/lib/perl5/site_perl/5.8.8/DBIx/SearchBuilder/Record.pm line 440        DBIx::SearchBuilder::Record::__ANON__('RT::Ticket=HASH(0xcfbcfe0)', '5 sec') called at (eval 595) line 16        eval '# Set initial values<br>
 my $trans = $self->TransactionObj;my $ticket = $self->TicketObj;my $timeworked = $ticket->TimeWorked;<br>my $started = $ticket->StartedObj;#my $duration = \'DAY\';my $now = new RT::Date($RT::SystemUser);$now->SetToNow();my $worked = $now->DiffAsString($started);<br>
 # Set value for TimeWorked if not already set<br> unless ($timeworked)    {     $ticket->SetTimeWorked($worked);     return 1;    }<br>return 0;' called at /opt/rt3/bin/../lib/RT/Action/UserDefined.pm line 78<br><br>
I don't understand where the "...'Value', '5 sec'" came from.<br><br>I also tried this with "Diff" and I get a resulting value.<br><br>Anyone have any idea what I'm doing wrong.<br>
<br>I wanted to use "Duration" but couldn't get it to run. I don't understand what parms it needs.<br><br>Any help would be appreciated.<br><br>Thanks.<br><br>Kenn<br>LBNL<br><br>