How to set a specific 'Depended on' by from scrip

Hi,

On ticket creation, I made a custom scrip to assigne the new ticket to a
specified user based on a requestor address. This is working with the
following action cleanup :

my $newowner = “userName”;
my $T_Obj = $self->TicketObj;
my ($status, $msg) = $self->TicketObj->SetOwner( $newowner );
unless( $status ) {
$RT::Logger->error( “Unable to assign the ticket to $newowner: $msg” );
return undef;
}
return 1;

In addition, I’d like to specify a link “Depended on by” to the tickets
according to the previous test. I’m still confusing how I should update
this field.

$RT::Logger->info(“Auto reference ticket #”. $T_Obj->id ." to ticket #1234"
);
my ($status, $msg) = $self->TicketObj->_Set( ‘DependedOnBy’, ‘1234’);
unless( $status ) {
$RT::Logger->error( “Unable to assign the ticket DependedOnBy” );
return undef;
}
return 1;

Can anyone help me to go on the right way ?

X

In addition, I’d like to specify a link “Depended on by” to the tickets according to the
previous test. I’m still confusing how I should update this field.
$RT::Logger->info(“Auto reference ticket #”. $T_Obj->id ." to ticket #1234" );
my ($status, $msg) = $self->TicketObj->_Set( ‘DependedOnBy’, ‘1234’);

_Set is really dangerous. In general, you should never use it.

You want to call AddLink on your ticket.
http://bestpractical.com/rt/docs/latest/RT/Ticket.html#AddLink

-kevin

Excellent, I finally got what I want doing like this :

my $newdependedonby = 1234;
my ($status, $msg) =
$self->TicketObj->AddLink(Type=>‘DependsOn’,Base=>$newdependedonby );

Thanks Kevin,
XOn 27 November 2012 18:16, Kevin Falcone wrote:

On Tue, Nov 27, 2012 at 02:39:40PM +0100, Xavier Reigner wrote:

In addition, I’d like to specify a link “Depended on by” to the
tickets according to the
previous test. I’m still confusing how I should update this field.
$RT::Logger->info(“Auto reference ticket #”. $T_Obj->id ." to ticket
#1234" );
my ($status, $msg) = $self->TicketObj->_Set( ‘DependedOnBy’, ‘1234’);

_Set is really dangerous. In general, you should never use it.

You want to call AddLink on your ticket.
RT::Ticket - RT 5.0.5 Documentation - Best Practical

-kevin

unless( $status ) {
$RT::Logger->error( “Unable to assign the ticket DependedOnBy” );
return undef;
}
return 1;