1 package FS::part_event::Condition::cust_status;
5 use base qw( FS::part_event::Condition );
6 use FS::Record qw( qsearch );
15 'status' => { 'label' => 'Customer Status',
16 'type' => 'select-cust_main-status',
23 my( $self, $object) = @_;
25 my $cust_main = $self->cust_main($object);
28 my $hashref = $self->option('status') || {};
29 $hashref->{ $cust_main->status };