%# If you cannot convince them, confuse them.
%# 		-- Harry S Truman
<%INIT>
$GotoTicket = int($GotoTicket) or return;

foreach my $type ($Type, grep { $_ ne $Type } qw( Requests Approvals Tickets )) {
    my $id = $m->comp("/Work/$type/GotoTicket", GotoTicket => $GotoTicket) or next;
    $m->print("<SCRIPT>location.href='/Work/$type/Display.html?id=$id';</SCRIPT>");
    $m->abort;
}

</%INIT>
<%ARGS>
$Type => 'Tickets'
$GotoTicket => 0
</%ARGS>
