Now I have a follow-up issue. Apparently my OpenDendentsOnResolve is
not working like I wanted.
As a recap:
I have two queues "TimeOff" and TimeOff-Approval"
(TimeOff-Approval is "disabled" like the ___Approval queue. Not sure if
that is a real problem or not, does not seem to be). A staff member
opens a ticket in "TimeOff" and that creates the two tickets in
"TimeOff-Approval" that the Supervisor and HR need to sign off on first.
Thanks to Gene, The Ticket created in "TimeOff" gets a status "pending"
(I added a new status to my RT_SiteConfig.pm)
--------------------
Now once the two "TimeOff-Approval" tickets are resolved, I want the
"TimeOff" ticket's status to be changed to "open". As of right now, the
"TimeOff" ticket remains "pending" even after approvals are approved.
I copy/pasted the "When a ticket has been approved by all approvers, add
correspondence to the original ticket" from the ___Approval queue.
I image this is where I can add the code needed to change the ticket
from "pending" to "open" but I don't know how.
---------------------
FROM THE "When a ticket has been approved by all approvers, add
correspondence to the original ticket"
CONDITION: On Resolve
ACTION: User Defined
TEMPLATE: All Approvals Passed
STAGE: TransactionCreate
CUSTOM CONDTION: blank
CUSTOM ACTION PREPARATION CODE:
# ------------------------------------------------------------------- #
# Find all the tickets that depend on this (that this is approving)
my $Ticket = $self->TicketObj;
my @TOP = $Ticket->AllDependedOnBy( Type => 'ticket' );
my $links = $Ticket->DependedOnBy;
my $passed = 0;
while (my $link = $links->Next) {
my $obj = $link->BaseObj;
next if ($obj->HasUnresolvedDependencies( Type => 'approval' ));
if ($obj->Type eq 'ticket') {
$obj->Comment(
Content => $self->loc("Your request has been approved."),
);
$T::Approval = $Ticket; # so we can access it inside templates
$self->{TicketObj} = $obj; # we want the original id in the token line
$passed = 1;
}
elsif ($obj->Type eq 'approval') {
$obj->SetStatus( Status => 'open', Force => 1 );
}
elsif ($RT::UseCodeTickets and $obj->Type eq 'code') {
my $code = $obj->Transactions->First->Content;
my $rv;
foreach my $TOP (@TOP) {
local $@;
$rv++ if eval $code;
$RT::Logger->error("Cannot eval code: $@") if $@;
}
if ($rv or [EMAIL PROTECTED]) {
$obj->SetStatus( Status => 'resolved', Force => 1,);
}
else {
$obj->SetStatus( Status => 'rejected', Force => 1,);
}
}
}
# Now magically turn myself into a Requestor Notify object...
require RT::Action::Notify; bless($self, 'RT::Action::Notify');
$self->{Argument} = 'Requestor'; $self->Prepare;
return 0; # ignore $passed;
# ------------------------------------------------------------------- #
CUSTOM ACTION CLEANUP CODE: blank
--
http://gentgeen.homelinux.org
#############################################################
Associate yourself with men of good quality if you esteem
your own reputation; for 'tis better to be alone then in bad
company. - George Washington, Rules of Civility
_______________________________________________
http://lists.bestpractical.com/cgi-bin/mailman/listinfo/rt-users
Community help: http://wiki.bestpractical.com
Commercial support: [EMAIL PROTECTED]
Discover RT's hidden secrets with RT Essentials from O'Reilly Media.
Buy a copy at http://rtbook.bestpractical.com
