[Rt-devel] LimitCustomField

[Wes Young]

Hi all,

I'm working on some code for RTIR and dealing heavily with CF's.

I'm trying to build the following package:

====

package RT::Search::TicketHistoryByAddress;

use strict;
use base qw(RT::Search::Generic);

use constant QUEUE	=> 'Incidents';
use constant CF		=> 'ARS_IP';
use constant LIMIT	=> 7;

sub Prepare  {
	my $self = shift;

	my $address = $self->Argument();

	$self->TicketsObj->LimitQueue(VALUE => QUEUE());
	$self->TicketsObj->LimitCustomField(
		CUSTOMFIELD	=> CF(),
		OPERATOR	=> 'LIKE',
		VALUE		=> $address,
	);

	return(1);
}

1;

====

I'm trying to test it with the rt-cron tool (it's just easier that way).
When given the command:

$ bin/rt-crontool --search RT::Search::TicketHistoryByAddress
--search-arg 128.205.xxx.xxx --action RT::Action::EscalatePriority
--action-arg 99 --verbose

I get the following error:

[Tue Oct 23 13:18:42 2007] [crit]: RT::CustomField::Queue Unimplemented
in RT::Tickets. (/opt/rt3/lib/RT/Tickets_Overlay.pm line 2470)
(/opt/rt3/lib/RT.pm:342)
RT::CustomField::Queue Unimplemented in RT::Tickets.
(/opt/rt3/lib/RT/Tickets_Overlay.pm line 2470) 

I've used various flavors of this code, and anytime I try to call
LimitCustomField, I get this error...

I've been looking everywhere (including the RT Essentials book) for
something to explain this. I've been poking around Tickets.pm,
Tickets_Overlay.pm, etc... Just wanted to see if I was missing something
dumb before I started down a black hole....

Currently using RT v3.7.13 on Perl 5.8.8
-- 
Wes Young
Network Security Analyst
University at Buffalo
 -----------------------------------------------
| my OpenID:        | http://tinyurl.com/2zu2d3 |
 -----------------------------------------------