#
# COPYRIGHT:
#
-# This software is Copyright (c) 1996-2015 Best Practical Solutions, LLC
+# This software is Copyright (c) 1996-2017 Best Practical Solutions, LLC
# <sales@bestpractical.com>
#
# (Except where explicitly superseded by other copyright notices)
$col->FromSQL($query);
- $col->OrderBy( FIELD => 'Due' );
-
+ $col->OrderByCols( { FIELD => 'Due' }, { FIELD => 'id' } );
+
return($col);
}
return ( 0, $self->loc("Can't link to a deleted ticket") );
}
+ return ( 0, $self->loc('Permission Denied') )
+ unless $self->CurrentUser->HasRight(
+ Right => 'CreateTicket',
+ Object => $self->TicketObj->QueueObj,
+ )
+ && $self->CurrentUser->HasRight(
+ Right => 'ModifyTicket',
+ Object => $self->TicketObj,
+ );
+
my $reminder = RT::Ticket->new($self->CurrentUser);
- my ( $status, $msg ) = $reminder->Create(
+ # the 2nd return value is txn id, which is useless here
+ my ( $status, undef, $msg ) = $reminder->Create(
Subject => $args{'Subject'},
Owner => $args{'Owner'},
Due => $args{'Due'},
RefersTo => $self->Ticket,
Type => 'reminder',
Queue => $self->TicketObj->Queue,
- Status => $self->TicketObj->QueueObj->Lifecycle->ReminderStatusOnOpen,
+ Status => $self->TicketObj->QueueObj->LifecycleObj->ReminderStatusOnOpen,
);
$self->TicketObj->_NewTransaction(
Type => 'AddReminder',
my $reminder = shift;
my ( $status, $msg ) =
- $reminder->SetStatus( $reminder->QueueObj->Lifecycle->ReminderStatusOnOpen );
+ $reminder->SetStatus( $reminder->LifecycleObj->ReminderStatusOnOpen );
$self->TicketObj->_NewTransaction(
Type => 'OpenReminder',
Field => 'RT::Ticket',
my $self = shift;
my $reminder = shift;
my ( $status, $msg ) =
- $reminder->SetStatus( $reminder->QueueObj->Lifecycle->ReminderStatusOnResolve );
+ $reminder->SetStatus( $reminder->LifecycleObj->ReminderStatusOnResolve );
$self->TicketObj->_NewTransaction(
Type => 'ResolveReminder',
Field => 'RT::Ticket',