& /RTFM/Elements/Tabs, Title => loc('Extract article from ticket #[_1] into class [_2]',$Ticket, $ClassObj->Name) &>
<%INIT> my $ticket=LoadTicket($Ticket); my $transactions = $ticket->Transactions; my $ClassObj = RT::FM::Class->new($session{'CurrentUser'}); $ClassObj->Load($Class); unless ($ClassObj->Id) { $m->comp("/RTFM/Elements/Error", Why => "'%1' isn't a valid class identifier", $Class); } my $CustomFields = $ClassObj->CustomFields(); $CustomFields->Limit(FIELD => 'Type', OPERATOR => '=', VALUE => 'TextSingle'); %init> <%ARGS> $Class=>undef $Ticket => undef %ARGS>